chiark / gitweb /
Manually editing of the event-mask type
[clg] / gdk / gdkenums.lisp
1 ;; generated by a modified makeenums.pl  ; -*- lisp -*-
2
3 ;; $id$
4
5
6 (in-package "GDK")
7
8 ; enumerations from "gdkcursor.h"
9
10 (deftype (cursor-type "GdkCursorType") ()
11   '(enum
12     (:num-glyphs  154)
13     (:x-cursor  0)
14     (:arrow  2)
15     (:based-arrow-down  4)
16     (:based-arrow-up  6)
17     (:boat  8)
18     (:bogosity  10)
19     (:bottom-left-corner  12)
20     (:bottom-right-corner  14)
21     (:bottom-side  16)
22     (:bottom-tee  18)
23     (:box-spiral  20)
24     (:center-ptr  22)
25     (:circle  24)
26     (:clock  26)
27     (:coffee-mug  28)
28     (:cross  30)
29     (:cross-reverse  32)
30     (:crosshair  34)
31     (:diamond-cross  36)
32     (:dot  38)
33     (:dotbox  40)
34     (:double-arrow  42)
35     (:draft-large  44)
36     (:draft-small  46)
37     (:draped-box  48)
38     (:exchange  50)
39     (:fleur  52)
40     (:gobbler  54)
41     (:gumby  56)
42     (:hand1  58)
43     (:hand2  60)
44     (:heart  62)
45     (:icon  64)
46     (:iron-cross  66)
47     (:left-ptr  68)
48     (:left-side  70)
49     (:left-tee  72)
50     (:leftbutton  74)
51     (:ll-angle  76)
52     (:lr-angle  78)
53     (:man  80)
54     (:middlebutton  82)
55     (:mouse  84)
56     (:pencil  86)
57     (:pirate  88)
58     (:plus  90)
59     (:question-arrow  92)
60     (:right-ptr  94)
61     (:right-side  96)
62     (:right-tee  98)
63     (:rightbutton  100)
64     (:rtl-logo  102)
65     (:sailboat  104)
66     (:sb-down-arrow  106)
67     (:sb-h-double-arrow  108)
68     (:sb-left-arrow  110)
69     (:sb-right-arrow  112)
70     (:sb-up-arrow  114)
71     (:sb-v-double-arrow  116)
72     (:shuttle  118)
73     (:sizing  120)
74     (:spider  122)
75     (:spraycan  124)
76     (:star  126)
77     (:target  128)
78     (:tcross  130)
79     (:top-left-arrow  132)
80     (:top-left-corner  134)
81     (:top-right-corner  136)
82     (:top-side  138)
83     (:top-tee  140)
84     (:trek  142)
85     (:ul-angle  144)
86     (:umbrella  146)
87     (:ur-angle  148)
88     (:watch  150)
89     (:xterm  152)
90     :last-cursor
91     (:cursor-is-pixmap  -1 )))
92
93 ; enumerations from "gdkdnd.h"
94
95 (deftype (drag-action "GdkDragAction") ()
96   '(flags
97     (:default  0)
98     (:copy  1)
99     (:move  2)
100     (:link  3)
101     (:private  4)
102     (:ask  5 )))
103
104 (deftype (drag-protocol "GdkDragProtocol") ()
105   '(enum
106     :motif
107     :xdnd
108     :rootwin
109     :none
110     :win32-dropfiles
111     :ole2
112     :local))
113
114 ; enumerations from "gdkevents.h"
115
116 (deftype (filter-return "GdkFilterReturn") ()
117   '(enum
118     :continue
119     :translate
120     :remove))
121
122 (deftype (event-type "GdkEventType") ()
123   '(enum
124     (:nothing  -1)
125     (:delete  0)
126     (:destroy  1)
127     (:expose  2)
128     (:motion-notify  3)
129     (:button-press  4)
130     (:2button-press  5)
131     (:3button-press  6)
132     (:button-release  7)
133     (:key-press  8)
134     (:key-release  9)
135     (:enter-notify  10)
136     (:leave-notify  11)
137     (:focus-change  12)
138     (:configure  13)
139     (:map  14)
140     (:unmap  15)
141     (:property-notify  16)
142     (:selection-clear  17)
143     (:selection-request  18)
144     (:selection-notify  19)
145     (:proximity-in  20)
146     (:proximity-out  21)
147     (:drag-enter  22)
148     (:drag-leave  23)
149     (:drag-motion  24)
150     (:drag-status  25)
151     (:drop-start  26)
152     (:drop-finished  27)
153     (:client-event  28)
154     (:visibility-notify  29)
155     (:no-expose  30)
156     (:scroll  31 )))
157
158 (deftype (event-mask "GdkEventMask") ()
159   '(flags
160     (:exposure  1)
161     (:pointer-motion  2)
162     (:pointer-motion-hint  3)
163     (:button-motion  4)
164     (:button1-motion  5)
165     (:button2-motion  6)
166     (:button3-motion  7)
167     (:button-press  8)
168     (:button-release  9)
169     (:key-press  10)
170     (:key-release  11)
171     (:enter-notify  12)
172     (:leave-notify  13)
173     (:focus-change  14)
174     (:structure  15)
175     (:property-change  16)
176     (:visibility-notify  17)
177     (:proximity-in  18)
178     (:proximity-out  19)
179     (:substructure  20)
180     (:scroll  21)
181 ;    (:all-events  #x3FFFFE )
182    ))
183
184 (deftype (visibility-state "GdkVisibilityState") ()
185   '(enum
186     :unobscured
187     :partial
188     :fully-obscured))
189
190 (deftype (scroll-direction "GdkScrollDirection") ()
191   '(enum
192     :up
193     :down
194     :left
195     :right))
196
197 (deftype (notify-type "GdkNotifyType") ()
198   '(enum
199     (:ancestor  0)
200     (:virtual  1)
201     (:inferior  2)
202     (:nonlinear  3)
203     (:nonlinear-virtual  4)
204     (:unknown  5 )))
205
206 (deftype (crossing-mode "GdkCrossingMode") ()
207   '(enum
208     :normal
209     :grab
210     :ungrab))
211
212 (deftype (property-state "GdkPropertyState") ()
213   '(enum
214     :new-value
215     :delete))
216
217 ; enumerations from "gdkfont.h"
218
219 (deftype (font-type "GdkFontType") ()
220   '(enum
221     :font
222     :fontset))
223
224 ; enumerations from "gdkgc.h"
225
226 (deftype (cap-style "GdkCapStyle") ()
227   '(enum
228     :not-last
229     :butt
230     :round
231     :projecting))
232
233 (deftype (fill "GdkFill") ()
234   '(enum
235     :solid
236     :tiled
237     :stippled
238     :opaque-stippled))
239
240 (deftype (gc-function "GdkFunction") ()
241   '(enum
242     :copy
243     :invert
244     :xor
245     :clear
246     :and
247     :and-reverse
248     :and-invert
249     :noop
250     :or
251     :equiv
252     :or-reverse
253     :copy-invert
254     :or-invert
255     :nand
256     :nor
257     :set))
258
259 (deftype (join-style "GdkJoinStyle") ()
260   '(enum
261     :miter
262     :round
263     :bevel))
264
265 (deftype (line-style "GdkLineStyle") ()
266   '(enum
267     :solid
268     :on-off-dash
269     :double-dash))
270
271 (deftype (subwindow-mode "GdkSubwindowMode") ()
272   '(enum
273     (:clip-by-children  0)
274     (:include-inferiors  1 )))
275
276 (deftype (g-c-values-mask "GdkGCValuesMask") ()
277   '(flags
278     (:foreground  0)
279     (:background  1)
280     (:font  2)
281     (:function  3)
282     (:fill  4)
283     (:tile  5)
284     (:stipple  6)
285     (:clip-mask  7)
286     (:subwindow  8)
287     (:ts-x-origin  9)
288     (:ts-y-origin  10)
289     (:clip-x-origin  11)
290     (:clip-y-origin  12)
291     (:exposures  13)
292     (:line-width  14)
293     (:line-style  15)
294     (:cap-style  16)
295     (:join-style  17 )))
296
297 ; enumerations from "gdkimage.h"
298
299 (deftype (image-type "GdkImageType") ()
300   '(enum
301     :normal
302     :shared
303     :fastest
304     :shared-pixmap))
305
306 ; enumerations from "gdkim.h"
307
308 (deftype (im-style "GdkIMStyle") ()
309   '(flags
310 ;    (:preedit-area  #x0001)
311 ;    (:preedit-callbacks  #x0002)
312 ;    (:preedit-position  #x0004)
313 ;    (:preedit-nothing  #x0008)
314 ;    (:preedit-none  #x0010)
315 ;    (:preedit-mask  #x001f)
316 ;    (:status-area  #x0100)
317 ;    (:status-callbacks  #x0200)
318 ;    (:status-nothing  #x0400)
319 ;    (:status-none  #x0800)
320 ;    (:status-mask  #x0f00  )
321    ))
322
323 ; (deftype (ic-attributes-type "GdkICAttributesType") ()
324 ;   '(flags
325 ;     (:style  0)
326 ;     (:client-window  1)
327 ;     (:focus-window  2)
328 ;     (:filter-events  3)
329 ;     (:spot-location  4)
330 ;     (:line-spacing  5)
331 ;     (:cursor  6)
332 ;     (:preedit-fontset  10)
333 ;     (:preedit-area  11)
334 ;     (:preedit-area-needed  12)
335 ;     (:preedit-foreground  13)
336 ;     (:preedit-background  14)
337 ;     (:preedit-pixmap  15)
338 ;     (:preedit-colormap  16)
339 ;     (:status-fontset  21)
340 ;     (:status-area  22)
341 ;     (:status-area-needed  23)
342 ;     (:status-foreground  24)
343 ;     (:status-background  25)
344 ;     (:status-pixmap  26)
345 ;     (:status-colormap  27)
346 ; ;    (:all-req  GDK_IC_STYLE | )
347 ;     :client-window
348 ; ;    (:preedit-area-req  GDK_IC_PREEDIT_AREA |  )
349 ;     :preedit-fontset
350 ; ;    (:preedit-position-req  GDK_IC_PREEDIT_AREA | GDK_IC_SPOT_LOCATION | )
351 ;     :preedit-fontset
352 ; ;    (:status-area-req  GDK_IC_STATUS_AREA |  )
353 ;     :status-fontset))
354
355 ; enumerations from "gdkinput.h"
356
357 (deftype (extension-mode "GdkExtensionMode") ()
358   '(enum
359     :none
360     :all
361     :cursor))
362
363 (deftype (input-source "GdkInputSource") ()
364   '(enum
365     :mouse
366     :pen
367     :eraser
368     :cursor))
369
370 (deftype (input-mode "GdkInputMode") ()
371   '(enum
372     :disabled
373     :screen
374     :window))
375
376 (deftype (axis-use "GdkAxisUse") ()
377   '(enum
378     :ignore
379     :x
380     :y
381     :pressure
382     :xtilt
383     :ytilt
384     :wheel
385     :last))
386
387 ; enumerations from "gdkpixbuf.h"
388
389 ; (deftype (pixbuf-alpha-mode "GdkPixbufAlphaMode") ()
390 ;   '(enum
391 ;     :bilevel
392 ;     :full))
393
394 ; enumerations from "gdkproperty.h"
395
396 (deftype (prop-mode "GdkPropMode") ()
397   '(enum
398     :replace
399     :prepend
400     :append))
401
402 ; enumerations from "gdkregion.h"
403
404 (deftype (fill-rule "GdkFillRule") ()
405   '(enum
406     :even-odd-rule
407     :winding-rule))
408
409 (deftype (overlap-type "GdkOverlapType") ()
410   '(enum
411     :in
412     :out
413     :part))
414
415 ; enumerations from "gdkrgb.h"
416
417 (deftype (rgb-dither "GdkRgbDither") ()
418   '(enum
419     :none
420     :normal
421     :max))
422
423 ; enumerations from "gdkselection.h"
424
425 (deftype (selection "GdkSelection") ()
426   '(enum
427     (:primary  1)
428     (:secondary  2 )))
429
430 (deftype (target "GdkTarget") ()
431   '(enum
432     (:bitmap  5)
433     (:colormap  7)
434     (:drawable  17)
435     (:pixmap  20)
436     (:string  31 )))
437
438 (deftype (selection-type "GdkSelectionType") ()
439   '(enum
440     (:atom  4)
441     (:bitmap  5)
442     (:colormap  7)
443     (:drawable  17)
444     (:integer  19)
445     (:pixmap  20)
446     (:window  33)
447     (:string  31 )))
448
449 ; enumerations from "gdktypes.h"
450
451 (deftype (byte-order "GdkByteOrder") ()
452   '(enum
453     :lsb-first
454     :msb-first))
455
456 (deftype (modifier-type "GdkModifierType") ()
457   '(flags
458     (:shift-mask  0)
459     (:lock-mask  1)
460     (:control-mask  2)
461     (:mod1-mask  3)
462     (:mod2-mask  4)
463     (:mod3-mask  5)
464     (:mod4-mask  6)
465     (:mod5-mask  7)
466     (:button1-mask  8)
467     (:button2-mask  9)
468     (:button3-mask  10)
469     (:button4-mask  11)
470     (:button5-mask  12)
471     (:release-mask  31)
472 ;    (:modifier-mask  GDK_RELEASE_MASK | #x1fff )
473    ))
474
475 (deftype (input-condition "GdkInputCondition") ()
476   '(flags
477     (:read  0)
478     (:write  1)
479     (:exception  2 )))
480
481 (deftype (status "GdkStatus") ()
482   '(enum
483     (:ok  0)
484     (:error  -1)
485     (:error-param  -2)
486     (:error-file  -3)
487     (:error-mem  -4 )))
488
489 (deftype (grab-status "GdkGrabStatus") ()
490   '(enum
491     (:success  0)
492     (:already-grabbed  1)
493     (:invalid-time  2)
494     (:not-viewable  3)
495     (:frozen  4 )))
496
497 ; enumerations from "gdkvisual.h"
498
499 (deftype (visual-type "GdkVisualType") ()
500   '(enum
501     :static-gray
502     :grayscale
503     :static-color
504     :pseudo-color
505     :true-color
506     :direct-color))
507
508 ; enumerations from "gdkwindow.h"
509
510 (deftype (window-class "GdkWindowClass") ()
511   '(enum
512     :output
513     :only))
514
515 (deftype (window-type "GdkWindowType") ()
516   '(enum
517     :root
518     :toplevel
519     :child
520     :dialog
521     :temp
522     :foreign))
523
524 (deftype (window-attributes-type "GdkWindowAttributesType") ()
525   '(flags
526     (:title  1)
527     (:x  2)
528     (:y  3)
529     (:cursor  4)
530     (:colormap  5)
531     (:visual  6)
532     (:wmclass  7)
533     (:noredir  8 )))
534
535 (deftype (window-hints "GdkWindowHints") ()
536   '(flags
537     (:pos  0)
538     (:min-size  1)
539     (:max-size  2)
540     (:base-size  3)
541     (:aspect  4)
542     (:resize-inc  5 )))
543
544 (deftype (wm-decoration "GdkWMDecoration") ()
545   '(flags
546     (:all  0)
547     (:border  1)
548     (:resizeh  2)
549     (:title  3)
550     (:menu  4)
551     (:minimize  5)
552     (:maximize  6 )))
553
554 (deftype (wm-function "GdkWMFunction") ()
555   '(flags
556     (:all  0)
557     (:resize  1)
558     (:move  2)
559     (:minimize  3)
560     (:maximize  4)
561     (:close  5 )))