3 (defcfun gtk-label-get-layout-offsets :void
4 (label (g-object label))
8 (defun label-layout-offsets (label)
9 (with-foreign-objects ((x :int) (y :int))
10 (gtk-label-get-layout-offsets label x y)
11 (values (mem-ref x :int) (mem-ref y :int))))
13 (export 'label-layout-offsets)
15 (defcfun (label-select-region "gtk_label_select_region") :void
16 (label (g-object label))
20 (export 'label-select-region)
22 (defcfun (label-layout "gtk_label_get_layout") g-object ;(g-object pango-layout)
23 (label (g-object label)))
25 (export 'label-layout)