Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/543ec0852722318665d2f5228e29d44a5fc973f5

>---------------------------------------------------------------

commit 543ec0852722318665d2f5228e29d44a5fc973f5
Author: Ian Lynagh <[email protected]>
Date:   Tue Jun 12 16:01:53 2012 +0100

    Remove unused showRdrName
    
    It was equivalent to showPpr anyway.

>---------------------------------------------------------------

 compiler/basicTypes/RdrName.lhs |    6 ------
 1 files changed, 0 insertions(+), 6 deletions(-)

diff --git a/compiler/basicTypes/RdrName.lhs b/compiler/basicTypes/RdrName.lhs
index 7af33a4..624f94b 100644
--- a/compiler/basicTypes/RdrName.lhs
+++ b/compiler/basicTypes/RdrName.lhs
@@ -44,9 +44,6 @@ module RdrName (
        isRdrDataCon, isRdrTyVar, isRdrTc, isQual, isQual_maybe, isUnqual, 
        isOrig, isOrig_maybe, isExact, isExact_maybe, isSrcRdrName,
 
-       -- ** Printing
-       showRdrName,
-
        -- * Local mapping of 'RdrName' to 'Name.Name'
        LocalRdrEnv, emptyLocalRdrEnv, extendLocalRdrEnv, extendLocalRdrEnvList,
        lookupLocalRdrEnv, lookupLocalRdrOcc, elemLocalRdrEnv, 
inLocalRdrEnvScope, 
@@ -282,9 +279,6 @@ instance OutputableBndr RdrName where
     pprInfixOcc  rdr = pprInfixVar  (isSymOcc (rdrNameOcc rdr)) (ppr rdr)
     pprPrefixOcc rdr = pprPrefixVar (isSymOcc (rdrNameOcc rdr)) (ppr rdr)
 
-showRdrName :: RdrName -> String
-showRdrName r = showSDoc (ppr r)
-
 instance Eq RdrName where
     (Exact n1)           == (Exact n2)    = n1==n2
        -- Convert exact to orig



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to