use guile obarrays
authorBT Templeton <bt@hcoop.net>
Thu, 8 Aug 2013 04:26:57 +0000 (00:26 -0400)
committerRobin Templeton <robin@terpri.org>
Sun, 19 Apr 2015 07:43:01 +0000 (03:43 -0400)
commitd23d13c03ca02a56c7f7f95e5712e482b320629f
tree7fa28d49c6109204c8c229ebc96c7db48b882287
parentc0ff0ac2275b5311b5f347ab0a8a18530090625e
use guile obarrays

* src/alloc.c (initialize_symbol): New function, extracted from
  `Fmake_symbol'.
  (Fmake_symbol): Use `scm_make_symbol'.
* src/emacs.c (main2): Define a symbol module.
* src/lisp.h (SYMBOLP, XSYMBOL): Update.
  (set_symbol_next): Remove. All callers changed.
* src/lread.c (obhash): New function.
  (Fintern, Fintern_soft, Funintern, oblookup, map_obarray): Use Guile
  obarrays.
  (init_obarray): Initialize a hash table of obarrays.
* src/lread.c (Ffind_symbol): New function.
src/alloc.c
src/emacs.c
src/lisp.h
src/lread.c