(* (c) 2018 Hannes Mehnert, all rights reserved *) val handle : 'a -> Vmm_commands.version -> X509.t list -> (string list * Vmm_commands.t, [> `Msg of string ]) Result.result