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

fix left-over slots

This commit is contained in:
Vitor Santos Costa 2014-02-09 10:44:43 +00:00
parent 2c12c7917b
commit f26cb133b9
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/c_interface.c
View File

@ -1780,6 +1780,7 @@ YAP_ExecuteFirst(PredEntry *pe, CPredicate exec_code)
}
} else {
Int ret = (exec_code)( PASS_REGS1 );
LOCAL_CurSlot = CurSlot;
if (!ret) {
Term t;
@ -1907,6 +1908,7 @@ YAP_ExecuteNext(PredEntry *pe, CPredicate exec_code)
return TRUE;
} else {
Int ret = (exec_code)( PASS_REGS1 );
LOCAL_CurSlot = CurSlot;
if (!ret) {
Term t;