Vmm_tlsSourceval wire_command_of_cert :
X509.Certificate.t ->
(Vmm_commands.version * Vmm_commands.t, [> `Msg of string | `Not_present ])
resultval handle :
X509.Certificate.t list ->
(Vmm_core.Name.t
* (Vmm_core.Name.path * Vmm_core.Policy.t) list
* Vmm_commands.version
* Vmm_commands.t,
[> `Msg of string ])
result