diff options
author | Krzysztof Gogolewski <krz.gogolewski@gmail.com> | 2018-12-19 19:17:20 +0100 |
---|---|---|
committer | Krzysztof Gogolewski <krz.gogolewski@gmail.com> | 2018-12-19 20:57:06 +0100 |
commit | d555d4beb457f485aa122d118903f6f926f054f8 (patch) | |
tree | 5ef4852ae9c31f9a88d3850c24990a762f6f428f /compiler | |
parent | de50f8fd432f88d26a08b07c7bf08c5bff25472e (diff) | |
download | haskell-d555d4beb457f485aa122d118903f6f926f054f8.tar.gz |
Use unicode arrows with -fprint-unicode-syntax
Summary:
See #8959, this is one more place where we
can pretty-print Unicode syntax.
Test Plan: validate
Reviewers: nomeata, bgamari
Reviewed By: bgamari
Subscribers: rwbarton, carter
GHC Trac Issues: #8959
Differential Revision: https://phabricator.haskell.org/D5439
Diffstat (limited to 'compiler')
-rw-r--r-- | compiler/hsSyn/HsTypes.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/hsSyn/HsTypes.hs b/compiler/hsSyn/HsTypes.hs index 993b0202d8..4ab15b2625 100644 --- a/compiler/hsSyn/HsTypes.hs +++ b/compiler/hsSyn/HsTypes.hs @@ -1444,7 +1444,7 @@ ppr_fun_ty ty1 ty2 = let p1 = ppr_mono_lty ty1 p2 = ppr_mono_lty ty2 in - sep [p1, text "->" <+> p2] + sep [p1, arrow <+> p2] -------------------------- ppr_tylit :: HsTyLit -> SDoc |