mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

qualify catch and try

Browse source 
got a build failure on android due to there being a Prelude.catch
This commit is contained in:
Joey Hess 2014-08-10 19:40:21 -04:00
parent 29aa5e82dc
commit fb66ee8c85
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Utility/Exception.hs
View file

@ -52,11 +52,11 @@ catchMsgIO a = do
{- catch specialized for IO errors only -} {- catch specialized for IO errors only -}
catchIO :: MonadCatch m => m a -> (IOException -> m a) -> m a catchIO :: MonadCatch m => m a -> (IOException -> m a) -> m a
catchIO = catch catchIO = M.catch
{- try specialized for IO errors only -} {- try specialized for IO errors only -}
tryIO :: MonadCatch m => m a -> m (Either IOException a) tryIO :: MonadCatch m => m a -> m (Either IOException a)
tryIO = try tryIO = M.try
{- bracket with setup and cleanup actions lifted to IO. {- bracket with setup and cleanup actions lifted to IO.
- -