update-phi ( bb ##phi -- )

Vocabulary

compiler.cfg.predecessors.private

Inputs

bb	an object
##phi	an object

Outputs

None

Definition

USING: accessors assocs kernel sequences ;

IN: compiler.cfg.predecessors.private

: update-phi ( bb ##phi -- )
    [ swap predecessors>> [ member-eq? ] curry filter-keys ]
    change-inputs drop ;