j-edge? ( from to -- ? )

Vocabulary

compiler.cfg.ssa.construction.tdmsc.private

Inputs

from	an object
to	an object

Outputs

?

an object

Definition

USING: compiler.cfg.dominance kernel ;

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

: j-edge? ( from to -- ? )
    2dup eq? [ 2drop f ] [ dominates? not ] if ;