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