# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 762580071 0
# Node ID 752d4237f869ca0efe2d5e04c72099b6884474dd
# Parent  ddf57829cf03d180babd766100ccbe663277479d
(memory_signal_data): No longer static.
(syms_of_alloc): Stick Qerror onto memory_signal_data.

diff -r ddf57829cf03 -r 752d4237f869 src/alloc.c
--- a/src/alloc.c	Wed Mar 02 03:46:54 1994 +0000
+++ b/src/alloc.c	Wed Mar 02 03:47:51 1994 +0000
@@ -99,7 +99,7 @@
 char *pending_malloc_warning;
 
 /* Pre-computed signal argument for use when memory is exhausted.  */
-static Lisp_Object memory_signal_data;
+Lisp_Object memory_signal_data;
 
 /* Maximum amount of C stack to save when a GC happens.  */
 
@@ -2224,7 +2224,8 @@
 
   /* We build this in advance because if we wait until we need it, we might
      not be able to allocate the memory to hold it.  */
-  memory_signal_data = Fcons (build_string ("Memory exhausted"), Qnil);
+  memory_signal_data
+    = Fcons (Qerror, Fcons (build_string ("Memory exhausted"), Qnil));
   staticpro (&memory_signal_data);
 
   defsubr (&Scons);