diff options
Diffstat (limited to 'libguile/eval.h')
-rw-r--r-- | libguile/eval.h | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/libguile/eval.h b/libguile/eval.h index 2ce79fd5c..d34c723da 100644 --- a/libguile/eval.h +++ b/libguile/eval.h @@ -53,14 +53,14 @@ /* {Options} */ -extern scm_option scm_eval_opts[]; +extern scm_option_t scm_eval_opts[]; #define SCM_EVAL_STACK scm_eval_opts[0].val #define SCM_N_EVAL_OPTIONS 1 -extern int scm_eval_stack; +extern scm_bits_t scm_eval_stack; -extern scm_option scm_evaluator_trap_table[]; +extern scm_option_t scm_evaluator_trap_table[]; extern SCM scm_eval_options_interface (SCM setting); @@ -83,8 +83,8 @@ extern SCM scm_eval_options_interface (SCM setting); #define SCM_ICDR (0x00080000L) #define SCM_IFRINC (0x00000100L) #define SCM_IDSTMSK (-SCM_IDINC) -#define SCM_IFRAME(n) ((int)((SCM_ICDR-SCM_IFRINC)>>8) \ - & (SCM_UNPACK (n) >> 8)) +#define SCM_IFRAME(n) ((scm_bits_t)((SCM_ICDR-SCM_IFRINC)>>8) \ + & (SCM_UNPACK (n)) >> 8) #define SCM_IDIST(n) (SCM_UNPACK (n) >> 20) #define SCM_ICDRP(n) (SCM_ICDR & SCM_UNPACK (n)) |