X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnBinds.lhs;h=ced653a84e8a67973618dbb3fd83b637e2020fb3;hb=f7ecf7234c224489be8a5e63fced903b655d92ee;hp=ac8dc51be0e7cfaca054022ce087afd379b70448;hpb=573ef10b2afd99d3c6a36370a9367609716c97d2;p=ghc-hetmet.git diff --git a/ghc/compiler/rename/RnBinds.lhs b/ghc/compiler/rename/RnBinds.lhs index ac8dc51..ced653a 100644 --- a/ghc/compiler/rename/RnBinds.lhs +++ b/ghc/compiler/rename/RnBinds.lhs @@ -34,12 +34,12 @@ import Digraph ( stronglyConnComp ) import ErrUtils ( addErrLoc, addShortErrLocLine ) import Name ( getLocalName, RdrName ) import Maybes ( catMaybes ) -import PprStyle--ToDo:rm +--import PprStyle--ToDo:rm import Pretty import UniqSet ( emptyUniqSet, unitUniqSet, mkUniqSet, unionUniqSets, unionManyUniqSets, elementOfUniqSet, uniqSetToList, SYN_IE(UniqSet) ) -import Util ( thenCmp, isIn, removeDups, panic, panic#, assertPanic, pprTrace{-ToDo:rm-} ) +import Util ( thenCmp, isIn, removeDups, panic, panic#, assertPanic ) \end{code} -- ToDo: Put the annotations into the monad, so that they arrive in the proper