From 01591d175e7a6b1a1227b3676a6f195f42368869 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 10 Apr 1995 23:06:13 +0000 Subject: [PATCH] (internal_condition_case): Abort if interrupt_input_blocked>0. --- src/eval.c | 5 +++++ 1 file changed, 5 insertions(+) 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; -- 2.39.5