git.iko.soy/distributed-process
on master help sign in
Fix typeable for ghc-7.8.
f7c456dAlexander Vershilov
src/Control/Distributed/Process/Serializable.hs+5−4
@@ -15,12 +15,13 @@ module Control.Distributed.Process.Serializable
15 ) where
15 ) where
16
16
17import Data.Binary (Binary)
17import Data.Binary (Binary)
18−import Data.Typeable (Typeable(..))
19
18
20−#if MIN_VERSION_base(4,6,0)
19+#if MIN_VERSION_base(4,7,0)
21−import Data.Typeable.Internal (TypeRep(TypeRep))
20+import Data.Typeable (Typeable)
22−#else
23import Data.Typeable.Internal (TypeRep(TypeRep), typeOf)
21import Data.Typeable.Internal (TypeRep(TypeRep), typeOf)
22+#else
23+import Data.Typeable (Typeable(..))
24+import Data.Typeable.Internal (TypeRep(TypeRep))
24#endif
25#endif
25
26
26import Numeric (showHex)
27import Numeric (showHex)