make sure we do trim_trail whenever we mess with B!

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2258 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2008-06-04 14:47:18 +00:00
parent 08422c967a
commit 175a0ba6dd
8 changed files with 204 additions and 183 deletions

View File

@@ -1789,7 +1789,7 @@ p_restore_regs2(void)
#endif /* TABLING */
B = pt0;
HB = B->cp_h;
/* trim_trail();*/
Yap_TrimTrail();
}
return(TRUE);
}
@@ -1852,7 +1852,8 @@ p_cut_up_to_next_disjunction(void) {
abolish_incomplete_subgoals(B);
#endif /* TABLING */
}
/* trim_trail(); */
HB = B->cp_h;
Yap_TrimTrail();
return TRUE;
}