diff --git a/s/primdata.ss b/s/primdata.ss index 478b947443..63a10a748d 100644 --- a/s/primdata.ss +++ b/s/primdata.ss @@ -1303,7 +1303,7 @@ (expand/optimize [sig [(ptr) (ptr environment) -> (ptr)]] [flags]) (expt-mod [sig [(integer integer integer) -> (integer)]] [flags arith-op mifoldable discard]) (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]) (vfasl-convert-file [sig [(ptr ptr ptr) -> (void)]] [flags]) (file-access-time [sig [(pathname) (pathname ptr) -> (time)]] [flags discard])