sig type t = unit val to_string : Libvirt.Event.Control_error.t -> string end