Initial commit
[cl-gtk2.git] / glib / gobject.gparams.lisp
1 (in-package :gobject)
2
3 (defcfun g-param-spec-boolean (:pointer g-param-spec-boolean)
4   (name :string)
5   (nick :string)
6   (blurb :string)
7   (default-value :boolean)
8   (flags g-param-flags))
9
10 (defcfun g-value-set-boolean :void
11   (g-value (:pointer g-value))
12   (new-value :boolean))
13
14 (defcfun g-value-get-boolean :boolean
15   (g-value (:pointer g-value)))
16
17 (defcfun g-param-spec-char (:pointer g-param-spec-char)
18   (name :string)
19   (nick :string)
20   (blurb :string)
21   (minimum :int8)
22   (maximum :int8)
23   (default-value :int8)
24   (flags g-param-flags))
25
26 (defcfun g-value-set-char :void
27   (g-value (:pointer g-value))
28   (new-value :char))
29
30 (defcfun g-value-get-char :char
31   (g-value (:pointer g-value)))
32
33 (defcfun g-param-spec-uchar (:pointer g-param-spec-uchar)
34   (name :string)
35   (nick :string)
36   (blurb :string)
37   (minimum :uint8)
38   (maximum :uint8)
39   (default-value :uint8)
40   (flags g-param-flags))
41
42 (defcfun g-value-set-uchar :void
43   (g-value (:pointer g-value))
44   (new-value :uchar))
45
46 (defcfun g-value-get-uchar :uchar
47   (g-value (:pointer g-value)))
48
49 (defcfun g-param-spec-int (:pointer g-param-spec-int)
50   (name :string)
51   (nick :string)
52   (blurb :string)
53   (minimum :int)
54   (maximum :int)
55   (default-value :int)
56   (flags g-param-flags))
57
58 (defcfun g-value-set-int :void
59   (g-value (:pointer g-value))
60   (new-value :int))
61
62 (defcfun g-value-get-int :int
63   (g-value (:pointer g-value)))
64
65 (defcfun g-param-spec-uint (:pointer g-param-spec-uint)
66   (name :string)
67   (nick :string)
68   (blurb :string)
69   (minimum :uint)
70   (maximum :uint)
71   (default-value :uint)
72   (flags g-param-flags))
73
74 (defcfun g-value-set-uint :void
75   (g-value (:pointer g-value))
76   (new-value :uint))
77
78 (defcfun g-value-get-uint :uint
79   (g-value (:pointer g-value)))
80
81 (defcfun g-param-spec-long (:pointer g-param-spec-long)
82   (name :string)
83   (nick :string)
84   (blurb :string)
85   (minimum :long)
86   (maximum :long)
87   (default-value :long)
88   (flags g-param-flags))
89
90 (defcfun g-value-set-long :void
91   (g-value (:pointer g-value))
92   (new-value :long))
93
94 (defcfun g-value-get-long :long
95   (g-value (:pointer g-value)))
96
97 (defcfun g-param-spec-ulong (:pointer g-param-spec-ulong)
98   (name :string)
99   (nick :string)
100   (blurb :string)
101   (minimum :ulong)
102   (maximum :ulong)
103   (default-value :ulong)
104   (flags g-param-flags))
105
106 (defcfun g-value-set-ulong :void
107   (g-value (:pointer g-value))
108   (new-value :ulong))
109
110 (defcfun g-value-get-ulong :ulong
111   (g-value (:pointer g-value)))
112
113 (defcfun g-param-spec-int64 (:pointer g-param-spec-int64)
114   (name :string)
115   (nick :string)
116   (blurb :string)
117   (minimum :int64)
118   (maximum :int64)
119   (default-value :int64)
120   (flags g-param-flags))
121
122 (defcfun g-value-set-int64 :void
123   (g-value (:pointer g-value))
124   (new-value :int64))
125
126 (defcfun g-value-get-int64 :int64
127   (g-value (:pointer g-value)))
128
129 (defcfun g-param-spec-uint64 (:pointer g-param-spec-uint64)
130   (name :string)
131   (nick :string)
132   (blurb :string)
133   (minimum :uint64)
134   (maximum :uint64)
135   (default-value :uint64)
136   (flags g-param-flags))
137
138 (defcfun g-value-set-uint64 :void
139   (g-value (:pointer g-value))
140   (new-value :uint64))
141
142 (defcfun g-value-get-uint64 :uint64
143   (g-value (:pointer g-value)))
144
145 (defcfun g-param-spec-float (:pointer g-param-spec-float)
146   (name :string)
147   (nick :string)
148   (blurb :string)
149   (minimum :float)
150   (maximum :float)
151   (default-value :float)
152   (flags g-param-flags))
153
154 (defcfun g-value-set-float :void
155   (g-value (:pointer g-value))
156   (new-value :float))
157
158 (defcfun g-value-get-float :float
159   (g-value (:pointer g-value)))
160
161 (defcfun g-param-spec-double (:pointer g-param-spec-double)
162   (name :string)
163   (nick :string)
164   (blurb :string)
165   (minimum :double)
166   (maximum :double)
167   (default-value :double)
168   (flags g-param-flags))
169
170 (defcfun g-value-set-double :void
171   (g-value (:pointer g-value))
172   (new-value :double))
173
174 (defcfun g-value-get-double :double
175   (g-value (:pointer g-value)))
176
177 (defcfun g-param-spec-enum (:pointer g-param-spec-enum)
178   (name :string)
179   (nick :string)
180   (blurb :string)
181   (enum-type g-type)
182   (default-value :int)
183   (flags g-param-flags))
184
185 (defcfun g-value-set-enum :void
186   (g-value (:pointer g-value))
187   (new-value :int))
188
189 (defcfun g-value-get-enum :int
190   (g-value (:pointer g-value)))
191
192 (defcfun g-param-spec-flags (:pointer g-param-spec-flags)
193   (name :string)
194   (nick :string)
195   (blurb :string)
196   (flags-type g-type)
197   (default-value :int)
198   (flags g-param-flags))
199
200 (defcfun g-value-set-flags :void
201   (g-value (:pointer g-value))
202   (new-value :int))
203
204 (defcfun g-value-get-flags :int
205   (g-value (:pointer g-value)))
206
207 (defcfun g-param-spec-string (:pointer g-param-spec-string)
208   (name :string)
209   (nick :string)
210   (blurb :string)
211   (default-value :string)
212   (flags g-param-flags))
213
214 (defcfun g-value-set-string :void
215   (g-value (:pointer g-value))
216   (new-value :string))
217
218 (defcfun g-value-get-string (:string :free-from-foreign nil)
219   (g-value (:pointer g-value)))
220
221 (defcfun g-param-spec-param (:pointer g-param-spec-param)
222   (name :string)
223   (nick :string)
224   (blurb :string)
225   (param-type g-type)
226   (flags g-param-flags))
227
228 (defcfun g-value-set-param :void
229   (g-value (:pointer g-value))
230   (new-value (:pointer g-param-spec)))
231
232 (defcfun g-value-get-param (:pointer g-param-spec)
233   (g-value (:pointer g-value)))
234
235 (defcfun g-param-spec-boxed (:pointer g-param-spec-boxed)
236   (name :string)
237   (nick :string)
238   (blurb :string)
239   (boxed-type g-type)
240   (flags g-param-flags))
241
242 (defcfun g-value-set-boxed :void
243   (g-value (:pointer g-value))
244   (new-value :pointer))
245
246 (defcfun g-value-get-boxed :pointer
247   (g-value (:pointer g-value)))
248
249 (defcfun g-param-spec-pointer (:pointer g-param-spec-pointer)
250   (name :string)
251   (nick :string)
252   (blurb :string)
253   (flags g-param-flags))
254
255 (defcfun g-value-set-pointer :void
256   (g-value (:pointer g-value))
257   (new-value :pointer))
258
259 (defcfun g-value-get-pointer :pointer
260   (g-value (:pointer g-value)))
261
262 (defcfun g-param-spec-object (:pointer g-param-spec-object)
263   (name :string)
264   (nick :string)
265   (blurb :string)
266   (object-type g-type)
267   (flags g-param-flags))
268
269 (defcfun g-value-set-object :void
270   (g-value (:pointer g-value))
271   (new-value :pointer))
272
273 (defcfun g-value-get-object :pointer
274   (g-value (:pointer g-value)))
275
276 (defcfun g-param-spec-value-array (:pointer g-param-spec-value-array)
277   (name :string)
278   (nick :string)
279   (blurb :string)
280   (element-spec (:pointer g-param-spec))
281   (flags g-param-flags))
282
283 (defcfun g-param-spec-g-type (:pointer g-param-spec-g-type)
284   (name :string)
285   (nick :string)
286   (blurb :string)
287   (types-root g-type)
288   (flags g-param-flags))
289
290 (defcfun (g-value-set-g-type "g_value_set_gtype") :void
291   (g-value (:pointer g-value))
292   (new-value g-type))
293
294 (defcfun (g-value-get-g-type "g_value_get_gtype") g-type
295   (g-value (:pointer g-value)))
296
297 (defcfun g-param-spec-ref-sink (:pointer g-param-spec)
298   (param-spec (:pointer g-param-spec)))
299
300 (defcfun g-param-spec-unref :void
301   (param-spec (:pointer g-param-spec)))
302
303 (defcfun g-param-value-set-default :void
304   (param-spec (:pointer g-param-spec))
305   (value (:pointer g-value)))
306
307 (defcfun g-param-value-defaults :boolean
308   (param-spec (:pointer g-param-spec))
309   (value (:pointer g-value)))
310
311 (defcfun g-param-value-validate :boolean
312   (param-spec (:pointer g-param-spec))
313   (value (:pointer g-value)))
314
315 (defcfun g-param-spec-get-name :string
316   (param-spec (:pointer g-param-spec)))
317
318 (defcfun g-param-spec-get-nick :string
319   (param-spec (:pointer g-param-spec)))
320
321 (defcfun g-param-spec-get-blurb :string
322   (param-spec (:pointer g-param-spec)))