diff options
author | Andy Wingo <wingo@pobox.com> | 2016-04-01 21:31:06 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2016-04-04 16:30:56 +0200 |
commit | 8a0fc5117619c7c920092bb056af923f2bbaf343 (patch) | |
tree | 9f7df927416c5681a543b663b20bd3f6979e4d25 /libguile/backtrace.h | |
parent | 737e62f4b5a9ef771bd40aab793942ba409cfe8a (diff) | |
download | guile-8a0fc5117619c7c920092bb056af923f2bbaf343.tar.gz |
display-{application,-backtrace} delegate to Scheme
* libguile/backtrace.h:
* libguile/backtrace.c (print_frame_var, kw_count, print_frames_var)
(frame_to_stack_vector_var): New variables.
(init_print_frame_var)
(init_print_frames_var_and_frame_to_stack_vector_var): New functions.
(scm_set_print_params_x): Remove function.
(scm_display_application): Delegate to print-frame.
(display_backtrace_body, scm_display_backtrace_with_highlights):
Delegate to print-frames.
Diffstat (limited to 'libguile/backtrace.h')
-rw-r--r-- | libguile/backtrace.h | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/libguile/backtrace.h b/libguile/backtrace.h index 42bd26f2a..59de89dae 100644 --- a/libguile/backtrace.h +++ b/libguile/backtrace.h @@ -36,9 +36,6 @@ SCM_API SCM scm_display_backtrace (SCM stack, SCM port, SCM first, SCM depth); SCM_API SCM scm_display_backtrace_with_highlights (SCM stack, SCM port, SCM first, SCM depth, SCM highlights); SCM_API SCM scm_backtrace (void); SCM_API SCM scm_backtrace_with_highlights (SCM highlights); -#ifdef GUILE_DEBUG -SCM_API SCM scm_set_print_params_x (SCM params); -#endif SCM_INTERNAL void scm_init_backtrace (void); |