X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FcoreSyn%2FCoreTidy.lhs;h=35948fc0c218f93e71508a4edf9f372ea0330862;hb=15cb792d18b1094e98c035dca6ecec5dad516056;hp=7b80eacf89f5195365f18658e1993844ea971a06;hpb=f94350a049d2a1c2b2f1aa25c62dfe20a541c049;p=ghc-hetmet.git

diff --git a/compiler/coreSyn/CoreTidy.lhs b/compiler/coreSyn/CoreTidy.lhs
index 7b80eac..35948fc 100644
--- a/compiler/coreSyn/CoreTidy.lhs
+++ b/compiler/coreSyn/CoreTidy.lhs
@@ -11,13 +11,11 @@ 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 Type		( tidyType, tidyTyVarBndr, substTy )
 import Var		( Var, TyVar, varName )
 import VarEnv
 import UniqFM		( lookupUFM )