diff options
author | Ian Lynagh <igloo@earth.li> | 2009-05-24 20:44:12 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2009-05-24 20:44:12 +0000 |
commit | 893a3c0ad6c39caf71ac28af900733513e1f153e (patch) | |
tree | 9f5611d6da315eaab7ac1edb6a025d5094a1d361 /compiler/utils/IOEnv.hs | |
parent | de8c33e4158b0f019da60d4b52ae2cbd7cb9fafc (diff) | |
download | haskell-893a3c0ad6c39caf71ac28af900733513e1f153e.tar.gz |
Remove legacy code that isn't used now that we require GHC >= 6.8
Diffstat (limited to 'compiler/utils/IOEnv.hs')
-rw-r--r-- | compiler/utils/IOEnv.hs | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/compiler/utils/IOEnv.hs b/compiler/utils/IOEnv.hs index 5f354f0e4d..305e30eed7 100644 --- a/compiler/utils/IOEnv.hs +++ b/compiler/utils/IOEnv.hs @@ -139,15 +139,9 @@ unsafeInterleaveM (IOEnv m) = IOEnv (\ env -> unsafeInterleaveIO (m env)) -- For use if the user has imported Control.Monad.Error from MTL -- Requires UndecidableInstances -#if __GLASGOW_HASKELL__ > 606 --- for some reason, this doesn't compile with GHC 6.6: --- utils/IOEnv.hs:144:33: --- No instance for (MonadPlus IO) --- arising from use of `mplus' at utils/IOEnv.hs:144:33-67 instance MonadPlus IO => MonadPlus (IOEnv env) where mzero = IOEnv (const mzero) m `mplus` n = IOEnv (\env -> unIOEnv m env `mplus` unIOEnv n env) -#endif ---------------------------------------------------------------------- -- Accessing input/output |