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

be careful: error handling may have changed PC in call_c_with_fail!

Browse Source
This commit is contained in:
Vitor Santos Costa 2009-05-09 23:40:17 -04:00
parent 5b527e7eeb
commit 61973a2be6
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
C/absmi.c
View File

@ -7598,10 +7598,13 @@ Yap_absmi(int inp)
SREG = (CELL *)((f)()); SREG = (CELL *)((f)());
setregs(); setregs();
} }
if (!SREG) if (!SREG) {
PREG = PREG->u.slp.l; /* be careful about error handling */
else if (PREG != FAILCODE)
PREG = PREG->u.slp.l;
} else {
PREG = NEXTOP(PREG, slp); PREG = NEXTOP(PREG, slp);
}
CACHE_A1(); CACHE_A1();
JMPNext(); JMPNext();
ENDBOp(); ENDBOp();