From 7ed9cd80c2e43d786d36db720092c0bf3134b910 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Mon, 31 Jan 2000 13:08:49 -0800
Subject: [PATCH] more debug for mappings
Rev: src/gc.c:1.44
---
src/gc.c | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/src/gc.c b/src/gc.c
index 18ec933c9f..c489d0b0c5 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -28,7 +28,7 @@ struct callback *gc_evaluator_callback=0;
#include "block_alloc.h"
-RCSID("$Id: gc.c,v 1.43 1999/09/25 20:50:15 grubba Exp $");
+RCSID("$Id: gc.c,v 1.44 2000/01/31 21:08:49 hubbe Exp $");
/* Run garbage collect approximate every time we have
* 20 percent of all arrays, objects and programs is
@@ -353,6 +353,8 @@ void describe_something(void *a, int t, int dm)
case T_MAPPING:
fprintf(stderr,"**Describing mapping:\n");
debug_dump_mapping((struct mapping *)a);
+ fprintf(stderr,"**Describing mapping data block:\n");
+ describe_something( ((struct mapping *)a)->data, -1, dm);
break;
case T_STRING:
--
GitLab