cleanup-insn ( insn -- )

Vocabulary

compiler.cfg.ssa.destruction.private

Inputs

insn

an object

Outputs

None

Definition

IN: compiler.cfg.ssa.destruction.private

GENERIC: cleanup-insn ( insn -- )

Methods

USING: compiler.cfg.instructions
compiler.cfg.ssa.destruction.private kernel make ;

M: ##copy cleanup-insn dup useful-copy? [ , ] [ drop ] if ;


USING: accessors assocs compiler.cfg.instructions
compiler.cfg.parallel-copy compiler.cfg.ssa.destruction.leaders
compiler.cfg.ssa.destruction.private kernel make sequences ;

M: ##parallel-copy cleanup-insn
    values>> [ leaders ] assoc-map [ first2 = ] reject
    parallel-copy-rep % ;


USING: compiler.cfg.instructions
compiler.cfg.ssa.destruction.private kernel ;

M: ##phi cleanup-insn drop ;


USING: compiler.cfg.instructions
compiler.cfg.ssa.destruction.private kernel make ;

M: ##tagged>integer cleanup-insn
    dup useful-copy? [ , ] [ drop ] if ;


USING: compiler.cfg.instructions
compiler.cfg.ssa.destruction.private make ;

M: insn cleanup-insn , ;