sequence-read1 ( stream -- elt/f )


Vocabulary
io.streams.sequence

Inputs
streaman object


Outputs
elt/fan object


Definition
USING: accessors kernel math sequences ;

IN: io.streams.sequence

: sequence-read1 ( stream -- elt/f )
dup >sequence-stream< dupd ?nth [ 1 + swap i<< ] dip ;
inline