From f746b568d797d6b35571968b838d540147dde3f9 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sat, 1 Feb 2014 03:26:52 -0800 Subject: * 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. --- ChangeLog | 7 +++++++ lib.c | 2 ++ 2 files changed, 9 insertions(+) diff --git a/ChangeLog b/ChangeLog index c9389f6b..46a88252 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2014-02-01 Kaz Kylheku + + * 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 * 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); } /* -- cgit v1.2.3