diff --git a/libraries/base/Control/Concurrent.hs b/libraries/base/Control/Concurrent.hs index eaf1e6621f5bd78325465be6193227d7c602a3b4..c12fef54b02e91fe8417e7daa3c210a84895b489 100644 --- a/libraries/base/Control/Concurrent.hs +++ b/libraries/base/Control/Concurrent.hs @@ -104,8 +104,6 @@ module Control.Concurrent ( ) where -import Prelude - import Control.Exception.Base as Exception import GHC.Exception diff --git a/libraries/base/Control/Concurrent/Chan.hs b/libraries/base/Control/Concurrent/Chan.hs index e0b7b54c23452a9d82088b30460629b237841dde..487187503d07e8c5dee1899849111d46a894d8b4 100644 --- a/libraries/base/Control/Concurrent/Chan.hs +++ b/libraries/base/Control/Concurrent/Chan.hs @@ -34,8 +34,6 @@ module Control.Concurrent.Chan writeList2Chan, ) where -import Prelude - import System.IO.Unsafe ( unsafeInterleaveIO ) import Control.Concurrent.MVar import Control.Exception (mask_) diff --git a/libraries/base/Control/Monad/Instances.hs b/libraries/base/Control/Monad/Instances.hs index 687d33c4b8a744dc2b872221b070010519c20142..7a4fdbefcdb7f76fc47b002075a297d373053e06 100644 --- a/libraries/base/Control/Monad/Instances.hs +++ b/libraries/base/Control/Monad/Instances.hs @@ -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 (Functor(..),Monad(..)) where - -import Prelude diff --git a/libraries/base/Control/Monad/ST/Lazy/Imp.hs b/libraries/base/Control/Monad/ST/Lazy/Imp.hs index 3fdd541047914cc22d4d5c51bdfddcdfc95e94c4..80c9fa5af380ab2957bfb3dc45a98027c3230679 100644 --- a/libraries/base/Control/Monad/ST/Lazy/Imp.hs +++ b/libraries/base/Control/Monad/ST/Lazy/Imp.hs @@ -36,8 +36,6 @@ module Control.Monad.ST.Lazy.Imp ( unsafeIOToST ) where -import Prelude - import Control.Monad.Fix import qualified Control.Monad.ST.Safe as ST diff --git a/libraries/base/Control/Monad/Zip.hs b/libraries/base/Control/Monad/Zip.hs index ec13eedf233738618d1daa92f871c229be1f6064..197951e6e96b9a9eb5d4ad9e95c9856c8292785d 100644 --- a/libraries/base/Control/Monad/Zip.hs +++ b/libraries/base/Control/Monad/Zip.hs @@ -17,7 +17,6 @@ module Control.Monad.Zip where -import Prelude import Control.Monad (liftM) -- | `MonadZip` type class. Minimal definition: `mzip` or `mzipWith` diff --git a/libraries/base/Data/Complex.hs b/libraries/base/Data/Complex.hs index 0ce148788d563a612a1668441b22c815962da8bd..2baa60bd3653f500eb48847ac85feaf47c19575c 100644 --- a/libraries/base/Data/Complex.hs +++ b/libraries/base/Data/Complex.hs @@ -34,8 +34,6 @@ module Data.Complex ) where -import Prelude - import Data.Typeable import Data.Data (Data) diff --git a/libraries/base/Data/Fixed.hs b/libraries/base/Data/Fixed.hs index 8e8ea60ebee6d1930ba0ef9916a35fbced01a49e..b499617f32a7308855664e7442474427da452607 100644 --- a/libraries/base/Data/Fixed.hs +++ b/libraries/base/Data/Fixed.hs @@ -37,7 +37,6 @@ module Data.Fixed E12,Pico ) where -import Prelude -- necessary to get dependencies right import Data.Typeable import Data.Data import GHC.Read diff --git a/libraries/base/Data/Ix.hs b/libraries/base/Data/Ix.hs index d3be1c4759fee8885f9fd1ff810247c1db6ef414..e7e1f34beea57bc807ed36ab8a74c81b6ed37227 100644 --- a/libraries/base/Data/Ix.hs +++ b/libraries/base/Data/Ix.hs @@ -61,6 +61,4 @@ module Data.Ix ) where --- import Prelude - import GHC.Arr diff --git a/libraries/base/Data/Ratio.hs b/libraries/base/Data/Ratio.hs index 6a16e9a260bbb15845c26c67cdda4385ae3dcd27..8517e485ff2e8bc4d3acad9a47f9337fc54db549 100644 --- a/libraries/base/Data/Ratio.hs +++ b/libraries/base/Data/Ratio.hs @@ -24,8 +24,6 @@ module Data.Ratio ) where -import Prelude - import GHC.Real -- The basic defns for Ratio -- ----------------------------------------------------------------------------- diff --git a/libraries/base/Data/STRef.hs b/libraries/base/Data/STRef.hs index dc65abc7919f981d76e4cc341d78548fa3d0601b..8df34bba9551d7a3de289e1587fdf4bfbc8c284e 100644 --- a/libraries/base/Data/STRef.hs +++ b/libraries/base/Data/STRef.hs @@ -24,8 +24,6 @@ module Data.STRef ( modifySTRef' ) where -import Prelude - import GHC.ST import GHC.STRef diff --git a/libraries/base/Data/STRef/Lazy.hs b/libraries/base/Data/STRef/Lazy.hs index 039b03f3b569f1128f3a1bd6cb94ec201f4499f4..5134de446eb6dc0d243e54599e4f9fcd53aca0f3 100644 --- a/libraries/base/Data/STRef/Lazy.hs +++ b/libraries/base/Data/STRef/Lazy.hs @@ -25,7 +25,6 @@ module Data.STRef.Lazy ( import Control.Monad.ST.Lazy.Safe import qualified Data.STRef as ST -import Prelude newSTRef :: a -> ST s (ST.STRef s a) readSTRef :: ST.STRef s a -> ST s a diff --git a/libraries/base/Data/Unique.hs b/libraries/base/Data/Unique.hs index a5c0d6c753ec57328e8f83536c4bc3b3d4926e44..74bac76ad073f3c3bdcac57ae979e227c0ff23be 100644 --- a/libraries/base/Data/Unique.hs +++ b/libraries/base/Data/Unique.hs @@ -22,8 +22,6 @@ module Data.Unique ( hashUnique ) where -import Prelude - import System.IO.Unsafe (unsafePerformIO) import GHC.Base diff --git a/libraries/base/GHC/Constants.hs b/libraries/base/GHC/Constants.hs index d8efd7228cc2f026d8ad4527983500f11df7b7aa..c2e01a3e62d5549b47294b67d922ad620a47016e 100644 --- a/libraries/base/GHC/Constants.hs +++ b/libraries/base/GHC/Constants.hs @@ -2,8 +2,6 @@ module GHC.Constants where -import Prelude () - -- TODO: This used to include HaskellConstants.hs, but that has now gone. -- We probably want to include the constants in platformConstants somehow -- instead. diff --git a/libraries/base/GHC/Environment.hs b/libraries/base/GHC/Environment.hs index 257ee27ebf3bee0a59674c97653318c403c42919..39b472913a4e8bd288f06fcaf17a69d4ee578306 100644 --- a/libraries/base/GHC/Environment.hs +++ b/libraries/base/GHC/Environment.hs @@ -3,7 +3,6 @@ module GHC.Environment (getFullArgs) where -import Prelude import Foreign import Foreign.C diff --git a/libraries/base/System/CPUTime.hsc b/libraries/base/System/CPUTime.hsc index 85634b7473388ac13864180113a4b44e0cc8ebb8..1d2f341d18efc94612bf5bba70a84f2a9621ac3e 100644 --- a/libraries/base/System/CPUTime.hsc +++ b/libraries/base/System/CPUTime.hsc @@ -24,8 +24,6 @@ module System.CPUTime cpuTimePrecision -- :: Integer ) where -import Prelude - import Data.Ratio import Foreign.Safe diff --git a/libraries/base/System/Console/GetOpt.hs b/libraries/base/System/Console/GetOpt.hs index 5bdb6d11d1309309a8a5e51cb9f862c62a1371e0..fa9f776ad5e13bd6674cd71510102c5c34fb7a94 100644 --- a/libraries/base/System/Console/GetOpt.hs +++ b/libraries/base/System/Console/GetOpt.hs @@ -62,8 +62,6 @@ module System.Console.GetOpt ( -- $example2 ) where -import Prelude -- necessary to get dependencies right - import Data.List ( isPrefixOf, find ) -- |What to do with options following non-options diff --git a/libraries/base/System/Environment.hs b/libraries/base/System/Environment.hs index b238360d2402445bf47ba67cd474f47d6f051ce1..ee91b78d79ec025ac64d3600a2c4684abaa23e8c 100644 --- a/libraries/base/System/Environment.hs +++ b/libraries/base/System/Environment.hs @@ -29,8 +29,6 @@ module System.Environment getEnvironment, ) where -import Prelude - import Foreign.Safe import Foreign.C import System.IO.Error (mkIOError) diff --git a/libraries/base/System/Exit.hs b/libraries/base/System/Exit.hs index f2fc4337770b5117178af8f5554ef72dd1a2811f..088a76bd96af8bc27139488a17fc6ba49bde87b5 100644 --- a/libraries/base/System/Exit.hs +++ b/libraries/base/System/Exit.hs @@ -23,7 +23,6 @@ module System.Exit , die ) where -import Prelude import System.IO import GHC.IO diff --git a/libraries/base/System/Info.hs b/libraries/base/System/Info.hs index 1d251bc37c46e7343ab8ff2d7938f5815d86d72e..1791cdbfe31854df64223ee946179e26747fdb18 100644 --- a/libraries/base/System/Info.hs +++ b/libraries/base/System/Info.hs @@ -24,7 +24,6 @@ module System.Info compilerVersion ) where -import Prelude import Data.Version -- | The version of 'compilerName' with which the program was compiled diff --git a/libraries/base/System/Mem.hs b/libraries/base/System/Mem.hs index 3674dcb2243bcccf812f2056b09032ca11aae393..09dfdf9191b71b9ee362236ee2c03582784f9ee3 100644 --- a/libraries/base/System/Mem.hs +++ b/libraries/base/System/Mem.hs @@ -19,7 +19,6 @@ module System.Mem , performMajorGC , performMinorGC ) where -import Prelude -- | Triggers an immediate garbage collection. performGC :: IO () diff --git a/libraries/base/System/Mem/StableName.hs b/libraries/base/System/Mem/StableName.hs index 4f2cab81f8bf59c871a67556565b98b4443a0fc8..f2baaf3e83a07911ee632bad75869aaace83c0a0 100644 --- a/libraries/base/System/Mem/StableName.hs +++ b/libraries/base/System/Mem/StableName.hs @@ -38,8 +38,6 @@ module System.Mem.StableName ( eqStableName ) where -import Prelude - import Data.Typeable import GHC.IO ( IO(..) ) diff --git a/libraries/base/Text/Printf.hs b/libraries/base/Text/Printf.hs index a92a1a48abe088b3384b08f3d1a6c31afdaca59b..d20e077b959513925f57f3ac009eaf4590a0a456 100644 --- a/libraries/base/Text/Printf.hs +++ b/libraries/base/Text/Printf.hs @@ -91,7 +91,6 @@ module Text.Printf( IsChar(..) ) where -import Prelude import Data.Char import Data.Int import Data.List diff --git a/libraries/base/Text/Show/Functions.hs b/libraries/base/Text/Show/Functions.hs index b34cbc67ce735e1eec695bc409d04fdf99e06632..7d3f110a32627cb840c9ebce914b4baad1833e73 100644 --- a/libraries/base/Text/Show/Functions.hs +++ b/libraries/base/Text/Show/Functions.hs @@ -21,8 +21,6 @@ module Text.Show.Functions () where -import Prelude - instance Show (a -> b) where showsPrec _ _ = showString ""