From 94d2b25c5e68337fb9363336daf1921c96af6071 Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Thu, 12 Oct 2000 03:00:41 +0200
Subject: [PATCH] Fixed some confusing output from locate_references.
Rev: src/gc.c:1.141
---
src/gc.c | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/src/gc.c b/src/gc.c
index 70f75d2fa8..f77b9fade5 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -30,7 +30,7 @@ struct callback *gc_evaluator_callback=0;
#include "block_alloc.h"
-RCSID("$Id: gc.c,v 1.140 2000/10/04 05:12:12 hubbe Exp $");
+RCSID("$Id: gc.c,v 1.141 2000/10/12 01:00:41 mast Exp $");
/* Run garbage collect approximately every time
* 20 percent of all arrays, objects and programs is
@@ -1048,11 +1048,16 @@ void locate_references(void *a)
gc_check_all_objects();
#ifdef PIKE_DEBUG
- if(master_object) gc_external_mark2(master_object,0," &master_object");
+ if(master_object) {
+ found_where = " as master_object";
+ gc_external_mark2(master_object,0," &master_object");
+ }
{
extern struct mapping *builtin_constants;
- if(builtin_constants)
+ if(builtin_constants) {
+ found_where = " as builtin_constants";
gc_external_mark2(builtin_constants,0," &builtin_constants");
+ }
}
#endif
--
GitLab