Mutex.MakeSourceMutex manager
val acquire :
Client.connection ->
?atime:float ->
?ltime:int ->
string ->
string ->
unit IO.tval with_mutex :
Client.connection ->
?atime:float ->
?ltime:int ->
string ->
(unit -> 'a IO.t) ->
'a IO.t