Module Libvirt.Event.Tray_change


module Tray_change: sig .. end

type reason = [ `Close | `Open | `Unknown of int ] 

type t = {
   dev_alias : string option; (*device alias*)
   reason : reason; (*why the tray status was changed*)
}
val to_string : t -> string