lablgtk3
GMain.Grab
val add : GObj.widget -> unit
val remove : GObj.widget -> unit
val get_current : unit -> GObj.widget