Must import ExitCode for its instance to be re-exported.

The Cabal library depends on "instance Exception ExitCode", and expects
to import it from Control.Exception, not Control.Exception.Base.

diff --git a/Control/Exception.hs b/Control/Exception.hs
index 4401976..1be188c 100644 (file)
--- a/Control/Exception.hs
+++ b/Control/Exception.hs
@@ -46,6 +46,9 @@ module Control.Exception (
         NonTermination(..),
         NestedAtomically(..),
 #endif
+#ifdef __NHC__
+        System.ExitCode(),     -- instance Exception
+#endif
 
         BlockedOnDeadMVar(..),
         BlockedIndefinitely(..),
@@ -137,6 +140,10 @@ import Data.Maybe
 import Prelude hiding (catch)
 #endif
 
+#ifdef __NHC__
+import System (ExitCode())
+#endif
+
 #if __GLASGOW_HASKELL__ || __HUGS__
 data Handler a = forall e . Exception e => Handler (e -> IO a)