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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
|
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include <gtk/gtk.h>
#include "GtkTypes.h"
#include "GdkTypes.h"
#include "MiscTypes.h"
#include "GtkDefs.h"
#ifndef boolSV
# define boolSV(b) ((b) ? &sv_yes : &sv_no)
#endif
MODULE = Gtk::List PACKAGE = Gtk::List PREFIX = gtk_list_
#ifdef GTK_LIST
Gtk::List_Sink
new(Class)
SV * Class
CODE:
RETVAL = GTK_LIST(gtk_list_new());
OUTPUT:
RETVAL
void
insert_items(self, position, ...)
Gtk::List self
int position
CODE:
{
GList * list = 0;
int i;
for(i=2;i<items;i++) {
GtkObject * o;
o = SvGtkObjectRef(ST(i), "Gtk::ListItem");
if (!o)
croak("item cannot be undef");
list = g_list_prepend(list, SvGtkObjectRef(ST(i),"Gtk::ListItem"));
}
g_list_reverse(list);
gtk_list_insert_items(self, list, position);
}
void
append_items(self, ...)
Gtk::List self
CODE:
{
GList * list = 0;
int i;
for(i=1;i<items;i++) {
GtkObject * o;
o = SvGtkObjectRef(ST(i), "Gtk::ListItem");
if (!o)
croak("item cannot be undef");
list = g_list_prepend(list, GTK_LIST_ITEM(o));
}
gtk_list_append_items(self, list);
}
void
prepend_items(self, ...)
Gtk::List self
CODE:
{
GList * list = 0;
int i;
for(i=1;i<items;i++) {
GtkObject * o;
o = SvGtkObjectRef(ST(i), "Gtk::ListItem");
if (!o)
croak("item cannot be undef");
list = g_list_prepend(list, GTK_LIST_ITEM(o));
}
g_list_reverse(list);
gtk_list_prepend_items(self, list);
}
void
remove_items(self, ...)
Gtk::List self
CODE:
{
GList * list = 0;
int i;
for(i=1;i<items;i++) {
GtkObject * o;
o = SvGtkObjectRef(ST(i), "Gtk::ListItem");
if (!o)
croak("item cannot be undef");
list = g_list_prepend(list, GTK_LIST_ITEM(o));
}
g_list_reverse(list);
gtk_list_remove_items(self, list);
g_list_free(list);
}
void
gtk_list_clear_items(self, start, end)
Gtk::List self
int start
int end
void
gtk_list_select_item(self, the_item)
Gtk::List self
int the_item
void
gtk_list_unselect_item(self, the_item)
Gtk::List self
int the_item
void
gtk_list_select_child(self, widget)
Gtk::List self
Gtk::Widget widget
void
gtk_list_unselect_child(self, widget)
Gtk::List self
Gtk::Widget widget
int
gtk_list_child_position(self, widget)
Gtk::List self
Gtk::Widget widget
void
gtk_list_set_selection_mode(self, mode)
Gtk::List self
Gtk::SelectionMode mode
void
selection(list)
Gtk::List list
PPCODE:
{
GList * selection = list->selection;
while(selection) {
EXTEND(sp,1);
PUSHs(sv_2mortal(newSVGtkObjectRef(GTK_OBJECT(selection->data),0)));
selection=selection->next;
}
}
void
children(list)
Gtk::List list
PPCODE:
{
GList * children = list->children;
while(children) {
EXTEND(sp,1);
PUSHs(sv_2mortal(newSVGtkObjectRef(GTK_OBJECT(children->data),0)));
children=children->next;
}
}
#endif
|
