summaryrefslogtreecommitdiff
path: root/libguile/gc.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-12-08 13:41:56 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-12-08 13:41:56 +0000
commit93d40df216ff9d8b528d67d20b7867e31ad89827 (patch)
tree7431e3bcb9be96c8884e8b5f988f5131e158d4fd /libguile/gc.c
parent23670993da5437eb5560559b45164eae539f3319 (diff)
downloadguile-93d40df216ff9d8b528d67d20b7867e31ad89827.tar.gz
* Guile does not assume a hash table size of scm_symhash_dim any more.
Diffstat (limited to 'libguile/gc.c')
-rw-r--r--libguile/gc.c9
1 files changed, 6 insertions, 3 deletions
diff --git a/libguile/gc.c b/libguile/gc.c
index b50281cda..e04d50b18 100644
--- a/libguile/gc.c
+++ b/libguile/gc.c
@@ -2506,9 +2506,12 @@ scm_init_storage (scm_sizet init_heap_size_1, int gc_trigger_1,
scm_listofnull = scm_cons (SCM_EOL, SCM_EOL);
scm_nullstr = scm_makstr (0L, 0);
scm_nullvect = scm_make_vector (SCM_INUM0, SCM_UNDEFINED);
- scm_symhash = scm_make_vector (SCM_MAKINUM (scm_symhash_dim), SCM_EOL);
- scm_weak_symhash = scm_make_weak_key_hash_table (SCM_MAKINUM (scm_symhash_dim));
- scm_symhash_vars = scm_make_vector (SCM_MAKINUM (scm_symhash_dim), SCM_EOL);
+
+#define DEFAULT_SYMHASH_SIZE 277
+ scm_symhash = scm_make_vector (SCM_MAKINUM (DEFAULT_SYMHASH_SIZE), SCM_EOL);
+ scm_weak_symhash = scm_make_weak_key_hash_table (SCM_MAKINUM (DEFAULT_SYMHASH_SIZE));
+ scm_symhash_vars = scm_make_vector (SCM_MAKINUM (DEFAULT_SYMHASH_SIZE), SCM_EOL);
+
scm_stand_in_procs = SCM_EOL;
scm_permobjs = SCM_EOL;
scm_protects = scm_make_vector (SCM_MAKINUM (31), SCM_EOL);