[commit: ghc] master: fix warnings (c90d45f)

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/c90d45f2bf1f350a0cc99c60eb81704b25309d53

>---------------------------------------------------------------

commit c90d45f2bf1f350a0cc99c60eb81704b25309d53
Author: Simon Marlow <[email protected]>
Date:   Thu Sep 20 14:12:05 2012 +0100

    fix warnings

>---------------------------------------------------------------

 compiler/nativeGen/RegAlloc/Linear/StackMap.hs |    5 +----
 1 files changed, 1 insertions(+), 4 deletions(-)

diff --git a/compiler/nativeGen/RegAlloc/Linear/StackMap.hs b/compiler/nativeGen/RegAlloc/Linear/StackMap.hs
index be9af02..69cf411 100644
--- a/compiler/nativeGen/RegAlloc/Linear/StackMap.hs
+++ b/compiler/nativeGen/RegAlloc/Linear/StackMap.hs
@@ -27,10 +27,7 @@ module RegAlloc.Linear.StackMap (
 
 where
 
-import RegAlloc.Linear.FreeRegs
-
 import DynFlags
-import Outputable
 import UniqFM
 import Unique
 
@@ -49,7 +46,7 @@ data StackMap
 
 -- | An empty stack map, with all slots available.
 emptyStackMap :: DynFlags -> StackMap
-emptyStackMap dflags = StackMap 0 emptyUFM
+emptyStackMap _ = StackMap 0 emptyUFM
 
 
 -- | If this vreg unique already has a stack assignment then return the slot number,