summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--compiler/utils/Outputable.lhs5
1 files changed, 1 insertions, 4 deletions
diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs
index 80c04094be..a6410352c3 100644
--- a/compiler/utils/Outputable.lhs
+++ b/compiler/utils/Outputable.lhs
@@ -45,7 +45,7 @@ module Outputable (
showSDoc, showSDocOneLine,
showSDocForUser, showSDocDebug, showSDocDump, showSDocDumpOneLine,
showPpr,
- showSDocUnqual, showsPrecSDoc,
+ showSDocUnqual,
renderWithStyle,
pprInfixVar, pprPrefixVar,
@@ -385,9 +385,6 @@ showSDocUnqual :: DynFlags -> SDoc -> String
showSDocUnqual _ d
= show (runSDoc d (initSDocContext (mkUserStyle neverQualify AllTheWay)))
-showsPrecSDoc :: Int -> SDoc -> ShowS
-showsPrecSDoc p d = showsPrec p (runSDoc d (initSDocContext defaultUserStyle))
-
showSDocDump :: DynFlags -> SDoc -> String
showSDocDump _ d
= Pretty.showDocWith PageMode (runSDoc d (initSDocContext defaultDumpStyle))