module Event:sig..end
val get_current_time : unit -> int32May return GDK_CURRENT_TIME
val get_current : unit -> GdkEvent.anyMay raise Gpointer.Null
val get_widget : 'a Gdk.event -> Gtk.widget Gtk.objMay raise Gpointer.Null
val propagate : [> `widget ] Gtk.obj -> 'a Gdk.event -> unit