diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-04-03 08:47:51 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-04-03 08:47:51 +0000 |
commit | 54778cd31205b1f50397cf7bf92f7d8b37c99870 (patch) | |
tree | ca3676c72e75e70a0184e7c50084660e62e9d6a3 /libguile/lang.c | |
parent | abeed821987ec1476e6a7836f1ed8ba8a6185959 (diff) | |
download | guile-54778cd31205b1f50397cf7bf92f7d8b37c99870.tar.gz |
Lots of fixes to make guile (at some time) compile with strict typing.
Diffstat (limited to 'libguile/lang.c')
-rw-r--r-- | libguile/lang.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/lang.c b/libguile/lang.c index 21bd3ff8d..3b93462a9 100644 --- a/libguile/lang.c +++ b/libguile/lang.c @@ -137,7 +137,7 @@ SCM_DEFINE1 (scm_nil_eq, "nil-eq", scm_tc7_rpsubr, "") #define FUNC_NAME s_scm_nil_eq { - return (((x==y) + return ((SCM_EQ_P (x, y) || (SCM_NILP (x) && (SCM_NULLP (y) || SCM_FALSEP (y))) || (SCM_NILP (y) && (SCM_NULLP (x) || SCM_FALSEP (x)))) ? scm_lisp_t |