Start to actually use extensible exceptions

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

diff --git a/Data/Typeable.hs-boot b/Data/Typeable.hs-boot
index 057468e..45be319 100644 (file)
--- a/Data/Typeable.hs-boot
+++ b/Data/Typeable.hs-boot
@@ -5,7 +5,6 @@ module Data.Typeable where
 
 import Data.Maybe
 import GHC.Base
-import {-# SOURCE #-} GHC.IOBase
 import GHC.Show
 
 data TypeRep
@@ -20,5 +19,3 @@ cast :: (Typeable a, Typeable b) => a -> Maybe b
 class Typeable a where
   typeOf :: a -> TypeRep
 
-instance Typeable Exception
-