diff --git a/basis/compiler/cfg/linearization/order/order-tests.factor b/basis/compiler/cfg/linearization/order/order-tests.factor index 34eaeffd9..67fb55f50 100644 --- a/basis/compiler/cfg/linearization/order/order-tests.factor +++ b/basis/compiler/cfg/linearization/order/order-tests.factor @@ -1,5 +1,5 @@ USING: compiler.cfg.debugger compiler.cfg compiler.cfg.linearization.order -kernel accessors sequences sets tools.test ; +kernel accessors sequences sets tools.test namespaces ; IN: compiler.cfg.linearization.order.tests V{ } 0 test-bb diff --git a/basis/compiler/tests/low-level-ir.factor b/basis/compiler/tests/low-level-ir.factor index e2fc26e94..76d7e6de4 100644 --- a/basis/compiler/tests/low-level-ir.factor +++ b/basis/compiler/tests/low-level-ir.factor @@ -18,7 +18,7 @@ IN: compiler.tests.low-level-ir compile-cfg ; : compile-test-bb ( insns -- result ) - V{ T{ ##prologue } T{ ##branch } } 0 test-bb + V{ T{ ##prologue } T{ ##branch } } [ clone ] map 0 test-bb V{ T{ ##inc-d f 1 } T{ ##replace f 0 D 0 } @@ -73,7 +73,7 @@ IN: compiler.tests.low-level-ir [ t ] [ V{ T{ ##load-reference f 0 { t f t } } - T{ ##slot-imm f 0 0 2 $[ array tag-number ] 2 } + T{ ##slot-imm f 0 0 2 $[ array tag-number ] } } compile-test-bb ] unit-test diff --git a/extra/compiler/graphviz/graphviz-tests.factor b/extra/compiler/graphviz/graphviz-tests.factor index 23f5f6fb6..8f6c0171e 100644 --- a/extra/compiler/graphviz/graphviz-tests.factor +++ b/extra/compiler/graphviz/graphviz-tests.factor @@ -1,5 +1,5 @@ IN: compiler.graphviz.tests -USING: compiler.graphviz io.files ; +USING: compiler.graphviz io.files kernel tools.test ; [ t ] [ [ [ 1 ] [ 2 ] if ] render-cfg exists? ] unit-test [ t ] [ [ [ 1 ] [ 2 ] if ] render-dom exists? ] unit-test