(export 'widget-create-pango-context)
-(defcfun (widget-get-pango-context "gtk_widget_get_pango_context") g-object
- (widget g-object))
-
-(export 'widget-get-pango-context)
-
-(defcfun (widget-create-pango-layout "gtk_widget_create_pango_layout") (g-object gdk::pango-layout :already-referenced)
+(defcfun (widget-create-pango-layout "gtk_widget_create_pango_layout") (g-object pango-layout :already-referenced)
(widget (g-object widget))
(text :string))
; TODO: gtk_widget_class_list_style_properties
-; TODO: gtk_widget_region_intersect
+(defcfun (widget-region-intersect "gtk_widget_region_intersect") (g-boxed-foreign region :return)
+ (widget (g-object widget))
+ (region (g-boxed-foreign region)))
+
+(export 'widget-region-intersect)
-; TODO: gtk_widget_send_expose
+; ignored: gtk_widget_send_expose
(defcfun gtk-widget-style-get-property :void
(widget g-object)