Merge branch 'master' of git://factorcode.org/git/factor
commit
4323b07f81
|
@ -2,7 +2,7 @@
|
||||||
IN: compiler.tests
|
IN: compiler.tests
|
||||||
USING: compiler generator generator.registers
|
USING: compiler generator generator.registers
|
||||||
generator.registers.private tools.test namespaces sequences
|
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> ;
|
: <int-vreg> ( n -- vreg ) int-regs <vreg> ;
|
||||||
|
|
||||||
|
@ -178,7 +178,7 @@ SYMBOL: template-chosen
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
[ t ] [
|
[ t ] [
|
||||||
phantom-datastack get [ cached? ] all?
|
phantom-datastack get stack>> [ cached? ] all?
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
! >r
|
! >r
|
||||||
|
|
|
@ -27,8 +27,6 @@ IN: io.windows.nt.files.tests
|
||||||
[ f ] [ "." root-directory? ] unit-test
|
[ f ] [ "." root-directory? ] unit-test
|
||||||
[ 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
|
[ "\\foo\\bar" ] [ "/foo/bar" normalize-path ":" split1 nip ] unit-test
|
||||||
|
|
||||||
[ "\\\\?\\C:\\builds\\factor\\log.txt" ] [
|
[ "\\\\?\\C:\\builds\\factor\\log.txt" ] [
|
||||||
|
|
Loading…
Reference in New Issue