X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FsimplCore%2FFloatIn.lhs;fp=ghc%2Fcompiler%2FsimplCore%2FFloatIn.lhs;h=295752014eb24c86713c8b5cc5cb131a25d51b60;hb=53ce311e219dcccf4d205f573c16e23a5c44265e;hp=be854af217a4b75b21b937b097687b78e0499f2d;hpb=615a5546467c7864c765adf40706f23be3fa28b6;p=ghc-hetmet.git

diff --git a/ghc/compiler/simplCore/FloatIn.lhs b/ghc/compiler/simplCore/FloatIn.lhs
index be854af..2957520 100644
--- a/ghc/compiler/simplCore/FloatIn.lhs
+++ b/ghc/compiler/simplCore/FloatIn.lhs
@@ -22,7 +22,7 @@ import CoreUtils	( exprIsValue, exprIsDupable )
 import CoreLint		( showPass, endPass )
 import CoreFVs		( CoreExprWithFVs, freeVars, freeVarsOf )
 import Id		( isOneShotLambda )
-import Var		( Id, idType, isTyVar )
+import Var		( Id, idType )
 import Type		( isUnLiftedType )
 import VarSet
 import Util		( zipEqual, zipWithEqual, count )