3 (defcallback gtk-tree-model-filter-visible-func-callback :boolean
4 ((tree-model g-object) (iter (g-boxed-foreign tree-iter)) (data :pointer))
5 (let ((fn (get-stable-pointer-value data)))
7 (funcall fn tree-model iter)
9 (return-false () nil))))
11 (defcfun gtk-tree-model-filter-set-visible-func :void
12 (filter (g-object tree-model-filter))
15 (destroy-notify :pointer))
17 (defun tree-model-filter-set-visible-function (tree-model-filter function)
18 (gtk-tree-model-filter-set-visible-func
20 (callback gtk-tree-model-filter-visible-func-callback)
21 (allocate-stable-pointer function)
22 (callback stable-pointer-free-destroy-notify-callback)))
24 (export 'tree-model-filter-set-visible-function)
28 typedef void (* GtkTreeModelFilterModifyFunc) (GtkTreeModel *model,
34 void gtk_tree_model_filter_set_modify_func (GtkTreeModelFilter *filter,
37 GtkTreeModelFilterModifyFunc func,
39 GDestroyNotify destroy);
42 (defcfun gtk-tree-model-filter-set-visible-column :void
43 (filter (g-object tree-model-filter))
46 (defun tree-model-filter-set-visible-column (filter column)
47 (gtk-tree-model-filter-set-visible-column filter column))
49 (export 'tree-model-filter-set-visible-column)
53 (defcfun gtk-tree-model-filter-convert-child-iter-to-iter :boolean
54 (filter (g-object tree-model-filter))
55 (filter-iter (g-boxed-foreign tree-iter))
56 (child-iter (g-boxed-foreign tree-iter)))
58 (defun tree-model-filter-convert-child-iter-to-iter (filter iter)
59 (let ((filter-iter (make-instance 'tree-iter)))
60 (when (gtk-tree-model-filter-convert-child-iter-to-iter filter filter-iter iter)
63 (export 'tree-model-filter-convert-child-iter-to-iter)
65 (defcfun gtk-tree-model-filter-convert-iter-to-child-iter :void
66 (filter (g-object tree-model-filter))
67 (child-iter (g-boxed-foreign tree-iter))
68 (filter-iter (g-boxed-foreign tree-iter)))
70 (defun tree-model-filter-convert-iter-to-child-iter (filter iter)
71 (let ((child-iter (make-instance 'tree-iter)))
72 (gtk-tree-model-filter-convert-iter-to-child-iter filter child-iter iter)
75 (export 'tree-model-filter-convert-iter-to-child-iter)
77 (defcfun gtk-tree-model-filter-convert-child-path-to-path (g-boxed-foreign tree-path :return)
78 (filter (g-object tree-model-sort))
79 (child-path (g-boxed-foreign tree-path)))
81 (defun tree-model-filter-convert-child-path-to-path (filter child-path)
82 (gtk-tree-model-filter-convert-child-path-to-path))
84 (export 'tree-model-filter-convert-child-path-to-path)
86 (defcfun gtk-tree-model-filter-convert-path-to-child-path (g-boxed-foreign tree-path :return)
87 (filter (g-object tree-model-sort))
88 (filter-path (g-boxed-foreign tree-path)))
90 (defun tree-model-filter-convert-path-to-child-path (filter child-path)
91 (gtk-tree-model-filter-convert-path-to-child-path))
93 (export 'tree-model-filter-convert-path-to-child-path)
97 (defcfun gtk-tree-model-filter-refilter :void
98 (filter (g-object tree-model-filter)))
100 (defun tree-model-filter-refilter (filter)
101 (gtk-tree-model-filter-refilter filter))
103 (export 'tree-model-filter-refilter)
105 (defcfun gtk-tree-model-filter-clear-cache :void
106 (filter (g-object tree-model-filter)))
108 (defun tree-model-filter-clear-cache (filter)
109 (gtk-tree-model-filter-clear-cache filter))
111 (export 'tree-model-filter-clear-cache)