From ac7811dec49f2f01282e350f79c4d9bae038bc35 Mon Sep 17 00:00:00 2001
From: Jeroen Engels <jfm.engels@gmail.com>
Date: Wed, 12 Jun 2024 16:42:56 +0200
Subject: [PATCH] Re-order declarations

---
 src/Review/FilePattern.elm | 88 +++++++++++++++++++-------------------
 1 file changed, 44 insertions(+), 44 deletions(-)

diff --git a/src/Review/FilePattern.elm b/src/Review/FilePattern.elm
index 76789e4a..1e3ddccc 100644
--- a/src/Review/FilePattern.elm
+++ b/src/Review/FilePattern.elm
@@ -62,6 +62,27 @@ type FilePattern
     | ExcludeDirectory String
 
 
+{-| REPLACEME
+-}
+include : String -> FilePattern
+include =
+    Include
+
+
+{-| REPLACEME
+-}
+exclude : String -> FilePattern
+exclude =
+    Exclude
+
+
+{-| REPLACEME
+-}
+excludeDirectory : String -> FilePattern
+excludeDirectory =
+    ExcludeDirectory
+
+
 {-| REPLACEME
 -}
 type Summary
@@ -76,20 +97,6 @@ type alias SummaryInfo =
     }
 
 
-{-| REPLACEME
--}
-toStrings : Summary -> { files : List { pattern : String, included : Bool }, excludedDirectories : List String }
-toStrings (Summary summary) =
-    { files = summary.strings
-    , excludedDirectories = summary.excludedDirectoriesStrings
-    }
-
-
-type CompactFilePattern
-    = CompactInclude (List Glob)
-    | CompactExclude (List Glob)
-
-
 {-| REPLACEME
 -}
 compact : List FilePattern -> Result (List String) Summary
@@ -152,6 +159,11 @@ compactBase filePatterns accSummary =
                     Err (compactErrors rest [ raw ])
 
 
+type CompactFilePattern
+    = CompactInclude (List Glob)
+    | CompactExclude (List Glob)
+
+
 compactHelp : List FilePattern -> List Glob -> Bool -> SummaryInfo -> Result (List String) SummaryInfo
 compactHelp filePatterns accGlobs included accSummary =
     case filePatterns of
@@ -224,6 +236,15 @@ compactHelp filePatterns accGlobs included accSummary =
                     Err (compactErrors rest [ raw ])
 
 
+toDirectory : String -> String
+toDirectory globStr =
+    if String.endsWith "/" globStr then
+        globStr ++ "**/*"
+
+    else
+        globStr ++ "/**/*"
+
+
 compactErrors : List FilePattern -> List String -> List String
 compactErrors filePatterns accGlobStrings =
     case filePatterns of
@@ -261,36 +282,6 @@ addRawIncludeExclude string included summary =
     }
 
 
-{-| REPLACEME
--}
-include : String -> FilePattern
-include =
-    Include
-
-
-{-| REPLACEME
--}
-exclude : String -> FilePattern
-exclude =
-    Exclude
-
-
-{-| REPLACEME
--}
-excludeDirectory : String -> FilePattern
-excludeDirectory =
-    ExcludeDirectory
-
-
-toDirectory : String -> String
-toDirectory globStr =
-    if String.endsWith "/" globStr then
-        globStr ++ "**/*"
-
-    else
-        globStr ++ "/**/*"
-
-
 {-| REPLACEME
 -}
 match : { includeByDefault : Bool } -> Summary -> String -> Bool
@@ -321,3 +312,12 @@ matchHelp includeByDefault filePatterns str =
 
             else
                 matchHelp includeByDefault rest str
+
+
+{-| REPLACEME
+-}
+toStrings : Summary -> { files : List { pattern : String, included : Bool }, excludedDirectories : List String }
+toStrings (Summary summary) =
+    { files = summary.strings
+    , excludedDirectories = summary.excludedDirectoriesStrings
+    }