summaryrefslogtreecommitdiff
path: root/compiler/nativeGen
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2009-07-07 12:15:48 +0000
committerIan Lynagh <igloo@earth.li>2009-07-07 12:15:48 +0000
commit703ca1542c8e0983cc9d8eebce6e9f3dd3fd71e2 (patch)
tree3bc691cef188bfe99017ed25882ed45635f851fe /compiler/nativeGen
parent7bb3d1fc79521d591cd9f824893963141a7997b6 (diff)
downloadhaskell-703ca1542c8e0983cc9d8eebce6e9f3dd3fd71e2.tar.gz
Remove unused imports
Diffstat (limited to 'compiler/nativeGen')
-rw-r--r--compiler/nativeGen/Reg.hs1
-rw-r--r--compiler/nativeGen/RegAlloc/Graph/Coalesce.hs1
-rw-r--r--compiler/nativeGen/RegAlloc/Graph/Main.hs1
-rw-r--r--compiler/nativeGen/RegAlloc/Graph/Spill.hs1
-rw-r--r--compiler/nativeGen/RegAlloc/Graph/SpillClean.hs1
-rw-r--r--compiler/nativeGen/RegAlloc/Graph/SpillCost.hs1
-rw-r--r--compiler/nativeGen/RegAlloc/Linear/X86/FreeRegs.hs1
-rw-r--r--compiler/nativeGen/SPARC/Instr.hs2
-rw-r--r--compiler/nativeGen/X86/Instr.hs1
9 files changed, 0 insertions, 10 deletions
diff --git a/compiler/nativeGen/Reg.hs b/compiler/nativeGen/Reg.hs
index 4819d0f3c7..1da72c4cef 100644
--- a/compiler/nativeGen/Reg.hs
+++ b/compiler/nativeGen/Reg.hs
@@ -29,7 +29,6 @@ where
import Outputable
import Unique
-import Panic
import RegClass
import Data.List
diff --git a/compiler/nativeGen/RegAlloc/Graph/Coalesce.hs b/compiler/nativeGen/RegAlloc/Graph/Coalesce.hs
index 8521e92601..74eb0c2f55 100644
--- a/compiler/nativeGen/RegAlloc/Graph/Coalesce.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/Coalesce.hs
@@ -18,7 +18,6 @@ import UniqFM
import UniqSet
import UniqSupply
-import Control.Monad
import Data.List
-- | Do register coalescing on this top level thing
diff --git a/compiler/nativeGen/RegAlloc/Graph/Main.hs b/compiler/nativeGen/RegAlloc/Graph/Main.hs
index 4ffcfee355..5fa771cfb8 100644
--- a/compiler/nativeGen/RegAlloc/Graph/Main.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/Main.hs
@@ -11,7 +11,6 @@ module RegAlloc.Graph.Main (
where
import qualified GraphColor as Color
-import qualified GraphBase as Color
import RegAlloc.Liveness
import RegAlloc.Graph.Spill
import RegAlloc.Graph.SpillClean
diff --git a/compiler/nativeGen/RegAlloc/Graph/Spill.hs b/compiler/nativeGen/RegAlloc/Graph/Spill.hs
index ce34b513a1..f9a2586f5a 100644
--- a/compiler/nativeGen/RegAlloc/Graph/Spill.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/Spill.hs
@@ -22,7 +22,6 @@ import UniqSupply
import Outputable
import Data.List
-import Data.Maybe
-- | Spill all these virtual regs to memory
diff --git a/compiler/nativeGen/RegAlloc/Graph/SpillClean.hs b/compiler/nativeGen/RegAlloc/Graph/SpillClean.hs
index 9d0dcf9236..b7b7475aec 100644
--- a/compiler/nativeGen/RegAlloc/Graph/SpillClean.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/SpillClean.hs
@@ -42,7 +42,6 @@ import State
import Outputable
import Util
-import Data.Maybe
import Data.List ( find, nub )
--
diff --git a/compiler/nativeGen/RegAlloc/Graph/SpillCost.hs b/compiler/nativeGen/RegAlloc/Graph/SpillCost.hs
index ff3f76a545..9de48d5cd8 100644
--- a/compiler/nativeGen/RegAlloc/Graph/SpillCost.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/SpillCost.hs
@@ -33,7 +33,6 @@ import State
import Data.List (nub, minimumBy)
import Data.Maybe
-import Control.Monad
type SpillCostRecord
= ( VirtualReg -- register name
diff --git a/compiler/nativeGen/RegAlloc/Linear/X86/FreeRegs.hs b/compiler/nativeGen/RegAlloc/Linear/X86/FreeRegs.hs
index db3d8a354f..4ba637f9b7 100644
--- a/compiler/nativeGen/RegAlloc/Linear/X86/FreeRegs.hs
+++ b/compiler/nativeGen/RegAlloc/Linear/X86/FreeRegs.hs
@@ -10,7 +10,6 @@ import Panic
import Data.Word
import Data.Bits
-import Data.List
type FreeRegs
= Word32
diff --git a/compiler/nativeGen/SPARC/Instr.hs b/compiler/nativeGen/SPARC/Instr.hs
index 5cb28d5c40..87b6abc317 100644
--- a/compiler/nativeGen/SPARC/Instr.hs
+++ b/compiler/nativeGen/SPARC/Instr.hs
@@ -43,8 +43,6 @@ import FastString
import FastBool
import Outputable
-import GHC.Exts
-
-- | Register or immediate
data RI
diff --git a/compiler/nativeGen/X86/Instr.hs b/compiler/nativeGen/X86/Instr.hs
index 7e11d23363..5d731bd88d 100644
--- a/compiler/nativeGen/X86/Instr.hs
+++ b/compiler/nativeGen/X86/Instr.hs
@@ -28,7 +28,6 @@ import Outputable
import Constants (rESERVED_C_STACK_BYTES)
import CLabel
-import Panic
-- Size of a PPC memory address, in bytes.
--