diff options
| author | Ian Lynagh <igloo@earth.li> | 2008-10-03 14:02:16 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2008-10-03 14:02:16 +0000 |
| commit | 1f3a7730cd7f831344d2a3b74a0ce700c382e858 (patch) | |
| tree | fc77a60a3cde863e0beb8810f48330200f455e22 /compiler/utils/IOEnv.hs | |
| parent | 08a9d7341402232672fcff9062454e6ba1ae8bd1 (diff) | |
| download | haskell-1f3a7730cd7f831344d2a3b74a0ce700c382e858.tar.gz | |
Use an extensible-exceptions package when bootstrapping
Ifdefs for whether we had extensible exceptions or not were spreading
through GHC's source, and things would only have got worse for the next
2-3 years, so instead we now use an implementation of extensible
exceptions built on top of the old exception type.
Diffstat (limited to 'compiler/utils/IOEnv.hs')
| -rw-r--r-- | compiler/utils/IOEnv.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/compiler/utils/IOEnv.hs b/compiler/utils/IOEnv.hs index 394a1c8f45..9332a8b363 100644 --- a/compiler/utils/IOEnv.hs +++ b/compiler/utils/IOEnv.hs @@ -95,11 +95,7 @@ fixM f = IOEnv (\ env -> fixIO (\ r -> unIOEnv (f r) env)) --------------------------- -#if __GLASGOW_HASKELL__ < 609 -tryM :: IOEnv env r -> IOEnv env (Either Exception r) -#else tryM :: IOEnv env r -> IOEnv env (Either IOException r) -#endif -- Reflect UserError exceptions (only) into IOEnv monad -- Other exceptions are not caught; they are simply propagated as exns -- |