diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2018-12-18 23:36:29 +0100 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2019-01-18 17:01:56 -0500 |
| commit | c9756dbf1ee58b117ea5c4ded45dea88030efd65 (patch) | |
| tree | 66aa32d9fdc0303c3b15f3fdb9605e30d8aa2449 /compiler/cmm | |
| parent | b14f54041eacf8c0f85e756148042d2dca8333f9 (diff) | |
| download | haskell-c9756dbf1ee58b117ea5c4ded45dea88030efd65.tar.gz | |
Prepare source-tree for base-4.13 MFP bump
Diffstat (limited to 'compiler/cmm')
| -rw-r--r-- | compiler/cmm/CmmMonad.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/cmm/CmmMonad.hs b/compiler/cmm/CmmMonad.hs index f3b4441a9b..821c0a6504 100644 --- a/compiler/cmm/CmmMonad.hs +++ b/compiler/cmm/CmmMonad.hs @@ -1,3 +1,5 @@ +{-# LANGUAGE CPP #-} + ----------------------------------------------------------------------------- -- A Parser monad with access to the 'DynFlags'. -- @@ -31,7 +33,9 @@ instance Applicative PD where instance Monad PD where (>>=) = thenPD +#if !MIN_VERSION_base(4,13,0) fail = MonadFail.fail +#endif instance MonadFail.MonadFail PD where fail = failPD |