each-prior ( ... seq quot: ( ... prior elt -- ... ) -- ... )

Vocabulary

sequences.extras

Inputs

seq	a sequence
quot	a quotation

Outputs

None

Definition

USING: kernel ;

IN: sequences.extras

: each-prior
    ( ... seq quot: ( ... prior elt -- ... ) -- ... )
    0 -rot each-prior-from ; inline