summaryrefslogtreecommitdiff
path: root/src/eval.c
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-04-10 23:06:13 +0000
committerRichard M. Stallman <rms@gnu.org>1995-04-10 23:06:13 +0000
commit93499b6236c465cab79a40e461924decf96bc63e (patch)
treef48c8242c5f4ead77d109f4662aaa8c5ece0fc29 /src/eval.c
parent94422a2737857a4b20f32f047f20ed5bda54629f (diff)
downloademacs-93499b6236c465cab79a40e461924decf96bc63e.tar.gz
(internal_condition_case): Abort if interrupt_input_blocked>0.
Diffstat (limited to 'src/eval.c')
-rw-r--r--src/eval.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c
index eb90dbd131a..29136940c4e 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1086,6 +1086,11 @@ internal_condition_case (bfun, handlers, hfun)
struct catchtag c;
struct handler h;
+ /* Since Fsignal resets this to 0, it had better be 0 now
+ or else we have a potential bug. */
+ if (interrupt_input_blocked != 0)
+ abort ();
+
c.tag = Qnil;
c.val = Qnil;
c.backlist = backtrace_list;