From be39f59b4071b3c1e800369843752fc63f1588d7 Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Mon, 3 Jul 2000 20:38:26 +0200
Subject: [PATCH] Tighted up some debug checks.

Rev: src/gc.c:1.100
---
 src/gc.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/gc.c b/src/gc.c
index c4c1011201..96ff37c2fc 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -29,7 +29,7 @@ struct callback *gc_evaluator_callback=0;
 
 #include "block_alloc.h"
 
-RCSID("$Id: gc.c,v 1.99 2000/07/03 16:50:09 mast Exp $");
+RCSID("$Id: gc.c,v 1.100 2000/07/03 18:38:26 mast Exp $");
 
 /* Run garbage collect approximately every time
  * 20 percent of all arrays, objects and programs is
@@ -1553,9 +1553,9 @@ int gc_do_free(void *a)
 	(m->flags & (GC_TOUCHED|GC_MARKED|GC_IS_REFERENCED)) == GC_TOUCHED)
       gc_fatal(a, 0, "gc_do_free() called without prior call to "
 	       "gc_mark() or gc_is_referenced().\n");
-    if((m->flags & (GC_MARKED|GC_XREFERENCED)) == GC_XREFERENCED)
-      gc_fatal(a, 1, "Thing with external reference missed in gc mark pass.\n");
   }
+  if((m->flags & (GC_MARKED|GC_XREFERENCED)) == GC_XREFERENCED)
+    gc_fatal(a, 1, "Thing with external reference missed in gc mark pass.\n");
   if ((m->flags & (GC_DO_FREE|GC_LIVE)) == GC_LIVE) live_ref++;
   m->flags |= GC_DO_FREE;
 #endif
-- 
GitLab