diff options
| author | Thomas Miedema <thomasmiedema@gmail.com> | 2015-08-03 18:05:28 +0200 |
|---|---|---|
| committer | Thomas Miedema <thomasmiedema@gmail.com> | 2015-08-05 10:10:32 +0200 |
| commit | 9d24b060af190c89173f9d13260e6eb1ab7debc3 (patch) | |
| tree | 17b2bbe8eab44a536cc99ec2af73b1fb6b7e3b66 /compiler/utils/Outputable.hs | |
| parent | d7b053a25f17a02753780293bc1d417c5794e91f (diff) | |
| download | haskell-9d24b060af190c89173f9d13260e6eb1ab7debc3.tar.gz | |
Pretty: rename variables to the ones used by libraries/pretty (#10735)
Diffstat (limited to 'compiler/utils/Outputable.hs')
| -rw-r--r-- | compiler/utils/Outputable.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/compiler/utils/Outputable.hs b/compiler/utils/Outputable.hs index 86ac85e31f..5fa050ee71 100644 --- a/compiler/utils/Outputable.hs +++ b/compiler/utils/Outputable.hs @@ -496,8 +496,7 @@ angleBrackets d = char '<' <> d <> char '>' paBrackets d = ptext (sLit "[:") <> d <> ptext (sLit ":]") cparen :: Bool -> SDoc -> SDoc - -cparen b d = SDoc $ Pretty.cparen b . runSDoc d +cparen b d = SDoc $ Pretty.maybeParens b . runSDoc d -- 'quotes' encloses something in single quotes... -- but it omits them if the thing begins or ends in a single quote |