combine-state-transitions ( hash -- hash )

Vocabulary

regexp.minimize

Inputs

hash

an object

Outputs

hash

an object

Definition

USING: arrays assocs kernel regexp.classes ;

IN: regexp.minimize

: combine-state-transitions ( hash -- hash )
    [ H{ } clone ] dip over
    [ [ 2array <or-class> ] change-at ] curry assoc-each
    [ swap ] assoc-map ;