Caqti_blocking.PoolSourceA pool implementation for the current concurrency library.
val create :
?max_size:int ->
?check:('a -> (bool -> unit) -> unit) ->
?validate:('a -> bool future) ->
(unit -> ('a, 'e) result future) ->
('a -> unit future) ->
('a, 'e) tInternal: 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.