trim-as ( ... seq quot: ( ... elt -- ... ? ) exemplar -- ... newseq )

Vocabulary

sequences.extras

Inputs

seq	a sequence
quot	a quotation
exemplar	an object

Outputs

newseq

a sequence

Definition

USING: kernel sequences ;

IN: sequences.extras

: trim-as
    ( ... seq quot: ( ... elt -- ... ? ) exemplar -- ... newseq )
    [ trim-slice ] [ like ] bi* ; inline