extra/io/unix/files/files-tests.factor

   1 USING: tools.test io.files ;
   2 IN: temporary
   3
   4 [ "/usr/libexec/" ] [ "/usr/libexec/awk/" parent-dir ] unit-test
   5 [ "/etc/" ] [ "/etc/passwd" parent-dir ] unit-test
   6 [ "/" ] [ "/etc/" parent-dir ] unit-test
   7 [ "/" ] [ "/etc" parent-dir ] unit-test
   8 [ "/" ] [ "/" parent-dir ] unit-test