Commit abfbb0d6 authored by Herbert Valerio Riedel's avatar Herbert Valerio Riedel 🕺

Remove redundant explicit `Prelude` imports

Since they're implied by the lack of `NoImplicitPrelude`
parent ce237451
...@@ -104,8 +104,6 @@ module Control.Concurrent ( ...@@ -104,8 +104,6 @@ module Control.Concurrent (
) where ) where
import Prelude
import Control.Exception.Base as Exception import Control.Exception.Base as Exception
import GHC.Exception import GHC.Exception
......
...@@ -34,8 +34,6 @@ module Control.Concurrent.Chan ...@@ -34,8 +34,6 @@ module Control.Concurrent.Chan
writeList2Chan, writeList2Chan,
) where ) where
import Prelude
import System.IO.Unsafe ( unsafeInterleaveIO ) import System.IO.Unsafe ( unsafeInterleaveIO )
import Control.Concurrent.MVar import Control.Concurrent.MVar
import Control.Exception (mask_) import Control.Exception (mask_)
......
...@@ -17,5 +17,3 @@ ...@@ -17,5 +17,3 @@
module Control.Monad.Instances {-# DEPRECATED "This module now contains no instances and will be removed in the future" #-} -- deprecated in 7.8 module Control.Monad.Instances {-# DEPRECATED "This module now contains no instances and will be removed in the future" #-} -- deprecated in 7.8
(Functor(..),Monad(..)) where (Functor(..),Monad(..)) where
import Prelude
...@@ -36,8 +36,6 @@ module Control.Monad.ST.Lazy.Imp ( ...@@ -36,8 +36,6 @@ module Control.Monad.ST.Lazy.Imp (
unsafeIOToST unsafeIOToST
) where ) where
import Prelude
import Control.Monad.Fix import Control.Monad.Fix
import qualified Control.Monad.ST.Safe as ST import qualified Control.Monad.ST.Safe as ST
......
...@@ -17,7 +17,6 @@ ...@@ -17,7 +17,6 @@
module Control.Monad.Zip where module Control.Monad.Zip where
import Prelude
import Control.Monad (liftM) import Control.Monad (liftM)
-- | `MonadZip` type class. Minimal definition: `mzip` or `mzipWith` -- | `MonadZip` type class. Minimal definition: `mzip` or `mzipWith`
......
...@@ -34,8 +34,6 @@ module Data.Complex ...@@ -34,8 +34,6 @@ module Data.Complex
) where ) where
import Prelude
import Data.Typeable import Data.Typeable
import Data.Data (Data) import Data.Data (Data)
......
...@@ -37,7 +37,6 @@ module Data.Fixed ...@@ -37,7 +37,6 @@ module Data.Fixed
E12,Pico E12,Pico
) where ) where
import Prelude -- necessary to get dependencies right
import Data.Typeable import Data.Typeable
import Data.Data import Data.Data
import GHC.Read import GHC.Read
......
...@@ -61,6 +61,4 @@ module Data.Ix ...@@ -61,6 +61,4 @@ module Data.Ix
) where ) where
-- import Prelude
import GHC.Arr import GHC.Arr
...@@ -24,8 +24,6 @@ module Data.Ratio ...@@ -24,8 +24,6 @@ module Data.Ratio
) where ) where
import Prelude
import GHC.Real -- The basic defns for Ratio import GHC.Real -- The basic defns for Ratio
-- ----------------------------------------------------------------------------- -- -----------------------------------------------------------------------------
......
...@@ -24,8 +24,6 @@ module Data.STRef ( ...@@ -24,8 +24,6 @@ module Data.STRef (
modifySTRef' modifySTRef'
) where ) where
import Prelude
import GHC.ST import GHC.ST
import GHC.STRef import GHC.STRef
......
...@@ -25,7 +25,6 @@ module Data.STRef.Lazy ( ...@@ -25,7 +25,6 @@ module Data.STRef.Lazy (
import Control.Monad.ST.Lazy.Safe import Control.Monad.ST.Lazy.Safe
import qualified Data.STRef as ST import qualified Data.STRef as ST
import Prelude
newSTRef :: a -> ST s (ST.STRef s a) newSTRef :: a -> ST s (ST.STRef s a)
readSTRef :: ST.STRef s a -> ST s a readSTRef :: ST.STRef s a -> ST s a
......
...@@ -22,8 +22,6 @@ module Data.Unique ( ...@@ -22,8 +22,6 @@ module Data.Unique (
hashUnique hashUnique
) where ) where
import Prelude
import System.IO.Unsafe (unsafePerformIO) import System.IO.Unsafe (unsafePerformIO)
import GHC.Base import GHC.Base
......
...@@ -2,8 +2,6 @@ ...@@ -2,8 +2,6 @@
module GHC.Constants where module GHC.Constants where
import Prelude ()
-- TODO: This used to include HaskellConstants.hs, but that has now gone. -- TODO: This used to include HaskellConstants.hs, but that has now gone.
-- We probably want to include the constants in platformConstants somehow -- We probably want to include the constants in platformConstants somehow
-- instead. -- instead.
......
...@@ -3,7 +3,6 @@ ...@@ -3,7 +3,6 @@
module GHC.Environment (getFullArgs) where module GHC.Environment (getFullArgs) where
import Prelude
import Foreign import Foreign
import Foreign.C import Foreign.C
......
...@@ -24,8 +24,6 @@ module System.CPUTime ...@@ -24,8 +24,6 @@ module System.CPUTime
cpuTimePrecision -- :: Integer cpuTimePrecision -- :: Integer
) where ) where
import Prelude
import Data.Ratio import Data.Ratio
import Foreign.Safe import Foreign.Safe
......
...@@ -62,8 +62,6 @@ module System.Console.GetOpt ( ...@@ -62,8 +62,6 @@ module System.Console.GetOpt (
-- $example2 -- $example2
) where ) where
import Prelude -- necessary to get dependencies right
import Data.List ( isPrefixOf, find ) import Data.List ( isPrefixOf, find )
-- |What to do with options following non-options -- |What to do with options following non-options
......
...@@ -29,8 +29,6 @@ module System.Environment ...@@ -29,8 +29,6 @@ module System.Environment
getEnvironment, getEnvironment,
) where ) where
import Prelude
import Foreign.Safe import Foreign.Safe
import Foreign.C import Foreign.C
import System.IO.Error (mkIOError) import System.IO.Error (mkIOError)
......
...@@ -23,7 +23,6 @@ module System.Exit ...@@ -23,7 +23,6 @@ module System.Exit
, die , die
) where ) where
import Prelude
import System.IO import System.IO
import GHC.IO import GHC.IO
......
...@@ -24,7 +24,6 @@ module System.Info ...@@ -24,7 +24,6 @@ module System.Info
compilerVersion compilerVersion
) where ) where
import Prelude
import Data.Version import Data.Version
-- | The version of 'compilerName' with which the program was compiled -- | The version of 'compilerName' with which the program was compiled
......
...@@ -19,7 +19,6 @@ module System.Mem ...@@ -19,7 +19,6 @@ module System.Mem
, performMajorGC , performMajorGC
, performMinorGC , performMinorGC
) where ) where
import Prelude
-- | Triggers an immediate garbage collection. -- | Triggers an immediate garbage collection.
performGC :: IO () performGC :: IO ()
......
...@@ -38,8 +38,6 @@ module System.Mem.StableName ( ...@@ -38,8 +38,6 @@ module System.Mem.StableName (
eqStableName eqStableName
) where ) where
import Prelude
import Data.Typeable import Data.Typeable
import GHC.IO ( IO(..) ) import GHC.IO ( IO(..) )
......
...@@ -91,7 +91,6 @@ module Text.Printf( ...@@ -91,7 +91,6 @@ module Text.Printf(
IsChar(..) IsChar(..)
) where ) where
import Prelude
import Data.Char import Data.Char
import Data.Int import Data.Int
import Data.List import Data.List
......
...@@ -21,8 +21,6 @@ ...@@ -21,8 +21,6 @@
module Text.Show.Functions () where module Text.Show.Functions () where
import Prelude
instance Show (a -> b) where instance Show (a -> b) where
showsPrec _ _ = showString "<function>" showsPrec _ _ = showString "<function>"
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment