[commit: ghc] master: Add missing whitespace in toArgs' error msg (31bddc4)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/31bddc42c24726a82e221c68df043703caeb42f4/ghc

>---------------------------------------------------------------

commit 31bddc42c24726a82e221c68df043703caeb42f4
Author: Herbert Valerio Riedel <hvr at gnu.org>
Date:   Tue Dec 8 23:01:35 2015 +0100

    Add missing whitespace in toArgs' error msg
    
    Differential Revision: https://phabricator.haskell.org/D1591


>---------------------------------------------------------------

31bddc42c24726a82e221c68df043703caeb42f4
 compiler/utils/Util.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/utils/Util.hs b/compiler/utils/Util.hs
index 406ee9c..d3830c3 100644
--- a/compiler/utils/Util.hs
+++ b/compiler/utils/Util.hs
@@ -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