| 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 */ |
Parent Directory
| 
Revision Log