diff options
Diffstat (limited to 'compiler')
| -rw-r--r-- | compiler/main/DynFlags.hs | 2 | ||||
| -rw-r--r-- | compiler/rename/RnEnv.lhs | 2 | ||||
| -rw-r--r-- | compiler/utils/Outputable.lhs | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs index 2ce5813f46..dcdc4b556d 100644 --- a/compiler/main/DynFlags.hs +++ b/compiler/main/DynFlags.hs @@ -1281,7 +1281,7 @@ initDynFlags dflags = do refRtccInfo <- newIORef Nothing wrapperNum <- newIORef emptyModuleEnv canUseUnicodeQuotes <- do let enc = localeEncoding - str = "‛’" + str = "‘’" (withCString enc str $ \cstr -> do str' <- peekCString enc cstr return (str == str')) diff --git a/compiler/rename/RnEnv.lhs b/compiler/rename/RnEnv.lhs index 2359cac043..49cbbad13d 100644 --- a/compiler/rename/RnEnv.lhs +++ b/compiler/rename/RnEnv.lhs @@ -830,7 +830,7 @@ as if there was an "import qualified M" declaration for every module. If we fail we just return Nothing, rather than bleating -about "attempting to use module ‛D’ (./D.hs) which is not loaded" +about "attempting to use module ‘D’ (./D.hs) which is not loaded" which is what loadSrcInterface does. Note [Safe Haskell and GHCi] diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs index 8a12670d50..e8d9347767 100644 --- a/compiler/utils/Outputable.lhs +++ b/compiler/utils/Outputable.lhs @@ -460,7 +460,7 @@ cparen b d = SDoc $ Pretty.cparen b . runSDoc d quotes d = sdocWithDynFlags $ \dflags -> if useUnicodeQuotes dflags - then char '‛' <> d <> char '’' + then char '‘' <> d <> char '’' else SDoc $ \sty -> let pp_d = runSDoc d sty str = show pp_d |