1#lang racket/base 2 3(provide (except-out (all-defined-out) <<)) 4 5(define GTK_WINDOW_TOPLEVEL 0) 6(define GTK_WINDOW_POPUP 1) 7 8(define << arithmetic-shift) 9 10(define GDK_EXPOSURE_MASK (1 . << . 1)) 11(define GDK_POINTER_MOTION_MASK (1 . << . 2)) 12(define GDK_POINTER_MOTION_HINT_MASK (1 . << . 3)) 13(define GDK_BUTTON_MOTION_MASK (1 . << . 4)) 14(define GDK_BUTTON1_MOTION_MASK (1 . << . 5)) 15(define GDK_BUTTON2_MOTION_MASK (1 . << . 6)) 16(define GDK_BUTTON3_MOTION_MASK (1 . << . 7)) 17(define GDK_BUTTON_PRESS_MASK (1 . << . 8)) 18(define GDK_BUTTON_RELEASE_MASK (1 . << . 9)) 19(define GDK_KEY_PRESS_MASK (1 . << . 10)) 20(define GDK_KEY_RELEASE_MASK (1 . << . 11)) 21(define GDK_ENTER_NOTIFY_MASK (1 . << . 12)) 22(define GDK_LEAVE_NOTIFY_MASK (1 . << . 13)) 23(define GDK_FOCUS_CHANGE_MASK (1 . << . 14)) 24(define GDK_STRUCTURE_MASK (1 . << . 15)) 25(define GDK_PROPERTY_CHANGE_MASK (1 . << . 16)) 26(define GDK_VISIBILITY_NOTIFY_MASK (1 . << . 17)) 27(define GDK_PROXIMITY_IN_MASK (1 . << . 18)) 28(define GDK_PROXIMITY_OUT_MASK (1 . << . 19)) 29(define GDK_SUBSTRUCTURE_MASK (1 . << . 20)) 30(define GDK_SCROLL_MASK (1 . << . 21)) 31(define GDK_SMOOTH_SCROLL_MASK (1 . << . 23)) ; added in v3.4 32;; (define GDK_ALL_EVENTS_MASK #x3FFFFE) - as of 2.0, but #x3FFFFFE as of 3.22 33 34(define GTK_TOPLEVEL (1 . << . 4)) 35(define GTK_NO_WINDOW (1 . << . 5)) 36(define GTK_REALIZED (1 . << . 6)) 37(define GTK_MAPPED (1 . << . 7)) 38(define GTK_VISIBLE (1 . << . 8)) 39(define GTK_SENSITIVE (1 . << . 9)) 40(define GTK_PARENT_SENSITIVE (1 . << . 10)) 41(define GTK_CAN_FOCUS (1 . << . 11)) 42(define GTK_HAS_FOCUS (1 . << . 12)) 43(define GTK_CAN_DEFAULT (1 . << . 13)) 44(define GTK_HAS_DEFAULT (1 . << . 14)) 45(define GTK_HAS_GRAB (1 . << . 15)) 46(define GTK_RC_STYLE (1 . << . 16)) 47(define GTK_COMPOSITE_CHILD (1 . << . 17)) 48(define GTK_NO_REPARENT (1 . << . 18)) 49(define GTK_APP_PAINTABLE (1 . << . 19)) 50(define GTK_RECEIVES_DEFAULT (1 . << . 20)) 51(define GTK_DOUBLE_BUFFERED (1 . << . 21)) 52(define GTK_NO_SHOW_ALL (1 . << . 22)) 53 54(define GDK_SHIFT_MASK (1 . << . 0)) 55(define GDK_LOCK_MASK (1 . << . 1)) 56(define GDK_CONTROL_MASK (1 . << . 2)) 57(define GDK_MOD1_MASK (1 . << . 3)) 58(define GDK_MOD2_MASK (1 . << . 4)) 59(define GDK_MOD3_MASK (1 . << . 5)) 60(define GDK_MOD4_MASK (1 . << . 6)) 61(define GDK_MOD5_MASK (1 . << . 7)) 62(define GDK_BUTTON1_MASK (1 . << . 8)) 63(define GDK_BUTTON2_MASK (1 . << . 9)) 64(define GDK_BUTTON3_MASK (1 . << . 10)) 65(define GDK_BUTTON4_MASK (1 . << . 11)) 66(define GDK_BUTTON5_MASK (1 . << . 12)) 67(define GDK_SUPER_MASK (1 . << . 26)) 68(define GDK_HYPER_MASK (1 . << . 27)) 69(define GDK_META_MASK (1 . << . 28)) 70(define GDK_RELEASE_MASK (1 . << . 30)) 71 72(define GDK_NOTHING -1) 73(define GDK_DELETE 0) 74(define GDK_DESTROY 1) 75(define GDK_EXPOSE 2) 76(define GDK_MOTION_NOTIFY 3) 77(define GDK_BUTTON_PRESS 4) 78(define GDK_2BUTTON_PRESS 5) 79(define GDK_3BUTTON_PRESS 6) 80(define GDK_BUTTON_RELEASE 7) 81(define GDK_KEY_PRESS 8) 82(define GDK_KEY_RELEASE 9) 83(define GDK_ENTER_NOTIFY 10) 84(define GDK_LEAVE_NOTIFY 11) 85(define GDK_FOCUS_CHANGE 12) 86(define GDK_CONFIGURE 13) 87(define GDK_MAP 14) 88(define GDK_UNMAP 15) 89(define GDK_PROPERTY_NOTIFY 16) 90(define GDK_SELECTION_CLEAR 17) 91(define GDK_SELECTION_REQUEST 18) 92(define GDK_SELECTION_NOTIFY 19) 93(define GDK_PROXIMITY_IN 20) 94(define GDK_PROXIMITY_OUT 21) 95(define GDK_DRAG_ENTER 22) 96(define GDK_DRAG_LEAVE 23) 97(define GDK_DRAG_MOTION 24) 98(define GDK_DRAG_STATUS 25) 99(define GDK_DROP_START 26) 100(define GDK_DROP_FINISHED 27) 101(define GDK_CLIENT_EVENT 28) 102(define GDK_VISIBILITY_NOTIFY 29) 103(define GDK_NO_EXPOSE 30) 104(define GDK_SCROLL 31) 105(define GDK_WINDOW_STATE 32) 106(define GDK_SETTING 33) 107(define GDK_OWNER_CHANGE 34) 108(define GDK_GRAB_BROKEN 35) 109(define GDK_DAMAGE 36) 110 111(define G_TYPE_STRING (16 . << . 2)) 112 113(define GTK_POLICY_ALWAYS 0) 114(define GTK_POLICY_AUTOMATIC 1) 115(define GTK_POLICY_NEVER 2) 116 117(define GDK_WINDOW_STATE_WITHDRAWN (1 . << . 0)) 118(define GDK_WINDOW_STATE_ICONIFIED (1 . << . 1)) 119(define GDK_WINDOW_STATE_MAXIMIZED (1 . << . 2)) 120(define GDK_WINDOW_STATE_STICKY (1 . << . 3)) 121(define GDK_WINDOW_STATE_FULLSCREEN (1 . << . 4)) 122(define GDK_WINDOW_STATE_ABOVE (1 . << . 5)) 123(define GDK_WINDOW_STATE_BELOW (1 . << . 6)) 124 125(define GDK_HINT_POS (1 . << . 0)) 126(define GDK_HINT_MIN_SIZE (1 . << . 1)) 127(define GDK_HINT_MAX_SIZE (1 . << . 2)) 128(define GDK_HINT_BASE_SIZE (1 . << . 3)) 129(define GDK_HINT_ASPECT (1 . << . 4)) 130(define GDK_HINT_RESIZE_INC (1 . << . 5)) 131(define GDK_HINT_WIN_GRAVITY (1 . << . 6)) 132(define GDK_HINT_USER_POS (1 . << . 7)) 133(define GDK_HINT_USER_SIZE (1 . << . 8)) 134 135(define GDK_SCROLL_UP 0) 136(define GDK_SCROLL_DOWN 1) 137(define GDK_SCROLL_LEFT 2) 138(define GDK_SCROLL_RIGHT 3) 139(define GDK_SCROLL_SMOOTH 4) 140