Fixing unit tests
parent
842cdf0891
commit
979d0b7dfe
|
@ -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 ;
|
||||
|
||||
: <int-vreg> ( n -- vreg ) int-regs <vreg> ;
|
||||
|
||||
|
@ -178,7 +178,7 @@ SYMBOL: template-chosen
|
|||
] unit-test
|
||||
|
||||
[ t ] [
|
||||
phantom-datastack get [ cached? ] all?
|
||||
phantom-datastack get stack>> [ cached? ] all?
|
||||
] unit-test
|
||||
|
||||
! >r
|
||||
|
|
|
@ -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" ] [
|
||||
|
|
Loading…
Reference in New Issue