basis/io/directories/search/search-tests.factor

   1 USING: io.directories.search io.files io.files.unique
   2 io.pathnames kernel namespaces sequences sorting tools.test ;
   3 IN: io.directories.search.tests
   4
   5 [ t ] [
   6     [
   7         10 [ "io.paths.test" "gogogo" make-unique-file ] replicate
   8         current-temporary-directory get t [ ] find-all-files
   9     ] with-unique-directory drop [ natural-sort ] bi@ =
  10 ] unit-test