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

configuration fixes

Browse Source
This commit is contained in:
Vitor Santos Costa
2018-11-23 10:55:05 +00:00
parent 9be6eb9132
commit 999de8df19
5 changed files with 13 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
C/yap-args.c
View File

@@ -198,7 +198,7 @@ static bool consult(const char *b_file USES_REGS) {
t = ArgOfTerm(1, t);
if (IsApplTerm(t) && FunctorOfTerm(t) == functor_compile2) {
consult(RepAtom(AtomOfTerm(ArgOfTerm(1, t)))->StrOfAE);
Yap_PopException();
Yap_ResetException(LOCAL_ActiveError);
} else {
YAP_RunGoalOnce(t);
}