|
USING: compiler.cfg.instructions
|
|
compiler.cfg.representations.selection tools.test ;
|
|
IN: compiler.cfg.representations.selection.tests
|
|
|
|
{ t t f } [
|
|
T{ ##load-integer } peephole-optimizable?
|
|
T{ ##shr-imm } peephole-optimizable?
|
|
T{ ##call } peephole-optimizable?
|
|
] unit-test
|