Define nonTermination for the RTS to use

[ghc-base.git] / GHC / Exception.lhs-boot

diff --git a/GHC/Exception.lhs-boot b/GHC/Exception.lhs-boot
index 773e4a5..dfd8013 100644 (file)
--- a/GHC/Exception.lhs-boot
+++ b/GHC/Exception.lhs-boot
@@ -8,8 +8,12 @@ import {-# SOURCE #-} qualified GHC.IOBase as IOB
 
 class Exception e
 
+data SomeException
+
 instance Exception IOB.Exception
 
 throwIO :: Exception e => e -> IOB.IO a
+
+toException :: Exception e => e -> SomeException
 \end{code}