summaryrefslogtreecommitdiff
path: root/compiler/nativeGen
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2012-08-21 19:51:58 +0100
committerIan Lynagh <ian@well-typed.com>2012-08-21 19:51:58 +0100
commiteb9b4e54861689d04b0dd6a2a626cf292a5aac7c (patch)
treee012e2d1a641b1c61bbe68be081d4c6ae4791cbb /compiler/nativeGen
parentb6b6311b1c8894fe9e157c5215decf4674d48cad (diff)
downloadhaskell-eb9b4e54861689d04b0dd6a2a626cf292a5aac7c.tar.gz
Remove unused 'targetWordSize'
Diffstat (limited to 'compiler/nativeGen')
-rw-r--r--compiler/nativeGen/TargetReg.hs6
1 files changed, 0 insertions, 6 deletions
diff --git a/compiler/nativeGen/TargetReg.hs b/compiler/nativeGen/TargetReg.hs
index f0d382d0d6..71e02a4c15 100644
--- a/compiler/nativeGen/TargetReg.hs
+++ b/compiler/nativeGen/TargetReg.hs
@@ -21,7 +21,6 @@ module TargetReg (
targetRealRegSqueeze,
targetClassOfRealReg,
targetMkVirtualReg,
- targetWordSize,
targetRegDotColor,
targetClassOfReg
)
@@ -34,7 +33,6 @@ import Reg
import RegClass
import Size
-import CmmType (wordWidth)
import Outputable
import Unique
import FastTypes
@@ -80,10 +78,6 @@ targetClassOfRealReg platform
ArchARM _ _ _ -> panic "targetClassOfRealReg ArchARM"
ArchUnknown -> panic "targetClassOfRealReg ArchUnknown"
--- TODO: This should look at targetPlatform too
-targetWordSize :: Size
-targetWordSize = intSize wordWidth
-
targetMkVirtualReg :: Platform -> Unique -> Size -> VirtualReg
targetMkVirtualReg platform
= case platformArch platform of