diff options
Diffstat (limited to 'testsuite/tests/deSugar/should_run/dsrun010.hs')
| -rw-r--r-- | testsuite/tests/deSugar/should_run/dsrun010.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/testsuite/tests/deSugar/should_run/dsrun010.hs b/testsuite/tests/deSugar/should_run/dsrun010.hs index 4b8bf4e1bc..5657fb7526 100644 --- a/testsuite/tests/deSugar/should_run/dsrun010.hs +++ b/testsuite/tests/deSugar/should_run/dsrun010.hs @@ -2,6 +2,8 @@ -- is reflected by calling the monadic 'fail', not by a -- runtime exception +{-# LANGUAGE NoMonadFailDesugaring #-} + import Control.Monad import Data.Maybe |