visit-insn ( insn -- )

Vocabulary

compiler.cfg.copy-prop.private

Inputs

insn

an object

Outputs

None

Definition

IN: compiler.cfg.copy-prop.private

GENERIC: visit-insn ( insn -- )

Methods

USING: accessors compiler.cfg.copy-prop.private
compiler.cfg.instructions kernel ;

M: ##copy visit-insn
    [ dst>> ] [ src>> resolve ] bi [ record-copy ] [ drop ] if*
    ;


USING: accessors assocs compiler.cfg.copy-prop.private
compiler.cfg.instructions grouping kernel namespaces sequences ;

M: ##phi visit-insn
    [ dst>> ] [ inputs>> values [ resolve ] map ] bi
    dup phis get key?
    [ redundant-phi ] [
        dup sift dup all-equal?
        [ nip useless-phi ] [ drop record-phi ] if
    ] if ;


USING: compiler.cfg.copy-prop.private compiler.cfg.instructions
kernel ;

M: insn visit-insn drop ;


USING: compiler.cfg.copy-prop.private compiler.cfg.def-use
compiler.cfg.instructions ;

M: vreg-insn visit-insn defs-vregs record-copies ;