Use an extensible-exceptions package when bootstrapping
[ghc-hetmet.git] / compiler / utils / IOEnv.hs
index 394a1c8..9332a8b 100644 (file)
@@ -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
 --