summaryrefslogtreecommitdiff
path: root/libguile/eval.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/eval.h')
-rw-r--r--libguile/eval.h9
1 files changed, 4 insertions, 5 deletions
diff --git a/libguile/eval.h b/libguile/eval.h
index 7d856a00b..cc6f8e180 100644
--- a/libguile/eval.h
+++ b/libguile/eval.h
@@ -45,12 +45,11 @@ SCM_API SCM scm_eval_options_interface (SCM setting);
#define SCM_TRAPS_P scm_evaluator_trap_table[0].val
#define SCM_ENTER_FRAME_P scm_evaluator_trap_table[1].val
-#define SCM_APPLY_FRAME_P scm_evaluator_trap_table[2].val
-#define SCM_EXIT_FRAME_P scm_evaluator_trap_table[3].val
-#define SCM_ENTER_FRAME_HDLR (SCM_PACK (scm_evaluator_trap_table[4].val))
-#define SCM_APPLY_FRAME_HDLR (SCM_PACK (scm_evaluator_trap_table[5].val))
+#define SCM_ENTER_FRAME_HDLR (SCM_PACK (scm_evaluator_trap_table[2].val))
+#define SCM_APPLY_FRAME_P scm_evaluator_trap_table[3].val
+#define SCM_APPLY_FRAME_HDLR (SCM_PACK (scm_evaluator_trap_table[4].val))
+#define SCM_EXIT_FRAME_P scm_evaluator_trap_table[5].val
#define SCM_EXIT_FRAME_HDLR (SCM_PACK (scm_evaluator_trap_table[6].val))
-#define SCM_N_EVALUATOR_TRAPS 7