X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FTypeable.hs-boot;h=da6142e83fdef59b55a00ca8106a92f397f92a98;hb=HEAD;hp=057468e5b7351157e90fe5ffe8b6377e1ff6d869;hpb=3e118622794d68f63338b3e00fe450b552408b64;p=ghc-base.git diff --git a/Data/Typeable.hs-boot b/Data/Typeable.hs-boot index 057468e..da6142e 100644 --- a/Data/Typeable.hs-boot +++ b/Data/Typeable.hs-boot @@ -1,24 +1,18 @@ - -{-# OPTIONS_GHC -XNoImplicitPrelude #-} +{-# LANGUAGE NoImplicitPrelude #-} module Data.Typeable where import Data.Maybe import GHC.Base -import {-# SOURCE #-} GHC.IOBase -import GHC.Show data TypeRep data TyCon mkTyCon :: String -> TyCon mkTyConApp :: TyCon -> [TypeRep] -> TypeRep -showsTypeRep :: TypeRep -> ShowS cast :: (Typeable a, Typeable b) => a -> Maybe b class Typeable a where typeOf :: a -> TypeRep -instance Typeable Exception -