diff options
author | Ian Lynagh <igloo@earth.li> | 2012-06-12 16:01:53 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2012-06-12 16:01:53 +0100 |
commit | 543ec0852722318665d2f5228e29d44a5fc973f5 (patch) | |
tree | 16856103ffdffc0acabc2c932b31a13b8591cd3e | |
parent | 4e78c8a0387263ee26cf380700769720aefb57c1 (diff) | |
download | haskell-543ec0852722318665d2f5228e29d44a5fc973f5.tar.gz |
Remove unused showRdrName
It was equivalent to showPpr anyway.
-rw-r--r-- | 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 7af33a4196..624f94b886 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 |