X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Frename%2FRnPat.lhs;h=9d3dc0489ee9151c8d82c5fac9b754cce892ab40;hb=9aaa2bc98fc2f9ca5428ecb3eed40b8fa4c5f749;hp=b3564f68476c4ed64a53567bf1181d6620415bb7;hpb=37e2b6d8287a9760ee89b1812537b14eabd46835;p=ghc-hetmet.git diff --git a/compiler/rename/RnPat.lhs b/compiler/rename/RnPat.lhs index b3564f6..9d3dc04 100644 --- a/compiler/rename/RnPat.lhs +++ b/compiler/rename/RnPat.lhs @@ -68,12 +68,11 @@ import Constants ( mAX_TUPLE_SIZE ) import Name ( Name, nameOccName, nameModule_maybe, getOccName, nameSrcSpan ) import OccName ( occEnvElts ) import NameSet -import UniqFM +import LazyUniqFM import RdrName ( RdrName, GlobalRdrElt(..), Provenance(..), extendLocalRdrEnv, lookupLocalRdrEnv, hideSomeUnquals, mkRdrUnqual, nameRdrName, gre_name, globalRdrEnvElts, isLocalGRE ) import LoadIface ( loadInterfaceForName ) -import UniqFM ( isNullUFM ) import UniqSet ( emptyUniqSet ) import List ( nub ) import Util ( isSingleton )