Commit 703ca154 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Remove unused imports

parent 7bb3d1fc
......@@ -50,7 +50,6 @@ import TysPrim
import TysWiredIn
import PrelRules
import Type
import TypeRep
import Coercion
import TcType
import CoreUtils ( exprType, mkCoerce )
......@@ -60,7 +59,6 @@ import TyCon
import Class
import VarSet
import Name
import OccName
import PrimOp
import ForeignCall
import DataCon
......@@ -70,7 +68,6 @@ import IdInfo
import NewDemand
import CoreSyn
import Unique
import Maybes
import PrelNames
import BasicTypes hiding ( SuccessFlag(..) )
import Util
......
......@@ -18,7 +18,6 @@ import BlockId
import Bitmap
import CLabel
import Cmm hiding (blockId)
import CmmExpr
import CmmInfo
import CmmProcPointZ
import CmmStackLayout
......@@ -35,7 +34,6 @@ import MkZipCfgCmm hiding (CmmAGraph, CmmBlock, CmmTopZ, CmmZ, CmmGraph)
import Monad
import Name
import Outputable
import Panic
import SMRep
import StgCmmClosure
import StgCmmForeign
......
......@@ -32,8 +32,6 @@ import UniqSet
import Unique
import Monad
import IO
import Data.List
-----------------------------------------------------------------------------
-- |Top level driver for the CPS pass
......
......@@ -24,7 +24,6 @@ import Constants
import StaticFlags
import Unique
import Maybe
import List
import FastString
import Panic
......
......@@ -15,7 +15,6 @@ import ZipCfgCmmRep (Convention(..))
import Constants
import StaticFlags (opt_Unregisterised)
import Outputable
import Panic
-- Calculate the 'GlobalReg' or stack locations for function call
-- parameters as used by the Cmm calling convention.
......
......@@ -6,7 +6,6 @@ where
import BlockId
import Cmm
import CmmExpr
import MkZipCfgCmm hiding (CmmGraph)
import ZipCfgCmmRep -- imported for reverse conversion
import CmmZipUtil
......@@ -16,11 +15,8 @@ import qualified ZipCfg as G
import FastString
import Monad
import Outputable
import Panic
import UniqSupply
import Maybe
cmmToZgraph :: GenCmm d h (ListGraph CmmStmt) -> UniqSM (GenCmm d h (CmmStackInfo, CmmGraph))
cmmOfZgraph :: GenCmm d h (CmmStackInfo, CmmGraph) -> GenCmm d h (ListGraph CmmStmt)
......
......@@ -11,7 +11,6 @@ import BlockId
import CLabel
import Cmm hiding (blockId)
import CmmContFlowOpt
import CmmExpr
import CmmInfo
import CmmLiveZ
import CmmTx
......@@ -23,7 +22,6 @@ import MkZipCfg
import MkZipCfgCmm hiding (CmmBlock, CmmGraph, CmmTopZ)
import Monad
import Outputable
import Panic
import UniqSet
import UniqSupply
import ZipCfg
......
......@@ -18,7 +18,6 @@ import CmmTx
import CmmLiveZ
import DFMonad
import MkZipCfg
import OptimizationFuel
import PprCmm()
import ZipCfg
import ZipCfgCmmRep
......@@ -27,7 +26,6 @@ import ZipDataflow
import Monad
import Outputable hiding (empty)
import qualified Outputable as PP
import Panic
import UniqSet
import Maybe
......
......@@ -18,7 +18,6 @@ import MkZipCfg
import MkZipCfgCmm hiding (CmmBlock, CmmGraph)
import Monad
import Outputable
import Panic
import SMRep (ByteOff)
import ZipCfg
import ZipCfg as Z
......
......@@ -16,7 +16,6 @@ import CmmTx
import PprCmm()
import OptimizationFuel
import Control.Monad
import Maybes
import Outputable
import UniqSupply
......
......@@ -6,7 +6,6 @@ where
import BlockId
import Cmm
import CmmExpr
import PprCmm
import Outputable
import qualified ZipCfgCmmRep as G
......
......@@ -29,10 +29,8 @@ import qualified ZipCfg as G
import Maybes
import Outputable
import Panic
import Control.Monad
import Maybe
{-
......
......@@ -48,8 +48,6 @@ import ListSetOps
import Util
import FastString
import StaticFlags
import Control.Monad
\end{code}
......
......@@ -39,7 +39,6 @@ import DataCon
import Unique
import StaticFlags
import Maybes
import Constants
import Util
import Outputable
......
......@@ -30,7 +30,6 @@ import CLabel
import ClosureInfo
import CostCentre
import Id
import Var
import SMRep
import BasicTypes
\end{code}
......
......@@ -50,7 +50,6 @@ import FastString
import Constants -- Lots of field offsets
import Outputable
import Data.Maybe
import Data.Char
import Control.Monad
......
......@@ -41,7 +41,6 @@ import HscTypes
import CostCentre
import Id
import Name
import OccName
import TyCon
import Module
import ErrUtils
......
......@@ -41,7 +41,6 @@ import IdInfo
import Type
import DataCon
import Name
import OccName
import TyCon
import Module
import ErrUtils
......
......@@ -47,8 +47,6 @@ import Outputable
import FastString
import Maybes
import Data.List
------------------------------------------------------------------------
-- Top-level bindings
------------------------------------------------------------------------
......
......@@ -82,7 +82,6 @@ import Id
import IdInfo
import DataCon
import Name
import OccName
import Type
import TypeRep
import TcType
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment