These unused imports are detected by the new unused-import code
43 files changed:
) where
import Prelude hiding (id,(.))
) where
import Prelude hiding (id,(.))
-import qualified Prelude
import Control.Category
import Control.Arrow
import Control.Category
import Control.Arrow
) where
import Prelude hiding (id,(.))
) where
import Prelude hiding (id,(.))
-import qualified Prelude
import Control.Monad
import Control.Monad.Fix
import Control.Monad
import Control.Monad.Fix
module Control.Category where
module Control.Category where
-import Prelude hiding (id,(.))
import qualified Prelude
infixr 9 .
import qualified Prelude
infixr 9 .
#ifdef __GLASGOW_HASKELL__
import GHC.Base
#ifdef __GLASGOW_HASKELL__
import GHC.Base
-import GHC.IO hiding ( onException, finally )
+-- import GHC.IO hiding ( onException, finally )
import Data.Maybe
#else
import Prelude hiding (catch)
import Data.Maybe
#else
import Prelude hiding (catch)
import GHC.IO.Exception
import GHC.Exception
import GHC.Show
import GHC.IO.Exception
import GHC.Exception
import GHC.Show
-import GHC.Exception hiding ( Exception )
+-- import GHC.Exception hiding ( Exception )
unsafeSTToIO -- :: ST s a -> IO a
) where
unsafeSTToIO -- :: ST s a -> IO a
) where
import Control.Monad.Fix
#include "Typeable.h"
import Control.Monad.Fix
#include "Typeable.h"
-import Control.Monad.ST (RealWorld)
import qualified Control.Monad.ST as ST
#ifdef __GLASGOW_HASKELL__
import qualified GHC.ST
import GHC.Base
import qualified Control.Monad.ST as ST
#ifdef __GLASGOW_HASKELL__
import qualified GHC.ST
import GHC.Base
module Control.Monad.ST
) where
module Control.Monad.ST
) where
import GHC.Base
import GHC.Num
import GHC.Show
import GHC.Base
import GHC.Num
import GHC.Show
import GHC.IO.Handle.FD ( stdout )
import qualified GHC.IO as New
import qualified GHC.IO.Exception as New
import GHC.IO.Handle.FD ( stdout )
import qualified GHC.IO as New
import qualified GHC.IO.Exception as New
import Control.Monad
-- Imports for the instances
import Control.Monad
-- Imports for the instances
import Data.Int -- So we can give Data instance for Int8, ...
import Data.Word -- So we can give Data instance for Word8, ...
#ifdef __GLASGOW_HASKELL__
import Data.Int -- So we can give Data instance for Int8, ...
import Data.Word -- So we can give Data instance for Word8, ...
#ifdef __GLASGOW_HASKELL__
#ifdef __GLASGOW_HASKELL__
import GHC.Base
import GHC.Show
#ifdef __GLASGOW_HASKELL__
import GHC.Base
import GHC.Show
#ifdef __GLASGOW_HASKELL__
import GHC.Base
import GHC.STRef
#ifdef __GLASGOW_HASKELL__
import GHC.Base
import GHC.STRef
import GHC.IORef hiding (atomicModifyIORef)
import qualified GHC.IORef
#if !defined(__PARALLEL_HASKELL__)
import GHC.IORef hiding (atomicModifyIORef)
import qualified GHC.IORef
#if !defined(__PARALLEL_HASKELL__)
#ifdef __GLASGOW_HASKELL__
import GHC.Arr
#ifdef __GLASGOW_HASKELL__
import GHC.Arr
module Data.STRef
) where
module Data.STRef
) where
import GHC.Num (Integer, fromInteger, (+))
import GHC.Real ( rem, Ratio )
import GHC.IORef (IORef,newIORef)
import GHC.Num (Integer, fromInteger, (+))
import GHC.Real ( rem, Ratio )
import GHC.IORef (IORef,newIORef)
-import GHC.IO (IO, unsafePerformIO,block)
+import GHC.IO (unsafePerformIO,block)
-- These imports are so we can define Typeable instances
-- It'd be better to give Typeable instances in the modules themselves
-- These imports are so we can define Typeable instances
-- It'd be better to give Typeable instances in the modules themselves
#ifdef __GLASGOW_HASKELL__
import GHC.Base
#ifdef __GLASGOW_HASKELL__
import GHC.Base
import GHC.Num
import GHC.Err ( undefined )
import GHC.ForeignPtr
import GHC.Num
import GHC.Err ( undefined )
import GHC.ForeignPtr
#endif
import GHC.Base
import GHC.Num
#endif
import GHC.Base
import GHC.Num
import GHC.IO.Exception
#endif
import GHC.IO.Exception
#endif
import GHC.Enum
import GHC.Word ( Word(..) )
import GHC.Enum
import GHC.Word ( Word(..) )
import Data.Word
#else
import Control.Monad ( liftM )
import Data.Word
#else
import Control.Monad ( liftM )
#ifdef __GLASGOW_HASKELL__
import GHC.Storable
import GHC.Stable ( StablePtr )
#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
import GHC.Num
import GHC.Int
import GHC.Word
#endif
#ifdef mingw32_HOST_OS
import GHC.Real ( div )
#endif
#ifdef mingw32_HOST_OS
import GHC.Real ( div )
-import GHC.Ptr ( plusPtr, FunPtr(..) )
+import GHC.Ptr ( FunPtr(..) )
#endif
#ifdef mingw32_HOST_OS
import GHC.Read ( Read )
#endif
#ifdef mingw32_HOST_OS
import GHC.Read ( Read )
import Control.Arrow (Arrow(..))
import Control.Category ((.))
import Data.Data (Data)
import Control.Arrow (Arrow(..))
import Control.Category ((.))
import Data.Data (Data)
-import Prelude hiding ((.))
-- A version of Control.Category.>>> overloaded on Arrow
#ifndef __HADDOCK__
-- A version of Control.Category.>>> overloaded on Arrow
#ifndef __HADDOCK__
import GHC.Base
import GHC.Word
import GHC.Int
import GHC.Base
import GHC.Word
import GHC.Int
import GHC.Ptr
import Data.String
import Data.List
import GHC.Ptr
import Data.String
import Data.List
import GHC.Show
import GHC.List ( null )
import GHC.Base
import GHC.Show
import GHC.List ( null )
import GHC.Base
import GHC.IORef
import GHC.STRef ( STRef(..) )
import GHC.Ptr ( Ptr(..), FunPtr(..) )
import GHC.IORef
import GHC.STRef ( STRef(..) )
import GHC.Ptr ( Ptr(..), FunPtr(..) )
import GHC.Num
import GHC.Ptr
import GHC.Word
import GHC.Num
import GHC.Ptr
import GHC.Word
import GHC.Num
import GHC.Real
import Data.Maybe
import GHC.Num
import GHC.Real
import Data.Maybe
import GHC.IO.Device as IODevice
import GHC.IO.Device as RawIO
import GHC.IO.Buffer
import GHC.IO.Device as IODevice
import GHC.IO.Device as RawIO
import GHC.IO.Buffer
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.Word
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.Word
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.Base
import GHC.Word
import GHC.Base
import GHC.Word
import GHC.IO.Buffer
-- -----------------------------------------------------------------------------
import GHC.IO.Buffer
-- -----------------------------------------------------------------------------
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.Base
import GHC.Real
import GHC.Num
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.IO.Exception
import GHC.IO.Buffer
import GHC.IO.Encoding.Types
import GHC.Show
import GHC.Enum
import Data.Maybe
import GHC.Show
import GHC.Enum
import Data.Maybe
import Data.Typeable
import GHC.IO
import Data.Typeable
import GHC.IO
import qualified System.Posix.Internals
import System.Posix.Internals hiding (FD, setEcho, getEcho)
import System.Posix.Types
import qualified System.Posix.Internals
import System.Posix.Internals hiding (FD, setEcho, getEcho)
import System.Posix.Types
-- -----------------------------------------------------------------------------
-- The file-descriptor IO device
-- -----------------------------------------------------------------------------
-- The file-descriptor IO device
import GHC.Real
import GHC.Show
import Data.Maybe
import GHC.Real
import GHC.Show
import Data.Maybe
import Foreign.C.Types
import GHC.MVar
import GHC.IO
import GHC.IO.Encoding
import Foreign.C.Types
import GHC.MVar
import GHC.IO
import GHC.IO.Encoding
+-- import GHC.IO.Exception
import GHC.IO.Device as IODevice
import GHC.IO.Exception
import GHC.IO.IOMode
import GHC.IO.Device as IODevice
import GHC.IO.Exception
import GHC.IO.IOMode
import GHC.Real
import GHC.Base
import GHC.Real
import GHC.Base
import GHC.Exception
import GHC.Num ( Num(..) )
import GHC.Show
import GHC.Exception
import GHC.Num ( Num(..) )
import GHC.Show
import Control.Monad
import Data.Maybe
import Foreign
import Control.Monad
import Data.Maybe
import Foreign
+-- import System.IO.Error
import System.Posix.Internals hiding (FD)
import System.Posix.Internals hiding (FD)
-import qualified System.Posix.Internals as Posix
#ifdef DEBUG_DUMP
import Foreign.C
#ifdef DEBUG_DUMP
import Foreign.C
+import GHC.IO() -- instance Monad IO
import Data.Maybe
data MVar a = MVar (MVar# RealWorld a)
import Data.Maybe
data MVar a = MVar (MVar# RealWorld a)
-import GHC.Err ( error )
import GHC.List ( length )
import GHC.ST
import GHC.Num
import GHC.List ( length )
import GHC.ST
import GHC.Num
import GHC.Ptr
import GHC.Base
import GHC.Ptr
import GHC.Base
-----------------------------------------------------------------------------
-- Stable Pointers
-----------------------------------------------------------------------------
-- Stable Pointers
import GHC.Base
import Data.Maybe
import GHC.Base
import Data.Maybe
-import GHC.IO ( IO(..), unIO )
#ifdef __GLASGOW_HASKELL__
import GHC.Base
#ifdef __GLASGOW_HASKELL__
import GHC.Base
-import GHC.IO
-import GHC.IO.Exception
+-- import GHC.IO
+-- import GHC.IO.Exception
import Text.Read
import GHC.Enum
import GHC.Num
import GHC.Real
import GHC.Float
import GHC.Show
import Text.Read
import GHC.Enum
import GHC.Num
import GHC.Real
import GHC.Float
import GHC.Show
-import GHC.Err ( error, undefined )
+import GHC.Err ( undefined )
import Foreign.C
import Control.Exception.Base ( bracket )
import Control.Monad
import Foreign.C
import Control.Exception.Base ( bracket )
import Control.Monad
import GHC.IO.Exception
#endif
import GHC.IO.Exception
#endif
import GHC.IO.Handle
import GHC.IORef
import GHC.IO.Exception ( userError )
import GHC.IO.Handle
import GHC.IORef
import GHC.IO.Exception ( userError )
import GHC.Num
import Text.Read
import GHC.Show
import GHC.Num
import Text.Read
import GHC.Show
import Foreign
import Foreign.C
import Foreign
import Foreign.C
import Data.Maybe
#if !defined(HTYPE_TCFLAG_T)
import Data.Maybe
#if !defined(HTYPE_TCFLAG_T)
import Foreign
import Foreign.C
import Data.Typeable
import Foreign
import Foreign.C
import Data.Typeable
#ifdef __GLASGOW_HASKELL__
import GHC.Base
import GHC.Enum
import GHC.Num
import GHC.Real
#ifdef __GLASGOW_HASKELL__
import GHC.Base
import GHC.Enum
import GHC.Num
import GHC.Real
import GHC.Read
import GHC.Show
#else
import GHC.Read
import GHC.Show
#else