fixes for copy_term

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1041 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2004-04-19 17:06:51 +00:00
parent 572690acd8
commit ea52ce8b26
3 changed files with 7 additions and 34 deletions

View File

@@ -315,7 +315,8 @@ copy_suspended_goals(sus_record *pt, CELL ***to_visit_ptr)
to_visit[0] = &(pt->SG)-1;
to_visit[1] = &(pt->SG);
to_visit[2] = &(gf->SG);
*to_visit_ptr = to_visit+3;
to_visit[3] = (CELL *)(*to_visit[0]);
*to_visit_ptr = to_visit+4;
#ifdef MULTI_ASSIGNMENT_VARIABLES
gf->NS = UpdateSVarList(gf);
#endif