(stream-contents-by-element) ( stream -- seq )

Vocabulary

io

Inputs

stream

an object

Outputs

seq

an object

Definition

USING: destructors io.private kernel sequences ;

IN: io

: (stream-contents-by-element) ( stream -- seq )
    [
        [ [ stream-read1 dup ] curry [ ] ]
        [ stream-exemplar produce-as nip ] bi
    ] with-disposal ; inline