summaryrefslogtreecommitdiff
path: root/libguile/backtrace.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/backtrace.c')
-rw-r--r--libguile/backtrace.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/libguile/backtrace.c b/libguile/backtrace.c
index d0f4820ba..4d2534ad3 100644
--- a/libguile/backtrace.c
+++ b/libguile/backtrace.c
@@ -604,6 +604,8 @@ display_backtrace_body(struct display_backtrace_args *a)
display_frame (frame, nfield, indentation, sport, a->port, pstate);
}
+ scm_remember_upto_here_1 (print_state);
+
return SCM_UNSPECIFIED;
}
#undef FUNC_NAME