diff options
Diffstat (limited to 'testsuite/tests/stranal/should_run/T11555a.hs')
| -rw-r--r-- | testsuite/tests/stranal/should_run/T11555a.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/stranal/should_run/T11555a.hs b/testsuite/tests/stranal/should_run/T11555a.hs index 29f2a49680..fc2e8b83ba 100644 --- a/testsuite/tests/stranal/should_run/T11555a.hs +++ b/testsuite/tests/stranal/should_run/T11555a.hs @@ -8,7 +8,7 @@ import GHC.Exts type RAW a = ContT () IO a --- See https://ghc.haskell.org/trac/ghc/ticket/11555 +-- See https://gitlab.haskell.org/ghc/ghc/issues/11555 catchSafe1, catchSafe2 :: IO a -> (SomeException -> IO a) -> IO a catchSafe1 a b = lazy a `catch` b catchSafe2 a b = join (evaluate a) `catch` b |