X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FsimplCore%2FSimplUtils.lhs;h=e8a6433279a1aa7213b680e9ce878bc8943afc01;hb=849b7bca043a521fc60e18393cc311c754f2d9fe;hp=cf022c222b1221549065ff6db31103fdf8155a58;hpb=fb69fc467fd1c05d29bff65f8bf5ce74a0052982;p=ghc-hetmet.git

diff --git a/ghc/compiler/simplCore/SimplUtils.lhs b/ghc/compiler/simplCore/SimplUtils.lhs
index cf022c2..e8a6433 100644
--- a/ghc/compiler/simplCore/SimplUtils.lhs
+++ b/ghc/compiler/simplCore/SimplUtils.lhs
@@ -29,7 +29,7 @@ import Id		( idType, idName,
 			  idUnfolding, idStrictness,
 			  mkVanillaId, idInfo
 			)
-import IdInfo		( StrictnessInfo(..), ArityInfo, atLeastArity, vanillaIdInfo )
+import IdInfo		( StrictnessInfo(..), ArityInfo, atLeastArity )
 import Maybes		( maybeToBool, catMaybes )
 import Name		( setNameUnique )
 import Demand		( isStrict )