2 files changed, 9 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index c9389f6b..46a88252 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2014-02-01  Kaz Kylheku  <kaz@kylheku.com>
+
+	* lib.c (d): Disable garbage collection around the dump.
+	It's importa for this function not to have the side effect
+	of triggering garbage collection, when it is used for 
+	debugging issues that show up under --gc-debug.
+
 2014-01-31  Kaz Kylheku  <kaz@kylheku.com>
 
 	* configure: remove stray debugging printf from the
diff --git a/lib.c b/lib.c
index 4213f0d4..d490a2c1 100644
--- a/lib.c
+++ b/lib.c
@@ -5577,7 +5577,9 @@ void dump(val obj, val out)
  */
 void d(val obj)
 {
+  int save = gc_state(0);
   dump(obj, std_output);
+  gc_state(save);
 }
 
 /*