From c5070877916874a8de59a31f61caabd116ef045f Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Mon, 12 Jun 2000 21:25:10 +0000 Subject: [PATCH] * iselect.c (SCM_NLONGBITS): Add workaround for the Sun 4.2 compiler. --- libguile/iselect.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/libguile/iselect.c b/libguile/iselect.c index fabd7f802..46ef923e7 100644 --- a/libguile/iselect.c +++ b/libguile/iselect.c @@ -69,7 +69,7 @@ extern void bzero (void *, size_t); #if LONG_MAX >> 16 == 0 #define SCM_NLONGBITS(p) (bc[((unsigned char *)(p))[0]]\ + bc[((unsigned char *)(p))[1]]) -#elif LONG_MAX >> 32 == 0 +#elif LONG_MAX >> 32 == 0 || LONG_MAX == 2147483647L /* bug in Sun CC 4.2 */ #define SCM_NLONGBITS(p) (bc[((unsigned char *)(p))[0]]\ + bc[((unsigned char *)(p))[1]]\ + bc[((unsigned char *)(p))[2]]\ @@ -83,6 +83,8 @@ extern void bzero (void *, size_t); + bc[((unsigned char *)(p))[5]]\ + bc[((unsigned char *)(p))[6]]\ + bc[((unsigned char *)(p))[7]]) +#else +#error Could not determine suitable definition for SCM_NLONGBITS #endif #ifdef HAVE_BZERO