projects
/
ghc-base.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Add a suitable Show instance for TextEncoding (#4273)
[ghc-base.git]
/
GHC
/
IO
/
Encoding
/
Iconv.hs
diff --git
a/GHC/IO/Encoding/Iconv.hs
b/GHC/IO/Encoding/Iconv.hs
index
9a9e8c8
..
1c19b00
100644
(file)
--- a/
GHC/IO/Encoding/Iconv.hs
+++ b/
GHC/IO/Encoding/Iconv.hs
@@
-132,6
+132,7
@@
char_shift | charSize == 2 = 1
mkTextEncoding :: String -> IO TextEncoding
mkTextEncoding charset = do
return (TextEncoding {
+ textEncodingName = charset,
mkTextDecoder = newIConv charset haskellChar iconvDecode,
mkTextEncoder = newIConv haskellChar charset iconvEncode})