[commit: base] master: Remove some redundant imports (ce34cd2)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/base

On branch  : master

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

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

commit ce34cd29197b5b465c2b6514c0f2177febaeb44d
Author: Ian Lynagh <igloo at earth.li>
Date:   Wed Feb 29 01:23:06 2012 +0000

    Remove some redundant imports

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

 Control/Monad/ST/Imp.hs |    4 +---
 Foreign/Storable.hs     |    1 -
 GHC/Enum.lhs            |    1 -
 GHC/MVar.hs             |    1 -
 4 files changed, 1 insertions(+), 6 deletions(-)

diff --git a/Control/Monad/ST/Imp.hs b/Control/Monad/ST/Imp.hs
index 8095ae2..e3feaa6 100644
--- a/Control/Monad/ST/Imp.hs
+++ b/Control/Monad/ST/Imp.hs
@@ -35,9 +35,7 @@ module Control.Monad.ST.Imp (
         unsafeSTToIO            -- :: ST s a -> IO a
     ) where
 
-#if defined(__GLASGOW_HASKELL__)
-import Control.Monad.Fix ()
-#else
+#if !defined(__GLASGOW_HASKELL__)
 import Control.Monad.Fix
 #endif
 
diff --git a/Foreign/Storable.hs b/Foreign/Storable.hs
index 9ba6bb9..753dc83 100644
--- a/Foreign/Storable.hs
+++ b/Foreign/Storable.hs
@@ -47,7 +47,6 @@ import Control.Monad            ( liftM )
 #ifdef __GLASGOW_HASKELL__
 import GHC.Storable
 import GHC.Stable       ( StablePtr )
-import GHC.IO()		-- Instance Monad IO
 import GHC.Num
 import GHC.Int
 import GHC.Word
diff --git a/GHC/Enum.lhs b/GHC/Enum.lhs
index 4475540..cea3ced 100644
--- a/GHC/Enum.lhs
+++ b/GHC/Enum.lhs
@@ -32,7 +32,6 @@ import GHC.Char
 import GHC.Integer
 import GHC.Num
 import GHC.Show
-import Data.Tuple       ()              -- for dependencies
 default ()              -- Double isn't available yet
 \end{code}
 
diff --git a/GHC/MVar.hs b/GHC/MVar.hs
index dc9f73d..6a10748 100644
--- a/GHC/MVar.hs
+++ b/GHC/MVar.hs
@@ -31,7 +31,6 @@ module GHC.MVar (
     ) where
 
 import GHC.Base
-import GHC.IO ()   -- instance Monad IO
 import Data.Maybe
 
 data MVar a = MVar (MVar# RealWorld a)