##sub
Basic block instructions

Prev:	##shr-imm
Next:	##sub-imm

Vocabulary
compiler.cfg.instructions

Definition

IN: compiler.cfg.instructions

TUPLE: ##sub < foldable-insn dst src1 src2 insn# ;

Methods

USING: accessors compiler.cfg.gvn.avail
compiler.cfg.instructions kernel ;

M: ##sub >avail-insn-defs [ ] change-dst drop ;


USING: accessors compiler.cfg.gvn.avail
compiler.cfg.instructions kernel ;

M: ##sub >avail-insn-uses
    [ dup >avail-vreg or* ] change-src1
    [ dup >avail-vreg or* ] change-src2 drop ;


USING: accessors arrays compiler.cfg.gvn.expressions
compiler.cfg.gvn.graph compiler.cfg.instructions kernel
sequences.private ;

M: ##sub >expr
    \ ##sub swap [ src1>> vreg>vn ] keep [ src2>> vreg>vn ] keep
    drop 3 f <array> 2 swap [ set-array-nth ] keep 1 swap
    [ set-array-nth ] keep 0 swap [ set-array-nth ] keep ;


USING: accessors arrays compiler.cfg.instructions
compiler.cfg.value-numbering.expressions
compiler.cfg.value-numbering.graph kernel sequences.private ;

M: ##sub >expr
    \ ##sub swap [ src1>> vreg>vn ] keep [ src2>> vreg>vn ] keep
    drop 3 f <array> 2 swap [ set-array-nth ] keep 1 swap
    [ set-array-nth ] keep 0 swap [ set-array-nth ] keep ;


USING: accessors compiler.cfg.instructions
compiler.cfg.linear-scan.assignment kernel ;

M: ##sub assign-insn-defs [ vreg>reg ] change-dst drop ;


USING: accessors compiler.cfg.instructions
compiler.cfg.linear-scan.assignment kernel ;

M: ##sub assign-insn-uses
    [ vreg>reg ] change-src1 [ vreg>reg ] change-src2 drop ;


USING: accessors compiler.cfg.instructions
compiler.cfg.representations.rewrite kernel ;

M: ##sub convert-insn-defs [ converted-value ] change-dst drop ;


USING: accessors compiler.cfg.instructions
compiler.cfg.representations.rewrite kernel ;

M: ##sub convert-insn-uses
    [ converted-value ] change-src1
    [ converted-value ] change-src2 drop ;


USING: compiler.cfg.instructions
compiler.cfg.representations.preferred cpu.architecture kernel ;

M: ##sub defs-vreg-reps drop { int-rep } ;


USING: accessors arrays compiler.cfg.def-use
compiler.cfg.instructions ;

M: ##sub defs-vregs dst>> 1array ;


USING: accessors compiler.cfg.instructions compiler.codegen
cpu.architecture kernel ;

M: ##sub generate-insn
    [ dst>> ] keep [ src1>> ] keep [ src2>> ] keep drop %sub ;


USING: accessors compiler.cfg.instructions compiler.cfg.liveness
kernel ;

M: ##sub lookup-base-pointer* nip src1>> lookup-base-pointer ;


USING: accessors compiler.cfg.instructions compiler.cfg.renaming
kernel ;

M: ##sub rename-insn-defs [ rename-value ] change-dst drop ;


USING: accessors compiler.cfg.instructions compiler.cfg.renaming
kernel ;

M: ##sub rename-insn-uses
    [ rename-value ] change-src1 [ rename-value ] change-src2
    drop ;


USING: accessors combinators compiler.cfg.gvn.math
compiler.cfg.gvn.rewrite compiler.cfg.instructions kernel ;

M: ##sub rewrite
    {
        { [ dup sub-to-neg? ] [ sub-to-neg ] }
        { [ dup diagonal? ] [ rewrite-subtraction-identity ] }
        {
            [ dup src2>> vreg-immediate-arithmetic? ]
            [ ##sub-imm f insn>imm-insn ]
        }
        [ drop f ]
    } cond ;


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

M: ##sub rewrite
    {
        { [ dup sub-to-neg? ] [ sub-to-neg ] }
        { [ dup diagonal? ] [ rewrite-subtraction-identity ] }
        {
            [ dup src2>> vreg-immediate-arithmetic? ]
            [ ##sub-imm f insn>imm-insn ]
        }
        [ drop f ]
    } cond ;


USING: accessors compiler.cfg.instructions
compiler.cfg.ssa.construction.private kernel ;

M: ##sub ssa-rename-insn-defs [ gen-name ] change-dst drop ;


USING: accessors compiler.cfg.instructions
compiler.cfg.ssa.construction.private kernel ;

M: ##sub ssa-rename-insn-uses
    [ top-name ] change-src1 [ top-name ] change-src2 drop ;


USING: compiler.cfg.instructions
compiler.cfg.representations.preferred cpu.architecture kernel ;

M: ##sub uses-vreg-reps drop { int-rep int-rep } ;


USING: accessors arrays compiler.cfg.def-use
compiler.cfg.instructions kernel ;

M: ##sub uses-vregs [ src1>> ] [ src2>> ] bi 2array ;