560af5c5 |
1 | ;; generated by a modified makeenums.pl ; -*- lisp -*- |
2 | ;; but edited by hand |
3 | |
4 | (in-package "GTK") |
5 | |
6 | ; enumerations from "gtkaccelgroup.h" |
7 | |
8 | (deftype (accel-flags "GtkAccelFlags") () |
9 | '(flags |
10 | (:visible 0) |
11 | (:signal-visible 1) |
12 | (:locked 2) |
13 | ; (:mask #x07 ) |
14 | )) |
15 | |
16 | ; enumerations from "gtkcalendar.h" |
17 | |
18 | (deftype (calendar-display-options "GtkCalendarDisplayOptions") () |
19 | '(flags |
20 | (:show-heading 0) |
21 | (:show-day-names 1) |
22 | (:no-month-change 2) |
23 | (:show-week-numbers 3) |
24 | (:week-start-monday 4 ))) |
25 | |
26 | ; enumerations from "gtkclist.h" |
27 | |
28 | (deftype (cell-type "GtkCellType") () |
29 | '(enum |
30 | :empty |
31 | :text |
32 | :pixmap |
33 | :pixtext |
34 | :widget)) |
35 | |
36 | (deftype (c-list-drag-pos "GtkCListDragPos") () |
37 | '(enum |
38 | :none |
39 | :before |
40 | :into |
41 | :after)) |
42 | |
43 | (deftype (button-action "GtkButtonAction") () |
44 | '(flags |
45 | ; (:ignored 0) |
46 | (:selects 0) |
47 | (:drags 1) |
48 | (:expands 2 ))) |
49 | |
50 | ; enumerations from "gtkctree.h" |
51 | |
52 | (deftype (ctree-pos "GtkCTreePos") () |
53 | '(enum |
54 | :before |
55 | :as-child |
56 | :after)) |
57 | |
58 | (deftype (ctree-line-style "GtkCTreeLineStyle") () |
59 | '(enum |
60 | :none |
61 | :solid |
62 | :dotted |
63 | :tabbed)) |
64 | |
65 | (deftype (ctree-expander-style "GtkCTreeExpanderStyle") () |
66 | '(enum |
67 | :none |
68 | :square |
69 | :triangle |
70 | :circular)) |
71 | |
72 | (deftype (ctree-expansion-type "GtkCTreeExpansionType") () |
73 | '(enum |
74 | :expand |
75 | :expand-recursive |
76 | :collapse |
77 | :collapse-recursive |
78 | :toggle |
79 | :toggle-recursive)) |
80 | |
81 | ; enumerations from "gtkdebug.h" |
82 | |
83 | (deftype (debug-flag "GtkDebugFlag") () |
84 | '(flags |
85 | (:objects 0) |
86 | (:misc 1) |
87 | (:signals 2) |
88 | (:dnd 3) |
89 | (:plugsocket 4) |
90 | (:text 5 ))) |
91 | |
92 | ; enumerations from "gtkdnd.h" |
93 | |
94 | (deftype (dest-defaults "GtkDestDefaults") () |
95 | '(flags |
96 | (:motion 0) |
97 | (:highlight 1) |
98 | (:drop 2) |
99 | ; (:all #x07 ) |
100 | )) |
101 | |
102 | (deftype (target-flags "GtkTargetFlags") () |
103 | '(flags |
104 | (:same-app 0) |
105 | (:same-widget 1 ))) |
106 | |
107 | ; enumerations from "gtkenums.h" |
108 | |
109 | (deftype (arrow-type "GtkArrowType") () |
110 | '(enum |
111 | :up |
112 | :down |
113 | :left |
114 | :right)) |
115 | |
116 | (deftype (attach-options "GtkAttachOptions") () |
117 | '(flags |
118 | (:expand 0) |
119 | (:shrink 1) |
120 | (:fill 2 ))) |
121 | |
122 | (deftype (button-box-style "GtkButtonBoxStyle") () |
123 | '(enum |
124 | :default-style |
125 | :spread |
126 | :edge |
127 | :start |
128 | :end)) |
129 | |
130 | (deftype (curve-type "GtkCurveType") () |
131 | '(enum |
132 | :linear |
133 | :spline |
134 | :free)) |
135 | |
136 | (deftype (direction-type "GtkDirectionType") () |
137 | '(enum |
138 | :tab-forward |
139 | :tab-backward |
140 | :up |
141 | :down |
142 | :left |
143 | :right)) |
144 | |
145 | (deftype (text-direction "GtkTextDirection") () |
146 | '(enum |
147 | :none |
148 | :ltr |
149 | :rtl)) |
150 | |
151 | (deftype (justification "GtkJustification") () |
152 | '(enum |
153 | :left |
154 | :right |
155 | :center |
156 | :fill)) |
157 | |
158 | (deftype (match-type "GtkMatchType") () |
159 | '(enum |
160 | :all |
161 | :all-tail |
162 | :head |
163 | :tail |
164 | :exact |
165 | :last)) |
166 | |
167 | (deftype (menu-direction-type "GtkMenuDirectionType") () |
168 | '(enum |
169 | :parent |
170 | :child |
171 | :next |
172 | :prev)) |
173 | |
174 | (deftype (menu-factory-type "GtkMenuFactoryType") () |
175 | '(enum |
176 | :menu |
177 | :menu-bar |
178 | :option-menu)) |
179 | |
180 | (deftype (metric-type "GtkMetricType") () |
181 | '(enum |
182 | :pixels |
183 | :inches |
184 | :centimeters)) |
185 | |
186 | (deftype (orientation "GtkOrientation") () |
187 | '(enum |
188 | :horizontal |
189 | :vertical)) |
190 | |
191 | (deftype (corner-type "GtkCornerType") () |
192 | '(enum |
193 | :top-left |
194 | :bottom-left |
195 | :top-right |
196 | :bottom-right)) |
197 | |
198 | (deftype (pack-type "GtkPackType") () |
199 | '(enum |
200 | :start |
201 | :end)) |
202 | |
203 | (deftype (path-priority-type "GtkPathPriorityType") () |
204 | '(enum |
205 | (:lowest 0) |
206 | (:gtk 4) |
207 | (:application 8) |
208 | (:rc 12) |
209 | (:highest 15) |
210 | ; (:mask #x0f ) |
211 | )) |
212 | |
213 | (deftype (path-type "GtkPathType") () |
214 | '(enum |
215 | :widget |
216 | :widget-class |
217 | :class)) |
218 | |
219 | (deftype (policy-type "GtkPolicyType") () |
220 | '(enum |
221 | :always |
222 | :automatic |
223 | :never)) |
224 | |
225 | (deftype (position-type "GtkPositionType") () |
226 | '(enum |
227 | :left |
228 | :right |
229 | :top |
230 | :bottom)) |
231 | |
232 | (deftype (preview-type "GtkPreviewType") () |
233 | '(enum |
234 | :color |
235 | :grayscale)) |
236 | |
237 | (deftype (relief-style "GtkReliefStyle") () |
238 | '(enum |
239 | :normal |
240 | :half |
241 | :none)) |
242 | |
243 | (deftype (resize-mode "GtkResizeMode") () |
244 | '(enum |
245 | :parent |
246 | :queue |
247 | :immediate)) |
248 | |
249 | (deftype (signal-run-type "GtkSignalRunType") () |
250 | '(flags |
251 | (:first 0) |
252 | (:last 1) |
253 | ; (:both (GTK_RUN_FIRST | GTK_RUN_LAST)) |
254 | (:no-recurse 2) |
255 | (:action 3) |
256 | (:no-hooks 4 ))) |
257 | |
258 | (deftype (scroll-type "GtkScrollType") () |
259 | '(enum |
260 | :none |
261 | :step-backward |
262 | :step-forward |
263 | :page-backward |
264 | :page-forward |
265 | :jump)) |
266 | |
267 | (deftype (selection-mode "GtkSelectionMode") () |
268 | '(enum |
269 | :single |
270 | :browse |
271 | :multiple |
272 | :extended)) |
273 | |
274 | (deftype (shadow-type "GtkShadowType") () |
275 | '(enum |
276 | :none |
277 | :in |
278 | :out |
279 | :etched-in |
280 | :etched-out)) |
281 | |
282 | (deftype (state-type "GtkStateType") () |
283 | '(enum |
284 | :normal |
285 | :active |
286 | :prelight |
287 | :selected |
288 | :insensitive)) |
289 | |
290 | (deftype (submenu-direction "GtkSubmenuDirection") () |
291 | '(enum |
292 | :left |
293 | :right)) |
294 | |
295 | (deftype (submenu-placement "GtkSubmenuPlacement") () |
296 | '(enum |
297 | :top-bottom |
298 | :left-right)) |
299 | |
300 | (deftype (toolbar-style "GtkToolbarStyle") () |
301 | '(enum |
302 | :icons |
303 | :text |
304 | :both |
305 | :both-horiz)) |
306 | |
307 | (deftype (trough-type "GtkTroughType") () |
308 | '(enum |
309 | :none |
310 | :start |
311 | :end |
312 | :jump)) |
313 | |
314 | (deftype (update-type "GtkUpdateType") () |
315 | '(enum |
316 | :continuous |
317 | :discontinuous |
318 | :delayed)) |
319 | |
320 | (deftype (visibility "GtkVisibility") () |
321 | '(enum |
322 | :none |
323 | :partial |
324 | :full)) |
325 | |
326 | (deftype (window-position "GtkWindowPosition") () |
327 | '(enum |
328 | :none |
329 | :center |
330 | :mouse |
331 | :center-always)) |
332 | |
333 | (deftype (window-type "GtkWindowType") () |
334 | '(enum |
335 | :toplevel |
336 | :dialog |
337 | :popup)) |
338 | |
339 | (deftype (sort-type "GtkSortType") () |
340 | '(enum |
341 | :ascending |
342 | :descending)) |
343 | |
344 | ; enumerations from "gtkobject.h" |
345 | |
346 | (deftype (object-flags "GtkObjectFlags") () |
347 | '(flags |
348 | (:destroyed 0) |
349 | (:floating 1) |
350 | (:connected 2) |
351 | (:constructed 3 ))) |
352 | |
353 | (deftype (arg-flags "GtkArgFlags") () |
354 | '(flags |
355 | (:readable 0) |
356 | (:writable 1) |
357 | (:construct 2) |
358 | (:construct-only 3) |
359 | (:child-arg 4) |
360 | ; (:mask #x1f) |
361 | ; (:readwrite GTK_ARG_READABLE | GTK_ARG_WRITABLE ) |
362 | )) |
363 | |
364 | ; enumerations from "gtkpacker.h" |
365 | |
366 | (deftype (packer-options "GtkPackerOptions") () |
367 | '(flags |
368 | (:expand 0) |
369 | (:fill-x 1) |
370 | (:fill-y 2 ))) |
371 | |
372 | (deftype (side-type "GtkSideType") () |
373 | '(enum |
374 | :top |
375 | :bottom |
376 | :left |
377 | :right)) |
378 | |
379 | (deftype (anchor-type "GtkAnchorType") () |
380 | '(enum |
381 | :center |
382 | :north |
383 | :north-west |
384 | :north-east |
385 | :south |
386 | :south-west |
387 | :south-east |
388 | :west |
389 | :east |
390 | ; (:n GTK_ANCHOR_NORTH) |
391 | ; (:nw GTK_ANCHOR_NORTH_WEST) |
392 | ; (:ne GTK_ANCHOR_NORTH_EAST) |
393 | ; (:s GTK_ANCHOR_SOUTH) |
394 | ; (:sw GTK_ANCHOR_SOUTH_WEST) |
395 | ; (:se GTK_ANCHOR_SOUTH_EAST) |
396 | ; (:w GTK_ANCHOR_WEST) |
397 | ; (:e GTK_ANCHOR_EAST ) |
398 | )) |
399 | |
400 | ; enumerations from "gtkprivate.h" |
401 | |
402 | (deftype (private-flags "GtkPrivateFlags") () |
403 | '(flags |
404 | (:user-style 0) |
405 | (:resize-pending 2) |
406 | (:resize-needed 3) |
407 | (:leave-pending 4) |
408 | (:has-shape-mask 5) |
409 | (:in-reparent 6) |
410 | (:direction-set 7) |
411 | (:direction-ltr 8))) |
412 | |
413 | ; enumerations from "gtkprogressbar.h" |
414 | |
415 | (deftype (progress-bar-style "GtkProgressBarStyle") () |
416 | '(enum |
417 | :continuous |
418 | :discrete)) |
419 | |
420 | (deftype (progress-bar-orientation "GtkProgressBarOrientation") () |
421 | '(enum |
422 | :left-to-right |
423 | :right-to-left |
424 | :bottom-to-top |
425 | :top-to-bottom)) |
426 | |
427 | ; enumerations from "gtkrc.h" |
428 | |
429 | (deftype (rc-flags "GtkRcFlags") () |
430 | '(flags |
431 | (:fg 0) |
432 | (:bg 1) |
433 | (:text 2) |
434 | (:base 3 ))) |
435 | |
436 | (deftype (rc-token-type "GtkRcTokenType") () |
437 | '(enum |
438 | (:invalid G_TOKEN_LAST) |
439 | :include |
440 | :normal |
441 | :active |
442 | :prelight |
443 | :selected |
444 | :insensitive |
445 | :fg |
446 | :bg |
447 | :text |
448 | :base |
449 | :xthickness |
450 | :ythickness |
451 | :font |
452 | :fontset |
453 | :font-name |
454 | :bg-pixmap |
455 | :pixmap-path |
456 | :style |
457 | :binding |
458 | :bind |
459 | :widget |
460 | :widget-class |
461 | :class |
462 | :lowest |
463 | :gtk |
464 | :application |
465 | :rc |
466 | :highest |
467 | :engine |
468 | :module-path |
469 | ; :last |
470 | )) |
471 | |
472 | ; enumerations from "gtkspinbutton.h" |
473 | |
474 | (deftype (spin-button-update-policy "GtkSpinButtonUpdatePolicy") () |
475 | '(enum |
476 | :always |
477 | :if-valid)) |
478 | |
479 | (deftype (spin-type "GtkSpinType") () |
480 | '(enum |
481 | :step-forward |
482 | :step-backward |
483 | :page-forward |
484 | :page-backward |
485 | :home |
486 | :end |
487 | :user-defined)) |
488 | |
489 | ; enumerations from "gtktexttag.h" |
490 | |
491 | (deftype (wrap-mode "GtkWrapMode") () |
492 | '(enum |
493 | :none |
494 | :char |
495 | :word)) |
496 | |
497 | ; enumerations from "gtktexttypes.h" |
498 | |
499 | (deftype text-tab-align |
500 | ; (text-tab-align "GtkTextTabAlign") |
501 | () |
502 | '(enum |
503 | :left |
504 | :right |
505 | :center |
506 | :numeric)) |
507 | |
508 | ; enumerations from "gtktextview.h" |
509 | |
510 | (deftype (text-view-movement-step "GtkTextViewMovementStep") () |
511 | '(enum |
512 | :char |
513 | :positions |
514 | :word |
515 | :line |
516 | :paragraph |
517 | :paragraph-ends |
518 | :buffer-ends)) |
519 | |
520 | (deftype (text-view-scroll-type "GtkTextViewScrollType") () |
521 | '(enum |
522 | :to-top |
523 | :to-bottom |
524 | :page-down |
525 | :page-up)) |
526 | |
527 | (deftype (text-view-delete-type "GtkTextViewDeleteType") () |
528 | '(enum |
529 | :char |
530 | :half-word |
531 | :whole-word |
532 | :half-line |
533 | :whole-line |
534 | :half-paragraph |
535 | :whole-paragraph |
536 | :whitespace |
537 | :whitespace-leave-one)) |
538 | |
539 | ; enumerations from "gtktoolbar.h" |
540 | |
541 | (deftype (toolbar-child-type "GtkToolbarChildType") () |
542 | '(enum |
543 | :space |
544 | :button |
545 | :togglebutton |
546 | :radiobutton |
547 | :widget)) |
548 | |
549 | (deftype (toolbar-space-style "GtkToolbarSpaceStyle") () |
550 | '(enum |
551 | :empty |
552 | :line)) |
553 | |
554 | ; enumerations from "gtktree.h" |
555 | |
556 | (deftype (tree-view-mode "GtkTreeViewMode") () |
557 | '(enum |
558 | :line |
559 | :item)) |
560 | |
561 | ; enumerations from "gtkwidget.h" |
562 | |
563 | (deftype (widget-flags "GtkWidgetFlags") () |
564 | '(flags |
565 | (:toplevel 4) |
566 | (:no-window 5) |
567 | (:realized 6) |
568 | (:mapped 7) |
569 | (:visible 8) |
570 | (:sensitive 9) |
571 | (:parent-sensitive 10) |
572 | (:can-focus 11) |
573 | (:has-focus 12) |
574 | (:can-default 13) |
575 | (:has-default 14) |
576 | (:has-grab 15) |
577 | (:rc-style 16) |
578 | (:composite-child 17) |
579 | (:no-reparent 18) |
580 | (:app-paintable 19) |
581 | (:receives-default 20) |
582 | (:double-buffered 21 ))) |