From: Simon Marlow <marlowsd@gmail.com>
Date: Fri, 7 Nov 2008 08:52:50 +0000 (+0000)
Subject: disable instance MonadPlus CoreM for GHC <= 6.6
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=2df0c61e36ebff35a4be1f782fe99b405413fe17

disable instance MonadPlus CoreM for GHC <= 6.6
---

diff --git a/compiler/simplCore/CoreMonad.lhs b/compiler/simplCore/CoreMonad.lhs
index ae45ba4..90b062f 100644
--- a/compiler/simplCore/CoreMonad.lhs
+++ b/compiler/simplCore/CoreMonad.lhs
@@ -125,9 +125,12 @@ instance Applicative CoreM where
 
 -- For use if the user has imported Control.Monad.Error from MTL
 -- Requires UndecidableInstances
+#if __GLASGOW_HASKELL__ > 606
+-- see instance MonadPlus IOEnv
 instance MonadPlus IO => MonadPlus CoreM where
     mzero = CoreM (const mzero)
     m `mplus` n = CoreM (\rs -> unCoreM m rs `mplus` unCoreM n rs)
+#endif
 
 instance MonadUnique CoreM where
     getUniqueSupplyM = do