Module Wayland_proto.Wl_display
type t = [ | `Wl_display
]type versions = [ | `V1
]module Error : sig ... endval requests : int -> string * (string * [> `New_ID of string option ]) listval events :
int ->
string * (string * [> `Object of 'a option | `String | `Uint ]) list