doc wibbles

[ghc-base.git] / Data / Typeable.hs-boot

diff --git a/Data/Typeable.hs-boot b/Data/Typeable.hs-boot
index 5a2989c..9da3620 100644 (file)
--- a/Data/Typeable.hs-boot
+++ b/Data/Typeable.hs-boot
@@ -1,15 +1,18 @@
 
-{-# OPTIONS -fno-implicit-prelude #-}
+{-# OPTIONS_GHC -XNoImplicitPrelude #-}
 
 module Data.Typeable where
 
+import Data.Maybe
 import GHC.Base
 
 data TypeRep
 data TyCon
 
-mkTyCon :: String -> TyCon
-mkTyConApp :: TyCon -> [TypeRep] -> TypeRep
+mkTyCon      :: String -> TyCon
+mkTyConApp   :: TyCon -> [TypeRep] -> TypeRep
+
+cast :: (Typeable a, Typeable b) => a -> Maybe b
 
 class Typeable a where
   typeOf :: a -> TypeRep