update-predecessor-phis ( from to bb -- )

Vocabulary

compiler.cfg.gc-checks.private

Inputs

from	an object
to	an object
bb	an object

Outputs

None

Definition

USING: accessors assocs compiler.cfg.utilities kernel ;

IN: compiler.cfg.gc-checks.private

:: update-predecessor-phis ( from to bb -- )
    to [
        [ [ [ dup from eq? [ drop bb ] when ] dip ] assoc-map ]
        change-inputs drop
    ] each-phi ;