summaryrefslogtreecommitdiff
path: root/libguile/pairs.h
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-03-29 01:15:56 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-03-29 01:15:56 +0000
commitdd039d6dc6e48d1eb9cc4b0601a431e19a334eaa (patch)
treeeb568f6a7ab1fba912c3baea37b2582ffebf9afe /libguile/pairs.h
parent8b3bda20581d305b3ec9f59eb7caa97ebe648fc2 (diff)
downloadguile-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.h4
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))