/[dtapublic]/projs/trunk/shared_source/c_tk_base_7_5_w_mods/tkplatdecls.h
ViewVC logotype

Contents of /projs/trunk/shared_source/c_tk_base_7_5_w_mods/tkplatdecls.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 69 - (show annotations) (download)
Sat Nov 5 10:54:17 2016 UTC (6 years, 3 months ago) by dashley
File MIME type: text/plain
File size: 6769 byte(s)
License and property (keyword) changes.
1 /* $Header$ */
2
3 /*
4 * tkPlatDecls.h --
5 *
6 * Declarations of functions in the platform-specific public Tcl API.
7 *
8 * Copyright (c) 1998-1999 by Scriptics Corporation.
9 *
10 * See the file "license.terms" for information on usage and redistribution
11 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
12 *
13 * RCS: @(#) $Id: tkplatdecls.h,v 1.1.1.1 2001/06/13 05:07:09 dtashley Exp $
14 */
15
16 #ifndef _TKPLATDECLS
17 #define _TKPLATDECLS
18
19 #ifdef BUILD_tk
20 #undef TCL_STORAGE_CLASS
21 #define TCL_STORAGE_CLASS DLLEXPORT
22 #endif
23
24 /*
25 * WARNING: This file is automatically generated by the tools/genStubs.tcl
26 * script. Any modifications to the function declarations below should be made
27 * in the generic/tk.decls script.
28 */
29
30
31 /* !BEGIN!: Do not edit below this line. */
32
33 /*
34 * Exported function declarations:
35 */
36
37 #ifdef __WIN32__
38 /* 0 */
39 extern Window Tk_AttachHWND _ANSI_ARGS_((Tk_Window tkwin,
40 HWND hwnd));
41 /* 1 */
42 extern HINSTANCE Tk_GetHINSTANCE _ANSI_ARGS_((void));
43 /* 2 */
44 extern HWND Tk_GetHWND _ANSI_ARGS_((Window window));
45 /* 3 */
46 extern Tk_Window Tk_HWNDToWindow _ANSI_ARGS_((HWND hwnd));
47 /* 4 */
48 extern void Tk_PointerEvent _ANSI_ARGS_((HWND hwnd, int x, int y));
49 /* 5 */
50 extern int Tk_TranslateWinEvent _ANSI_ARGS_((HWND hwnd,
51 UINT message, WPARAM wParam, LPARAM lParam,
52 LRESULT * result));
53 #endif /* __WIN32__ */
54 #ifdef MAC_TCL
55 /* 0 */
56 extern void Tk_MacSetEmbedHandler _ANSI_ARGS_((
57 Tk_MacEmbedRegisterWinProc * registerWinProcPtr,
58 Tk_MacEmbedGetGrafPortProc * getPortProcPtr,
59 Tk_MacEmbedMakeContainerExistProc * containerExistProcPtr,
60 Tk_MacEmbedGetClipProc * getClipProc,
61 Tk_MacEmbedGetOffsetInParentProc * getOffsetProc));
62 /* 1 */
63 extern void Tk_MacTurnOffMenus _ANSI_ARGS_((void));
64 /* 2 */
65 extern void Tk_MacTkOwnsCursor _ANSI_ARGS_((int tkOwnsIt));
66 /* 3 */
67 extern void TkMacInitMenus _ANSI_ARGS_((Tcl_Interp * interp));
68 /* 4 */
69 extern void TkMacInitAppleEvents _ANSI_ARGS_((
70 Tcl_Interp * interp));
71 /* 5 */
72 extern int TkMacConvertEvent _ANSI_ARGS_((
73 EventRecord * eventPtr));
74 /* 6 */
75 extern int TkMacConvertTkEvent _ANSI_ARGS_((
76 EventRecord * eventPtr, Window window));
77 /* 7 */
78 extern void TkGenWMConfigureEvent _ANSI_ARGS_((Tk_Window tkwin,
79 int x, int y, int width, int height,
80 int flags));
81 /* 8 */
82 extern void TkMacInvalClipRgns _ANSI_ARGS_((TkWindow * winPtr));
83 /* 9 */
84 extern int TkMacHaveAppearance _ANSI_ARGS_((void));
85 /* 10 */
86 extern GWorldPtr TkMacGetDrawablePort _ANSI_ARGS_((Drawable drawable));
87 #endif /* MAC_TCL */
88
89 typedef struct TkPlatStubs {
90 int magic;
91 struct TkPlatStubHooks *hooks;
92
93 #ifdef __WIN32__
94 Window (*tk_AttachHWND) _ANSI_ARGS_((Tk_Window tkwin, HWND hwnd)); /* 0 */
95 HINSTANCE (*tk_GetHINSTANCE) _ANSI_ARGS_((void)); /* 1 */
96 HWND (*tk_GetHWND) _ANSI_ARGS_((Window window)); /* 2 */
97 Tk_Window (*tk_HWNDToWindow) _ANSI_ARGS_((HWND hwnd)); /* 3 */
98 void (*tk_PointerEvent) _ANSI_ARGS_((HWND hwnd, int x, int y)); /* 4 */
99 int (*tk_TranslateWinEvent) _ANSI_ARGS_((HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam, LRESULT * result)); /* 5 */
100 #endif /* __WIN32__ */
101 #ifdef MAC_TCL
102 void (*tk_MacSetEmbedHandler) _ANSI_ARGS_((Tk_MacEmbedRegisterWinProc * registerWinProcPtr, Tk_MacEmbedGetGrafPortProc * getPortProcPtr, Tk_MacEmbedMakeContainerExistProc * containerExistProcPtr, Tk_MacEmbedGetClipProc * getClipProc, Tk_MacEmbedGetOffsetInParentProc * getOffsetProc)); /* 0 */
103 void (*tk_MacTurnOffMenus) _ANSI_ARGS_((void)); /* 1 */
104 void (*tk_MacTkOwnsCursor) _ANSI_ARGS_((int tkOwnsIt)); /* 2 */
105 void (*tkMacInitMenus) _ANSI_ARGS_((Tcl_Interp * interp)); /* 3 */
106 void (*tkMacInitAppleEvents) _ANSI_ARGS_((Tcl_Interp * interp)); /* 4 */
107 int (*tkMacConvertEvent) _ANSI_ARGS_((EventRecord * eventPtr)); /* 5 */
108 int (*tkMacConvertTkEvent) _ANSI_ARGS_((EventRecord * eventPtr, Window window)); /* 6 */
109 void (*tkGenWMConfigureEvent) _ANSI_ARGS_((Tk_Window tkwin, int x, int y, int width, int height, int flags)); /* 7 */
110 void (*tkMacInvalClipRgns) _ANSI_ARGS_((TkWindow * winPtr)); /* 8 */
111 int (*tkMacHaveAppearance) _ANSI_ARGS_((void)); /* 9 */
112 GWorldPtr (*tkMacGetDrawablePort) _ANSI_ARGS_((Drawable drawable)); /* 10 */
113 #endif /* MAC_TCL */
114 } TkPlatStubs;
115
116 #ifdef __cplusplus
117 extern "C" {
118 #endif
119 extern TkPlatStubs *tkPlatStubsPtr;
120 #ifdef __cplusplus
121 }
122 #endif
123
124 #if defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS)
125
126 /*
127 * Inline function declarations:
128 */
129
130 #ifdef __WIN32__
131 #ifndef Tk_AttachHWND
132 #define Tk_AttachHWND \
133 (tkPlatStubsPtr->tk_AttachHWND) /* 0 */
134 #endif
135 #ifndef Tk_GetHINSTANCE
136 #define Tk_GetHINSTANCE \
137 (tkPlatStubsPtr->tk_GetHINSTANCE) /* 1 */
138 #endif
139 #ifndef Tk_GetHWND
140 #define Tk_GetHWND \
141 (tkPlatStubsPtr->tk_GetHWND) /* 2 */
142 #endif
143 #ifndef Tk_HWNDToWindow
144 #define Tk_HWNDToWindow \
145 (tkPlatStubsPtr->tk_HWNDToWindow) /* 3 */
146 #endif
147 #ifndef Tk_PointerEvent
148 #define Tk_PointerEvent \
149 (tkPlatStubsPtr->tk_PointerEvent) /* 4 */
150 #endif
151 #ifndef Tk_TranslateWinEvent
152 #define Tk_TranslateWinEvent \
153 (tkPlatStubsPtr->tk_TranslateWinEvent) /* 5 */
154 #endif
155 #endif /* __WIN32__ */
156 #ifdef MAC_TCL
157 #ifndef Tk_MacSetEmbedHandler
158 #define Tk_MacSetEmbedHandler \
159 (tkPlatStubsPtr->tk_MacSetEmbedHandler) /* 0 */
160 #endif
161 #ifndef Tk_MacTurnOffMenus
162 #define Tk_MacTurnOffMenus \
163 (tkPlatStubsPtr->tk_MacTurnOffMenus) /* 1 */
164 #endif
165 #ifndef Tk_MacTkOwnsCursor
166 #define Tk_MacTkOwnsCursor \
167 (tkPlatStubsPtr->tk_MacTkOwnsCursor) /* 2 */
168 #endif
169 #ifndef TkMacInitMenus
170 #define TkMacInitMenus \
171 (tkPlatStubsPtr->tkMacInitMenus) /* 3 */
172 #endif
173 #ifndef TkMacInitAppleEvents
174 #define TkMacInitAppleEvents \
175 (tkPlatStubsPtr->tkMacInitAppleEvents) /* 4 */
176 #endif
177 #ifndef TkMacConvertEvent
178 #define TkMacConvertEvent \
179 (tkPlatStubsPtr->tkMacConvertEvent) /* 5 */
180 #endif
181 #ifndef TkMacConvertTkEvent
182 #define TkMacConvertTkEvent \
183 (tkPlatStubsPtr->tkMacConvertTkEvent) /* 6 */
184 #endif
185 #ifndef TkGenWMConfigureEvent
186 #define TkGenWMConfigureEvent \
187 (tkPlatStubsPtr->tkGenWMConfigureEvent) /* 7 */
188 #endif
189 #ifndef TkMacInvalClipRgns
190 #define TkMacInvalClipRgns \
191 (tkPlatStubsPtr->tkMacInvalClipRgns) /* 8 */
192 #endif
193 #ifndef TkMacHaveAppearance
194 #define TkMacHaveAppearance \
195 (tkPlatStubsPtr->tkMacHaveAppearance) /* 9 */
196 #endif
197 #ifndef TkMacGetDrawablePort
198 #define TkMacGetDrawablePort \
199 (tkPlatStubsPtr->tkMacGetDrawablePort) /* 10 */
200 #endif
201 #endif /* MAC_TCL */
202
203 #endif /* defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS) */
204
205 /* !END!: Do not edit above this line. */
206
207 #undef TCL_STORAGE_CLASS
208 #define TCL_STORAGE_CLASS DLLIMPORT
209
210 #endif /* _TKPLATDECLS */
211
212 /* End of tkplatdecls.h */

Properties

Name Value
svn:keywords Header

dashley@gmail.com
ViewVC Help
Powered by ViewVC 1.1.25