diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-09-16 17:18:31 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-09-17 20:04:08 -0400 |
| commit | 7f2785f2d6c6947d22d4d8b71d205c7c4b025680 (patch) | |
| tree | 374285a3d61efdc7d7c45ea257020b7b20a1555c | |
| parent | 37aa224ad5b1cfb17d472c7b88c5c76bf22a52f3 (diff) | |
| download | haskell-7f2785f2d6c6947d22d4d8b71d205c7c4b025680.tar.gz | |
Remove pprPrec from Outputable (unused)
| -rw-r--r-- | compiler/GHC/Utils/Outputable.hs | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/compiler/GHC/Utils/Outputable.hs b/compiler/GHC/Utils/Outputable.hs index fd84e276b8..abb3e94615 100644 --- a/compiler/GHC/Utils/Outputable.hs +++ b/compiler/GHC/Utils/Outputable.hs @@ -804,14 +804,7 @@ keyword = coloured Col.colBold -- | Class designating that some type has an 'SDoc' representation class Outputable a where - ppr :: a -> SDoc - pprPrec :: Rational -> a -> SDoc - -- 0 binds least tightly - -- We use Rational because there is always a - -- Rational between any other two Rationals - - ppr = pprPrec 0 - pprPrec _ = ppr + ppr :: a -> SDoc instance Outputable Char where ppr c = text [c] |