fuse-scale? ( insn -- ? )

Vocabulary

compiler.cfg.gvn.alien

Inputs

insn

an object

Outputs

?

an object

Definition

USING: accessors combinators.short-circuit
compiler.cfg.gvn.avail compiler.cfg.gvn.graph kernel ;

IN: compiler.cfg.gvn.alien

: fuse-scale? ( insn -- ? )
    {
        [ scale>> 0 = ]
        [
            displacement>> vreg>insn
            [ scale-insn? ] with-available-uses?
        ]
    } 1&& ;