From 479f4cac9815c88e91492913a1247d8c6f53b659 Mon Sep 17 00:00:00 2001
From: "simonpj@microsoft.com" <unknown>
Date: Wed, 21 Feb 2007 16:53:12 +0000
Subject: [PATCH] Import trimming

---
 compiler/coreSyn/CorePrep.lhs |    3 ---
 compiler/coreSyn/CoreSyn.lhs  |    1 -
 compiler/specialise/Rules.lhs |    2 +-
 3 files changed, 1 insertion(+), 5 deletions(-)

diff --git a/compiler/coreSyn/CorePrep.lhs b/compiler/coreSyn/CorePrep.lhs
index e2b6ecf..fee95a5 100644
--- a/compiler/coreSyn/CorePrep.lhs
+++ b/compiler/coreSyn/CorePrep.lhs
@@ -34,9 +34,6 @@ import ErrUtils
 import DynFlags
 import Util
 import Outputable
-import TysWiredIn
-import MkId
-import TysPrim
 \end{code}
 
 -- ---------------------------------------------------------------------------
diff --git a/compiler/coreSyn/CoreSyn.lhs b/compiler/coreSyn/CoreSyn.lhs
index d89f542..09e41aa 100644
--- a/compiler/coreSyn/CoreSyn.lhs
+++ b/compiler/coreSyn/CoreSyn.lhs
@@ -54,7 +54,6 @@ import Var
 import Type
 import Coercion
 import Name
-import OccName
 import Literal
 import DataCon
 import BasicTypes
diff --git a/compiler/specialise/Rules.lhs b/compiler/specialise/Rules.lhs
index 4b7e926..bcb847a 100644
--- a/compiler/specialise/Rules.lhs
+++ b/compiler/specialise/Rules.lhs
@@ -35,7 +35,7 @@ import IdInfo		( SpecInfo( SpecInfo ) )
 import Var		( Var )
 import VarEnv
 import VarSet
-import Name		( Name, NamedThing(..), nameOccName )
+import Name		( Name, NamedThing(..) )
 import NameEnv
 import Unify 		( ruleMatchTyX, MatchEnv(..) )
 import BasicTypes	( Activation, CompilerPhase, isActive )
-- 
1.7.10.4