X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FTypeable.hs-boot;h=45be319adafe92ef4d7195e15d33d6e468e496ad;hb=fdb4cee6ff91b59915eedba0afa3285681cbcab7;hp=4250e569b99c4a8f7d37729267a2598b8c6540da;hpb=aa95003f89ac4330e8348434155dedcb6c7efcf7;p=ghc-base.git diff --git a/Data/Typeable.hs-boot b/Data/Typeable.hs-boot index 4250e56..45be319 100644 --- a/Data/Typeable.hs-boot +++ b/Data/Typeable.hs-boot @@ -1,3 +1,21 @@ -{-# OPTIONS -fno-implicit-prelude #-} + +{-# OPTIONS_GHC -XNoImplicitPrelude #-} + module Data.Typeable where + +import Data.Maybe +import GHC.Base +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 +