Placate GHC with explicit import lists
authorIan Lynagh <igloo@earth.li>
Fri, 20 Jun 2008 18:39:26 +0000 (18:39 +0000)
committerIan Lynagh <igloo@earth.li>
Fri, 20 Jun 2008 18:39:26 +0000 (18:39 +0000)
Data/Map.hs
Data/Sequence.hs
Data/Set.hs

index a71b281..6fcb797 100644 (file)
@@ -177,7 +177,7 @@ import Data.Monoid (Monoid(..))
 import Control.Applicative (Applicative(..), (<$>))
 import Data.Traversable (Traversable(traverse))
 import Data.Foldable (Foldable(foldMap))
-import Data.Typeable
+import Data.Typeable (Typeable2(..), TyCon, mkTyCon, mkTyConApp)
 
 {-
 -- for quick check
@@ -189,7 +189,7 @@ import List(nub,sort)
 
 #if __GLASGOW_HASKELL__
 import Text.Read
-import Data.Generics.Basics
+import Data.Generics.Basics (Data(..), mkNorepType, gcast2)
 import Data.Generics.Instances ()
 #endif
 
index 5761add..afcaaae 100644 (file)
@@ -75,12 +75,13 @@ import Control.Monad (MonadPlus(..))
 import Data.Monoid (Monoid(..))
 import Data.Foldable
 import Data.Traversable
-import Data.Typeable
+import Data.Typeable (TyCon, Typeable1(..), mkTyCon, mkTyConApp)
 
 #ifdef __GLASGOW_HASKELL__
 import Text.Read (Lexeme(Ident), lexP, parens, prec,
        readPrec, readListPrec, readListPrecDefault)
-import Data.Generics.Basics
+import Data.Generics.Basics (Data(..), DataType, Constr, Fixity(..),
+                             mkConstr, mkDataType, constrIndex, gcast1)
 #endif
 
 #if TESTING
index 9dd8af4..6a443a9 100644 (file)
@@ -104,7 +104,7 @@ import Prelude hiding (filter,foldr,null,map)
 import qualified Data.List as List
 import Data.Monoid (Monoid(..))
 import Data.Foldable (Foldable(foldMap))
-import Data.Typeable
+import Data.Typeable (Typeable1(..), TyCon, mkTyCon, mkTyConApp)
 
 {-
 -- just for testing
@@ -115,7 +115,7 @@ import qualified List
 
 #if __GLASGOW_HASKELL__
 import Text.Read
-import Data.Generics.Basics
+import Data.Generics.Basics (Data(..), mkNorepType, gcast1)
 import Data.Generics.Instances ()
 #endif