val spec : unit ‑> ('a, 'a) Common.Command.Spec.t
val dispatch : Async.Rpc.Connection.t ‑> unit Async.Deferred.t