; TODO: gtk_get_default_language
+(defcfun gtk-events-pending :boolean)
+
+(export 'gtk-events-pending)
+
(defcfun gtk-main-iteration :boolean)
(export 'gtk-main-iteration)
; TODO: gtk_main_do_event
-(defcfun (grad-add "gtk_grab_add") :void
+(defcfun (grab-add "gtk_grab_add") :void
(widget g-object))
(export 'grab-add)