From: simonpj <unknown>
Date: Tue, 6 May 2003 10:26:48 +0000 (+0000)
Subject: [project @ 2003-05-06 10:26:48 by simonpj]
X-Git-Tag: Approx_11550_changesets_converted~928
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=f4a3aa3ceb5f38098ecfe42bdffb2400dc9825ce;p=ghc-hetmet.git

[project @ 2003-05-06 10:26:48 by simonpj]
Import wibbles
---

diff --git a/ghc/compiler/simplCore/Simplify.lhs b/ghc/compiler/simplCore/Simplify.lhs
index 144ff75..3eed86a 100644
--- a/ghc/compiler/simplCore/Simplify.lhs
+++ b/ghc/compiler/simplCore/Simplify.lhs
@@ -24,7 +24,6 @@ import VarEnv
 import Id		( Id, idType, idInfo, idArity, isDataConWorkId, 
 			  setIdUnfolding, isDeadBinder,
 			  idNewDemandInfo, setIdInfo,
-			  idSpecialisation, setIdSpecialisation,
 			  setIdOccInfo, zapLamIdInfo, setOneShotLambda, 
 			)
 import OccName		( encodeFS )
@@ -50,7 +49,7 @@ import CostCentre	( currentCCS )
 import Type		( isUnLiftedType, seqType, tyConAppArgs, funArgTy,
 			  splitFunTy_maybe, splitFunTy, eqType
 			)
-import Subst		( mkSubst, substTy, substExpr, substRules,
+import Subst		( mkSubst, substTy, substExpr, 
 			  isInScope, lookupIdSubst, simplIdInfo
 			)
 import TysPrim		( realWorldStatePrimTy )