# HG changeset patch
# User Steven Tamm <steventamm@mac.com>
# Date 1039327337 0
# Node ID 7b5cd8383f0bbb5b54da4f933f85ea6aaf978dc3
# Parent  a7aee9fdf21e953c0514a65bb260de75da9fdcab
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

diff -r a7aee9fdf21e -r 7b5cd8383f0b src/eval.c
--- a/src/eval.c	Sun Dec 08 06:00:10 2002 +0000
+++ b/src/eval.c	Sun Dec 08 06:02:17 2002 +0000
@@ -2160,6 +2160,10 @@
   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;
 }