diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2018-03-25 22:12:49 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2018-03-25 22:12:49 -0400 |
commit | 20ae19fc7297dceaefde8d3443099bfd9cd1e905 (patch) | |
tree | f74944a339e77e6f2ee827d034be203cd05b0b03 /libraries | |
parent | 41db237e1290b650e52eb07323eca71de941e184 (diff) | |
download | haskell-20ae19fc7297dceaefde8d3443099bfd9cd1e905.tar.gz |
base: Fix Unicode handling of TyCon's Show instance
Test Plan: `make test TEST=T14925`
Reviewers: hvr, dfeuer
Reviewed By: dfeuer
Subscribers: rwbarton, thomie, carter
GHC Trac Issues: #14925
Differential Revision: https://phabricator.haskell.org/D4530
Diffstat (limited to 'libraries')
-rw-r--r-- | libraries/base/GHC/Show.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/GHC/Show.hs b/libraries/base/GHC/Show.hs index a7a7f89bde..798dff9891 100644 --- a/libraries/base/GHC/Show.hs +++ b/libraries/base/GHC/Show.hs @@ -215,7 +215,7 @@ instance Show TyCon where -- | @since 4.9.0.0 instance Show TrName where - showsPrec _ (TrNameS s) = showString (unpackCString# s) + showsPrec _ (TrNameS s) = showString (unpackCStringUtf8# s) showsPrec _ (TrNameD s) = showString s -- | @since 4.9.0.0 |