X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FcoreSyn%2FCoreTidy.lhs;h=bacf64fc27f207b07c512aba9e854e4cc7885353;hb=1bf363052778fc39335ea3701a3229572358c51e;hp=7b80eacf89f5195365f18658e1993844ea971a06;hpb=f94350a049d2a1c2b2f1aa25c62dfe20a541c049;p=ghc-hetmet.git diff --git a/compiler/coreSyn/CoreTidy.lhs b/compiler/coreSyn/CoreTidy.lhs index 7b80eac..bacf64f 100644 --- a/compiler/coreSyn/CoreTidy.lhs +++ b/compiler/coreSyn/CoreTidy.lhs @@ -11,14 +11,12 @@ module CoreTidy ( import CoreSyn import CoreUtils ( exprArity ) -import DataCon ( DataCon ) -import Id ( Id, mkUserLocal, idInfo, setIdInfo, idUnique, - idType, setIdType ) +import Id ( Id, mkUserLocal, idInfo, setIdInfo, idUnique, idType ) import IdInfo ( setArityInfo, vanillaIdInfo, newStrictnessInfo, setAllStrictnessInfo, newDemandInfo, setNewDemandInfo ) -import Type ( Type, tidyType, tidyTyVarBndr, substTy, mkOpenTvSubst ) -import Var ( Var, TyVar, varName ) +import Type ( tidyType, tidyTyVarBndr ) +import Var ( Var, varName ) import VarEnv import UniqFM ( lookupUFM ) import Name ( Name, getOccName )