summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-05-30 16:01:34 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-05-30 16:01:34 +0000
commit7272f6d8b83bf90cd036edcff4c554c09892f910 (patch)
tree64ce4ccfdd06677455ea1c43db39024f72b9f40c
parentb272843227b9d84c21e16129371a2d4a6a2e62f5 (diff)
downloadguile-7272f6d8b83bf90cd036edcff4c554c09892f910.tar.gz
* Don't use SCM_SMOB_PREDICATE in header file.
-rw-r--r--libguile/ChangeLog6
-rw-r--r--libguile/numbers.h2
2 files changed, 7 insertions, 1 deletions
diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index effe2a600..c18032c28 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,5 +1,11 @@
2000-05-30 Dirk Herrmann <D.Herrmann@tu-bs.de>
+ * numbers.h (SCM_BIGP): Don't use SCM_SMOB_PREDICATE in header
+ file: Code using numbers should not be required to include
+ smob.h.
+
+2000-05-30 Dirk Herrmann <D.Herrmann@tu-bs.de>
+
* coop-threads.c.cygnus, coop-threads.h.cygnus, fsu-pthreads.h,
mit-pthreads.c, mit-pthreads.h: Deleted.
diff --git a/libguile/numbers.h b/libguile/numbers.h
index 03cdf2ff7..14e18f8a7 100644
--- a/libguile/numbers.h
+++ b/libguile/numbers.h
@@ -173,7 +173,7 @@
#define SCM_NUMBERP(x) (SCM_INUMP(x) || SCM_NUMP(x))
#define SCM_NUMP(x) (!SCM_IMP(x) && (0xfcff & SCM_CELL_TYPE (x)) == scm_tc7_smob)
-#define SCM_BIGP(x) SCM_SMOB_PREDICATE (scm_tc16_big, x)
+#define SCM_BIGP(x) (!SCM_IMP (x) && (SCM_TYP16 (x) == scm_tc16_big))
#define SCM_BIGSIGNFLAG 0x10000L
#define SCM_BIGSIZEFIELD 17
#define SCM_BIGSIGN(x) (SCM_CELL_WORD_0 (x) & SCM_BIGSIGNFLAG)