12 lines
409 B
Factor
12 lines
409 B
Factor
|
USING: kernel tools.test ;
|
||
|
|
IN: io.windows.nt.files.tests
|
||
|
|
|
||
|
|
[ f ] [ "" root-directory? ] unit-test
|
||
|
|
[ t ] [ "\\" root-directory? ] unit-test
|
||
|
|
[ t ] [ "\\\\" root-directory? ] unit-test
|
||
|
|
[ t ] [ "\\\\\\\\\\\\" root-directory? ] unit-test
|
||
|
|
[ t ] [ "/" root-directory? ] unit-test
|
||
|
|
[ t ] [ "//" root-directory? ] unit-test
|
||
|
|
[ t ] [ "//////////////" root-directory? ] unit-test
|
||
|
|
[ t ] [ "\\foo" absolute-path? ] unit-test
|