diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2018-11-10 01:12:52 +0100 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2019-03-22 10:34:51 -0400 |
| commit | ab51bee40c82cd552bcf13e24b67d43f3b8d25f3 (patch) | |
| tree | a75a4102576dad50af44e342fb9152e7270792eb /testsuite/tests/quasiquotation | |
| parent | cd07086ada34888c08585f4dc98a961618748ed0 (diff) | |
| download | haskell-ab51bee40c82cd552bcf13e24b67d43f3b8d25f3.tar.gz | |
base: Remove `Monad(fail)` method and reexport `MonadFail(fail)` instead
As per https://prime.haskell.org/wiki/Libraries/Proposals/MonadFail
Coauthored-by: Ben Gamari <ben@well-typed.com>
Diffstat (limited to 'testsuite/tests/quasiquotation')
| -rw-r--r-- | testsuite/tests/quasiquotation/qq005/Expr.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/quasiquotation/qq006/Expr.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/quasiquotation/qq005/Expr.hs b/testsuite/tests/quasiquotation/qq005/Expr.hs index 1c51d9db1f..767d906ba4 100644 --- a/testsuite/tests/quasiquotation/qq005/Expr.hs +++ b/testsuite/tests/quasiquotation/qq005/Expr.hs @@ -64,7 +64,7 @@ anti = lexeme $ cs <- many idchar return $ AntiIntExpr (c : cs) -parseExpr :: Monad m => TH.Loc -> String -> m Expr +parseExpr :: MonadFail m => TH.Loc -> String -> m Expr parseExpr (Loc {loc_filename = file, loc_start = (line,col)}) s = case runParser p () "" s of Left err -> fail $ show err diff --git a/testsuite/tests/quasiquotation/qq006/Expr.hs b/testsuite/tests/quasiquotation/qq006/Expr.hs index 1c51d9db1f..767d906ba4 100644 --- a/testsuite/tests/quasiquotation/qq006/Expr.hs +++ b/testsuite/tests/quasiquotation/qq006/Expr.hs @@ -64,7 +64,7 @@ anti = lexeme $ cs <- many idchar return $ AntiIntExpr (c : cs) -parseExpr :: Monad m => TH.Loc -> String -> m Expr +parseExpr :: MonadFail m => TH.Loc -> String -> m Expr parseExpr (Loc {loc_filename = file, loc_start = (line,col)}) s = case runParser p () "" s of Left err -> fail $ show err |