init-merge-sets ( cfg -- )

Vocabulary

compiler.cfg.ssa.construction.tdmsc.private

Inputs

cfg

an object

Outputs

None

Definition

USING: assocs bit-sets compiler.cfg.rpo kernel namespaces
sequences ;

IN: compiler.cfg.ssa.construction.tdmsc.private

: init-merge-sets ( cfg -- )
    post-order dup length [ <bit-set> ] curry H{ } map>assoc
    merge-sets set ;