1 files changed, 1 insertions, 1 deletions
diff --git a/hash.c b/hash.c
index 384a741d..d0bd4ac5 100644
--- a/hash.c
+++ b/hash.c
@@ -427,7 +427,7 @@ val remhash(val hash, val key)
 
   if (existing) {
     val loc = memq(existing, *pchain);
-    *pchain = nappend2(ldiff(*pchain, loc), cdr(loc));
+    set(*pchain, nappend2(ldiff(*pchain, loc), cdr(loc)));
     h->count--;
     bug_unless (h->count >= 0);
   }