selector-as* ( quot exemplar -- selector accum )

Vocabulary

sequences.extras

Inputs

quot	a quotation
exemplar	an object

Outputs

selector	an object
accum	an object

Definition

USING: kernel sequences sequences.extras.private ;

IN: sequences.extras

: selector-as* ( quot exemplar -- selector accum )
    [ length ] keep (selector-as*) ; inline