evaluate-test-imm ( insn -- ? )

Vocabulary

compiler.cfg.value-numbering.comparisons

Inputs

insn

an object

Outputs

?

an object

Definition

USING: accessors combinators compiler.cfg.comparisons
compiler.cfg.value-numbering.rewrite kernel math ;

IN: compiler.cfg.value-numbering.comparisons

: evaluate-test-imm ( insn -- ? )
    [ src1>> vreg>integer ] [ src2>> ] [ cc>> ] tri
    [ bitand ] dip { { cc= [ 0 = ] } { cc/= [ 0 = not ] } } case
    ;