From: ross Date: Mon, 5 Sep 2005 08:22:23 +0000 (+0000) Subject: [project @ 2005-09-05 08:22:23 by ross] X-Git-Tag: Initial_conversion_from_CVS_complete~230 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=478f7aa502f4c8a57deb920658c152730d8c83d3;p=ghc-hetmet.git [project @ 2005-09-05 08:22:23 by ross] add a newline after error messages MERGE to STABLE --- diff --git a/ghc/utils/runghc/runghc.hs b/ghc/utils/runghc/runghc.hs index af74d74..f8330b5 100644 --- a/ghc/utils/runghc/runghc.hs +++ b/ghc/utils/runghc/runghc.hs @@ -62,5 +62,5 @@ notArg _ = True dieProg :: String -> IO a dieProg msg = do p <- getProgName - hPutStr stderr (p ++ ": " ++ msg) + hPutStrLn stderr (p ++ ": " ++ msg) exitWith (ExitFailure 1)