safe-subseq ( from to seq -- subseq )

Vocabulary

sequences.extras

Inputs

from	an integer
to	an integer
seq	a sequence

Outputs

subseq

an object

Word description

A safe version of subseq.

Definition

USING: kernel math.order sequences ;

IN: sequences.extras

: safe-subseq ( from to seq -- subseq )
    [ length [ [ 0 ] ] dip [ clamp ] curry compose bi@ ] keep
    subseq ;