negative-one-vreg? ( vreg -- ? )

Vocabulary

compiler.cfg.value-numbering.math

Inputs

vreg

an object

Outputs

?

an object

Definition

USING: accessors combinators.short-circuit
compiler.cfg.instructions compiler.cfg.value-numbering.graph
kernel ;

IN: compiler.cfg.value-numbering.math

: negative-one-vreg? ( vreg -- ? )
    vreg>insn { [ ##load-integer? ] [ val>> -1 = ] } 1&& ;