diff options
author | Ian Lynagh <igloo@earth.li> | 2012-05-28 23:23:58 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2012-05-28 23:23:58 +0100 |
commit | 4c0f04ca654b46e9d2ef925973fb1393be71505c (patch) | |
tree | 265be002dcc09e9053c936c97c050ec0400eb556 | |
parent | 8ea3ea2a935cbbea2ad75522db2f9831f8214e20 (diff) | |
download | haskell-4c0f04ca654b46e9d2ef925973fb1393be71505c.tar.gz |
Rmove printErrs
It's no longer used
-rw-r--r-- | compiler/utils/Outputable.lhs | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs index c674237173..bc6e832870 100644 --- a/compiler/utils/Outputable.lhs +++ b/compiler/utils/Outputable.lhs @@ -39,7 +39,7 @@ module Outputable ( colBinder, bold, keyword, -- * Converting 'SDoc' into strings and outputing it - printErrs, printOutput, hPrintDump, printDump, + printOutput, hPrintDump, printDump, printForC, printForAsm, printForUser, printForUserPartWay, pprCode, mkCodeStyle, showSDoc, showSDocOneLine, @@ -318,13 +318,6 @@ ifPprDebug d = SDoc $ \ctx -> \end{code} \begin{code} --- I'm not sure whether the direct-IO approach of Pretty.printDoc --- above is better or worse than the put-big-string approach here -printErrs :: SDoc -> PprStyle -> IO () -printErrs doc sty = do - Pretty.printDoc PageMode stderr (runSDoc doc (initSDocContext sty)) - hFlush stderr - printOutput :: Doc -> IO () printOutput doc = Pretty.printDoc PageMode stdout doc |