Use the new obarray type for the initial obarray

* src/lread.c (OBARRAY_SIZE): Remove.
(load_path_check): Create an obarray object instead of a vector.
The initial size is less important because it will grow as needed.

1 files changed, 1 insertions, 4 deletions

diff --git a/src/lread.c b/src/lread.c
index 01a51125b43..2251b4f2509 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -5440,13 +5440,10 @@ DEFUN ("internal--obarray-buckets",
   return Fnreverse (ret);
 }
 
-#define OBARRAY_SIZE 16384
-
 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);