* 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.

1 files changed, 2 insertions, 0 deletions

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);
 }
 
 /*