>compare-imm ( insn swap? -- insn' )

Vocabulary

compiler.cfg.value-numbering.comparisons

Inputs

insn	an object
swap?	an object

Outputs

insn'

an object

Definition

USING: compiler.cfg.instructions compiler.cfg.registers
compiler.cfg.value-numbering.rewrite kernel ;

IN: compiler.cfg.value-numbering.comparisons

: >compare-imm ( insn swap? -- insn' )
    (>compare-imm) [ vreg>literal ] dip
    next-vreg ##compare-imm new-insn ; inline