summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--hash.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/hash.c b/hash.c
index cc1b161f..d6e3d7a5 100644
--- a/hash.c
+++ b/hash.c
@@ -345,7 +345,7 @@ static val hash_equal_op(val left, val right)
} else {
ncons = or2(pop(&free_conses), cons(nil, nil));
rplaca(ncons, lcell);
- rplaca(ncons, pending);
+ rplacd(ncons, pending);
pending = ncons;
}
@@ -364,7 +364,7 @@ static val hash_equal_op(val left, val right)
} else {
ncons = or2(pop(&free_conses), cons(nil, nil));
rplaca(ncons, rcell);
- rplaca(ncons, pending);
+ rplacd(ncons, pending);
pending = ncons;
}
}