Revert "io.directories.search: Fix the order of the depth/breadth traversals."

This reverts commit c3cfc177cd4e781acea9fccd7c1136f7ad261738.

diff --git a/basis/io/directories/search/search-tests.factor b/basis/io/directories/search/search-tests.factor
index 1d8bd99d5f27336a7448848f1e019c1ed71f5db1..91831b8a8a2cf21b6acc0fb537c2c8efc4521ccd 100644 (file)
--- a/basis/io/directories/search/search-tests.factor
+++ b/basis/io/directories/search/search-tests.factor
@@ -47,9 +47,42 @@ strings tools.test ;
     [ drop f ] find-up-to-root
 ] unit-test
 
-{
-    t
-} [
+[
+    {
+        "/a"
+        "/a/a"
+        "/a/a/a"
+        "/a/b"
+        "/a/b/a"
+        "/b"
+        "/b/a"
+        "/b/a/a"
+        "/b/b"
+        "/b/b/a"
+        "/c"
+        "/c/a"
+        "/c/a/a"
+        "/c/b"
+        "/c/b/a"
+    }
+    {
+        "/a"
+        "/b"
+        "/c"
+        "/a/a"
+        "/a/b"
+        "/b/a"
+        "/b/b"
+        "/c/a"
+        "/c/b"
+        "/a/a/a"
+        "/a/b/a"
+        "/b/a/a"
+        "/b/b/a"
+        "/c/a/a"
+        "/c/b/a"
+    }
+] [
     [
         "a" make-directory
         "a/a" make-directory
@@ -87,5 +120,4 @@ strings tools.test ;
             [ natural-sort ] map concat
         ] with-variable
     ] with-test-directory
-    [ natural-sort ] bi@ sequence=
 ] unit-test