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

exception at fail could loop with bad env. #59

Browse Source
This commit is contained in:
Costa Vitor 2009-05-22 19:43:17 -05:00
parent b93e5fd300
commit c00facdd17
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
C/absmi.c
View File

@ -2759,6 +2759,7 @@ Yap_absmi(int inp)
SREG = (CELL *)RepPredProp(Yap_GetPredPropByAtom(AtomFail,0)); SREG = (CELL *)RepPredProp(Yap_GetPredPropByAtom(AtomFail,0));
/* make sure we have the correct environment for continuation */ /* make sure we have the correct environment for continuation */
ENV = B->cp_env; ENV = B->cp_env;
YENV = (CELL *)B;
goto creep; goto creep;
} }
/* don't do debugging and friends here */ /* don't do debugging and friends here */