val current : versioncurrent is the current version.
val is_current : version -> boolval pp_version : version Fmt.tpp_version ppf version pretty prints version onto ppf.
type console_cmd = [ | `Console_add| `Console_subscribe of since_count| `Old_console_subscribe of since_count ]type unikernel_cmd = [ | `Unikernel_info| `Unikernel_create of Vmm_core.Unikernel.config| `Unikernel_force_create of Vmm_core.Unikernel.config| `Unikernel_restart| `Unikernel_destroy| `Unikernel_get of int| `Old_unikernel_info1| `Old_unikernel_info2| `Old_unikernel_get ]type t = [ | `Console_cmd of console_cmd| `Stats_cmd of stats_cmd| `Unikernel_cmd of unikernel_cmd| `Policy_cmd of policy_cmd| `Block_cmd of block_cmd ]val pp : verbose:bool -> t Fmt.ttype data = [ | `Console_data of Ptime.t * string| `Utc_console_data of Ptime.t * string| `Stats_data of Vmm_core.Stats.t ]val pp_data : data Fmt.tval header : ?version:version -> ?sequence:int64 -> Vmm_core.Name.t -> headertype success = [ | `Empty| `String of string| `Policies of (Vmm_core.Name.t * Vmm_core.Policy.t) list| `Old_unikernels of (Vmm_core.Name.t * Vmm_core.Unikernel.config) list| `Old_unikernel_info of (Vmm_core.Name.t * Vmm_core.Unikernel.info) list| `Unikernel_info of (Vmm_core.Name.t * Vmm_core.Unikernel.info) list| `Unikernel_image of bool * string| `Block_devices of (Vmm_core.Name.t * int * bool) list| `Block_device_image of bool * string ]val pp_wire : verbose:bool -> wire Fmt.tval endpoint : t -> Vmm_core.service * [ `End | `Read ]