peek1-from ( n/f string -- ch )

Vocabulary

modern.slices

Inputs

n/f	an object
string	an object

Outputs

ch

an object

Definition

USING: kernel sequences ;

IN: modern.slices

: peek1-from ( n/f string -- ch ) over [ ?nth ] [ 2drop f ] if ;