diff options
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 b7a575a4a..85008579d 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) ((x) ^ (SCM_BOOL_T ^ SCM_BOOL_F)) +#define SCM_BOOL_NOT(x) SCM_ASSCM(SCM_ASWORD(x) ^ (SCM_ASWORD (SCM_BOOL_T) ^ SCM_ASWORD (SCM_BOOL_F))) |