Fix the build with GHC 6.8
[ghc-hetmet.git] / compiler / specialise / SpecConstr.lhs
index f366cd7..c545fad 100644 (file)
@@ -53,7 +53,11 @@ import qualified LazyUniqFM as L
 import MonadUtils
 import Control.Monad   ( zipWithM )
 import Data.List
+#if __GLASGOW_HASKELL__ > 609
 import Data.Data        ( Data, Typeable )
+#else
+import Data.Generics    ( Data, Typeable )
+#endif
 \end{code}
 
 -----------------------------------------------------