Add missing whitespace in toArgs' error msg
authorHerbert Valerio Riedel <hvr@gnu.org>
Tue, 8 Dec 2015 22:01:35 +0000 (23:01 +0100)
committerHerbert Valerio Riedel <hvr@gnu.org>
Tue, 8 Dec 2015 22:01:38 +0000 (23:01 +0100)
Differential Revision: https://phabricator.haskell.org/D1591

compiler/utils/Util.hs

index 406ee9c..d3830c3 100644 (file)
@@ -868,7 +868,7 @@ toArgs str
                     | all isSpace spaces ->
                        Right args
                    _ ->
-                       Left ("Couldn't read " ++ show str ++ "as [String]")
+                       Left ("Couldn't read " ++ show str ++ " as [String]")
       s -> toArgs' s
  where
   toArgs' :: String -> Either String [String]
@@ -899,7 +899,7 @@ toArgs str
                     | all isSpace (take 1 rest) ->
                     Right (arg, rest)
                 _ ->
-                    Left ("Couldn't read " ++ show s ++ "as String")
+                    Left ("Couldn't read " ++ show s ++ " as String")
 {-
 -- -----------------------------------------------------------------------------
 -- Floats