fix: relax constraints on MonadKill

This commit is contained in:
orion 2023-11-22 09:43:58 -06:00
parent 2ca46d43a5
commit 0e048f69a7
Signed by: orion
GPG Key ID: 6D4165AE4C928719

View File

@ -289,7 +289,7 @@ instance (Parallel f m) => Parallel (AsyncStateT w s f) (AsyncStateT w s m) wher
parallel a = wrap $ parallel $ unwrap a parallel a = wrap $ parallel $ unwrap a
sequential a = wrap $ sequential $ unwrap a sequential a = wrap $ sequential $ unwrap a
instance (MonadError e m, MonadKill e f m) => MonadKill e f (AsyncStateT w s m) where instance MonadKill e f m => MonadKill e f (AsyncStateT w s m) where
kill e f = wrap $ kill e f kill e f = wrap $ kill e f
instance (MonadBracket e f m) => MonadBracket e f (AsyncStateT w s m) where instance (MonadBracket e f m) => MonadBracket e f (AsyncStateT w s m) where