From: simonpj@microsoft.com <unknown>
Date: Thu, 2 Mar 2006 13:52:58 +0000 (+0000)
Subject: Sigh: one more fix to undoing the erroneous patch
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=1eeb06aa5afa12474f8e73d9d8bd082b3dde76b9;p=ghc-hetmet.git

Sigh: one more fix to undoing the erroneous patch
---

diff --git a/ghc/compiler/simplCore/OccurAnal.lhs b/ghc/compiler/simplCore/OccurAnal.lhs
index 5537155..90a565f 100644
--- a/ghc/compiler/simplCore/OccurAnal.lhs
+++ b/ghc/compiler/simplCore/OccurAnal.lhs
@@ -22,9 +22,10 @@ import CoreFVs		( idRuleVars )
 import CoreUtils	( exprIsTrivial, isDefaultAlt )
 import Id		( isDataConWorkId, isOneShotBndr, setOneShotLambda, 
 			  idOccInfo, setIdOccInfo, isLocalId,
-			  isExportedId, idArity, 
+			  isExportedId, idArity, idSpecialisation,
 			  idType, idUnique, Id
 			)
+import IdInfo		( isEmptySpecInfo )
 import BasicTypes	( OccInfo(..), isOneOcc, InterestingCxt )
 
 import VarSet