~ chicken-core (chicken-5) 69510911f2fb816f2550b7554903cf01cbfd8823
commit 69510911f2fb816f2550b7554903cf01cbfd8823 Author: Evan Hanson <evhan@foldling.org> AuthorDate: Mon Sep 5 22:37:03 2016 +1200 Commit: Evan Hanson <evhan@foldling.org> CommitDate: Sat Sep 10 22:58:21 2016 +1200 Trace temp stack resizing with "-:g" rather than "-:d" diff --git a/runtime.c b/runtime.c index e930b883..5d2863bd 100644 --- a/runtime.c +++ b/runtime.c @@ -2803,8 +2803,9 @@ void C_save_and_reclaim(void *trampoline, int n, C_word *av) if(fixed_temporary_stack_size) panic(C_text("fixed temporary stack overflow (\"apply\" called with too many arguments?)")); - if(debug_mode) { - C_dbg(C_text("debug"), C_text("resizing temporary stack dynamically from " UWORD_COUNT_FORMAT_STRING "k to " UWORD_COUNT_FORMAT_STRING "k ...\n"), + + if(gc_report_flag) { + C_dbg(C_text("GC"), C_text("resizing temporary stack dynamically from " UWORD_COUNT_FORMAT_STRING "k to " UWORD_COUNT_FORMAT_STRING "k ...\n"), C_wordstobytes(temporary_stack_size) / 1024, C_wordstobytes(new_size) / 1024); }Trap