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