Mercurial > repos > rliterman > csp2

comparison CSP2/CSP2_env/env-d9b9114564458d9d-741b3de822f2aaca6c6caa4325c4afce/include/tkPlatDecls.h @ 69:33d812a61356

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload commit 2e9511a184a1ca667c7be0c6321a36dc4e3d116d
author jpayne
date Tue, 18 Mar 2025 17:55:14 -0400
parents
children
comparison
equal deleted inserted replaced
67:0e9998148a16 69:33d812a61356
1 /*
2 * tkPlatDecls.h --
3 *
4 * Declarations of functions in the platform-specific public Tcl API.
5 *
6 * Copyright (c) 1998-1999 by Scriptics Corporation.
7 *
8 * See the file "license.terms" for information on usage and redistribution
9 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
10 */
11
12 #ifndef _TKPLATDECLS
13 #define _TKPLATDECLS
14
15 #ifdef BUILD_tk
16 #undef TCL_STORAGE_CLASS
17 #define TCL_STORAGE_CLASS DLLEXPORT
18 #endif
19
20 /*
21 * WARNING: This file is automatically generated by the tools/genStubs.tcl
22 * script. Any modifications to the function declarations below should be made
23 * in the generic/tk.decls script.
24 */
25
26 #ifdef __cplusplus
27 extern "C" {
28 #endif
29
30 /* !BEGIN!: Do not edit below this line. */
31
32 #ifdef __cplusplus
33 extern "C" {
34 #endif
35
36 /*
37 * Exported function declarations:
38 */
39
40 #if defined(_WIN32) || defined(__CYGWIN__) /* WIN */
41 /* 0 */
42 EXTERN Window Tk_AttachHWND(Tk_Window tkwin, HWND hwnd);
43 /* 1 */
44 EXTERN HINSTANCE Tk_GetHINSTANCE(void);
45 /* 2 */
46 EXTERN HWND Tk_GetHWND(Window window);
47 /* 3 */
48 EXTERN Tk_Window Tk_HWNDToWindow(HWND hwnd);
49 /* 4 */
50 EXTERN void Tk_PointerEvent(HWND hwnd, int x, int y);
51 /* 5 */
52 EXTERN int Tk_TranslateWinEvent(HWND hwnd, UINT message,
53 WPARAM wParam, LPARAM lParam,
54 LRESULT *result);
55 #endif /* WIN */
56 #ifdef MAC_OSX_TK /* AQUA */
57 /* 0 */
58 EXTERN void Tk_MacOSXSetEmbedHandler(
59 Tk_MacOSXEmbedRegisterWinProc *registerWinProcPtr,
60 Tk_MacOSXEmbedGetGrafPortProc *getPortProcPtr,
61 Tk_MacOSXEmbedMakeContainerExistProc *containerExistProcPtr,
62 Tk_MacOSXEmbedGetClipProc *getClipProc,
63 Tk_MacOSXEmbedGetOffsetInParentProc *getOffsetProc);
64 /* 1 */
65 EXTERN void Tk_MacOSXTurnOffMenus(void);
66 /* 2 */
67 EXTERN void Tk_MacOSXTkOwnsCursor(int tkOwnsIt);
68 /* 3 */
69 EXTERN void TkMacOSXInitMenus(Tcl_Interp *interp);
70 /* 4 */
71 EXTERN void TkMacOSXInitAppleEvents(Tcl_Interp *interp);
72 /* 5 */
73 EXTERN void TkGenWMConfigureEvent(Tk_Window tkwin, int x, int y,
74 int width, int height, int flags);
75 /* 6 */
76 EXTERN void TkMacOSXInvalClipRgns(Tk_Window tkwin);
77 /* 7 */
78 EXTERN void * TkMacOSXGetDrawablePort(Drawable drawable);
79 /* 8 */
80 EXTERN void * TkMacOSXGetRootControl(Drawable drawable);
81 /* 9 */
82 EXTERN void Tk_MacOSXSetupTkNotifier(void);
83 /* 10 */
84 EXTERN int Tk_MacOSXIsAppInFront(void);
85 /* 11 */
86 EXTERN Tk_Window Tk_MacOSXGetTkWindow(void *w);
87 /* 12 */
88 EXTERN void * Tk_MacOSXGetCGContextForDrawable(Drawable drawable);
89 /* 13 */
90 EXTERN void * Tk_MacOSXGetNSWindowForDrawable(Drawable drawable);
91 /* Slot 14 is reserved */
92 /* Slot 15 is reserved */
93 /* 16 */
94 EXTERN void TkGenWMConfigureEvent_(Tk_Window tkwin, int x, int y,
95 int width, int height, int flags);
96 #endif /* AQUA */
97
98 typedef struct TkPlatStubs {
99 int magic;
100 void *hooks;
101
102 #if defined(_WIN32) || defined(__CYGWIN__) /* WIN */
103 Window (*tk_AttachHWND) (Tk_Window tkwin, HWND hwnd); /* 0 */
104 HINSTANCE (*tk_GetHINSTANCE) (void); /* 1 */
105 HWND (*tk_GetHWND) (Window window); /* 2 */
106 Tk_Window (*tk_HWNDToWindow) (HWND hwnd); /* 3 */
107 void (*tk_PointerEvent) (HWND hwnd, int x, int y); /* 4 */
108 int (*tk_TranslateWinEvent) (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam, LRESULT *result); /* 5 */
109 #endif /* WIN */
110 #ifdef MAC_OSX_TK /* AQUA */
111 void (*tk_MacOSXSetEmbedHandler) (Tk_MacOSXEmbedRegisterWinProc *registerWinProcPtr, Tk_MacOSXEmbedGetGrafPortProc *getPortProcPtr, Tk_MacOSXEmbedMakeContainerExistProc *containerExistProcPtr, Tk_MacOSXEmbedGetClipProc *getClipProc, Tk_MacOSXEmbedGetOffsetInParentProc *getOffsetProc); /* 0 */
112 void (*tk_MacOSXTurnOffMenus) (void); /* 1 */
113 void (*tk_MacOSXTkOwnsCursor) (int tkOwnsIt); /* 2 */
114 void (*tkMacOSXInitMenus) (Tcl_Interp *interp); /* 3 */
115 void (*tkMacOSXInitAppleEvents) (Tcl_Interp *interp); /* 4 */
116 void (*tkGenWMConfigureEvent) (Tk_Window tkwin, int x, int y, int width, int height, int flags); /* 5 */
117 void (*tkMacOSXInvalClipRgns) (Tk_Window tkwin); /* 6 */
118 void * (*tkMacOSXGetDrawablePort) (Drawable drawable); /* 7 */
119 void * (*tkMacOSXGetRootControl) (Drawable drawable); /* 8 */
120 void (*tk_MacOSXSetupTkNotifier) (void); /* 9 */
121 int (*tk_MacOSXIsAppInFront) (void); /* 10 */
122 Tk_Window (*tk_MacOSXGetTkWindow) (void *w); /* 11 */
123 void * (*tk_MacOSXGetCGContextForDrawable) (Drawable drawable); /* 12 */
124 void * (*tk_MacOSXGetNSWindowForDrawable) (Drawable drawable); /* 13 */
125 void (*reserved14)(void);
126 void (*reserved15)(void);
127 void (*tkGenWMConfigureEvent_) (Tk_Window tkwin, int x, int y, int width, int height, int flags); /* 16 */
128 #endif /* AQUA */
129 } TkPlatStubs;
130
131 extern const TkPlatStubs *tkPlatStubsPtr;
132
133 #ifdef __cplusplus
134 }
135 #endif
136
137 #if defined(USE_TK_STUBS)
138
139 /*
140 * Inline function declarations:
141 */
142
143 #if defined(_WIN32) || defined(__CYGWIN__) /* WIN */
144 #define Tk_AttachHWND \
145 (tkPlatStubsPtr->tk_AttachHWND) /* 0 */
146 #define Tk_GetHINSTANCE \
147 (tkPlatStubsPtr->tk_GetHINSTANCE) /* 1 */
148 #define Tk_GetHWND \
149 (tkPlatStubsPtr->tk_GetHWND) /* 2 */
150 #define Tk_HWNDToWindow \
151 (tkPlatStubsPtr->tk_HWNDToWindow) /* 3 */
152 #define Tk_PointerEvent \
153 (tkPlatStubsPtr->tk_PointerEvent) /* 4 */
154 #define Tk_TranslateWinEvent \
155 (tkPlatStubsPtr->tk_TranslateWinEvent) /* 5 */
156 #endif /* WIN */
157 #ifdef MAC_OSX_TK /* AQUA */
158 #define Tk_MacOSXSetEmbedHandler \
159 (tkPlatStubsPtr->tk_MacOSXSetEmbedHandler) /* 0 */
160 #define Tk_MacOSXTurnOffMenus \
161 (tkPlatStubsPtr->tk_MacOSXTurnOffMenus) /* 1 */
162 #define Tk_MacOSXTkOwnsCursor \
163 (tkPlatStubsPtr->tk_MacOSXTkOwnsCursor) /* 2 */
164 #define TkMacOSXInitMenus \
165 (tkPlatStubsPtr->tkMacOSXInitMenus) /* 3 */
166 #define TkMacOSXInitAppleEvents \
167 (tkPlatStubsPtr->tkMacOSXInitAppleEvents) /* 4 */
168 #define TkGenWMConfigureEvent \
169 (tkPlatStubsPtr->tkGenWMConfigureEvent) /* 5 */
170 #define TkMacOSXInvalClipRgns \
171 (tkPlatStubsPtr->tkMacOSXInvalClipRgns) /* 6 */
172 #define TkMacOSXGetDrawablePort \
173 (tkPlatStubsPtr->tkMacOSXGetDrawablePort) /* 7 */
174 #define TkMacOSXGetRootControl \
175 (tkPlatStubsPtr->tkMacOSXGetRootControl) /* 8 */
176 #define Tk_MacOSXSetupTkNotifier \
177 (tkPlatStubsPtr->tk_MacOSXSetupTkNotifier) /* 9 */
178 #define Tk_MacOSXIsAppInFront \
179 (tkPlatStubsPtr->tk_MacOSXIsAppInFront) /* 10 */
180 #define Tk_MacOSXGetTkWindow \
181 (tkPlatStubsPtr->tk_MacOSXGetTkWindow) /* 11 */
182 #define Tk_MacOSXGetCGContextForDrawable \
183 (tkPlatStubsPtr->tk_MacOSXGetCGContextForDrawable) /* 12 */
184 #define Tk_MacOSXGetNSWindowForDrawable \
185 (tkPlatStubsPtr->tk_MacOSXGetNSWindowForDrawable) /* 13 */
186 /* Slot 14 is reserved */
187 /* Slot 15 is reserved */
188 #define TkGenWMConfigureEvent_ \
189 (tkPlatStubsPtr->tkGenWMConfigureEvent_) /* 16 */
190 #endif /* AQUA */
191
192 #endif /* defined(USE_TK_STUBS) */
193
194 /* !END!: Do not edit above this line. */
195
196 #ifdef __cplusplus
197 }
198 #endif
199
200 #undef TCL_STORAGE_CLASS
201 #define TCL_STORAGE_CLASS DLLIMPORT
202
203 #undef TkGenWMConfigureEvent_
204 #define Tk_MacOSXGetNSViewForDrawable TkMacOSXGetRootControl
205
206 #endif /* _TKPLATDECLS */