]> gitweb.factorcode.org Git - factor.git/blob - basis/compiler/cfg/intrinsics/fixnum/fixnum-tests.factor
compiler.cfg.*: a bunch of new tests
[factor.git] / basis / compiler / cfg / intrinsics / fixnum / fixnum-tests.factor
1 USING: compiler.cfg.comparisons compiler.cfg.instructions
2 compiler.cfg.intrinsics.fixnum compiler.test make tools.test ;
3 IN: compiler.cfg.intrinsics.fixnum.tests
4
5 {
6     V{
7         T{ ##compare-integer
8            { dst 4 }
9            { src1 1 }
10            { src2 2 }
11            { cc cc> }
12            { temp 3 }
13         }
14     }
15 } [
16     [ cc> emit-fixnum-comparison ] V{ } make
17 ] cfg-unit-test