X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FTuple.hs;h=81ae83d2e1b799c972c2e1bb9efb7a56a69337ff;hb=1a2c75698b74fe40e3cd91854c3f6a64e1dac348;hp=8ed3928638833c28bb49d54838919884b66e42d3;hpb=06ffe41b5a1730c93f5e3add2d0f32fe6677d223;p=ghc-base.git

diff --git a/Data/Tuple.hs b/Data/Tuple.hs
index 8ed3928..81ae83d 100644
--- a/Data/Tuple.hs
+++ b/Data/Tuple.hs
@@ -40,7 +40,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