Vmm_commandsSourceThe type of versions of the grammar defined below.
type stats_cmd = [ | `Stats_add of string * int * (string * string) list| `Stats_remove| `Stats_subscribe| `Stats_initial ]type unikernel_cmd = [ | `Unikernel_info| `Unikernel_create of Vmm_core.Unikernel.config| `Unikernel_force_create of Vmm_core.Unikernel.config| `Unikernel_restart of Vmm_core.Unikernel.arguments option| `Unikernel_destroy| `Unikernel_get of int| `Old_unikernel_info3| `Old_unikernel_info4 ]type block_cmd = [ | `Block_info| `Old_block_add of int * bool * string option| `Block_remove| `Old_block_set of bool * string| `Old_block_dump of int| `Block_dump of int| `Block_add of int| `Block_set of bool ]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 ]type data = [ | `Console_data of Ptime.t * string| `Stats_data of Vmm_core.Stats.t| `Block_data of string option ]type success = [ | `Empty| `String of string| `Policies of (Vmm_core.Name.t * Vmm_core.Policy.t) list| `Old_unikernel_info3 of (Vmm_core.Name.t * Vmm_core.Unikernel.info) list| `Old_unikernel_info4 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| `Old_block_device_image of bool * string| `Block_device_image of bool ]