diff options
author | Marius Vollmer <mvo@zagadka.de> | 2005-01-02 20:49:04 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2005-01-02 20:49:04 +0000 |
commit | 4057a3e05afde62a4a5039668d129411958f330a (patch) | |
tree | f7240b20d7c05a0a944bfe7e2672ca9dd66f3cc8 /libguile/symbols.c | |
parent | f60539dba44057dbcf6179f30d4f03f44c46f0b6 (diff) | |
download | guile-4057a3e05afde62a4a5039668d129411958f330a.tar.gz |
Use new vector elements API or simple vector API, as appropriate.
Removed SCM_HAVE_ARRAYS ifdefery. Replaced all uses of
SCM_HASHTABLE_BUCKETS with SCM_HASHTABLE_BUCKET.
Diffstat (limited to 'libguile/symbols.c')
-rw-r--r-- | libguile/symbols.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/symbols.c b/libguile/symbols.c index b265e5ce4..204bc7446 100644 --- a/libguile/symbols.c +++ b/libguile/symbols.c @@ -98,7 +98,7 @@ scm_i_mem2symbol (SCM str) SCM l; - for (l = SCM_HASHTABLE_BUCKETS (symbols) [hash]; + for (l = SCM_HASHTABLE_BUCKET (symbols, hash); !scm_is_null (l); l = SCM_CDR (l)) { @@ -128,7 +128,7 @@ scm_i_mem2symbol (SCM str) SCM symbol = scm_i_make_symbol (str, 0, raw_hash, scm_cons (SCM_BOOL_F, SCM_EOL)); - SCM slot = SCM_HASHTABLE_BUCKETS (symbols) [hash]; + SCM slot = SCM_HASHTABLE_BUCKET (symbols, hash); SCM cell = scm_cons (symbol, SCM_UNDEFINED); SCM_SET_HASHTABLE_BUCKET (symbols, hash, scm_cons (cell, slot)); SCM_HASHTABLE_INCREMENT (symbols); |