diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix copy_term between constraints

Browse Source 
change visiited stack in unify to AuxSp because H can be changed
by woken goals


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@221 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2001-12-11 03:34:03 +00:00
parent 373a5439fa
commit 6a34f51a25
6 changed files with 59 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
C/corout.c
View File

@@ -326,7 +326,7 @@ copy_suspended_goals(sus_record *pt, CELL ***to_visit_ptr)
}
static int
CopySuspendedVar(Term orig, CELL ***to_visit_ptr)
CopySuspendedVar(CELL *orig, CELL ***to_visit_ptr, CELL *res)
{
register sus_tag *sreg = (sus_tag *)orig, *vs;
@@ -337,6 +337,7 @@ CopySuspendedVar(Term orig, CELL ***to_visit_ptr)
RESET_VARIABLE(&(vs->ActiveSus));
vs->sus_id = susp_ext;
vs->SG = copy_suspended_goals(sreg->SG, to_visit_ptr);
*res = (CELL)&(vs->ActiveSus);
UpdateTimedVar(DelayedVars, (CELL)(vs+1));
return(TRUE);
}