From 25b29e084d1f82833076f1dcf44dbfd108094281 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Thu, 21 Mar 2019 19:36:05 -0700 Subject: [PATCH] io.directories.search: a better fix for the linux entry ordering issue. --- basis/io/directories/search/search-tests.factor | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/basis/io/directories/search/search-tests.factor b/basis/io/directories/search/search-tests.factor index 91831b8a8a..62c8105630 100644 --- a/basis/io/directories/search/search-tests.factor +++ b/basis/io/directories/search/search-tests.factor @@ -1,7 +1,7 @@ -USING: combinators fry io.directories io.directories.hierarchy -io.directories.search io.files.unique io.pathnames kernel math -namespaces sequences sorting splitting splitting.monotonic -strings tools.test ; +USING: combinators fry grouping io.directories +io.directories.hierarchy io.directories.search io.files.unique +io.pathnames kernel math namespaces sequences sorting splitting +splitting.monotonic strings tools.test ; { t } [ [ @@ -106,8 +106,8 @@ strings tools.test ; ! preserve file traversal order, but sort ! alphabetically for cross-platform testing - [ [ length ] bi@ < ] monotonic-split - [ natural-sort ] map natural-sort concat + dup length 3 / group natural-sort + [ natural-sort ] map concat ] with-variable +breadth-first+ traversal-method [