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

fixes for signal handling

Browse Source
This commit is contained in:
Vítor Santos Costa 2014-09-02 22:24:01 -05:00
parent 99713d81a6
commit b942c1ef13
3 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
C/absmi.c
View File

@ -606,9 +606,6 @@ check_alarm_fail_int(int CONT USES_REGS)
return CONT;
}
#endif
if (Yap_get_signal( YAP_INT_SIGNAL ) ) {
Yap_Error(PURE_ABORT, TermNil, "abort from console");
}
if (Yap_get_signal( YAP_FAIL_SIGNAL )) {
return FALSE;
}

2
C/signals.c
View File

@ -107,7 +107,6 @@ ProcessSIGINT(void)
{
CACHE_REGS
int ch, out;
printf("H\n");
#if HAVE_ISATTY
if (!isatty(0)) {
return YAP_INT_SIGNAL;
@ -259,7 +258,6 @@ Yap_external_signal(int wid, yap_signals sig)
#endif
do_signal(wid, sig PASS_REGS);
LOCAL_PrologMode &= ~InterruptMode;
p_debug( PASS_REGS1 );
}
int

2
C/sysbits.c
View File

@ -1520,6 +1520,7 @@ ReceiveSignal (int s, void *x, void *y)
{
CACHE_REGS
LOCAL_PrologMode |= InterruptMode;
my_signal (s, ReceiveSignal);
switch (s)
{
case SIGINT:
@ -1577,6 +1578,7 @@ ReceiveSignal (int s, void *x, void *y)
fprintf(stderr, "\n[ Unexpected signal ]\n");
exit (s);
}
LOCAL_PrologMode &= ~InterruptMode;
}
#endif