/[dtapublic]/projs/trunk/shared_source/c_tcl_base_7_5_w_mods/tclintplatdecls.h
ViewVC logotype

Contents of /projs/trunk/shared_source/c_tcl_base_7_5_w_mods/tclintplatdecls.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 66 - (show annotations) (download)
Sun Oct 30 21:57:38 2016 UTC (8 years, 1 month ago) by dashley
File MIME type: text/plain
File size: 19299 byte(s)
Header and footer cleanup.
1 /* $Header$ */
2 /*
3 * tclIntPlatDecls.h --
4 *
5 * This file contains the declarations for all platform dependent
6 * unsupported functions that are exported by the Tcl library. These
7 * interfaces are not guaranteed to remain the same between
8 * versions. Use at your own risk.
9 *
10 * Copyright (c) 1998-1999 by Scriptics Corporation.
11 * All rights reserved.
12 *
13 * RCS: @(#) $Id: tclintplatdecls.h,v 1.1.1.1 2001/06/13 04:40:42 dtashley Exp $
14 */
15
16 #ifndef _TCLINTPLATDECLS
17 #define _TCLINTPLATDECLS
18
19 /*
20 * WARNING: This file is automatically generated by the tools/genStubs.tcl
21 * script. Any modifications to the function declarations below should be made
22 * in the generic/tclInt.decls script.
23 */
24
25 /* !BEGIN!: Do not edit below this line. */
26
27 /*
28 * Exported function declarations:
29 */
30
31 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
32 /* 0 */
33 EXTERN void TclGetAndDetachPids _ANSI_ARGS_((Tcl_Interp * interp,
34 Tcl_Channel chan));
35 /* 1 */
36 EXTERN int TclpCloseFile _ANSI_ARGS_((TclFile file));
37 /* 2 */
38 EXTERN Tcl_Channel TclpCreateCommandChannel _ANSI_ARGS_((
39 TclFile readFile, TclFile writeFile,
40 TclFile errorFile, int numPids,
41 Tcl_Pid * pidPtr));
42 /* 3 */
43 EXTERN int TclpCreatePipe _ANSI_ARGS_((TclFile * readPipe,
44 TclFile * writePipe));
45 /* 4 */
46 EXTERN int TclpCreateProcess _ANSI_ARGS_((Tcl_Interp * interp,
47 int argc, char ** argv, TclFile inputFile,
48 TclFile outputFile, TclFile errorFile,
49 Tcl_Pid * pidPtr));
50 /* Slot 5 is reserved */
51 /* 6 */
52 EXTERN TclFile TclpMakeFile _ANSI_ARGS_((Tcl_Channel channel,
53 int direction));
54 /* 7 */
55 EXTERN TclFile TclpOpenFile _ANSI_ARGS_((CONST char * fname,
56 int mode));
57 /* 8 */
58 EXTERN int TclUnixWaitForFile _ANSI_ARGS_((int fd, int mask,
59 int timeout));
60 /* 9 */
61 EXTERN TclFile TclpCreateTempFile _ANSI_ARGS_((
62 CONST char * contents));
63 #endif /* UNIX */
64 #ifdef __WIN32__
65 /* 0 */
66 EXTERN void TclWinConvertError _ANSI_ARGS_((DWORD errCode));
67 /* 1 */
68 EXTERN void TclWinConvertWSAError _ANSI_ARGS_((DWORD errCode));
69 /* 2 */
70 EXTERN struct servent * TclWinGetServByName _ANSI_ARGS_((CONST char * nm,
71 CONST char * proto));
72 /* 3 */
73 EXTERN int TclWinGetSockOpt _ANSI_ARGS_((SOCKET s, int level,
74 int optname, char FAR * optval,
75 int FAR * optlen));
76 /* 4 */
77 EXTERN HINSTANCE TclWinGetTclInstance _ANSI_ARGS_((void));
78 /* Slot 5 is reserved */
79 /* 6 */
80 EXTERN u_short TclWinNToHS _ANSI_ARGS_((u_short ns));
81 /* 7 */
82 EXTERN int TclWinSetSockOpt _ANSI_ARGS_((SOCKET s, int level,
83 int optname, CONST char FAR * optval,
84 int optlen));
85 /* 8 */
86 EXTERN unsigned long TclpGetPid _ANSI_ARGS_((Tcl_Pid pid));
87 /* 9 */
88 EXTERN int TclWinGetPlatformId _ANSI_ARGS_((void));
89 /* Slot 10 is reserved */
90 /* 11 */
91 EXTERN void TclGetAndDetachPids _ANSI_ARGS_((Tcl_Interp * interp,
92 Tcl_Channel chan));
93 /* 12 */
94 EXTERN int TclpCloseFile _ANSI_ARGS_((TclFile file));
95 /* 13 */
96 EXTERN Tcl_Channel TclpCreateCommandChannel _ANSI_ARGS_((
97 TclFile readFile, TclFile writeFile,
98 TclFile errorFile, int numPids,
99 Tcl_Pid * pidPtr));
100 /* 14 */
101 EXTERN int TclpCreatePipe _ANSI_ARGS_((TclFile * readPipe,
102 TclFile * writePipe));
103 /* 15 */
104 EXTERN int TclpCreateProcess _ANSI_ARGS_((Tcl_Interp * interp,
105 int argc, char ** argv, TclFile inputFile,
106 TclFile outputFile, TclFile errorFile,
107 Tcl_Pid * pidPtr));
108 /* Slot 16 is reserved */
109 /* Slot 17 is reserved */
110 /* 18 */
111 EXTERN TclFile TclpMakeFile _ANSI_ARGS_((Tcl_Channel channel,
112 int direction));
113 /* 19 */
114 EXTERN TclFile TclpOpenFile _ANSI_ARGS_((CONST char * fname,
115 int mode));
116 /* 20 */
117 EXTERN void TclWinAddProcess _ANSI_ARGS_((HANDLE hProcess,
118 DWORD id));
119 /* 21 */
120 EXTERN void TclpAsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async));
121 /* 22 */
122 EXTERN TclFile TclpCreateTempFile _ANSI_ARGS_((
123 CONST char * contents));
124 /* 23 */
125 EXTERN char * TclpGetTZName _ANSI_ARGS_((int isdst));
126 /* 24 */
127 EXTERN char * TclWinNoBackslash _ANSI_ARGS_((char * path));
128 /* 25 */
129 EXTERN TclPlatformType * TclWinGetPlatform _ANSI_ARGS_((void));
130 /* 26 */
131 EXTERN void TclWinSetInterfaces _ANSI_ARGS_((int wide));
132 #endif /* __WIN32__ */
133 #ifdef MAC_TCL
134 /* 0 */
135 EXTERN VOID * TclpSysAlloc _ANSI_ARGS_((long size, int isBin));
136 /* 1 */
137 EXTERN void TclpSysFree _ANSI_ARGS_((VOID * ptr));
138 /* 2 */
139 EXTERN VOID * TclpSysRealloc _ANSI_ARGS_((VOID * cp,
140 unsigned int size));
141 /* 3 */
142 EXTERN void TclpExit _ANSI_ARGS_((int status));
143 /* 4 */
144 EXTERN int FSpGetDefaultDir _ANSI_ARGS_((FSSpecPtr theSpec));
145 /* 5 */
146 EXTERN int FSpSetDefaultDir _ANSI_ARGS_((FSSpecPtr theSpec));
147 /* 6 */
148 EXTERN OSErr FSpFindFolder _ANSI_ARGS_((short vRefNum,
149 OSType folderType, Boolean createFolder,
150 FSSpec * spec));
151 /* 7 */
152 EXTERN void GetGlobalMouse _ANSI_ARGS_((Point * mouse));
153 /* 8 */
154 EXTERN pascal OSErr FSpGetDirectoryID _ANSI_ARGS_((CONST FSSpec * spec,
155 long * theDirID, Boolean * isDirectory));
156 /* 9 */
157 EXTERN pascal short FSpOpenResFileCompat _ANSI_ARGS_((
158 CONST FSSpec * spec, SignedByte permission));
159 /* 10 */
160 EXTERN pascal void FSpCreateResFileCompat _ANSI_ARGS_((
161 CONST FSSpec * spec, OSType creator,
162 OSType fileType, ScriptCode scriptTag));
163 /* 11 */
164 EXTERN int FSpLocationFromPath _ANSI_ARGS_((int length,
165 CONST char * path, FSSpecPtr theSpec));
166 /* 12 */
167 EXTERN OSErr FSpPathFromLocation _ANSI_ARGS_((FSSpecPtr theSpec,
168 int * length, Handle * fullPath));
169 /* 13 */
170 EXTERN void TclMacExitHandler _ANSI_ARGS_((void));
171 /* 14 */
172 EXTERN void TclMacInitExitToShell _ANSI_ARGS_((int usePatch));
173 /* 15 */
174 EXTERN OSErr TclMacInstallExitToShellPatch _ANSI_ARGS_((
175 ExitToShellProcPtr newProc));
176 /* 16 */
177 EXTERN int TclMacOSErrorToPosixError _ANSI_ARGS_((int error));
178 /* 17 */
179 EXTERN void TclMacRemoveTimer _ANSI_ARGS_((void * timerToken));
180 /* 18 */
181 EXTERN void * TclMacStartTimer _ANSI_ARGS_((long ms));
182 /* 19 */
183 EXTERN int TclMacTimerExpired _ANSI_ARGS_((void * timerToken));
184 /* 20 */
185 EXTERN int TclMacRegisterResourceFork _ANSI_ARGS_((
186 short fileRef, Tcl_Obj * tokenPtr,
187 int insert));
188 /* 21 */
189 EXTERN short TclMacUnRegisterResourceFork _ANSI_ARGS_((
190 char * tokenPtr, Tcl_Obj * resultPtr));
191 /* 22 */
192 EXTERN int TclMacCreateEnv _ANSI_ARGS_((void));
193 /* 23 */
194 EXTERN FILE * TclMacFOpenHack _ANSI_ARGS_((CONST char * path,
195 CONST char * mode));
196 /* Slot 24 is reserved */
197 /* 25 */
198 EXTERN int TclMacChmod _ANSI_ARGS_((char * path, int mode));
199 #endif /* MAC_TCL */
200
201 typedef struct TclIntPlatStubs {
202 int magic;
203 struct TclIntPlatStubHooks *hooks;
204
205 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
206 void (*tclGetAndDetachPids) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 0 */
207 int (*tclpCloseFile) _ANSI_ARGS_((TclFile file)); /* 1 */
208 Tcl_Channel (*tclpCreateCommandChannel) _ANSI_ARGS_((TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr)); /* 2 */
209 int (*tclpCreatePipe) _ANSI_ARGS_((TclFile * readPipe, TclFile * writePipe)); /* 3 */
210 int (*tclpCreateProcess) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr)); /* 4 */
211 void *reserved5;
212 TclFile (*tclpMakeFile) _ANSI_ARGS_((Tcl_Channel channel, int direction)); /* 6 */
213 TclFile (*tclpOpenFile) _ANSI_ARGS_((CONST char * fname, int mode)); /* 7 */
214 int (*tclUnixWaitForFile) _ANSI_ARGS_((int fd, int mask, int timeout)); /* 8 */
215 TclFile (*tclpCreateTempFile) _ANSI_ARGS_((CONST char * contents)); /* 9 */
216 #endif /* UNIX */
217 #ifdef __WIN32__
218 void (*tclWinConvertError) _ANSI_ARGS_((DWORD errCode)); /* 0 */
219 void (*tclWinConvertWSAError) _ANSI_ARGS_((DWORD errCode)); /* 1 */
220 struct servent * (*tclWinGetServByName) _ANSI_ARGS_((CONST char * nm, CONST char * proto)); /* 2 */
221 int (*tclWinGetSockOpt) _ANSI_ARGS_((SOCKET s, int level, int optname, char FAR * optval, int FAR * optlen)); /* 3 */
222 HINSTANCE (*tclWinGetTclInstance) _ANSI_ARGS_((void)); /* 4 */
223 void *reserved5;
224 u_short (*tclWinNToHS) _ANSI_ARGS_((u_short ns)); /* 6 */
225 int (*tclWinSetSockOpt) _ANSI_ARGS_((SOCKET s, int level, int optname, CONST char FAR * optval, int optlen)); /* 7 */
226 unsigned long (*tclpGetPid) _ANSI_ARGS_((Tcl_Pid pid)); /* 8 */
227 int (*tclWinGetPlatformId) _ANSI_ARGS_((void)); /* 9 */
228 void *reserved10;
229 void (*tclGetAndDetachPids) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 11 */
230 int (*tclpCloseFile) _ANSI_ARGS_((TclFile file)); /* 12 */
231 Tcl_Channel (*tclpCreateCommandChannel) _ANSI_ARGS_((TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr)); /* 13 */
232 int (*tclpCreatePipe) _ANSI_ARGS_((TclFile * readPipe, TclFile * writePipe)); /* 14 */
233 int (*tclpCreateProcess) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr)); /* 15 */
234 void *reserved16;
235 void *reserved17;
236 TclFile (*tclpMakeFile) _ANSI_ARGS_((Tcl_Channel channel, int direction)); /* 18 */
237 TclFile (*tclpOpenFile) _ANSI_ARGS_((CONST char * fname, int mode)); /* 19 */
238 void (*tclWinAddProcess) _ANSI_ARGS_((HANDLE hProcess, DWORD id)); /* 20 */
239 void (*tclpAsyncMark) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 21 */
240 TclFile (*tclpCreateTempFile) _ANSI_ARGS_((CONST char * contents)); /* 22 */
241 char * (*tclpGetTZName) _ANSI_ARGS_((int isdst)); /* 23 */
242 char * (*tclWinNoBackslash) _ANSI_ARGS_((char * path)); /* 24 */
243 TclPlatformType * (*tclWinGetPlatform) _ANSI_ARGS_((void)); /* 25 */
244 void (*tclWinSetInterfaces) _ANSI_ARGS_((int wide)); /* 26 */
245 #endif /* __WIN32__ */
246 #ifdef MAC_TCL
247 VOID * (*tclpSysAlloc) _ANSI_ARGS_((long size, int isBin)); /* 0 */
248 void (*tclpSysFree) _ANSI_ARGS_((VOID * ptr)); /* 1 */
249 VOID * (*tclpSysRealloc) _ANSI_ARGS_((VOID * cp, unsigned int size)); /* 2 */
250 void (*tclpExit) _ANSI_ARGS_((int status)); /* 3 */
251 int (*fSpGetDefaultDir) _ANSI_ARGS_((FSSpecPtr theSpec)); /* 4 */
252 int (*fSpSetDefaultDir) _ANSI_ARGS_((FSSpecPtr theSpec)); /* 5 */
253 OSErr (*fSpFindFolder) _ANSI_ARGS_((short vRefNum, OSType folderType, Boolean createFolder, FSSpec * spec)); /* 6 */
254 void (*getGlobalMouse) _ANSI_ARGS_((Point * mouse)); /* 7 */
255 pascal OSErr (*fSpGetDirectoryID) _ANSI_ARGS_((CONST FSSpec * spec, long * theDirID, Boolean * isDirectory)); /* 8 */
256 pascal short (*fSpOpenResFileCompat) _ANSI_ARGS_((CONST FSSpec * spec, SignedByte permission)); /* 9 */
257 pascal void (*fSpCreateResFileCompat) _ANSI_ARGS_((CONST FSSpec * spec, OSType creator, OSType fileType, ScriptCode scriptTag)); /* 10 */
258 int (*fSpLocationFromPath) _ANSI_ARGS_((int length, CONST char * path, FSSpecPtr theSpec)); /* 11 */
259 OSErr (*fSpPathFromLocation) _ANSI_ARGS_((FSSpecPtr theSpec, int * length, Handle * fullPath)); /* 12 */
260 void (*tclMacExitHandler) _ANSI_ARGS_((void)); /* 13 */
261 void (*tclMacInitExitToShell) _ANSI_ARGS_((int usePatch)); /* 14 */
262 OSErr (*tclMacInstallExitToShellPatch) _ANSI_ARGS_((ExitToShellProcPtr newProc)); /* 15 */
263 int (*tclMacOSErrorToPosixError) _ANSI_ARGS_((int error)); /* 16 */
264 void (*tclMacRemoveTimer) _ANSI_ARGS_((void * timerToken)); /* 17 */
265 void * (*tclMacStartTimer) _ANSI_ARGS_((long ms)); /* 18 */
266 int (*tclMacTimerExpired) _ANSI_ARGS_((void * timerToken)); /* 19 */
267 int (*tclMacRegisterResourceFork) _ANSI_ARGS_((short fileRef, Tcl_Obj * tokenPtr, int insert)); /* 20 */
268 short (*tclMacUnRegisterResourceFork) _ANSI_ARGS_((char * tokenPtr, Tcl_Obj * resultPtr)); /* 21 */
269 int (*tclMacCreateEnv) _ANSI_ARGS_((void)); /* 22 */
270 FILE * (*tclMacFOpenHack) _ANSI_ARGS_((CONST char * path, CONST char * mode)); /* 23 */
271 void *reserved24;
272 int (*tclMacChmod) _ANSI_ARGS_((char * path, int mode)); /* 25 */
273 #endif /* MAC_TCL */
274 } TclIntPlatStubs;
275
276 #ifdef __cplusplus
277 extern "C" {
278 #endif
279 extern TclIntPlatStubs *tclIntPlatStubsPtr;
280 #ifdef __cplusplus
281 }
282 #endif
283
284 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
285
286 /*
287 * Inline function declarations:
288 */
289
290 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
291 #ifndef TclGetAndDetachPids
292 #define TclGetAndDetachPids \
293 (tclIntPlatStubsPtr->tclGetAndDetachPids) /* 0 */
294 #endif
295 #ifndef TclpCloseFile
296 #define TclpCloseFile \
297 (tclIntPlatStubsPtr->tclpCloseFile) /* 1 */
298 #endif
299 #ifndef TclpCreateCommandChannel
300 #define TclpCreateCommandChannel \
301 (tclIntPlatStubsPtr->tclpCreateCommandChannel) /* 2 */
302 #endif
303 #ifndef TclpCreatePipe
304 #define TclpCreatePipe \
305 (tclIntPlatStubsPtr->tclpCreatePipe) /* 3 */
306 #endif
307 #ifndef TclpCreateProcess
308 #define TclpCreateProcess \
309 (tclIntPlatStubsPtr->tclpCreateProcess) /* 4 */
310 #endif
311 /* Slot 5 is reserved */
312 #ifndef TclpMakeFile
313 #define TclpMakeFile \
314 (tclIntPlatStubsPtr->tclpMakeFile) /* 6 */
315 #endif
316 #ifndef TclpOpenFile
317 #define TclpOpenFile \
318 (tclIntPlatStubsPtr->tclpOpenFile) /* 7 */
319 #endif
320 #ifndef TclUnixWaitForFile
321 #define TclUnixWaitForFile \
322 (tclIntPlatStubsPtr->tclUnixWaitForFile) /* 8 */
323 #endif
324 #ifndef TclpCreateTempFile
325 #define TclpCreateTempFile \
326 (tclIntPlatStubsPtr->tclpCreateTempFile) /* 9 */
327 #endif
328 #endif /* UNIX */
329 #ifdef __WIN32__
330 #ifndef TclWinConvertError
331 #define TclWinConvertError \
332 (tclIntPlatStubsPtr->tclWinConvertError) /* 0 */
333 #endif
334 #ifndef TclWinConvertWSAError
335 #define TclWinConvertWSAError \
336 (tclIntPlatStubsPtr->tclWinConvertWSAError) /* 1 */
337 #endif
338 #ifndef TclWinGetServByName
339 #define TclWinGetServByName \
340 (tclIntPlatStubsPtr->tclWinGetServByName) /* 2 */
341 #endif
342 #ifndef TclWinGetSockOpt
343 #define TclWinGetSockOpt \
344 (tclIntPlatStubsPtr->tclWinGetSockOpt) /* 3 */
345 #endif
346 #ifndef TclWinGetTclInstance
347 #define TclWinGetTclInstance \
348 (tclIntPlatStubsPtr->tclWinGetTclInstance) /* 4 */
349 #endif
350 /* Slot 5 is reserved */
351 #ifndef TclWinNToHS
352 #define TclWinNToHS \
353 (tclIntPlatStubsPtr->tclWinNToHS) /* 6 */
354 #endif
355 #ifndef TclWinSetSockOpt
356 #define TclWinSetSockOpt \
357 (tclIntPlatStubsPtr->tclWinSetSockOpt) /* 7 */
358 #endif
359 #ifndef TclpGetPid
360 #define TclpGetPid \
361 (tclIntPlatStubsPtr->tclpGetPid) /* 8 */
362 #endif
363 #ifndef TclWinGetPlatformId
364 #define TclWinGetPlatformId \
365 (tclIntPlatStubsPtr->tclWinGetPlatformId) /* 9 */
366 #endif
367 /* Slot 10 is reserved */
368 #ifndef TclGetAndDetachPids
369 #define TclGetAndDetachPids \
370 (tclIntPlatStubsPtr->tclGetAndDetachPids) /* 11 */
371 #endif
372 #ifndef TclpCloseFile
373 #define TclpCloseFile \
374 (tclIntPlatStubsPtr->tclpCloseFile) /* 12 */
375 #endif
376 #ifndef TclpCreateCommandChannel
377 #define TclpCreateCommandChannel \
378 (tclIntPlatStubsPtr->tclpCreateCommandChannel) /* 13 */
379 #endif
380 #ifndef TclpCreatePipe
381 #define TclpCreatePipe \
382 (tclIntPlatStubsPtr->tclpCreatePipe) /* 14 */
383 #endif
384 #ifndef TclpCreateProcess
385 #define TclpCreateProcess \
386 (tclIntPlatStubsPtr->tclpCreateProcess) /* 15 */
387 #endif
388 /* Slot 16 is reserved */
389 /* Slot 17 is reserved */
390 #ifndef TclpMakeFile
391 #define TclpMakeFile \
392 (tclIntPlatStubsPtr->tclpMakeFile) /* 18 */
393 #endif
394 #ifndef TclpOpenFile
395 #define TclpOpenFile \
396 (tclIntPlatStubsPtr->tclpOpenFile) /* 19 */
397 #endif
398 #ifndef TclWinAddProcess
399 #define TclWinAddProcess \
400 (tclIntPlatStubsPtr->tclWinAddProcess) /* 20 */
401 #endif
402 #ifndef TclpAsyncMark
403 #define TclpAsyncMark \
404 (tclIntPlatStubsPtr->tclpAsyncMark) /* 21 */
405 #endif
406 #ifndef TclpCreateTempFile
407 #define TclpCreateTempFile \
408 (tclIntPlatStubsPtr->tclpCreateTempFile) /* 22 */
409 #endif
410 #ifndef TclpGetTZName
411 #define TclpGetTZName \
412 (tclIntPlatStubsPtr->tclpGetTZName) /* 23 */
413 #endif
414 #ifndef TclWinNoBackslash
415 #define TclWinNoBackslash \
416 (tclIntPlatStubsPtr->tclWinNoBackslash) /* 24 */
417 #endif
418 #ifndef TclWinGetPlatform
419 #define TclWinGetPlatform \
420 (tclIntPlatStubsPtr->tclWinGetPlatform) /* 25 */
421 #endif
422 #ifndef TclWinSetInterfaces
423 #define TclWinSetInterfaces \
424 (tclIntPlatStubsPtr->tclWinSetInterfaces) /* 26 */
425 #endif
426 #endif /* __WIN32__ */
427 #ifdef MAC_TCL
428 #ifndef TclpSysAlloc
429 #define TclpSysAlloc \
430 (tclIntPlatStubsPtr->tclpSysAlloc) /* 0 */
431 #endif
432 #ifndef TclpSysFree
433 #define TclpSysFree \
434 (tclIntPlatStubsPtr->tclpSysFree) /* 1 */
435 #endif
436 #ifndef TclpSysRealloc
437 #define TclpSysRealloc \
438 (tclIntPlatStubsPtr->tclpSysRealloc) /* 2 */
439 #endif
440 #ifndef TclpExit
441 #define TclpExit \
442 (tclIntPlatStubsPtr->tclpExit) /* 3 */
443 #endif
444 #ifndef FSpGetDefaultDir
445 #define FSpGetDefaultDir \
446 (tclIntPlatStubsPtr->fSpGetDefaultDir) /* 4 */
447 #endif
448 #ifndef FSpSetDefaultDir
449 #define FSpSetDefaultDir \
450 (tclIntPlatStubsPtr->fSpSetDefaultDir) /* 5 */
451 #endif
452 #ifndef FSpFindFolder
453 #define FSpFindFolder \
454 (tclIntPlatStubsPtr->fSpFindFolder) /* 6 */
455 #endif
456 #ifndef GetGlobalMouse
457 #define GetGlobalMouse \
458 (tclIntPlatStubsPtr->getGlobalMouse) /* 7 */
459 #endif
460 #ifndef FSpGetDirectoryID
461 #define FSpGetDirectoryID \
462 (tclIntPlatStubsPtr->fSpGetDirectoryID) /* 8 */
463 #endif
464 #ifndef FSpOpenResFileCompat
465 #define FSpOpenResFileCompat \
466 (tclIntPlatStubsPtr->fSpOpenResFileCompat) /* 9 */
467 #endif
468 #ifndef FSpCreateResFileCompat
469 #define FSpCreateResFileCompat \
470 (tclIntPlatStubsPtr->fSpCreateResFileCompat) /* 10 */
471 #endif
472 #ifndef FSpLocationFromPath
473 #define FSpLocationFromPath \
474 (tclIntPlatStubsPtr->fSpLocationFromPath) /* 11 */
475 #endif
476 #ifndef FSpPathFromLocation
477 #define FSpPathFromLocation \
478 (tclIntPlatStubsPtr->fSpPathFromLocation) /* 12 */
479 #endif
480 #ifndef TclMacExitHandler
481 #define TclMacExitHandler \
482 (tclIntPlatStubsPtr->tclMacExitHandler) /* 13 */
483 #endif
484 #ifndef TclMacInitExitToShell
485 #define TclMacInitExitToShell \
486 (tclIntPlatStubsPtr->tclMacInitExitToShell) /* 14 */
487 #endif
488 #ifndef TclMacInstallExitToShellPatch
489 #define TclMacInstallExitToShellPatch \
490 (tclIntPlatStubsPtr->tclMacInstallExitToShellPatch) /* 15 */
491 #endif
492 #ifndef TclMacOSErrorToPosixError
493 #define TclMacOSErrorToPosixError \
494 (tclIntPlatStubsPtr->tclMacOSErrorToPosixError) /* 16 */
495 #endif
496 #ifndef TclMacRemoveTimer
497 #define TclMacRemoveTimer \
498 (tclIntPlatStubsPtr->tclMacRemoveTimer) /* 17 */
499 #endif
500 #ifndef TclMacStartTimer
501 #define TclMacStartTimer \
502 (tclIntPlatStubsPtr->tclMacStartTimer) /* 18 */
503 #endif
504 #ifndef TclMacTimerExpired
505 #define TclMacTimerExpired \
506 (tclIntPlatStubsPtr->tclMacTimerExpired) /* 19 */
507 #endif
508 #ifndef TclMacRegisterResourceFork
509 #define TclMacRegisterResourceFork \
510 (tclIntPlatStubsPtr->tclMacRegisterResourceFork) /* 20 */
511 #endif
512 #ifndef TclMacUnRegisterResourceFork
513 #define TclMacUnRegisterResourceFork \
514 (tclIntPlatStubsPtr->tclMacUnRegisterResourceFork) /* 21 */
515 #endif
516 #ifndef TclMacCreateEnv
517 #define TclMacCreateEnv \
518 (tclIntPlatStubsPtr->tclMacCreateEnv) /* 22 */
519 #endif
520 #ifndef TclMacFOpenHack
521 #define TclMacFOpenHack \
522 (tclIntPlatStubsPtr->tclMacFOpenHack) /* 23 */
523 #endif
524 /* Slot 24 is reserved */
525 #ifndef TclMacChmod
526 #define TclMacChmod \
527 (tclIntPlatStubsPtr->tclMacChmod) /* 25 */
528 #endif
529 #endif /* MAC_TCL */
530
531 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
532
533 /* !END!: Do not edit above this line. */
534
535 #endif /* _TCLINTPLATDECLS */
536
537 /* End of tclintplatdecls.h */

Properties

Name Value
svn:keywords Header

dashley@gmail.com
ViewVC Help
Powered by ViewVC 1.1.25