Hi,
Daniel Fischer wrote:
> On Tuesday 05 October 2010 23:34:56, Johannes Waldmann wrote:
> > main = writeFile "check.out" "ü"
> >
> > that's u-umlaut, and the source file is utf-8-encoded
> > and ghc-6.12.3 compiles it without problems but when running, I get
> >
> > hClose: invalid argument (Invalid or incomplete multibyte or wide
> > character)
In order to make the behaviour independent of the locale (which is
desirable for programs storing state in text files), you can use
functions like writeFileUTF8 and readFileUTF8 here:
import System.IO
writeFileUTF8 file text = withFile file WriteMode $ \handle -> do
hSetEncoding handle utf8
hPutStr handle text
readFileUTF8 file = do
handle <- openFile file ReadMode
hSetEncoding handle utf8
hGetContents handle
main = do
let s = "äöü"
writeFileUTF8 "test.out" s
s' <- readFileUTF8 "test.out"
putStrLn $ unwords [s, "==", s']
Of course using System.IO.UTF8 from utf8-string would also work.
HTH,
Bertram
_______________________________________________
Haskell-Cafe mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/haskell-cafe
