diff options
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/alloc.c b/src/alloc.c index 47a8e4f4bd2..4226cb1d1a0 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -668,10 +668,10 @@ malloc_warning (const char *str) | |||
| 668 | void | 668 | void |
| 669 | display_malloc_warning (void) | 669 | display_malloc_warning (void) |
| 670 | { | 670 | { |
| 671 | call3 (intern ("display-warning"), | 671 | call3 (Qdisplay_warning, |
| 672 | intern ("alloc"), | 672 | Qalloc, |
| 673 | build_string (pending_malloc_warning), | 673 | build_string (pending_malloc_warning), |
| 674 | intern (":emergency")); | 674 | QCemergency); |
| 675 | pending_malloc_warning = 0; | 675 | pending_malloc_warning = 0; |
| 676 | } | 676 | } |
| 677 | 677 | ||
| @@ -8317,6 +8317,8 @@ N should be nonnegative. */); | |||
| 8317 | 4, 4, "watch_gc_cons_percentage", {0}, lisp_h_Qnil}}; | 8317 | 4, 4, "watch_gc_cons_percentage", {0}, lisp_h_Qnil}}; |
| 8318 | XSETSUBR (watcher, &Swatch_gc_cons_percentage.s); | 8318 | XSETSUBR (watcher, &Swatch_gc_cons_percentage.s); |
| 8319 | Fadd_variable_watcher (Qgc_cons_percentage, watcher); | 8319 | Fadd_variable_watcher (Qgc_cons_percentage, watcher); |
| 8320 | DEFSYM (Qalloc, "alloc"); | ||
| 8321 | DEFSYM (QCemergency, ":emergency"); | ||
| 8320 | } | 8322 | } |
| 8321 | 8323 | ||
| 8322 | #ifdef HAVE_X_WINDOWS | 8324 | #ifdef HAVE_X_WINDOWS |