===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/gc/new_hblk.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -p -r1.4 -r1.5
--- OpenXM_contrib2/asir2000/gc/new_hblk.c	2002/07/24 07:46:20	1.4
+++ OpenXM_contrib2/asir2000/gc/new_hblk.c	2002/07/24 08:00:11	1.5
@@ -247,6 +247,7 @@ int kind;
 	    ABORT("HBLK SZ inconsistency");
         }
 #   endif
+  if (GC_debugging_started) clear = TRUE;
 
   /* Allocate a new heap block */
     h = GC_allochblk(sz, kind, 0);