diff --git a/core/compiler/tests/templates-early.factor b/core/compiler/tests/templates-early.factor index 71da9436f1..004d088343 100755 --- a/core/compiler/tests/templates-early.factor +++ b/core/compiler/tests/templates-early.factor @@ -2,7 +2,7 @@ IN: compiler.tests USING: compiler generator generator.registers generator.registers.private tools.test namespaces sequences -words kernel math effects definitions compiler.units ; +words kernel math effects definitions compiler.units accessors ; : ( n -- vreg ) int-regs ; @@ -178,7 +178,7 @@ SYMBOL: template-chosen ] unit-test [ t ] [ - phantom-datastack get [ cached? ] all? + phantom-datastack get stack>> [ cached? ] all? ] unit-test ! >r diff --git a/extra/io/windows/nt/files/files-tests.factor b/extra/io/windows/nt/files/files-tests.factor index a08241ad1b..0fa4b4151c 100755 --- a/extra/io/windows/nt/files/files-tests.factor +++ b/extra/io/windows/nt/files/files-tests.factor @@ -1,5 +1,5 @@ USING: io.files kernel tools.test io.backend -io.windows.nt.files splitting sequences io.files.private ; +io.windows.nt.files splitting sequences ; IN: io.windows.nt.files.tests [ f ] [ "\\foo" absolute-path? ] unit-test @@ -27,8 +27,6 @@ IN: io.windows.nt.files.tests [ f ] [ "." root-directory? ] unit-test [ f ] [ ".." root-directory? ] unit-test -[ ] [ "" resource-path cd ] unit-test - [ "\\foo\\bar" ] [ "/foo/bar" normalize-path ":" split1 nip ] unit-test [ "\\\\?\\C:\\builds\\factor\\log.txt" ] [