From 639e56a4edaae413a238e62158503978c18545be Mon Sep 17 00:00:00 2001 From: Ludovic Courtes Date: Sun, 25 Jun 2006 22:43:33 +0000 Subject: [PATCH] Re-fixed the hash table element counting in `scm_i_rehash ()'. * libguile/hashtab.c (scm_i_rehash): Don't invoke `SCM_HASHTABLE_DECREMENT ()' when a weak pair is encountered in the source bucket. git-archimport-id: lcourtes@laas.fr--2005-libre/guile-core--boehm-gc--1.9--patch-43 --- libguile/hashtab.c | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/libguile/hashtab.c b/libguile/hashtab.c index 9671a47ea..633d26261 100644 --- a/libguile/hashtab.c +++ b/libguile/hashtab.c @@ -274,11 +274,8 @@ scm_i_rehash (SCM table, ls = SCM_CDR (ls); if (SCM_WEAK_PAIR_DELETED_P (handle)) - { - /* HANDLE is a nullified weak pair: skip it. */ - SCM_HASHTABLE_DECREMENT (table); - continue; - } + /* HANDLE is a nullified weak pair: skip it. */ + continue; h = hash_fn (SCM_CAR (handle), new_size, closure); if (h >= new_size) -- 2.20.1