comparison src/alloc.c @ 6133:752d4237f869

(memory_signal_data): No longer static. (syms_of_alloc): Stick Qerror onto memory_signal_data.
author Richard M. Stallman <rms@gnu.org>
date Wed, 02 Mar 1994 03:47:51 +0000
parents 64417bbbb128
children 80569adf45e4
comparison
equal deleted inserted replaced
6132:ddf57829cf03 6133:752d4237f869
97 97
98 /* If nonzero, this is a warning delivered by malloc and not yet displayed. */ 98 /* If nonzero, this is a warning delivered by malloc and not yet displayed. */
99 char *pending_malloc_warning; 99 char *pending_malloc_warning;
100 100
101 /* Pre-computed signal argument for use when memory is exhausted. */ 101 /* Pre-computed signal argument for use when memory is exhausted. */
102 static Lisp_Object memory_signal_data; 102 Lisp_Object memory_signal_data;
103 103
104 /* Maximum amount of C stack to save when a GC happens. */ 104 /* Maximum amount of C stack to save when a GC happens. */
105 105
106 #ifndef MAX_SAVE_STACK 106 #ifndef MAX_SAVE_STACK
107 #define MAX_SAVE_STACK 16000 107 #define MAX_SAVE_STACK 16000
2222 which includes both saved text and other data."); 2222 which includes both saved text and other data.");
2223 undo_strong_limit = 30000; 2223 undo_strong_limit = 30000;
2224 2224
2225 /* We build this in advance because if we wait until we need it, we might 2225 /* We build this in advance because if we wait until we need it, we might
2226 not be able to allocate the memory to hold it. */ 2226 not be able to allocate the memory to hold it. */
2227 memory_signal_data = Fcons (build_string ("Memory exhausted"), Qnil); 2227 memory_signal_data
2228 = Fcons (Qerror, Fcons (build_string ("Memory exhausted"), Qnil));
2228 staticpro (&memory_signal_data); 2229 staticpro (&memory_signal_data);
2229 2230
2230 defsubr (&Scons); 2231 defsubr (&Scons);
2231 defsubr (&Slist); 2232 defsubr (&Slist);
2232 defsubr (&Svector); 2233 defsubr (&Svector);