check-slice-of ( seq from to -- seq from to )

Vocabulary

sequences.extras

Inputs

seq	an object
from	an object
to	an object

Outputs

seq	an object
from	an object
to	an object

Definition

USING: kernel math sequences ;

IN: sequences.extras

: check-slice-of ( seq from to -- seq from to )
    over 0 < [ slice-error-of ] when dup reach length >
    [ slice-error-of ] when 2dup > [ slice-error-of ] when ;
    inline