mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Use the new obarray type for the initial obarray

Browse source 
This can improve performance a lot, especially after the obarray has
been fed many symbols.

* src/lread.c (OBARRAY_SIZE): Remove.
(load_path_check): Create an obarray object instead of a vector.
This commit is contained in:
Mattias Engdegård 2024-02-11 15:11:21 +01:00
parent 462d8ba813
commit 3ea77c735d
1 changed files with 1 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/lread.c
View file

@ -5446,13 +5446,10 @@ DEFUN ("internal--obarray-buckets",
return Fnreverse (ret);
}
#define OBARRAY_SIZE 15121
void
init_obarray_once (void)
{
/* FIXME: use PVEC_OBARRAY */
Vobarray = make_vector (OBARRAY_SIZE, make_fixnum (0));
Vobarray = make_obarray (15);
initial_obarray = Vobarray;
staticpro (&initial_obarray);