summaryrefslogtreecommitdiffstats
path: root/unwind.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2023-01-20 22:39:17 -0800
committerKaz Kylheku <kaz@kylheku.com>2023-01-20 22:39:17 -0800
commitc6d7e940e105958e4303eba504cf147b7f428cdf (patch)
tree34bcb7d5f5cad29e415dca73392253e5eb0861fb /unwind.c
parent1a80b87961607dbf8026a98ee0c6fc4d3f7db96d (diff)
downloadtxr-c6d7e940e105958e4303eba504cf147b7f428cdf.tar.gz
txr-c6d7e940e105958e4303eba504cf147b7f428cdf.tar.bz2
txr-c6d7e940e105958e4303eba504cf147b7f428cdf.zip
fix --no-debug-support configuration.
* debug.h (debug_init): Define as ((void) 0) macro in the no debug support case. * unwind.h (uw_last_form_expanded): No-debug-support version must yield a value, not void. * unwind.c (ffcal_frame_type, eval_frame_type, expand_frame_type): Define only if CONFIG_DEBUG_SUPPORT is enabled, to suppress unused warnings. * eval.c (do_eval): Conditionally define debug-related code. The uw_push_eval function doesn't exist if CONFIG_DEBUG_SUPPORT isn't enabled.
Diffstat (limited to 'unwind.c')
-rw-r--r--unwind.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/unwind.c b/unwind.c
index b7419f8d..844c38aa 100644
--- a/unwind.c
+++ b/unwind.c
@@ -70,7 +70,9 @@ static val sys_cont_free_s, sys_capture_cont_s;
val catch_frame_s;
static val frame_type, catch_frame_type, handle_frame_type;
+#if CONFIG_DEBUG_SUPPORT
static val fcall_frame_type, eval_frame_type, expand_frame_type;
+#endif
static val deferred_warnings, tentative_defs;