From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Sun, 8 Feb 1987 12:28:47 +0000 (+0000)
Subject: Unnecessary and incorrect reinitialization of Weak_Chain.
X-Git-Tag: 20090517-FFI~13715
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=2ca5575facf253397c2a20fd83e0d86dc29086af;p=mit-scheme.git

Unnecessary and incorrect reinitialization of Weak_Chain.
---

diff --git a/v7/src/microcode/memmag.c b/v7/src/microcode/memmag.c
index 5c17d4ac8..37fbef6e2 100644
--- a/v7/src/microcode/memmag.c
+++ b/v7/src/microcode/memmag.c
@@ -30,7 +30,7 @@ Technology nor of any adaptation thereof in any advertising,
 promotional, or sales literature without prior written consent from
 MIT in each case. */
 
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/memmag.c,v 9.24 1987/02/07 15:25:07 jinx Exp $ */
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/memmag.c,v 9.25 1987/02/08 12:28:47 jinx Exp $ */
 
 /* Memory management top level.
 
@@ -333,7 +333,6 @@ Built_In_Primitive(Prim_Garbage_Collect, 1, "GARBAGE-COLLECT")
   }
   GC_Reserve = Get_Integer(Arg1);
   GCFlip();
-  Weak_Chain = NULL;
   GC();
   IntCode &= ~INT_GC;
   if (GC_Check(GC_Space_Needed))