Merge pull request #181 from gus-massa/17-6-Fxbit-SetP

Fix fxbit-set? signature
original commit: ac3ad102d8fccbb218de3ad2b7ab2e4a62a28fa7
This commit is contained in:
R. Kent Dybvig 2017-06-07 18:28:52 -04:00 committed by GitHub
commit 9368b13659
2 changed files with 3 additions and 1 deletions

2
LOG
View File

@ -477,3 +477,5 @@
- fix strip-fasl-file for immutable strings and vectors,
fix an $oops call, and fix a vector-index increment in hashing
strip.ss, 7.ss, newhash.ss, misc.ms
- fix signature of fxbit-set?
primdata.ss

View File

@ -72,7 +72,7 @@
(fxbit-count [sig [(fixnum) -> (fixnum)]] [flags arith-op cp02])
(fxlength [sig [(fixnum) -> (fixnum)]] [flags arith-op cp02])
(fxfirst-bit-set [sig [(fixnum) -> (fixnum)]] [flags arith-op cp02])
(fxbit-set? [sig [(fixnum sub-ufixnum) -> (fixnum)]] [flags pure cp02])
(fxbit-set? [sig [(fixnum sub-ufixnum) -> (boolean)]] [flags pure cp02])
(fxcopy-bit [sig [(fixnum sub-ufixnum bit) -> (fixnum)]] [flags arith-op cp02])
(fxbit-field [sig [(fixnum sub-ufixnum sub-ufixnum) -> (fixnum)]] [flags arith-op cp02 cp03])
(fxcopy-bit-field [sig [(fixnum sub-ufixnum sub-ufixnum fixnum) -> (fixnum)]] [flags arith-op cp02])