Make.PoolSourceThis is an instantiation of Caqti_pool for the chosen thread monad.
val create :
?max_size:int ->
?check:('a -> (bool -> unit) -> unit) ->
?validate:('a -> bool System.io) ->
(unit -> 'a System.io) ->
('a -> unit System.io) ->
'a t(internal) create alloc free is a pool of resources allocated by alloc and freed by free. This is primarily indented for implementing the connect_pool functions.
use f pool calls f on a resource drawn from pool, handing back the resource to the pool when f exits.