suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix fasl-read signature

Browse Source 
primdata.ss

original commit: f54da8207572e9aa71d97352b3040c5c791a6dc1
This commit is contained in:
Gustavo Massaccesi 2020-03-01 11:35:42 -03:00
parent 68c114c930
commit 3018d8823a
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
LOG
View File

@ -1945,3 +1945,5 @@
compress_io.c, new_io.c, externs.h, compress_io.c, new_io.c, externs.h,
bytevector.ms, mats/Mf-base, root-experr* bytevector.ms, mats/Mf-base, root-experr*
io.stex, objects.stex, release_notes.stex io.stex, objects.stex, release_notes.stex
- fix fasl-read signature
primdata.ss

2
s/primdata.ss
View File

@ -1284,7 +1284,7 @@
(expand/optimize [sig [(ptr) (ptr environment) -> (ptr)]] [flags]) (expand/optimize [sig [(ptr) (ptr environment) -> (ptr)]] [flags])
(expt-mod [sig [(integer integer integer) -> (integer)]] [flags arith-op mifoldable discard]) (expt-mod [sig [(integer integer integer) -> (integer)]] [flags arith-op mifoldable discard])
(fasl-file [sig [(pathname pathname) -> (void)]] [flags true]) (fasl-file [sig [(pathname pathname) -> (void)]] [flags true])
(fasl-read [sig [(binary-input-port) (binary-input-port sub-symbol) -> (ptr)]] [flags true]) (fasl-read [sig [(binary-input-port) (binary-input-port sub-symbol) -> (ptr)]] [flags])
(fasl-write [sig [(sub-ptr binary-output-port) -> (void)]] [flags true]) (fasl-write [sig [(sub-ptr binary-output-port) -> (void)]] [flags true])
(file-access-time [sig [(pathname) (pathname ptr) -> (time)]] [flags discard]) (file-access-time [sig [(pathname) (pathname ptr) -> (time)]] [flags discard])
(file-change-time [sig [(pathname) (pathname ptr) -> (time)]] [flags discard]) (file-change-time [sig [(pathname) (pathname ptr) -> (time)]] [flags discard])