diff options
Diffstat (limited to 'compiler/utils/IOEnv.hs')
| -rw-r--r-- | compiler/utils/IOEnv.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/utils/IOEnv.hs b/compiler/utils/IOEnv.hs index 4640b2b7c2..d6807da71a 100644 --- a/compiler/utils/IOEnv.hs +++ b/compiler/utils/IOEnv.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} -- -- (c) The University of Glasgow 2002-2006 -- @@ -58,7 +59,9 @@ unIOEnv (IOEnv m) = m instance Monad (IOEnv m) where (>>=) = thenM (>>) = (*>) +#if !MIN_VERSION_base(4,13,0) fail = MonadFail.fail +#endif instance MonadFail.MonadFail (IOEnv m) where fail _ = failM -- Ignore the string |