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),
|
MonadReader (MVar AnnexState),
|
||||||
MonadCatch,
|
MonadCatch,
|
||||||
MonadThrow,
|
MonadThrow,
|
||||||
|
#if MIN_VERSION_exceptions(0,6,0)
|
||||||
MonadMask,
|
MonadMask,
|
||||||
|
#endif
|
||||||
Functor,
|
Functor,
|
||||||
Applicative
|
Applicative
|
||||||
)
|
)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue