summaryrefslogtreecommitdiff
path: root/libguile/eval.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/eval.h')
-rw-r--r--libguile/eval.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/eval.h b/libguile/eval.h
index 1c05955b5..ddfcc1853 100644
--- a/libguile/eval.h
+++ b/libguile/eval.h
@@ -83,7 +83,7 @@ extern SCM scm_eval_options_interface (SCM setting);
#define SCM_IDSTMSK (-SCM_IDINC)
#define SCM_IFRAME(n) ((int)((SCM_ICDR-SCM_IFRINC)>>8) & ((int)(n)>>8))
#define SCM_IDIST(n) (((unsigned long)(n))>>20)
-#define SCM_ICDRP(n) (SCM_ICDR & (n))
+#define SCM_ICDRP(n) (SCM_ICDR & SCM_ASWORD(n))