diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2014-02-23 22:00:57 +0100 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2014-02-25 11:06:51 +0100 |
| commit | 018676c7f883886b388652c913c99a10d2591b0b (patch) | |
| tree | ddeb1cd21f74b21f12b1d1ddbc26abb934136587 /compiler/utils | |
| parent | ede5b5180c2a5db3f51b01dbef402d21ace9601c (diff) | |
| download | haskell-018676c7f883886b388652c913c99a10d2591b0b.tar.gz | |
Use U+2018 instead of U+201B quote mark in compiler messages
This matches GCC's choice of Unicode quotation marks (i.e. U+2018 and U+2019)
and therefore looks more familiar on the console. This addresses #2507.
Signed-off-by: Herbert Valerio Riedel <hvr@gnu.org>
Diffstat (limited to 'compiler/utils')
| -rw-r--r-- | compiler/utils/Outputable.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |