From 14067ea7abe81564d66a3654242508e18b9cb6f0 Mon Sep 17 00:00:00 2001
From: Chong Yidong <cyd@stupidchicken.com>
Date: Thu, 15 May 2008 02:45:44 +0000
Subject: [PATCH] (init_fns): Don't initialize weak_hash_tables here.
 (init_weak_hash_tables): New fun.  Initialize weak_hash_tables.

---
 src/fns.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/fns.c b/src/fns.c
index 98a043683f9..b4c84b16f70 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -4257,6 +4257,12 @@ hash_clear (h)
 			   Weak Hash Tables
  ************************************************************************/
 
+void
+init_weak_hash_tables ()
+{
+  weak_hash_tables = NULL;
+}
+
 /* Sweep weak hash table H.  REMOVE_ENTRIES_P non-zero means remove
    entries from the table that don't survive the current GC.
    REMOVE_ENTRIES_P zero means mark entries that are in use.  Value is
@@ -5284,7 +5290,6 @@ both `use-dialog-box' and this variable are non-nil.  */);
 void
 init_fns ()
 {
-  weak_hash_tables = NULL;
 }
 
 /* arch-tag: 787f8219-5b74-46bd-8469-7e1cc475fa31
-- 
2.39.2