val spec : unit ‑> (which:[ `Only_frozen | `Only_active | `All ] ‑> 'a, 'a) Common.Command.Spec.t
val dispatch : which:[ `Only_frozen | `Only_active | `All ] ‑> Async.Rpc.Connection.t ‑> unit Async.Deferred.t