sig
type reason = [ `MissingOnStart | `Unknown of int ]
type t = {
old_src_path : string option;
new_src_path : string option;
dev_alias : string option;
reason : Libvirt.Event.Disk_change.reason;
}
val to_string : Libvirt.Event.Disk_change.t -> string
end