summaryrefslogtreecommitdiff
path: root/compiler/cmm/CmmMonad.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/cmm/CmmMonad.hs')
-rw-r--r--compiler/cmm/CmmMonad.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/cmm/CmmMonad.hs b/compiler/cmm/CmmMonad.hs
index c035577473..e225d7dd4f 100644
--- a/compiler/cmm/CmmMonad.hs
+++ b/compiler/cmm/CmmMonad.hs
@@ -29,7 +29,7 @@ instance Applicative PD where
instance Monad PD where
(>>=) = thenPD
- fail = failPD
+ fail = MonadFail.fail
instance MonadFail.MonadFail PD where
fail = failPD