diff options
Diffstat (limited to 'libguile/eval.h')
-rw-r--r-- | libguile/eval.h | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/libguile/eval.h b/libguile/eval.h index 06ad86969..4bd167f48 100644 --- a/libguile/eval.h +++ b/libguile/eval.h @@ -95,9 +95,11 @@ extern SCM scm_eval_options_interface (SCM setting); * * For an explanation of symbols containing "EVAL", see beginning of eval.c. */ -#define SCM_EVALIM2(x) ((SCM_EQ_P ((x), SCM_EOL)) \ - ? scm_misc_error (NULL, scm_s_expression, SCM_EOL), 0 \ - : (x)) +#define SCM_EVALIM2(x) \ + ((SCM_EQ_P ((x), SCM_EOL) \ + ? scm_misc_error (NULL, scm_s_expression, SCM_EOL), 0 \ + : 0), \ + (x)) #ifdef MEMOIZE_LOCALS #define SCM_EVALIM(x, env) (SCM_ILOCP (x) \ ? *scm_ilookup ((x), env) \ |