Fix redumping with --enable-checking

diff --git a/src/pdumper.c b/src/pdumper.c
index 79946cc66f0e833ae73e341c5b9534f9cc5384f7..a9efaf3b6d5af33065a894da7725f278c4621b2a 100644 (file)
--- a/src/pdumper.c
+++ b/src/pdumper.c
@@ -2600,6 +2600,7 @@ hash_table_contents (Lisp_Object table)
 static void
 check_hash_table_rehash (Lisp_Object table_orig)
 {
+  hash_rehash_if_needed (XHASH_TABLE (table_orig));
   Lisp_Object table_rehashed = Fcopy_hash_table (table_orig);
   eassert (XHASH_TABLE (table_rehashed)->count >= 0);
   XHASH_TABLE (table_rehashed)->count *= -1;