diff options
| author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-03-12 18:30:33 +0000 |
|---|---|---|
| committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-03-12 18:30:33 +0000 |
| commit | f12677062e15015d7ef7d36fe3d103a77d1fefca (patch) | |
| tree | e9ec3a99d2037b92f5c0c95e2a5b6e234b7ebb9d /libguile/boolean.h | |
| parent | 67673f7594ecd4768b9e6db847949406a9e10091 (diff) | |
| download | guile-f12677062e15015d7ef7d36fe3d103a77d1fefca.tar.gz | |
*** empty log message ***
Diffstat (limited to 'libguile/boolean.h')
| -rw-r--r-- | libguile/boolean.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/boolean.h b/libguile/boolean.h index 4825c17ac..fe2184823 100644 --- a/libguile/boolean.h +++ b/libguile/boolean.h @@ -64,7 +64,7 @@ /* SCM_BOOL_NOT returns the other boolean. * The order of ^s here is important for Borland C++ (!?!?!) */ -#define SCM_BOOL_NOT(x) SCM_SCM(SCM_BITS(x) ^ (SCM_BITS (SCM_BOOL_T) ^ SCM_BITS (SCM_BOOL_F))) +#define SCM_BOOL_NOT(x) SCM_PACK(SCM_UNPACK(x) ^ (SCM_UNPACK (SCM_BOOL_T) ^ SCM_UNPACK (SCM_BOOL_F))) |