blob: c9f25027f9b33608c353366e97f182b4ce10d43a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
-- Test purpose:
-- RebindableSyntax does not play that well with MonadFail, so here we ensure
-- that when both settings are enabled we get the proper warning.
{-# OPTIONS_GHC -fwarn-missing-monadfail-instance #-}
{-# LANGUAGE RebindableSyntax #-}
module MonadFailWarningsWithRebindableSyntax where
import Prelude
test1 f g = do
Just x <- f
g
|
