Data.Pool

Using pools

createPool :: (MonadIO m, MonadPeelIO m) => IO a -> (a -> IO ()) -> Int -> (Pool a -> m b) -> m b

createPoolCheckAlive

Arguments

:: (MonadIO m, MonadPeelIO m)

=> IO a

-> (a -> IO ())

-> Int

-> (Pool a -> m b)

-> (a -> IO Bool)

is the resource alive?

-> m b

withPool :: (MonadIO m, MonadPeelIO m) => Pool a -> (a -> m b) -> m (Maybe b)

withPool' :: (MonadIO m, MonadPeelIO m) => Pool a -> (a -> m b) -> m b

This function throws a PoolExhaustedException when no resources are available. See withPoolAllocate to avoid this.

withPoolAllocate :: MonadPeelIO m => Pool a -> (a -> m b) -> m b

Same as withPool', but instead of throwing a PoolExhaustedException when there the maximum number of resources are created and allocated, it allocates a new resource, passes it to the subprocess and then frees it.

data Pool a

Diagnostics

data PoolStats

Constructors

PoolStats

Fields

poolStatsMax :: Int

poolStatsAvailable :: Int

poolStatsCreated :: Int

poolStats :: Pool a -> IO PoolStats