fix longjmp RestartEnv to be performed by a single function.

This commit is contained in:
Vítor Santos Costa
2012-02-05 12:04:29 +00:00
parent 0b1c98d3f6
commit 123ef47171
7 changed files with 18 additions and 34 deletions

View File

@@ -1564,10 +1564,7 @@ InteractSIGINT(int ch) {
/* in case someone mangles the P register */
}
LOCAL_PrologMode &= ~AsyncIntMode;
#if PUSH_REGS
restore_absmi_regs(&Yap_standard_regs);
#endif
siglongjmp(LOCAL_RestartEnv,1);
Yap_RestartYap( 1 );
return -1;
case 'b':
/* continue */