peek-from ( n/f string m -- string )

Vocabulary

modern.slices

Inputs

n/f	an object
string	an object
m	an object

Outputs

string

an object

Definition

USING: kernel sequences ;

IN: modern.slices

: peek-from ( n/f string m -- string )
    over [ [ swap tail-slice ] dip head-slice ] [ 3drop f ] if ;