fixes to?\012handle interrupts ^C in Windows.

Improvements to configure scripts for WIN32 configurations.
--with-readline= option for configure


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@96 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2001-06-22 17:53:36 +00:00
parent c3e7f600d5
commit f22f7434c7
25 changed files with 1070 additions and 769 deletions

View File

@@ -249,22 +249,20 @@ Abort (char *format,...)
#ifdef DEBUGX
DumpActiveGoals();
#endif /* DEBUG */
if (PrologMode & BootMode)
{
exit_yap (1, NIL);
}
else
{
CreepFlag = CalculateStackGap();
if (PrologMode & BootMode) {
exit_yap (1, NIL);
} else {
PutValue(AtomThrow, MkAtomTerm(AtomFalse));
CreepFlag = CalculateStackGap();
#if PUSH_REGS
restore_absmi_regs(&standard_regs);
restore_absmi_regs(&standard_regs);
#endif
#if defined(__GNUC__) && defined(hppa)
/* siglongjmp resets the TR hardware register */
save_TR();
/* siglongjmp resets the TR hardware register */
save_TR();
#endif
siglongjmp (RestartEnv, 1);
}
siglongjmp (RestartEnv, 1);
}
}