diff --git a/lib/srfi/144/math.stub b/lib/srfi/144/math.stub index b6ebf5d5..d0abbcf0 100644 --- a/lib/srfi/144/math.stub +++ b/lib/srfi/144/math.stub @@ -102,7 +102,8 @@ (define-c double frexp (double (result int))) -(define-c int (sign-bit "signbit") (double)) +(c-declare "#define sign_bit(v) (!!signbit(v))") +(define-c int sign-bit (double)) (define-c boolean (flfinite? "isfinite") (double)) (define-c boolean (flinfinite? "isinf") (double))