From 20b63dce1695cfc2dfa94961d03da88a4cceaffb Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Tue, 2 Jul 2019 22:48:23 +0000 Subject: [PATCH] Fix bug#36477 --- src/fns.c | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/fns.c b/src/fns.c index 2fc000a7f4..375b7d2841 100644 --- a/src/fns.c +++ b/src/fns.c @@ -4223,6 +4223,11 @@ hash_table_rehash (struct Lisp_Hash_Table *h) { ptrdiff_t size = HASH_TABLE_SIZE (h); + h->next = Fcopy_sequence (h->next); + h->index = Fcopy_sequence (h->index); + h->hash = Fcopy_sequence (h->hash); + h->key_and_value = Fcopy_sequence (h->key_and_value); + /* Recompute the actual hash codes for each entry in the table. Order is still invalid. */ for (ptrdiff_t i = 0; i < size; ++i) -- 2.20.1