diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2011-06-24 23:25:22 +0200 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2011-06-24 23:25:22 +0200 |
commit | 636ead85d008f74c264519673611d6c82204870f (patch) | |
tree | 3229cd25872d05e0d776a436284dee77721f0321 /src/alloc.c | |
parent | 7e30f7b6c7a8bdb1897da74891de42e9dc30bf0b (diff) | |
download | emacs-636ead85d008f74c264519673611d6c82204870f.tar.gz |
Move DEFSYM to lisp.h and use everywhere.
Diffstat (limited to 'src/alloc.c')
-rw-r--r-- | src/alloc.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/src/alloc.c b/src/alloc.c index 69623d103c3..43befd722bb 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -6251,8 +6251,7 @@ do hash-consing of the objects allocated to pure space. */); DEFVAR_LISP ("post-gc-hook", Vpost_gc_hook, doc: /* Hook run after garbage collection has finished. */); Vpost_gc_hook = Qnil; - Qpost_gc_hook = intern_c_string ("post-gc-hook"); - staticpro (&Qpost_gc_hook); + DEFSYM (Qpost_gc_hook, "post-gc-hook"); DEFVAR_LISP ("memory-signal-data", Vmemory_signal_data, doc: /* Precomputed `signal' argument for memory-full error. */); @@ -6266,11 +6265,8 @@ do hash-consing of the objects allocated to pure space. */); doc: /* Non-nil means Emacs cannot get much more Lisp memory. */); Vmemory_full = Qnil; - staticpro (&Qgc_cons_threshold); - Qgc_cons_threshold = intern_c_string ("gc-cons-threshold"); - - staticpro (&Qchar_table_extra_slots); - Qchar_table_extra_slots = intern_c_string ("char-table-extra-slots"); + DEFSYM (Qgc_cons_threshold, "gc-cons-threshold"); + DEFSYM (Qchar_table_extra_slots, "char-table-extra-slots"); DEFVAR_LISP ("gc-elapsed", Vgc_elapsed, doc: /* Accumulated time elapsed in garbage collections. |