[commit: ghc] master: Really fix dropWhileEndLE commit (eb35339)
git at git.haskell.org
git at git.haskell.org
Thu Oct 2 21:32:16 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/eb3533997e33602007a1a1a760a72bfcb4fba3ee/ghc
>---------------------------------------------------------------
commit eb3533997e33602007a1a1a760a72bfcb4fba3ee
Author: Joachim Breitner <mail at joachim-breitner.de>
Date: Thu Oct 2 23:31:06 2014 +0200
Really fix dropWhileEndLE commit
which I fixed before, but failed to pass -a to "git commit --amend"
>---------------------------------------------------------------
eb3533997e33602007a1a1a760a72bfcb4fba3ee
libraries/base/GHC/Windows.hs | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/libraries/base/GHC/Windows.hs b/libraries/base/GHC/Windows.hs
index 83f83df..6b23019 100644
--- a/libraries/base/GHC/Windows.hs
+++ b/libraries/base/GHC/Windows.hs
@@ -69,7 +69,6 @@ import GHC.Base
import GHC.IO
import GHC.Num
import System.IO.Error
-import Util
import qualified Numeric
@@ -121,7 +120,7 @@ errCodeToIOError fn_name err_code = do
-- XXX we should really do this directly.
let errno = c_maperrno_func err_code
- let msg' = dropWhileEndLE isSpace msg -- drop trailing \n
+ let msg' = dropWhileEnd isSpace msg -- drop trailing \n
ioerror = errnoToIOError fn_name errno Nothing Nothing
`ioeSetErrorString` msg'
return ioerror
More information about the ghc-commits
mailing list