allow building with old versions of exceptions before MonadMask was split out
This commit is contained in:
parent
02a4cef66c
commit
469640e790
1 changed files with 2 additions and 0 deletions
2
Annex.hs
2
Annex.hs
|
@ -79,7 +79,9 @@ newtype Annex a = Annex { runAnnex :: ReaderT (MVar AnnexState) IO a }
|
|||
MonadReader (MVar AnnexState),
|
||||
MonadCatch,
|
||||
MonadThrow,
|
||||
#if MIN_VERSION_exceptions(0,6,0)
|
||||
MonadMask,
|
||||
#endif
|
||||
Functor,
|
||||
Applicative
|
||||
)
|
||||
|
|
Loading…
Reference in a new issue