github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-03 13:02:37 +03:00
Code Issues Projects Releases Wiki Activity

📝 catchException.

Browse Source
This commit is contained in:
Rob Rix 2018-04-03 16:22:28 -04:00
parent 1c4a8d3d9b
commit 01c6d93111
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Semantic/Task.hs
View File

@ -243,6 +243,9 @@ runParser Options{..} blob@Blob{..} = go
_ -> fold syntax _ -> fold syntax
-- | Catch exceptions in 'IO' actions embedded in 'Eff', handling them with the passed function.
--
-- Note that while the type allows 'IO' to occur anywhere within the effect list, it must actually occur at the end to be able to run the computation.
catchException :: ( Exc.Exception e catchException :: ( Exc.Exception e
, Member IO r , Member IO r
) )