steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

io: fix each-block-slice typo

db4
Joe Groff 2011-11-09 18:04:46 -08:00
parent 4f4bbd3304
commit b4947a62f6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/io/io.factor
View File

@ -182,7 +182,7 @@ USE: kernel.private
swap [ 65536 swap stream-read-partial ] curry each-morsel ; inline swap [ 65536 swap stream-read-partial ] curry each-morsel ; inline
: each-block-slice ( ... quot: ( ... block -- ... ) -- ... ) : each-block-slice ( ... quot: ( ... block -- ... ) -- ... )
input-stream get swap each-stream-block ; inline input-stream get swap each-stream-block-slice ; inline
: each-block ( ... quot: ( ... block -- ... ) -- ... ) : each-block ( ... quot: ( ... block -- ... ) -- ... )
input-stream get swap each-stream-block ; inline input-stream get swap each-stream-block ; inline
@ -214,7 +214,7 @@ USE: kernel.private
[ stream-write ] curry each-stream-block ; inline [ stream-write ] curry each-stream-block ; inline
: stream-copy ( in out -- ) : stream-copy ( in out -- )
[ [ stream-copy* ] with-disposal ] curry with-disposal ; [ [ stream-copy* ] with-disposal ] curry with-disposal ; inline
! Default implementations of stream operations in terms of read1/write1 ! Default implementations of stream operations in terms of read1/write1