use the native unicode support from GHC 6.12

This commit is contained in:
krasimir
2010-04-19 09:38:36 +00:00
parent 8b5827fc89
commit 6313244eac
23 changed files with 177 additions and 490 deletions

View File

@@ -24,6 +24,10 @@ main = do
codepage <- getACP
setConsoleCP codepage
setConsoleOutputCP codepage
enc <- mkTextEncoding ("CP"++show codepage)
hSetEncoding stdin enc
hSetEncoding stdout enc
hSetEncoding stderr enc
#endif
args <- getArgs
case parseOptions args of