summaryrefslogtreecommitdiff
path: root/libguile/debug.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/debug.h')
-rw-r--r--libguile/debug.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/debug.h b/libguile/debug.h
index f54156310..0f796a687 100644
--- a/libguile/debug.h
+++ b/libguile/debug.h
@@ -100,9 +100,9 @@ extern int scm_check_entry_p, scm_check_apply_p, scm_check_exit_p;
#define SCM_RESET_DEBUG_MODE \
{\
- if (SCM_ENTER_FRAME_P || SCM_BREAKPOINTS_P) CHECK_ENTRY = 1;\
- if (SCM_APPLY_FRAME_P || SCM_TRACE_P) CHECK_APPLY = 1;\
- if (SCM_EXIT_FRAME_P || SCM_TRACE_P) CHECK_EXIT = 1;\
+ CHECK_ENTRY = SCM_ENTER_FRAME_P || SCM_BREAKPOINTS_P;\
+ CHECK_APPLY = SCM_APPLY_FRAME_P || SCM_TRACE_P;\
+ CHECK_EXIT = SCM_EXIT_FRAME_P || SCM_TRACE_P;\
scm_debug_mode = SCM_DEVAL_P || CHECK_ENTRY || CHECK_APPLY || CHECK_EXIT;\
scm_ceval_ptr = scm_debug_mode ? scm_deval : scm_ceval;\
}