add-out ( seq partition -- partition' )

Vocabulary

regexp.disambiguate

Inputs

seq	an object
partition	an object

Outputs

partition'

an object

Definition

USING: accessors kernel sequences ;

IN: regexp.disambiguate

: add-out ( seq partition -- partition' )
    [ nip in>> ] [ out>> append ] 2bi parts boa ;