make-partition ( choices classes -- partition )

Vocabulary

regexp.disambiguate

Inputs

choices	an object
classes	an object

Outputs

partition

an object

Definition

USING: assocs kernel sequences ;

IN: regexp.disambiguate

: make-partition ( choices classes -- partition )
    zip [ first ] partition [ values ] bi@ parts boa ;