cleanup of CLPQR and CHR;
simplification of module handling; new timestamp implementation git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@52 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
3
C/exec.c
3
C/exec.c
@@ -917,6 +917,7 @@ do_goal(CODEADDR CodeAdr, int arity, CELL *pt, int args_to_save, int top)
|
||||
B->cp_depth = DEPTH;
|
||||
#endif /* DEPTH_LIMIT */
|
||||
if (top) {
|
||||
Term t;
|
||||
#if COROUTINING
|
||||
RESET_VARIABLE((CELL *)GlobalBase);
|
||||
DelayedVars = NewTimedVar((CELL)GlobalBase);
|
||||
@@ -924,6 +925,8 @@ do_goal(CODEADDR CodeAdr, int arity, CELL *pt, int args_to_save, int top)
|
||||
MutableList = NewTimedVar(TermNil);
|
||||
AttsMutableList = NewTimedVar(TermNil);
|
||||
#endif
|
||||
t = NewTimedVar(MkIntTerm(0));
|
||||
CurrentModulePtr = RepAppl(t)+1;
|
||||
}
|
||||
YENV = ASP = (CELL *)B;
|
||||
HB = H;
|
||||
|
Reference in New Issue
Block a user