[project @ 2005-02-02 13:26:13 by simonpj]

[haskell-directory.git] / Control / Exception.hs

diff --git a/Control/Exception.hs b/Control/Exception.hs
index 83f37cb..7551e25 100644 (file)
--- a/Control/Exception.hs
+++ b/Control/Exception.hs
@@ -130,13 +130,6 @@ import System.IO.Error     hiding ( catch, try )
 import System.IO.Unsafe (unsafePerformIO)
 import Data.Dynamic
 
-#include "Typeable.h"
-INSTANCE_TYPEABLE0(Exception,exceptionTc,"Exception")
-INSTANCE_TYPEABLE0(IOException,ioExceptionTc,"IOException")
-INSTANCE_TYPEABLE0(ArithException,arithExceptionTc,"ArithException")
-INSTANCE_TYPEABLE0(ArrayException,arrayExceptionTc,"ArrayException")
-INSTANCE_TYPEABLE0(AsyncException,asyncExceptionTc,"AsyncException")
-
 -----------------------------------------------------------------------------
 -- Catching exceptions