(probably) fix the error in refcount
[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-take-boxed :void
247   (g-value (:pointer g-value))
248   (new-value :pointer))
249
250 (defcfun g-value-get-boxed :pointer
251   (g-value (:pointer g-value)))
252
253 (defcfun g-param-spec-pointer (:pointer g-param-spec-pointer)
254   (name :string)
255   (nick :string)
256   (blurb :string)
257   (flags g-param-flags))
258
259 (defcfun g-value-set-pointer :void
260   (g-value (:pointer g-value))
261   (new-value :pointer))
262
263 (defcfun g-value-get-pointer :pointer
264   (g-value (:pointer g-value)))
265
266 (defcfun g-param-spec-object (:pointer g-param-spec-object)
267   (name :string)
268   (nick :string)
269   (blurb :string)
270   (object-type g-type)
271   (flags g-param-flags))
272
273 (defcfun g-value-set-object :void
274   (g-value (:pointer g-value))
275   (new-value :pointer))
276
277 (defcfun g-value-get-object :pointer
278   (g-value (:pointer g-value)))
279
280 (defcfun g-param-spec-value-array (:pointer g-param-spec-value-array)
281   (name :string)
282   (nick :string)
283   (blurb :string)
284   (element-spec (:pointer g-param-spec))
285   (flags g-param-flags))
286
287 (defcfun g-param-spec-g-type (:pointer g-param-spec-g-type)
288   (name :string)
289   (nick :string)
290   (blurb :string)
291   (types-root g-type)
292   (flags g-param-flags))
293
294 (defcfun (g-value-set-g-type "g_value_set_gtype") :void
295   (g-value (:pointer g-value))
296   (new-value g-type))
297
298 (defcfun (g-value-get-g-type "g_value_get_gtype") g-type
299   (g-value (:pointer g-value)))
300
301 (defcfun g-param-spec-ref-sink (:pointer g-param-spec)
302   (param-spec (:pointer g-param-spec)))
303
304 (defcfun g-param-spec-unref :void
305   (param-spec (:pointer g-param-spec)))
306
307 (defcfun g-param-value-set-default :void
308   (param-spec (:pointer g-param-spec))
309   (value (:pointer g-value)))
310
311 (defcfun g-param-value-defaults :boolean
312   (param-spec (:pointer g-param-spec))
313   (value (:pointer g-value)))
314
315 (defcfun g-param-value-validate :boolean
316   (param-spec (:pointer g-param-spec))
317   (value (:pointer g-value)))
318
319 (defcfun g-param-spec-get-name :string
320   (param-spec (:pointer g-param-spec)))
321
322 (defcfun g-param-spec-get-nick :string
323   (param-spec (:pointer g-param-spec)))
324
325 (defcfun g-param-spec-get-blurb :string
326   (param-spec (:pointer g-param-spec)))