diff options
Diffstat (limited to 'libguile/eval.h')
-rw-r--r-- | libguile/eval.h | 9 |
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 |