mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

* Don't use SCM_SMOB_PREDICATE in header file.

Browse source
This commit is contained in:
Dirk Herrmann 2000-05-30 16:01:34 +00:00
parent b272843227
commit 7272f6d8b8
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/ChangeLog
View file

@ -1,3 +1,9 @@
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,

2
libguile/numbers.h
View file

@ -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)