summaryrefslogtreecommitdiff
path: root/libguile/properties.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>2003-02-19 16:16:46 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>2003-02-19 16:16:46 +0000
commit231a4ea849085615dc2d7bd805c8e8025495bfe2 (patch)
tree8a06f100bd487c2806608489f6190e03c3656891 /libguile/properties.c
parent110beb83a514da75c488448e4118219c2da8df19 (diff)
downloadguile-231a4ea849085615dc2d7bd805c8e8025495bfe2.tar.gz
* environments.c (DEFAULT_OBARRAY_SIZE): Changed from 137 to 31
(since hash tables now adapt their size). * modules.c (scm_modules_prehistory): Changed from 2001 to 1533 (current number of prehistory bindings; hashtable code will select a prime which is greater than this value). * symbols.c (scm_symbols_prehistory): Changed from 1009 to 2139 (current number of initial symbols). * properties.c (scm_init_properties): Don't specify size of scm_properties_whash. * objprop.c (scm_init_objprop): Don't specify size of scm_object_whash. * keywords.c (scm_init_keywords): Don't specify a hash table size.
Diffstat (limited to 'libguile/properties.c')
-rw-r--r--libguile/properties.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/properties.c b/libguile/properties.c
index c70df6560..b3b057227 100644
--- a/libguile/properties.c
+++ b/libguile/properties.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1995,1996,2000,2001 Free Software Foundation, Inc.
+/* Copyright (C) 1995,1996,2000,2001, 2003 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
@@ -147,7 +147,7 @@ SCM_DEFINE (scm_primitive_property_del_x, "primitive-property-del!", 2, 0, 0,
void
scm_init_properties ()
{
- scm_properties_whash = scm_make_weak_key_hash_table (SCM_MAKINUM (511));
+ scm_properties_whash = scm_make_weak_key_hash_table (SCM_UNDEFINED);
#include "libguile/properties.x"
}