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

Diff of /projs/ets/trunk/src/c_tk_base_7_5_w_mods/tkplatdecls.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

projs/trunk/shared_source/tk_base/tkplatdecls.h revision 42 by dashley, Fri Oct 14 01:50:00 2016 UTC projs/trunk/shared_source/c_tk_base_7_5_w_mods/tkplatdecls.h revision 71 by dashley, Sat Nov 5 11:07:06 2016 UTC
# Line 1  Line 1 
 /* $Header: /cvsroot/esrg/sfesrg/esrgpcpj/shared/tk_base/tkplatdecls.h,v 1.1.1.1 2001/06/13 05:07:09 dtashley Exp $ */  
   
 /*  
  * tkPlatDecls.h --  
  *  
  *      Declarations of functions in the platform-specific public Tcl API.  
  *  
  * Copyright (c) 1998-1999 by Scriptics Corporation.  
  *  
  * See the file "license.terms" for information on usage and redistribution  
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.  
  *  
  * RCS: @(#) $Id: tkplatdecls.h,v 1.1.1.1 2001/06/13 05:07:09 dtashley Exp $  
  */  
   
 #ifndef _TKPLATDECLS  
 #define _TKPLATDECLS  
   
 #ifdef BUILD_tk  
 #undef TCL_STORAGE_CLASS  
 #define TCL_STORAGE_CLASS DLLEXPORT  
 #endif  
   
 /*  
  * WARNING: This file is automatically generated by the tools/genStubs.tcl  
  * script.  Any modifications to the function declarations below should be made  
  * in the generic/tk.decls script.  
  */  
   
   
 /* !BEGIN!: Do not edit below this line. */  
   
 /*  
  * Exported function declarations:  
  */  
   
 #ifdef __WIN32__  
 /* 0 */  
 extern Window           Tk_AttachHWND _ANSI_ARGS_((Tk_Window tkwin,  
                                 HWND hwnd));  
 /* 1 */  
 extern HINSTANCE        Tk_GetHINSTANCE _ANSI_ARGS_((void));  
 /* 2 */  
 extern HWND             Tk_GetHWND _ANSI_ARGS_((Window window));  
 /* 3 */  
 extern Tk_Window        Tk_HWNDToWindow _ANSI_ARGS_((HWND hwnd));  
 /* 4 */  
 extern void             Tk_PointerEvent _ANSI_ARGS_((HWND hwnd, int x, int y));  
 /* 5 */  
 extern int              Tk_TranslateWinEvent _ANSI_ARGS_((HWND hwnd,  
                                 UINT message, WPARAM wParam, LPARAM lParam,  
                                 LRESULT * result));  
 #endif /* __WIN32__ */  
 #ifdef MAC_TCL  
 /* 0 */  
 extern void             Tk_MacSetEmbedHandler _ANSI_ARGS_((  
                                 Tk_MacEmbedRegisterWinProc * registerWinProcPtr,  
                                 Tk_MacEmbedGetGrafPortProc * getPortProcPtr,  
                                 Tk_MacEmbedMakeContainerExistProc * containerExistProcPtr,  
                                 Tk_MacEmbedGetClipProc * getClipProc,  
                                 Tk_MacEmbedGetOffsetInParentProc * getOffsetProc));  
 /* 1 */  
 extern void             Tk_MacTurnOffMenus _ANSI_ARGS_((void));  
 /* 2 */  
 extern void             Tk_MacTkOwnsCursor _ANSI_ARGS_((int tkOwnsIt));  
 /* 3 */  
 extern void             TkMacInitMenus _ANSI_ARGS_((Tcl_Interp * interp));  
 /* 4 */  
 extern void             TkMacInitAppleEvents _ANSI_ARGS_((  
                                 Tcl_Interp * interp));  
 /* 5 */  
 extern int              TkMacConvertEvent _ANSI_ARGS_((  
                                 EventRecord * eventPtr));  
 /* 6 */  
 extern int              TkMacConvertTkEvent _ANSI_ARGS_((  
                                 EventRecord * eventPtr, Window window));  
 /* 7 */  
 extern void             TkGenWMConfigureEvent _ANSI_ARGS_((Tk_Window tkwin,  
                                 int x, int y, int width, int height,  
                                 int flags));  
 /* 8 */  
 extern void             TkMacInvalClipRgns _ANSI_ARGS_((TkWindow * winPtr));  
 /* 9 */  
 extern int              TkMacHaveAppearance _ANSI_ARGS_((void));  
 /* 10 */  
 extern GWorldPtr        TkMacGetDrawablePort _ANSI_ARGS_((Drawable drawable));  
 #endif /* MAC_TCL */  
   
 typedef struct TkPlatStubs {  
     int magic;  
     struct TkPlatStubHooks *hooks;  
   
 #ifdef __WIN32__  
     Window (*tk_AttachHWND) _ANSI_ARGS_((Tk_Window tkwin, HWND hwnd)); /* 0 */  
     HINSTANCE (*tk_GetHINSTANCE) _ANSI_ARGS_((void)); /* 1 */  
     HWND (*tk_GetHWND) _ANSI_ARGS_((Window window)); /* 2 */  
     Tk_Window (*tk_HWNDToWindow) _ANSI_ARGS_((HWND hwnd)); /* 3 */  
     void (*tk_PointerEvent) _ANSI_ARGS_((HWND hwnd, int x, int y)); /* 4 */  
     int (*tk_TranslateWinEvent) _ANSI_ARGS_((HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam, LRESULT * result)); /* 5 */  
 #endif /* __WIN32__ */  
 #ifdef MAC_TCL  
     void (*tk_MacSetEmbedHandler) _ANSI_ARGS_((Tk_MacEmbedRegisterWinProc * registerWinProcPtr, Tk_MacEmbedGetGrafPortProc * getPortProcPtr, Tk_MacEmbedMakeContainerExistProc * containerExistProcPtr, Tk_MacEmbedGetClipProc * getClipProc, Tk_MacEmbedGetOffsetInParentProc * getOffsetProc)); /* 0 */  
     void (*tk_MacTurnOffMenus) _ANSI_ARGS_((void)); /* 1 */  
     void (*tk_MacTkOwnsCursor) _ANSI_ARGS_((int tkOwnsIt)); /* 2 */  
     void (*tkMacInitMenus) _ANSI_ARGS_((Tcl_Interp * interp)); /* 3 */  
     void (*tkMacInitAppleEvents) _ANSI_ARGS_((Tcl_Interp * interp)); /* 4 */  
     int (*tkMacConvertEvent) _ANSI_ARGS_((EventRecord * eventPtr)); /* 5 */  
     int (*tkMacConvertTkEvent) _ANSI_ARGS_((EventRecord * eventPtr, Window window)); /* 6 */  
     void (*tkGenWMConfigureEvent) _ANSI_ARGS_((Tk_Window tkwin, int x, int y, int width, int height, int flags)); /* 7 */  
     void (*tkMacInvalClipRgns) _ANSI_ARGS_((TkWindow * winPtr)); /* 8 */  
     int (*tkMacHaveAppearance) _ANSI_ARGS_((void)); /* 9 */  
     GWorldPtr (*tkMacGetDrawablePort) _ANSI_ARGS_((Drawable drawable)); /* 10 */  
 #endif /* MAC_TCL */  
 } TkPlatStubs;  
   
 #ifdef __cplusplus  
 extern "C" {  
 #endif  
 extern TkPlatStubs *tkPlatStubsPtr;  
 #ifdef __cplusplus  
 }  
 #endif  
   
 #if defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS)  
   
 /*  
  * Inline function declarations:  
  */  
   
 #ifdef __WIN32__  
 #ifndef Tk_AttachHWND  
 #define Tk_AttachHWND \  
         (tkPlatStubsPtr->tk_AttachHWND) /* 0 */  
 #endif  
 #ifndef Tk_GetHINSTANCE  
 #define Tk_GetHINSTANCE \  
         (tkPlatStubsPtr->tk_GetHINSTANCE) /* 1 */  
 #endif  
 #ifndef Tk_GetHWND  
 #define Tk_GetHWND \  
         (tkPlatStubsPtr->tk_GetHWND) /* 2 */  
 #endif  
 #ifndef Tk_HWNDToWindow  
 #define Tk_HWNDToWindow \  
         (tkPlatStubsPtr->tk_HWNDToWindow) /* 3 */  
 #endif  
 #ifndef Tk_PointerEvent  
 #define Tk_PointerEvent \  
         (tkPlatStubsPtr->tk_PointerEvent) /* 4 */  
 #endif  
 #ifndef Tk_TranslateWinEvent  
 #define Tk_TranslateWinEvent \  
         (tkPlatStubsPtr->tk_TranslateWinEvent) /* 5 */  
 #endif  
 #endif /* __WIN32__ */  
 #ifdef MAC_TCL  
 #ifndef Tk_MacSetEmbedHandler  
 #define Tk_MacSetEmbedHandler \  
         (tkPlatStubsPtr->tk_MacSetEmbedHandler) /* 0 */  
 #endif  
 #ifndef Tk_MacTurnOffMenus  
 #define Tk_MacTurnOffMenus \  
         (tkPlatStubsPtr->tk_MacTurnOffMenus) /* 1 */  
 #endif  
 #ifndef Tk_MacTkOwnsCursor  
 #define Tk_MacTkOwnsCursor \  
         (tkPlatStubsPtr->tk_MacTkOwnsCursor) /* 2 */  
 #endif  
 #ifndef TkMacInitMenus  
 #define TkMacInitMenus \  
         (tkPlatStubsPtr->tkMacInitMenus) /* 3 */  
 #endif  
 #ifndef TkMacInitAppleEvents  
 #define TkMacInitAppleEvents \  
         (tkPlatStubsPtr->tkMacInitAppleEvents) /* 4 */  
 #endif  
 #ifndef TkMacConvertEvent  
 #define TkMacConvertEvent \  
         (tkPlatStubsPtr->tkMacConvertEvent) /* 5 */  
 #endif  
 #ifndef TkMacConvertTkEvent  
 #define TkMacConvertTkEvent \  
         (tkPlatStubsPtr->tkMacConvertTkEvent) /* 6 */  
 #endif  
 #ifndef TkGenWMConfigureEvent  
 #define TkGenWMConfigureEvent \  
         (tkPlatStubsPtr->tkGenWMConfigureEvent) /* 7 */  
 #endif  
 #ifndef TkMacInvalClipRgns  
 #define TkMacInvalClipRgns \  
         (tkPlatStubsPtr->tkMacInvalClipRgns) /* 8 */  
 #endif  
 #ifndef TkMacHaveAppearance  
 #define TkMacHaveAppearance \  
         (tkPlatStubsPtr->tkMacHaveAppearance) /* 9 */  
 #endif  
 #ifndef TkMacGetDrawablePort  
 #define TkMacGetDrawablePort \  
         (tkPlatStubsPtr->tkMacGetDrawablePort) /* 10 */  
 #endif  
 #endif /* MAC_TCL */  
   
 #endif /* defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS) */  
   
 /* !END!: Do not edit above this line. */  
   
 #undef TCL_STORAGE_CLASS  
 #define TCL_STORAGE_CLASS DLLIMPORT  
   
 #endif /* _TKPLATDECLS */  
   
   
 /* $History: tkPlatDecls.h $  
  *  
  * *****************  Version 1  *****************  
  * User: Dtashley     Date: 1/02/01    Time: 3:04a  
  * Created in $/IjuScripter, IjuConsole/Source/Tk Base  
  * Initial check-in.  
  */  
   
 /* End of TKPLATDECLS.H */  
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 */
Legend:
Removed from v.42  
changed lines
  Added in v.71
dashley@gmail.com
 ViewVC Help
Powered by ViewVC 1.1.25