summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghci.debugger/scripts/break024.hs
blob: 33c8ce60365c639f55c29167e2fdefcdc69b0d48 (plain)
1
2
3
4
import Control.Exception as CE

exception_uncaught = ioError (userError "error")
exception_caught   = CE.try exception_uncaught :: IO (Either CE.IOException ())