<peek-stream> ( stream -- stream )

Vocabulary

io.streams.peek

Inputs

stream

an object

Outputs

stream

an object

Definition

USING: accessors kernel ;

IN: io.streams.peek

: <peek-stream> ( stream -- stream )
    peek-stream new swap >>stream 64 over stream-new-resizable
    >>peeked ; inline