From cab2a4c125b422d675aa5ba086e3f94e97e9f81b Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Thu, 23 Jul 2009 12:19:13 +0000 Subject: [PATCH] Windows only: set the encoding on stdin to utf8 Otherwise it defaults to latin1. --- ghc/InteractiveUI.hs | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index 5acb36e..3675398 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -328,6 +328,12 @@ interactiveUI srcs maybe_exprs = do -- We don't want the cmd line to buffer any input that might be -- intended for the program, so unbuffer stdin. hSetBuffering stdin NoBuffering +#if defined(mingw32_HOST_OS) && __GLASGOW_HASKELL__ >= 611 + -- On Unix, stdin will use the locale encoding. The IO library + -- doesn't do this on Windows (yet), so for now we use UTF-8, + -- for consistency with GHC 6.10 and to make the tests work. + hSetEncoding stdin utf8 +#endif -- initial context is just the Prelude prel_mod <- GHC.lookupModule (GHC.mkModuleName "Prelude") Nothing -- 1.7.10.4