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