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

   1 USING: io.directories io.directories.hierarchy kernel
   2 sequences tools.test ;
   3
   4 { { "classes/tuple/tuple.factor" } } [
   5     "resource:core" [
   6         "." directory-tree-files [ "classes/tuple/tuple.factor" = ] filter
   7     ] with-directory
   8 ] unit-test
   9
  10 { { "classes/tuple" } } [
  11     "resource:core" [
  12         "." directory-tree-files [ "classes/tuple" = ] filter
  13     ] with-directory
  14 ] unit-test
  15
  16 { { "classes/tuple/tuple.factor" } } [
  17     "resource:core" [
  18         [ "classes/tuple/tuple.factor" = ] filter
  19     ] with-directory-tree-files
  20 ] unit-test