fix register recovery after ^c on Macs

fix 64 bit complaints.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1542 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2006-02-13 16:58:55 +00:00
parent bc82175e5e
commit 46f90fc6aa
5 changed files with 26 additions and 14 deletions

View File

@@ -1239,16 +1239,12 @@ exec_absmi(int top)
/* otherwise, SetDBForThrow will fail entering critical mode */
Yap_PrologMode = UserMode;
/* find out where to cut to */
#if defined(__GNUC__)
#if defined(hppa) || defined(__alpha)
/* siglongjmp resets the TR hardware register */
/* TR and B are crucial, they might have been changed, or not */
restore_TR();
#endif
#if defined(__alpha)
/* siglongjmp resets the H hardware register */
restore_B();
/* H is not so important, because we're gonna backtrack */
restore_H();
#endif
#endif
yap_flags[SPY_CREEP_FLAG] = 0;
LOCK(SignalLock);
CreepFlag = CalculateStackGap();