Feval: On Carbon/MacOSX call mac_check_for_quit_char at each stack frame.

This may change/move as it could be quite time consuming
This commit is contained in:
Steven Tamm 2002-12-08 06:02:17 +00:00
parent 3605200c46
commit 824eb35eec

View file

@ -2160,6 +2160,10 @@ DEFUN ("eval", Feval, Seval, 1, 1, 0,
if (backtrace.debug_on_exit)
val = call_debugger (Fcons (Qexit, Fcons (val, Qnil)));
backtrace_list = backtrace.next;
#ifdef HAVE_CARBON
mac_check_for_quit_char();
#endif
return val;
}