moved null streams to fix load order issue
parent
cf9fde020f
commit
11552b0254
|
@ -63,6 +63,7 @@ vectors words ;
|
||||||
"/library/io/stream.factor"
|
"/library/io/stream.factor"
|
||||||
"/library/io/duplex-stream.factor"
|
"/library/io/duplex-stream.factor"
|
||||||
"/library/io/stdio.factor"
|
"/library/io/stdio.factor"
|
||||||
|
"/library/io/null-stream.factor"
|
||||||
"/library/io/plain-stream.factor"
|
"/library/io/plain-stream.factor"
|
||||||
"/library/io/lines.factor"
|
"/library/io/lines.factor"
|
||||||
"/library/io/string-streams.factor"
|
"/library/io/string-streams.factor"
|
||||||
|
@ -181,6 +182,7 @@ vectors words ;
|
||||||
"/library/ui/editors.factor"
|
"/library/ui/editors.factor"
|
||||||
"/library/ui/splitters.factor"
|
"/library/ui/splitters.factor"
|
||||||
"/library/ui/incremental.factor"
|
"/library/ui/incremental.factor"
|
||||||
|
"/library/ui/paragraphs.factor"
|
||||||
"/library/ui/panes.factor"
|
"/library/ui/panes.factor"
|
||||||
"/library/ui/books.factor"
|
"/library/ui/books.factor"
|
||||||
"/library/ui/outliner.factor"
|
"/library/ui/outliner.factor"
|
||||||
|
|
|
@ -0,0 +1,19 @@
|
||||||
|
IN: io
|
||||||
|
USING: kernel ;
|
||||||
|
|
||||||
|
! Think '/dev/null'.
|
||||||
|
M: f stream-close drop ;
|
||||||
|
M: f set-timeout drop ;
|
||||||
|
|
||||||
|
M: f stream-readln drop f ;
|
||||||
|
M: f stream-read1 drop f ;
|
||||||
|
M: f stream-read 2drop f ;
|
||||||
|
|
||||||
|
M: f stream-write1 2drop ;
|
||||||
|
M: f stream-write 2drop ;
|
||||||
|
M: f stream-terpri drop ;
|
||||||
|
M: f stream-flush drop ;
|
||||||
|
|
||||||
|
M: f stream-format 3drop ;
|
||||||
|
M: f stream-break drop ;
|
||||||
|
M: f with-nested-stream rot drop with-stream* ;
|
|
@ -33,20 +33,3 @@ GENERIC: with-nested-stream ( style stream quot -- )
|
||||||
|
|
||||||
: stream-copy ( in out -- )
|
: stream-copy ( in out -- )
|
||||||
[ 2dup (stream-copy) ] [ stream-close stream-close ] cleanup ;
|
[ 2dup (stream-copy) ] [ stream-close stream-close ] cleanup ;
|
||||||
|
|
||||||
! Think '/dev/null'.
|
|
||||||
M: f stream-close drop ;
|
|
||||||
M: f set-timeout drop ;
|
|
||||||
|
|
||||||
M: f stream-readln drop f ;
|
|
||||||
M: f stream-read1 drop f ;
|
|
||||||
M: f stream-read 2drop f ;
|
|
||||||
|
|
||||||
M: f stream-write1 2drop ;
|
|
||||||
M: f stream-write 2drop ;
|
|
||||||
M: f stream-terpri drop ;
|
|
||||||
M: f stream-flush drop ;
|
|
||||||
|
|
||||||
M: f stream-format 3drop ;
|
|
||||||
M: f stream-break drop ;
|
|
||||||
M: f with-nested-stream rot drop with-stream* ;
|
|
||||||
|
|
Loading…
Reference in New Issue