From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 11 Mar 1993 19:53:49 +0000 (+0000)
Subject: Automatically disable GC reference trace at end of GC.
X-Git-Tag: 20090517-FFI~8421
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=980521f69f30087a63c75dd9027e543c556a906e;p=mit-scheme.git

Automatically disable GC reference trace at end of GC.
---

diff --git a/v7/src/microcode/memmag.c b/v7/src/microcode/memmag.c
index 56b5a27d8..0ff335416 100644
--- a/v7/src/microcode/memmag.c
+++ b/v7/src/microcode/memmag.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: memmag.c,v 9.48 1993/03/10 17:19:58 cph Exp $
+$Id: memmag.c,v 9.49 1993/03/11 19:53:49 cph Exp $
 
 Copyright (c) 1987-93 Massachusetts Institute of Technology
 
@@ -409,6 +409,8 @@ DEFUN_VOID (GC)
 	    Microcode_Termination (TERM_BROKEN_HEART);
 	  }
       }
+      gc_objects_referencing = SHARP_F;
+      gc_object_referenced = SHARP_F;
     }
 #endif