ICML writer: fix missing type signature warning

2026-08-26 18:26:36 +00:00 · 2018-11-07 09:52:12 +01:00
parent 5f030f3c2c
commit 62a5f6fa85
1 changed files with 4 additions and 3 deletions
@@ -483,9 +483,10 @@ mergeStrings opts = mergeStrings' . map spaceToStr
                                    WrapPreserve  -> Str "\n"
                                    _             -> Str " "
        spaceToStr x = x
-mergeStrings' (Str x : Str y : zs) = mergeStrings' (Str (x ++ y) : zs)
-mergeStrings' (x : xs) = x : mergeStrings' xs
-mergeStrings' []       = []
+
+        mergeStrings' (Str x : Str y : zs) = mergeStrings' (Str (x ++ y) : zs)
+        mergeStrings' (x : xs) = x : mergeStrings' xs
+        mergeStrings' []       = []

 -- | Intersperse line breaks
 intersperseBrs :: [Doc] -> Doc