X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FTypeable.hs-boot;h=da6142e83fdef59b55a00ca8106a92f397f92a98;hb=HEAD;hp=4250e569b99c4a8f7d37729267a2598b8c6540da;hpb=aa95003f89ac4330e8348434155dedcb6c7efcf7;p=ghc-base.git diff --git a/Data/Typeable.hs-boot b/Data/Typeable.hs-boot index 4250e56..da6142e 100644 --- a/Data/Typeable.hs-boot +++ b/Data/Typeable.hs-boot @@ -1,3 +1,18 @@ -{-# OPTIONS -fno-implicit-prelude #-} +{-# LANGUAGE NoImplicitPrelude #-} + module Data.Typeable where + +import Data.Maybe +import GHC.Base + data TypeRep +data TyCon + +mkTyCon :: String -> TyCon +mkTyConApp :: TyCon -> [TypeRep] -> TypeRep + +cast :: (Typeable a, Typeable b) => a -> Maybe b + +class Typeable a where + typeOf :: a -> TypeRep +