summaryrefslogtreecommitdiffstats
path: root/hash.c
diff options
context:
space:
mode:
Diffstat (limited to 'hash.c')
-rw-r--r--hash.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/hash.c b/hash.c
index 618acc75..c2dee744 100644
--- a/hash.c
+++ b/hash.c
@@ -455,7 +455,7 @@ void hash_process_weak(void)
for (iter = pchain; !gc_is_reachable(*iter); ) {
val entry = car(*iter);
- if (!gc_is_reachable(entry) && !gc_is_reachable(car(entry)))
+ if (!gc_is_reachable(entry) && !gc_is_reachable(cdr(entry)))
*iter = cdr(*iter);
else
iter = cdr_l(*iter);