swap-compare ( src1 src2 cc swap? -- src1 src2 cc )

Vocabulary

compiler.cfg.gvn.comparisons

Inputs

src1	an object
src2	an object
cc	an object
swap?	an object

Outputs

src1	an object
src2	an object
cc	an object

Definition

USING: compiler.cfg.comparisons kernel ;

IN: compiler.cfg.gvn.comparisons

: swap-compare ( src1 src2 cc swap? -- src1 src2 cc )
    [ swapd swap-cc ] when ; inline