?push ( vector sequence-parser string/? -- vector sequence-parser )

Vocabulary

lint.vocabs.private

Inputs

vector	an object
sequence-parser	an object
string/?	an object

Outputs

vector	an object
sequence-parser	an object

Definition

USING: kernel sequences ;

IN: lint.vocabs.private

: ?push
    ( vector sequence-parser string/? -- vector sequence-parser )
    [ [ swap [ push ] keep ] curry dip ] when* ;