Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 05:39:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge pull request #747 from ilammy/sign-bit

Browse source 
Fix usage of signbit() in SRFI 144
This commit is contained in:
Alex Shinn 2021-06-06 13:59:13 +09:00 • committed by GitHub
commit ead366870b
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/srfi/144/math.stub
View file

@ -102,7 +102,8 @@
(define-c double frexp (double (result int))) (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 (flfinite? "isfinite") (double))
(define-c boolean (flinfinite? "isinf") (double)) (define-c boolean (flinfinite? "isinf") (double))