From c72dc997c63a629f6a2a9f82168ac93dda9ee09e Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Tue, 6 Oct 2009 10:02:07 +0000 Subject: [PATCH] Use UTF-32LE instead of UTF32LE The latter is not recognised by some iconv implementations. --- GHC/IO/Encoding/Iconv.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/GHC/IO/Encoding/Iconv.hs b/GHC/IO/Encoding/Iconv.hs index 1f20af2..8ef87c9 100644 --- a/GHC/IO/Encoding/Iconv.hs +++ b/GHC/IO/Encoding/Iconv.hs @@ -128,11 +128,11 @@ foreign import ccall unsafe "localeEncoding" haskellChar :: String #ifdef WORDS_BIGENDIAN -haskellChar | charSize == 2 = "UTF16BE" - | otherwise = "UTF32BE" +haskellChar | charSize == 2 = "UTF-16BE" + | otherwise = "UTF-32BE" #else -haskellChar | charSize == 2 = "UTF16LE" - | otherwise = "UTF32LE" +haskellChar | charSize == 2 = "UTF-16LE" + | otherwise = "UTF-32LE" #endif char_shift :: Int -- 1.7.10.4