# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 762579898 0
# Node ID 854e14ecfa939a075ec28051d9aee3a8b21cb715
# Parent  d4e5878462cb425c0dc12778beee488c97a6b714
(struct handler): New field chosen_clause.
(memory_signal_data): Declare it.

diff -r d4e5878462cb -r 854e14ecfa93 src/lisp.h
--- a/src/lisp.h	Wed Mar 02 03:43:07 1994 +0000
+++ b/src/lisp.h	Wed Mar 02 03:44:58 1994 +0000
@@ -905,6 +905,9 @@
     /* The handler clauses and variable from the condition-case form.  */
     Lisp_Object handler;
     Lisp_Object var;
+    /* Fsignal stores here the condition-case clause that applies,
+       and Fcondition_case thus knows which clause to run.  */
+    Lisp_Object chosen_clause;
 
     /* Used to effect the longjump out to the handler.  */
     struct catchtag *tag;
@@ -918,6 +921,8 @@
 extern struct catchtag *catchlist;
 extern struct backtrace *backtrace_list;
 
+extern Lisp_Object memory_signal_data;
+
 /* An address near the bottom of the stack.
    Tells GC how to save a copy of the stack.  */
 extern char *stack_bottom;