1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
(define-boxed TreeIter
(in-module "Gtk")
(c-name "GtkTreeIter")
(gtype-id "GTK_TYPE_TREE_ITER")
(copy-func "gtk_tree_iter_copy")
(release-func "gtk_tree_iter_free")
(fields
'("GtkReliefStyle" "style")
'("gint" "rise")
'("GtkWidget*" "target")
'("gchar*" "wagga_momma")
)
)
(define-method copy
(of-object "GtkTreeIter")
(c-name "gtk_tree_iter_copy")
(caller-owns-return #t)
(return-type "GtkTreeIter*")
)
(define-method free
(of-object "GtkTreeIter")
(c-name "gtk_tree_iter_free")
(return-type "none")
)
|
