[commit: ghc] wip/generalized-arrow: More test fixes (40b7367)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/generalized-arrow
Link       : http://ghc.haskell.org/trac/ghc/changeset/40b7367003948074b04666d886b4c1adb53f5990/ghc

>---------------------------------------------------------------

commit 40b7367003948074b04666d886b4c1adb53f5990
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Wed Mar 16 23:15:48 2016 +0100

    More test fixes


>---------------------------------------------------------------

40b7367003948074b04666d886b4c1adb53f5990
 libraries/base/tests/dynamic002.hs | 5 +++++
 libraries/base/tests/dynamic004.hs | 1 -
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/libraries/base/tests/dynamic002.hs b/libraries/base/tests/dynamic002.hs
index 6d53d2e..fff14ec 100644
--- a/libraries/base/tests/dynamic002.hs
+++ b/libraries/base/tests/dynamic002.hs
@@ -1,7 +1,12 @@
+{-# LANGUAGE CPP #-}
+
 -- !!! Testing Typeable instances
 module Main(main) where
 
 import Data.Dynamic
+#if MIN_VERSION_base(4,9,0)
+import Data.Typeable (TypeCon, TypeRep)
+#endif
 import Data.Array
 import Data.Array.MArray
 import Data.Array.ST
diff --git a/libraries/base/tests/dynamic004.hs b/libraries/base/tests/dynamic004.hs
index e6b7a82..2091646 100644
--- a/libraries/base/tests/dynamic004.hs
+++ b/libraries/base/tests/dynamic004.hs
@@ -1,7 +1,6 @@
 module Main where
 
 import Data.Typeable
-import Data.Typeable.Internal
 import GHC.Fingerprint
 import Text.Printf