diff --git a/.gitignore b/.gitignore index faccf25e8..dbae7786b 100644 --- a/.gitignore +++ b/.gitignore @@ -215,3 +215,4 @@ cmake/docs/Doxyfile *.stackdump *.gz +.Rproj.user diff --git a/C/exec.c b/C/exec.c index 27a873971..f7098440f 100755 --- a/C/exec.c +++ b/C/exec.c @@ -1628,10 +1628,10 @@ static bool exec_absmi(bool top, yap_reset_t reset_mode USES_REGS) { pop_text_stack(i + 1); return out; } + void Yap_PrepGoal(arity_t arity, CELL *pt, YAP_dogoalinfo *gip USES_REGS) { -void Yap_PrepGoal(arity_t arity, CELL *pt, YAP_dogoalinfo *gip USES_REGS) { /* create an initial pseudo environment so that when garbage - collection is going up in the environment chain it doesn't get + collection is going up in the environment chain it doesn't ge t confused */ Yap_ResetException(worker_id); // sl = Yap_InitSlot(t); @@ -1652,7 +1652,7 @@ void Yap_PrepGoal(arity_t arity, CELL *pt, YAP_dogoalinfo *gip USES_REGS) { /* keep a place where you can inform you had an exception */ if (pt) { int i; - for (i = 0; i < arity; i++) { + for (i = 0; i < 3; i++) { XREGS[i + 1] = *pt++; } } @@ -1678,7 +1678,7 @@ void Yap_PrepGoal(arity_t arity, CELL *pt, YAP_dogoalinfo *gip USES_REGS) { static bool do_goal(yamop *CodeAdr, int arity, CELL *pt, YAP_dogoalinfo *gi, bool top USES_REGS) { bool out; - Yap_PrepGoal(arity, pt, gi PASS_REGS); + Yap_PrepGoal(arity, pt, gi PASS_REGS); // CACHE_A1(); P = (yamop *)CodeAdr; // S = CellPtr(RepPredProp( diff --git a/CMakeLists.txt b/CMakeLists.txt index e0600e0fd..7cb812396 100755 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -1,4 +1,3 @@ - # value of 3.4.0 or lower. cmake_minimum_required(VERSION 3.4) @@ -905,11 +904,7 @@ add_subDIRECTORY(packages/ProbLog) endif() -if (WITH_MINISAT) - -add_subDIRECTORY(packages/swi-minisat2) - -endif() +add_subDIRECTORY(packages/bee) if (WITH_CLPQR) diff --git a/H/Yapproto.h b/H/Yapproto.h index 5e1999050..5ddce5ee5 100755 --- a/H/Yapproto.h +++ b/H/Yapproto.h @@ -203,12 +203,12 @@ extern void Yap_fail_all(choiceptr bb USES_REGS); extern Term Yap_ExecuteCallMetaCall(Term,Term); extern void Yap_InitExecFs(void); extern bool Yap_JumpToEnv(void); -extern Term Yap_RunTopGoal(Term, bool); +extern Term Yap_RunTopGoal(Term, YAP_dogoalinfo *gip,bool); extern bool Yap_execute_goal(Term, int, Term, bool); extern bool Yap_exec_absmi(bool, yap_reset_t); extern void Yap_trust_last(void); extern void Yap_closeGoal(bool out, yamop *saved_p, yamop * saved_cp, Int saved_e, Int saved_b, yhandle_t hdl, bool pass_ex); -extern void Yap_PrepGoal(UInt, CELL *, choiceptr USES_REGS); +extern void Yap_PrepGoal(arity_t arity, CELL *pt, YAP_dogoalinfo *gip USES_REGS); extern bool Yap_execute_pred(struct pred_entry *ppe, CELL *pt, bool pass_exception USES_REGS); extern int Yap_dogc(int extra_args, Term *tp USES_REGS); diff --git a/H/fields.h b/H/fields.h index bc486302e..d60ec86c5 100644 --- a/H/fields.h +++ b/H/fields.h @@ -34,7 +34,7 @@ #define HENVYOP(N, NAME, op, NEXTNAME, PFAIL) DEF NAME Yap_heap_regs->NAME##_ #define HCPYOP(N, NAME, OP, FAILP) DEF NAME Yap_heap_regs->NAME##_ -#include "heap.h" +#include "YapHeap.h" #undef HM #undef HSPACE @@ -72,7 +72,7 @@ DEF GLOBAL_##NAME Yap_heap_regs->NAME##_ #define HCPYOP(N, NAME, OP, FAILP) DEF GLOBAL_##NAME Yap_heap_regs->NAME##_ -#include "heap.h" +#include "YapHeap.h" #undef LOC #undef LOCL diff --git a/H/locals.h b/H/locals.h index 7380c1c5d..e42e9dcd2 100644 --- a/H/locals.h +++ b/H/locals.h @@ -3,7 +3,7 @@ // Macro support #ifndef LOCAL #include "Yap.h" -#include "heap.h" +#include "YapHeap.h" #define LOCAL(A, B) A B #define LOCAL_INIT(A, B, C) \ A B; \ diff --git a/pl/boot.yap b/pl/boot.yap index 941e1c8c7..377e5db00 100644 --- a/pl/boot.yap +++ b/pl/boot.yap @@ -267,7 +267,7 @@ initialize_prolog :- :- c_compile( 'protect.yap' ). :- ['absf.yap']. -%:- stop_low_level_trace. +%:- ..............................lp------------------------------------------------------------------. :- use_module('error.yap'). :- [