Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-04 03:36:34 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

SRFI 143: fx-{width,least,greatest} are not procedures

Browse source 
In the SRFI text, these are constants:

fx-width
fx-greatest
fx-least

But they were implemented as procedures in Cyclone.

This patch changes that, so they now are implemented
as constants.
This commit is contained in:
Jeronimo Pellegrini 2023-03-04 06:53:53 -03:00
parent cb67aeb0a3
commit b60bfc266b
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