summaryrefslogtreecommitdiff
path: root/libguile/eval.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/eval.h')
-rw-r--r--libguile/eval.h10
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))