| 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 ))) |