From fa80cd0e896b8cca30be1ed63a6374df830c5202 Mon Sep 17 00:00:00 2001
From: "Malcolm.Wallace@cs.york.ac.uk" <unknown>
Date: Wed, 13 Aug 2008 12:57:10 +0000
Subject: [PATCH] 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.

---
 Control/Exception.hs |    7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Control/Exception.hs b/Control/Exception.hs
index 4401976..1be188c 100644
--- 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)
 
-- 
1.7.10.4