pesky ^C and abort fixes (I hope)

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@236 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2001-12-18 22:01:26 +00:00
parent 7e22cb486f
commit 2b78d7ce14
12 changed files with 42 additions and 32 deletions

View File

@@ -298,7 +298,7 @@ absmi(int inp)
restore_absmi_regs(old_regs);
#endif
if (!growheap(FALSE)) {
Abort("[ SYSTEM ERROR: YAP failed to reserve space in growheap ]\n");
Error(SYSTEM_ERROR, TermNil, "YAP failed to reserve space in growheap");
FAIL();
}
goto reset_absmi;
@@ -2077,7 +2077,7 @@ absmi(int inp)
}
if (PrologMode & AbortMode) {
PrologMode &= ~AbortMode;
Abort("");
Error(PURE_ABORT, TermNil, "");
}
JMPNext();
}