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

make sure we always look for slots if called from user code. 

oops beautifications.
This commit is contained in:
Vítor Santos Costa 2010-05-04 14:53:34 +01:00
parent 2be8bcb482
commit aadbb136f5
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
C/c_interface.c
View File

@ -1019,6 +1019,10 @@ YAP_cut_up(void)
}
}
#endif /* CUT_C */
/* This is complicated: make sure we can restore the ASP
pointer back to where cut_up called it. Slots depend on it. */
if (ENV > B->cp_env)
ASP = B->cp_env;
#ifdef YAPOR
{
choiceptr cut_pt;
@ -1033,7 +1037,6 @@ YAP_cut_up(void)
B = B->cp_b; /* cut_fail */
#endif
HB = B->cp_h; /* cut_fail */
RECOVER_B();
}