Remove ST stuff that is now in the new st package

[ghc-base.git] / Data / Tuple.hs

diff --git a/Data/Tuple.hs b/Data/Tuple.hs
index 1a15887..335835c 100644 (file)
--- a/Data/Tuple.hs
+++ b/Data/Tuple.hs
@@ -1,4 +1,7 @@
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
+{-# OPTIONS_GHC -fno-warn-orphans #-}
+-- XXX -fno-warn-unused-imports needed for the GHC.Tuple import below. Sigh.
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.Tuple
@@ -38,7 +41,9 @@ module Data.Tuple
     where
 
 #ifdef __GLASGOW_HASKELL__
-import GHC.Base
+import GHC.Bool
+import GHC.Classes
+import GHC.Ordering
 -- XXX The standalone deriving clauses fail with
 --     The data constructors of `(,)' are not all in scope
 --       so you cannot derive an instance for it