diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-03-29 01:15:56 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-03-29 01:15:56 +0000 |
commit | dd039d6dc6e48d1eb9cc4b0601a431e19a334eaa (patch) | |
tree | eb568f6a7ab1fba912c3baea37b2582ffebf9afe /libguile/pairs.h | |
parent | 8b3bda20581d305b3ec9f59eb7caa97ebe648fc2 (diff) | |
download | guile-dd039d6dc6e48d1eb9cc4b0601a431e19a334eaa.tar.gz |
* New macro SCM_TRUE_P.
* Use SCM_EQ_P to compare SCM values.
Diffstat (limited to 'libguile/pairs.h')
-rw-r--r-- | libguile/pairs.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/pairs.h b/libguile/pairs.h index b07225698..96b0e47d7 100644 --- a/libguile/pairs.h +++ b/libguile/pairs.h @@ -52,8 +52,8 @@ -#define SCM_NULLP(x) (SCM_EOL == (x)) -#define SCM_NNULLP(x) (SCM_EOL != (x)) +#define SCM_NULLP(x) (SCM_EQ_P ((x), SCM_EOL)) +#define SCM_NNULLP(x) (!SCM_NULLP (x)) #define SCM_CAR(x) (SCM_CELL_OBJECT_0 (x)) #define SCM_CDR(x) (SCM_CELL_OBJECT_1 (x)) |