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

win32 io -- keep same behavior as unix on .2 read

erg 2006-10-28 20:40:07 +00:00
parent 4a61a78a79
commit 8964e4ed26
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
library/io/windows/stream.factor
View File

@ -111,7 +111,7 @@ M: win32-stream-reader stream-read1 ( stream -- ch/f )
>r 1 r> consume-input >string-or-f first ; >r 1 r> consume-input >string-or-f first ;
M: win32-stream-reader stream-read ( n stream -- str/f ) M: win32-stream-reader stream-read ( n stream -- str/f )
swap >r win32-buffer-size <sbuf> r> do-read-count ; swap >fixnum >r win32-buffer-size <sbuf> r> do-read-count ;
M: win32-stream-writer stream-close ( stream -- ) M: win32-stream-writer stream-close ( stream -- )
dup maybe-flush-output dup maybe-flush-output