Mercurial > hg > xemacs-beta
diff src/symbols.c @ 247:e70b3a057e12 r20-5b22
Import from CVS: tag r20-5b22
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:18:21 +0200 |
parents | 51092a27c943 |
children | 677f6a0ee643 |
line wrap: on
line diff
--- a/src/symbols.c Mon Aug 13 10:17:55 2007 +0200 +++ b/src/symbols.c Mon Aug 13 10:18:21 2007 +0200 @@ -57,6 +57,8 @@ #include "buffer.h" /* for Vbuffer_defaults */ #include "console.h" +#include "elhash.h" /* for HASHTABLE_NONWEAK and HASHTABLE_EQ */ + Lisp_Object Qad_advice_info, Qad_activate; Lisp_Object Qget_value, Qset_value, Qbound_predicate, Qmake_unbound; @@ -3133,9 +3135,16 @@ { { symbol_value_forward_lheader_initializer, 0, 69}, SYMVAL_UNBOUND_MARKER }; +Lisp_Object Vpure_uninterned_symbol_table; + void init_symbols_once_early (void) { + /* see comment in Fpurecopy() */ + Vpure_uninterned_symbol_table = + make_lisp_hashtable (50, HASHTABLE_NONWEAK, HASHTABLE_EQ); + staticpro(&Vpure_uninterned_symbol_table); + Qnil = Fmake_symbol (make_pure_pname ((CONST Bufbyte *) "nil", 3, 1)); /* Bootstrapping problem: Qnil isn't set when make_pure_pname is called the first time. */