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

What was this doing?

Browse Source
This commit is contained in:
Vitor Santos Costa 2016-12-16 02:52:34 -06:00
parent c9309dce75
commit 0a043720b1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
C/exec.c
View File

@ -2077,7 +2077,7 @@ static Int jump_env(USES_REGS1) {
Term t2; Term t2;
Yap_find_prolog_culprit(PASS_REGS1); Yap_find_prolog_culprit(PASS_REGS1);
LOCAL_Error_TYPE = ERROR_EVENT; // LOCAL_Error_TYPE = ERROR_EVENT;
t = ArgOfTerm(1, t); t = ArgOfTerm(1, t);
if (IsApplTerm(t) && IsAtomTerm((t2 = ArgOfTerm(1, t)))) { if (IsApplTerm(t) && IsAtomTerm((t2 = ArgOfTerm(1, t)))) {
LOCAL_ActiveError.errorAsText = AtomOfTerm(t2); LOCAL_ActiveError.errorAsText = AtomOfTerm(t2);
@ -2087,7 +2087,7 @@ static Int jump_env(USES_REGS1) {
LOCAL_ActiveError.classAsText = NULL; LOCAL_ActiveError.classAsText = NULL;
} }
} else { } else {
LOCAL_Error_TYPE = THROW_EVENT; //LOCAL_Error_TYPE = THROW_EVENT;
} }
LOCAL_ActiveError.prologPredName = NULL; LOCAL_ActiveError.prologPredName = NULL;
Yap_PutException(t); Yap_PutException(t);