diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-05-27 22:00:03 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-05-27 22:00:03 +0000 |
commit | 729dbac32f9b3a8b2c6fe399f4e725549cecd1e7 (patch) | |
tree | b8ffb0687a7290e037a64aef646fee3747574db0 /libguile/eval.h | |
parent | fc62c86a599039709b22783a0abc552a5f33719e (diff) | |
download | guile-729dbac32f9b3a8b2c6fe399f4e725549cecd1e7.tar.gz |
* Changed the default definition of SCM.
* Fixed some typing problems detected by the above change.
* Fixed some problems that were detected by compiling guile with -W.
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) \ |