diff --git a/include/chibi/sexp.h b/include/chibi/sexp.h index 39a3ea58..d13c2c64 100644 --- a/include/chibi/sexp.h +++ b/include/chibi/sexp.h @@ -129,7 +129,7 @@ typedef unsigned int sexp_tag_t; typedef unsigned long sexp_uint_t; typedef long sexp_sint_t; #define sexp_heap_align(n) sexp_align(n, 5) -#elif __CYGWIN__ +#elif defined(__CYGWIN__) typedef unsigned short sexp_tag_t; typedef unsigned int sexp_uint_t; typedef int sexp_sint_t; diff --git a/lib/srfi/27/rand.c b/lib/srfi/27/rand.c index d70f8726..6e971df8 100644 --- a/lib/srfi/27/rand.c +++ b/lib/srfi/27/rand.c @@ -19,7 +19,7 @@ SEXP_RANDOM_STATE_SIZE, \ sexp_random_data(x)) -#if SEXP_BSD +#if SEXP_BSD || defined(__CYGWIN__) typedef unsigned int sexp_random_t; #define sexp_call_random(rs, dst) ((dst) = rand_r(sexp_random_data(rs))) #define sexp_seed_random(n, rs) *sexp_random_data(rs) = (n) @@ -85,7 +85,7 @@ static sexp sexp_random_real (sexp ctx sexp_api_params(self, n)) { return sexp_rs_random_real(ctx sexp_api_pass(self, n), default_random_source); } -#if SEXP_BSD +#if SEXP_BSD || defined(__CYGWIN__) static sexp sexp_make_random_source (sexp ctx sexp_api_params(self, n)) { sexp res;