check-redundancy ( insn -- )

Vocabulary

compiler.cfg.gvn

Inputs

insn

an object

Outputs

None

Definition

USING: assocs compiler.cfg.gvn.expressions
compiler.cfg.gvn.graph kernel namespaces ;

IN: compiler.cfg.gvn

: check-redundancy ( insn -- )
    dup >expr
    [ exprs>vns get at ] [ redundant-instruction ]
    [ useful-instruction ] ?if ;