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

Merge pull request #503 from jpellegrini/srfi-143

Browse source 
SRFI 143: `fx-{width,least,greatest}` are not procedures
This commit is contained in:
Justin Ethier 2023-03-04 10:15:36 -05:00 • committed by GitHub
commit bb707e8604
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
srfi/143.sld
View file

@ -36,9 +36,6 @@
fxbit-field-rotate fxbit-field-reverse
)
(inline
fx-width
fx-greatest
fx-least
fixnum?
fx=? fx<? fx>? fx<=? fx>=?
fxzero? fxpositive? fxnegative? fxodd? fxeven?
@ -56,9 +53,9 @@
mask
)
(begin
(define (fx-width) 31)
(define (fx-greatest) 1073741823)
(define (fx-least) -1073741824)
(define fx-width 31)
(define fx-greatest 1073741823)
(define fx-least -1073741824)
(define-syntax bin-num-op
(er-macro-transformer