error handling

This commit is contained in:
Vitor Santos Costa
2016-09-23 01:21:42 -05:00
parent 2bbc3b9265
commit f9655cccb6
3 changed files with 9 additions and 10 deletions

View File

@@ -136,7 +136,7 @@ protected:
YAPPredicate(const char *s0, Term &out, Term &names) {
CACHE_REGS
BACKUP_MACHINE_REGS();
Term *outp;
Term *modp = NULL;;
out = Yap_StringToTerm(s0, strlen(s0) + 1, &LOCAL_encoding, 1200, &names);
// extern char *s0;
@@ -145,7 +145,7 @@ protected:
// delete [] ns;
if (out == 0L)
throw YAPError();
ap = getPred(out, outp);
ap = getPred(out, modp);
RECOVER_MACHINE_REGS();
}