summaryrefslogtreecommitdiff
path: root/testsuite/tests/module
diff options
context:
space:
mode:
authorBodigrim <andrew.lelechenko@gmail.com>2022-11-21 20:10:38 +0000
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-12-08 22:46:47 -0500
commitef702a18dbe44d486d7a41c554564ca3e0f236ee (patch)
tree90106ce207403f5e658c8ee6517362fdf7ec9397 /testsuite/tests/module
parent3807a46c6ee6b3ae52b888c4add6416f0d381e87 (diff)
downloadhaskell-ef702a18dbe44d486d7a41c554564ca3e0f236ee.tar.gz
Fix tests
Diffstat (limited to 'testsuite/tests/module')
-rw-r--r--testsuite/tests/module/mod133.hs7
1 files changed, 3 insertions, 4 deletions
diff --git a/testsuite/tests/module/mod133.hs b/testsuite/tests/module/mod133.hs
index f56ec1d02d..f947a9aa95 100644
--- a/testsuite/tests/module/mod133.hs
+++ b/testsuite/tests/module/mod133.hs
@@ -1,4 +1,4 @@
--- Control.Monad.Except re-exports Control.Monad.Fix.
+-- Control.Monad re-exports Control.Monad.Fail.
-- This test checks that the subordinate-name test
-- for a class operation (when renaming the instance decl)
-- works correctly.
@@ -6,7 +6,6 @@
module ShouldCompile where
import Control.Monad
-import Control.Monad.Except
data Foo a = Foo a
@@ -21,5 +20,5 @@ instance Monad Foo where
return = pure
(Foo a) >>= k = k a
-instance MonadFix Foo where
- mfix = undefined
+instance MonadFail Foo where
+ fail = undefined