val which : [ `Only_frozen | `Only_active | `All ] Common.Command.Param.t
val dispatch : which:[ `Only_frozen | `Only_active | `All ] ‑> Async.Rpc.Connection.t ‑> int Async.Deferred.t