(Hydro_types.call_params -> (Hydro_endpoint.Client.response -> unit) -> unit) -> (Hydro_endpoint.Client.response -> 'a) -> Unixqueue.event_system -> ['a] Hydro_lm.call_suspension_t