1 USING: compiler.cfg.gc-checks compiler.cfg.debugger
2 compiler.cfg.registers compiler.cfg.instructions compiler.cfg
3 compiler.cfg.predecessors cpu.architecture tools.test kernel vectors
4 namespaces accessors sequences ;
5 IN: compiler.cfg.gc-checks.tests
7 : test-gc-checks ( -- )
8 H{ } clone representations set
15 T{ ##replace f 0 D 1 }
19 T{ ##box-float f 0 1 }
24 [ ] [ test-gc-checks ] unit-test
26 [ V{ D 0 D 2 } ] [ 1 get instructions>> first uninitialized-locs>> ] unit-test