summaryrefslogtreecommitdiff
path: root/libraries/base/Foreign
diff options
context:
space:
mode:
authorsimonpj@microsoft <unknown>2007-05-03 12:30:10 +0000
committersimonpj@microsoft <unknown>2007-05-03 12:30:10 +0000
commitebde8c26902d51c84ec40cee9692dd2d7c3ebdb6 (patch)
treed2112fc29b0bebeca64c751630e608847e4beb6e /libraries/base/Foreign
parent279015b456299853d2f95e732c14f3ce66d5ec81 (diff)
downloadhaskell-ebde8c26902d51c84ec40cee9692dd2d7c3ebdb6.tar.gz
Trim imports, remove a cycle
A first attempt at removing gratuitous cycles in the base package. I've removed the useless module GHC.Dynamic, which gets rid of a cycle; and trimmed off various unnecesary imports. This also fixes the IsString import problem.
Diffstat (limited to 'libraries/base/Foreign')
-rw-r--r--libraries/base/Foreign/Ptr.hs1
-rw-r--r--libraries/base/Foreign/StablePtr.hs1
-rw-r--r--libraries/base/Foreign/Storable.hs1
-rw-r--r--libraries/base/Foreign/Storable.hs-boot1
4 files changed, 0 insertions, 4 deletions
diff --git a/libraries/base/Foreign/Ptr.hs b/libraries/base/Foreign/Ptr.hs
index 6467c3826b..23706a8762 100644
--- a/libraries/base/Foreign/Ptr.hs
+++ b/libraries/base/Foreign/Ptr.hs
@@ -65,7 +65,6 @@ import Data.Word
import Foreign.C.Types
#endif
-import Control.Monad ( liftM )
import Data.Bits
import Data.Typeable ( Typeable(..), mkTyCon, mkTyConApp )
import Foreign.Storable ( Storable(..) )
diff --git a/libraries/base/Foreign/StablePtr.hs b/libraries/base/Foreign/StablePtr.hs
index 9554060c58..8ebdcfeb92 100644
--- a/libraries/base/Foreign/StablePtr.hs
+++ b/libraries/base/Foreign/StablePtr.hs
@@ -30,7 +30,6 @@ module Foreign.StablePtr
#ifdef __GLASGOW_HASKELL__
import GHC.Stable
-import GHC.Err
#endif
#ifdef __HUGS__
diff --git a/libraries/base/Foreign/Storable.hs b/libraries/base/Foreign/Storable.hs
index c48746bc34..3f054490aa 100644
--- a/libraries/base/Foreign/Storable.hs
+++ b/libraries/base/Foreign/Storable.hs
@@ -45,7 +45,6 @@ import GHC.Stable ( StablePtr )
import GHC.Num
import GHC.Int
import GHC.Word
-import GHC.Stable
import GHC.Ptr
import GHC.Float
import GHC.Err
diff --git a/libraries/base/Foreign/Storable.hs-boot b/libraries/base/Foreign/Storable.hs-boot
index 12d256c481..35374b5abe 100644
--- a/libraries/base/Foreign/Storable.hs-boot
+++ b/libraries/base/Foreign/Storable.hs-boot
@@ -5,7 +5,6 @@ module Foreign.Storable where
import GHC.Float
import GHC.Int
-import GHC.Num
import GHC.Word
class Storable a