io.streams.duplex: use >duplex-stream<.

freebsd-work
John Benediktsson 2019-01-10 20:35:32 -08:00
parent 15fff4a1fd
commit c2684d5875
1 changed files with 1 additions and 1 deletions

View File

@ -19,7 +19,7 @@ INSTANCE: duplex-stream output-stream
: >duplex-stream< ( stream -- in out ) [ in>> ] [ out>> ] bi ; inline
M: duplex-stream stream-element-type
[ in>> ] [ out>> ] bi
>duplex-stream<
[ stream-element-type ] bi@
2dup eq? [ drop ] [ "Cannot determine element type" throw ] if ;