async-pool
async-pool copied to clipboard
lifted/generalised version of this library?
No, not presently.
Is there workaround to run mapTasks in something other than IO? MonadBaseControl is not applicable -> because "a" type is different
myMapTasks :: (Monad (t IO), MonadTransControl t) => AP.TaskGroup -> [t IO a] -> t IO [a]
myMapTasks tg a =
liftWith (\rib -> AP.mapTasks tg (rib <$> a)) >>= \x ->
traverse (restoreT . return) x