generic

tclIntPlatDecls.h

Go to the documentation of this file.
00001 /*
00002  * tclIntPlatDecls.h --
00003  *
00004  *      This file contains the declarations for all platform dependent
00005  *      unsupported functions that are exported by the Tcl library.  These
00006  *      interfaces are not guaranteed to remain the same between
00007  *      versions.  Use at your own risk.
00008  *
00009  * Copyright (c) 1998-1999 by Scriptics Corporation.
00010  * All rights reserved.
00011  *
00012  * RCS: @(#) $Id: tclIntPlatDecls.h,v 1.32 2007/12/13 15:23:18 dgp Exp $
00013  */
00014 
00015 #ifndef _TCLINTPLATDECLS
00016 #define _TCLINTPLATDECLS
00017 
00018 #undef TCL_STORAGE_CLASS
00019 #ifdef BUILD_tcl
00020 #   define TCL_STORAGE_CLASS DLLEXPORT
00021 #else
00022 #   ifdef USE_TCL_STUBS
00023 #      define TCL_STORAGE_CLASS
00024 #   else
00025 #      define TCL_STORAGE_CLASS DLLIMPORT
00026 #   endif
00027 #endif
00028 
00029 /*
00030  * WARNING: This file is automatically generated by the tools/genStubs.tcl
00031  * script.  Any modifications to the function declarations below should be made
00032  * in the generic/tclInt.decls script.
00033  */
00034 
00035 /* !BEGIN!: Do not edit below this line. */
00036 
00037 /*
00038  * Exported function declarations:
00039  */
00040 
00041 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
00042 #ifndef TclGetAndDetachPids_TCL_DECLARED
00043 #define TclGetAndDetachPids_TCL_DECLARED
00044 /* 0 */
00045 EXTERN void             TclGetAndDetachPids (Tcl_Interp * interp, 
00046                                 Tcl_Channel chan);
00047 #endif
00048 #ifndef TclpCloseFile_TCL_DECLARED
00049 #define TclpCloseFile_TCL_DECLARED
00050 /* 1 */
00051 EXTERN int              TclpCloseFile (TclFile file);
00052 #endif
00053 #ifndef TclpCreateCommandChannel_TCL_DECLARED
00054 #define TclpCreateCommandChannel_TCL_DECLARED
00055 /* 2 */
00056 EXTERN Tcl_Channel      TclpCreateCommandChannel (TclFile readFile, 
00057                                 TclFile writeFile, TclFile errorFile, 
00058                                 int numPids, Tcl_Pid * pidPtr);
00059 #endif
00060 #ifndef TclpCreatePipe_TCL_DECLARED
00061 #define TclpCreatePipe_TCL_DECLARED
00062 /* 3 */
00063 EXTERN int              TclpCreatePipe (TclFile * readPipe, 
00064                                 TclFile * writePipe);
00065 #endif
00066 #ifndef TclpCreateProcess_TCL_DECLARED
00067 #define TclpCreateProcess_TCL_DECLARED
00068 /* 4 */
00069 EXTERN int              TclpCreateProcess (Tcl_Interp * interp, int argc, 
00070                                 CONST char ** argv, TclFile inputFile, 
00071                                 TclFile outputFile, TclFile errorFile, 
00072                                 Tcl_Pid * pidPtr);
00073 #endif
00074 /* Slot 5 is reserved */
00075 #ifndef TclpMakeFile_TCL_DECLARED
00076 #define TclpMakeFile_TCL_DECLARED
00077 /* 6 */
00078 EXTERN TclFile          TclpMakeFile (Tcl_Channel channel, int direction);
00079 #endif
00080 #ifndef TclpOpenFile_TCL_DECLARED
00081 #define TclpOpenFile_TCL_DECLARED
00082 /* 7 */
00083 EXTERN TclFile          TclpOpenFile (CONST char * fname, int mode);
00084 #endif
00085 #ifndef TclUnixWaitForFile_TCL_DECLARED
00086 #define TclUnixWaitForFile_TCL_DECLARED
00087 /* 8 */
00088 EXTERN int              TclUnixWaitForFile (int fd, int mask, int timeout);
00089 #endif
00090 #ifndef TclpCreateTempFile_TCL_DECLARED
00091 #define TclpCreateTempFile_TCL_DECLARED
00092 /* 9 */
00093 EXTERN TclFile          TclpCreateTempFile (CONST char * contents);
00094 #endif
00095 #ifndef TclpReaddir_TCL_DECLARED
00096 #define TclpReaddir_TCL_DECLARED
00097 /* 10 */
00098 EXTERN Tcl_DirEntry *   TclpReaddir (DIR * dir);
00099 #endif
00100 #ifndef TclpLocaltime_unix_TCL_DECLARED
00101 #define TclpLocaltime_unix_TCL_DECLARED
00102 /* 11 */
00103 EXTERN struct tm *      TclpLocaltime_unix (CONST time_t * clock);
00104 #endif
00105 #ifndef TclpGmtime_unix_TCL_DECLARED
00106 #define TclpGmtime_unix_TCL_DECLARED
00107 /* 12 */
00108 EXTERN struct tm *      TclpGmtime_unix (CONST time_t * clock);
00109 #endif
00110 #ifndef TclpInetNtoa_TCL_DECLARED
00111 #define TclpInetNtoa_TCL_DECLARED
00112 /* 13 */
00113 EXTERN char *           TclpInetNtoa (struct in_addr addr);
00114 #endif
00115 #ifndef TclUnixCopyFile_TCL_DECLARED
00116 #define TclUnixCopyFile_TCL_DECLARED
00117 /* 14 */
00118 EXTERN int              TclUnixCopyFile (CONST char * src, CONST char * dst, 
00119                                 CONST Tcl_StatBuf * statBufPtr, 
00120                                 int dontCopyAtts);
00121 #endif
00122 #endif /* UNIX */
00123 #ifdef __WIN32__ /* WIN */
00124 #ifndef TclWinConvertError_TCL_DECLARED
00125 #define TclWinConvertError_TCL_DECLARED
00126 /* 0 */
00127 EXTERN void             TclWinConvertError (DWORD errCode);
00128 #endif
00129 #ifndef TclWinConvertWSAError_TCL_DECLARED
00130 #define TclWinConvertWSAError_TCL_DECLARED
00131 /* 1 */
00132 EXTERN void             TclWinConvertWSAError (DWORD errCode);
00133 #endif
00134 #ifndef TclWinGetServByName_TCL_DECLARED
00135 #define TclWinGetServByName_TCL_DECLARED
00136 /* 2 */
00137 EXTERN struct servent *  TclWinGetServByName (CONST char * nm, 
00138                                 CONST char * proto);
00139 #endif
00140 #ifndef TclWinGetSockOpt_TCL_DECLARED
00141 #define TclWinGetSockOpt_TCL_DECLARED
00142 /* 3 */
00143 EXTERN int              TclWinGetSockOpt (int s, int level, int optname, 
00144                                 char FAR * optval, int FAR * optlen);
00145 #endif
00146 #ifndef TclWinGetTclInstance_TCL_DECLARED
00147 #define TclWinGetTclInstance_TCL_DECLARED
00148 /* 4 */
00149 EXTERN HINSTANCE        TclWinGetTclInstance (void);
00150 #endif
00151 /* Slot 5 is reserved */
00152 #ifndef TclWinNToHS_TCL_DECLARED
00153 #define TclWinNToHS_TCL_DECLARED
00154 /* 6 */
00155 EXTERN u_short          TclWinNToHS (u_short ns);
00156 #endif
00157 #ifndef TclWinSetSockOpt_TCL_DECLARED
00158 #define TclWinSetSockOpt_TCL_DECLARED
00159 /* 7 */
00160 EXTERN int              TclWinSetSockOpt (int s, int level, int optname, 
00161                                 CONST char FAR * optval, int optlen);
00162 #endif
00163 #ifndef TclpGetPid_TCL_DECLARED
00164 #define TclpGetPid_TCL_DECLARED
00165 /* 8 */
00166 EXTERN unsigned long    TclpGetPid (Tcl_Pid pid);
00167 #endif
00168 #ifndef TclWinGetPlatformId_TCL_DECLARED
00169 #define TclWinGetPlatformId_TCL_DECLARED
00170 /* 9 */
00171 EXTERN int              TclWinGetPlatformId (void);
00172 #endif
00173 /* Slot 10 is reserved */
00174 #ifndef TclGetAndDetachPids_TCL_DECLARED
00175 #define TclGetAndDetachPids_TCL_DECLARED
00176 /* 11 */
00177 EXTERN void             TclGetAndDetachPids (Tcl_Interp * interp, 
00178                                 Tcl_Channel chan);
00179 #endif
00180 #ifndef TclpCloseFile_TCL_DECLARED
00181 #define TclpCloseFile_TCL_DECLARED
00182 /* 12 */
00183 EXTERN int              TclpCloseFile (TclFile file);
00184 #endif
00185 #ifndef TclpCreateCommandChannel_TCL_DECLARED
00186 #define TclpCreateCommandChannel_TCL_DECLARED
00187 /* 13 */
00188 EXTERN Tcl_Channel      TclpCreateCommandChannel (TclFile readFile, 
00189                                 TclFile writeFile, TclFile errorFile, 
00190                                 int numPids, Tcl_Pid * pidPtr);
00191 #endif
00192 #ifndef TclpCreatePipe_TCL_DECLARED
00193 #define TclpCreatePipe_TCL_DECLARED
00194 /* 14 */
00195 EXTERN int              TclpCreatePipe (TclFile * readPipe, 
00196                                 TclFile * writePipe);
00197 #endif
00198 #ifndef TclpCreateProcess_TCL_DECLARED
00199 #define TclpCreateProcess_TCL_DECLARED
00200 /* 15 */
00201 EXTERN int              TclpCreateProcess (Tcl_Interp * interp, int argc, 
00202                                 CONST char ** argv, TclFile inputFile, 
00203                                 TclFile outputFile, TclFile errorFile, 
00204                                 Tcl_Pid * pidPtr);
00205 #endif
00206 /* Slot 16 is reserved */
00207 /* Slot 17 is reserved */
00208 #ifndef TclpMakeFile_TCL_DECLARED
00209 #define TclpMakeFile_TCL_DECLARED
00210 /* 18 */
00211 EXTERN TclFile          TclpMakeFile (Tcl_Channel channel, int direction);
00212 #endif
00213 #ifndef TclpOpenFile_TCL_DECLARED
00214 #define TclpOpenFile_TCL_DECLARED
00215 /* 19 */
00216 EXTERN TclFile          TclpOpenFile (CONST char * fname, int mode);
00217 #endif
00218 #ifndef TclWinAddProcess_TCL_DECLARED
00219 #define TclWinAddProcess_TCL_DECLARED
00220 /* 20 */
00221 EXTERN void             TclWinAddProcess (HANDLE hProcess, DWORD id);
00222 #endif
00223 /* Slot 21 is reserved */
00224 #ifndef TclpCreateTempFile_TCL_DECLARED
00225 #define TclpCreateTempFile_TCL_DECLARED
00226 /* 22 */
00227 EXTERN TclFile          TclpCreateTempFile (CONST char * contents);
00228 #endif
00229 #ifndef TclpGetTZName_TCL_DECLARED
00230 #define TclpGetTZName_TCL_DECLARED
00231 /* 23 */
00232 EXTERN char *           TclpGetTZName (int isdst);
00233 #endif
00234 #ifndef TclWinNoBackslash_TCL_DECLARED
00235 #define TclWinNoBackslash_TCL_DECLARED
00236 /* 24 */
00237 EXTERN char *           TclWinNoBackslash (char * path);
00238 #endif
00239 /* Slot 25 is reserved */
00240 #ifndef TclWinSetInterfaces_TCL_DECLARED
00241 #define TclWinSetInterfaces_TCL_DECLARED
00242 /* 26 */
00243 EXTERN void             TclWinSetInterfaces (int wide);
00244 #endif
00245 #ifndef TclWinFlushDirtyChannels_TCL_DECLARED
00246 #define TclWinFlushDirtyChannels_TCL_DECLARED
00247 /* 27 */
00248 EXTERN void             TclWinFlushDirtyChannels (void);
00249 #endif
00250 #ifndef TclWinResetInterfaces_TCL_DECLARED
00251 #define TclWinResetInterfaces_TCL_DECLARED
00252 /* 28 */
00253 EXTERN void             TclWinResetInterfaces (void);
00254 #endif
00255 #ifndef TclWinCPUID_TCL_DECLARED
00256 #define TclWinCPUID_TCL_DECLARED
00257 /* 29 */
00258 EXTERN int              TclWinCPUID (unsigned int index, unsigned int * regs);
00259 #endif
00260 #endif /* WIN */
00261 #ifdef MAC_OSX_TCL /* MACOSX */
00262 #ifndef TclGetAndDetachPids_TCL_DECLARED
00263 #define TclGetAndDetachPids_TCL_DECLARED
00264 /* 0 */
00265 EXTERN void             TclGetAndDetachPids (Tcl_Interp * interp, 
00266                                 Tcl_Channel chan);
00267 #endif
00268 #ifndef TclpCloseFile_TCL_DECLARED
00269 #define TclpCloseFile_TCL_DECLARED
00270 /* 1 */
00271 EXTERN int              TclpCloseFile (TclFile file);
00272 #endif
00273 #ifndef TclpCreateCommandChannel_TCL_DECLARED
00274 #define TclpCreateCommandChannel_TCL_DECLARED
00275 /* 2 */
00276 EXTERN Tcl_Channel      TclpCreateCommandChannel (TclFile readFile, 
00277                                 TclFile writeFile, TclFile errorFile, 
00278                                 int numPids, Tcl_Pid * pidPtr);
00279 #endif
00280 #ifndef TclpCreatePipe_TCL_DECLARED
00281 #define TclpCreatePipe_TCL_DECLARED
00282 /* 3 */
00283 EXTERN int              TclpCreatePipe (TclFile * readPipe, 
00284                                 TclFile * writePipe);
00285 #endif
00286 #ifndef TclpCreateProcess_TCL_DECLARED
00287 #define TclpCreateProcess_TCL_DECLARED
00288 /* 4 */
00289 EXTERN int              TclpCreateProcess (Tcl_Interp * interp, int argc, 
00290                                 CONST char ** argv, TclFile inputFile, 
00291                                 TclFile outputFile, TclFile errorFile, 
00292                                 Tcl_Pid * pidPtr);
00293 #endif
00294 /* Slot 5 is reserved */
00295 #ifndef TclpMakeFile_TCL_DECLARED
00296 #define TclpMakeFile_TCL_DECLARED
00297 /* 6 */
00298 EXTERN TclFile          TclpMakeFile (Tcl_Channel channel, int direction);
00299 #endif
00300 #ifndef TclpOpenFile_TCL_DECLARED
00301 #define TclpOpenFile_TCL_DECLARED
00302 /* 7 */
00303 EXTERN TclFile          TclpOpenFile (CONST char * fname, int mode);
00304 #endif
00305 #ifndef TclUnixWaitForFile_TCL_DECLARED
00306 #define TclUnixWaitForFile_TCL_DECLARED
00307 /* 8 */
00308 EXTERN int              TclUnixWaitForFile (int fd, int mask, int timeout);
00309 #endif
00310 #ifndef TclpCreateTempFile_TCL_DECLARED
00311 #define TclpCreateTempFile_TCL_DECLARED
00312 /* 9 */
00313 EXTERN TclFile          TclpCreateTempFile (CONST char * contents);
00314 #endif
00315 #ifndef TclpReaddir_TCL_DECLARED
00316 #define TclpReaddir_TCL_DECLARED
00317 /* 10 */
00318 EXTERN Tcl_DirEntry *   TclpReaddir (DIR * dir);
00319 #endif
00320 #ifndef TclpLocaltime_unix_TCL_DECLARED
00321 #define TclpLocaltime_unix_TCL_DECLARED
00322 /* 11 */
00323 EXTERN struct tm *      TclpLocaltime_unix (CONST time_t * clock);
00324 #endif
00325 #ifndef TclpGmtime_unix_TCL_DECLARED
00326 #define TclpGmtime_unix_TCL_DECLARED
00327 /* 12 */
00328 EXTERN struct tm *      TclpGmtime_unix (CONST time_t * clock);
00329 #endif
00330 #ifndef TclpInetNtoa_TCL_DECLARED
00331 #define TclpInetNtoa_TCL_DECLARED
00332 /* 13 */
00333 EXTERN char *           TclpInetNtoa (struct in_addr addr);
00334 #endif
00335 #ifndef TclUnixCopyFile_TCL_DECLARED
00336 #define TclUnixCopyFile_TCL_DECLARED
00337 /* 14 */
00338 EXTERN int              TclUnixCopyFile (CONST char * src, CONST char * dst, 
00339                                 CONST Tcl_StatBuf * statBufPtr, 
00340                                 int dontCopyAtts);
00341 #endif
00342 #ifndef TclMacOSXGetFileAttribute_TCL_DECLARED
00343 #define TclMacOSXGetFileAttribute_TCL_DECLARED
00344 /* 15 */
00345 EXTERN int              TclMacOSXGetFileAttribute (Tcl_Interp * interp, 
00346                                 int objIndex, Tcl_Obj * fileName, 
00347                                 Tcl_Obj ** attributePtrPtr);
00348 #endif
00349 #ifndef TclMacOSXSetFileAttribute_TCL_DECLARED
00350 #define TclMacOSXSetFileAttribute_TCL_DECLARED
00351 /* 16 */
00352 EXTERN int              TclMacOSXSetFileAttribute (Tcl_Interp * interp, 
00353                                 int objIndex, Tcl_Obj * fileName, 
00354                                 Tcl_Obj * attributePtr);
00355 #endif
00356 #ifndef TclMacOSXCopyFileAttributes_TCL_DECLARED
00357 #define TclMacOSXCopyFileAttributes_TCL_DECLARED
00358 /* 17 */
00359 EXTERN int              TclMacOSXCopyFileAttributes (CONST char * src, 
00360                                 CONST char * dst, 
00361                                 CONST Tcl_StatBuf * statBufPtr);
00362 #endif
00363 #ifndef TclMacOSXMatchType_TCL_DECLARED
00364 #define TclMacOSXMatchType_TCL_DECLARED
00365 /* 18 */
00366 EXTERN int              TclMacOSXMatchType (Tcl_Interp * interp, 
00367                                 CONST char * pathName, CONST char * fileName, 
00368                                 Tcl_StatBuf * statBufPtr, 
00369                                 Tcl_GlobTypeData * types);
00370 #endif
00371 #endif /* MACOSX */
00372 
00373 typedef struct TclIntPlatStubs {
00374     int magic;
00375     struct TclIntPlatStubHooks *hooks;
00376 
00377 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
00378     void (*tclGetAndDetachPids) (Tcl_Interp * interp, Tcl_Channel chan); /* 0 */
00379     int (*tclpCloseFile) (TclFile file); /* 1 */
00380     Tcl_Channel (*tclpCreateCommandChannel) (TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr); /* 2 */
00381     int (*tclpCreatePipe) (TclFile * readPipe, TclFile * writePipe); /* 3 */
00382     int (*tclpCreateProcess) (Tcl_Interp * interp, int argc, CONST char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr); /* 4 */
00383     void *reserved5;
00384     TclFile (*tclpMakeFile) (Tcl_Channel channel, int direction); /* 6 */
00385     TclFile (*tclpOpenFile) (CONST char * fname, int mode); /* 7 */
00386     int (*tclUnixWaitForFile) (int fd, int mask, int timeout); /* 8 */
00387     TclFile (*tclpCreateTempFile) (CONST char * contents); /* 9 */
00388     Tcl_DirEntry * (*tclpReaddir) (DIR * dir); /* 10 */
00389     struct tm * (*tclpLocaltime_unix) (CONST time_t * clock); /* 11 */
00390     struct tm * (*tclpGmtime_unix) (CONST time_t * clock); /* 12 */
00391     char * (*tclpInetNtoa) (struct in_addr addr); /* 13 */
00392     int (*tclUnixCopyFile) (CONST char * src, CONST char * dst, CONST Tcl_StatBuf * statBufPtr, int dontCopyAtts); /* 14 */
00393 #endif /* UNIX */
00394 #ifdef __WIN32__ /* WIN */
00395     void (*tclWinConvertError) (DWORD errCode); /* 0 */
00396     void (*tclWinConvertWSAError) (DWORD errCode); /* 1 */
00397     struct servent * (*tclWinGetServByName) (CONST char * nm, CONST char * proto); /* 2 */
00398     int (*tclWinGetSockOpt) (int s, int level, int optname, char FAR * optval, int FAR * optlen); /* 3 */
00399     HINSTANCE (*tclWinGetTclInstance) (void); /* 4 */
00400     void *reserved5;
00401     u_short (*tclWinNToHS) (u_short ns); /* 6 */
00402     int (*tclWinSetSockOpt) (int s, int level, int optname, CONST char FAR * optval, int optlen); /* 7 */
00403     unsigned long (*tclpGetPid) (Tcl_Pid pid); /* 8 */
00404     int (*tclWinGetPlatformId) (void); /* 9 */
00405     void *reserved10;
00406     void (*tclGetAndDetachPids) (Tcl_Interp * interp, Tcl_Channel chan); /* 11 */
00407     int (*tclpCloseFile) (TclFile file); /* 12 */
00408     Tcl_Channel (*tclpCreateCommandChannel) (TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr); /* 13 */
00409     int (*tclpCreatePipe) (TclFile * readPipe, TclFile * writePipe); /* 14 */
00410     int (*tclpCreateProcess) (Tcl_Interp * interp, int argc, CONST char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr); /* 15 */
00411     void *reserved16;
00412     void *reserved17;
00413     TclFile (*tclpMakeFile) (Tcl_Channel channel, int direction); /* 18 */
00414     TclFile (*tclpOpenFile) (CONST char * fname, int mode); /* 19 */
00415     void (*tclWinAddProcess) (HANDLE hProcess, DWORD id); /* 20 */
00416     void *reserved21;
00417     TclFile (*tclpCreateTempFile) (CONST char * contents); /* 22 */
00418     char * (*tclpGetTZName) (int isdst); /* 23 */
00419     char * (*tclWinNoBackslash) (char * path); /* 24 */
00420     void *reserved25;
00421     void (*tclWinSetInterfaces) (int wide); /* 26 */
00422     void (*tclWinFlushDirtyChannels) (void); /* 27 */
00423     void (*tclWinResetInterfaces) (void); /* 28 */
00424     int (*tclWinCPUID) (unsigned int index, unsigned int * regs); /* 29 */
00425 #endif /* WIN */
00426 #ifdef MAC_OSX_TCL /* MACOSX */
00427     void (*tclGetAndDetachPids) (Tcl_Interp * interp, Tcl_Channel chan); /* 0 */
00428     int (*tclpCloseFile) (TclFile file); /* 1 */
00429     Tcl_Channel (*tclpCreateCommandChannel) (TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr); /* 2 */
00430     int (*tclpCreatePipe) (TclFile * readPipe, TclFile * writePipe); /* 3 */
00431     int (*tclpCreateProcess) (Tcl_Interp * interp, int argc, CONST char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr); /* 4 */
00432     void *reserved5;
00433     TclFile (*tclpMakeFile) (Tcl_Channel channel, int direction); /* 6 */
00434     TclFile (*tclpOpenFile) (CONST char * fname, int mode); /* 7 */
00435     int (*tclUnixWaitForFile) (int fd, int mask, int timeout); /* 8 */
00436     TclFile (*tclpCreateTempFile) (CONST char * contents); /* 9 */
00437     Tcl_DirEntry * (*tclpReaddir) (DIR * dir); /* 10 */
00438     struct tm * (*tclpLocaltime_unix) (CONST time_t * clock); /* 11 */
00439     struct tm * (*tclpGmtime_unix) (CONST time_t * clock); /* 12 */
00440     char * (*tclpInetNtoa) (struct in_addr addr); /* 13 */
00441     int (*tclUnixCopyFile) (CONST char * src, CONST char * dst, CONST Tcl_StatBuf * statBufPtr, int dontCopyAtts); /* 14 */
00442     int (*tclMacOSXGetFileAttribute) (Tcl_Interp * interp, int objIndex, Tcl_Obj * fileName, Tcl_Obj ** attributePtrPtr); /* 15 */
00443     int (*tclMacOSXSetFileAttribute) (Tcl_Interp * interp, int objIndex, Tcl_Obj * fileName, Tcl_Obj * attributePtr); /* 16 */
00444     int (*tclMacOSXCopyFileAttributes) (CONST char * src, CONST char * dst, CONST Tcl_StatBuf * statBufPtr); /* 17 */
00445     int (*tclMacOSXMatchType) (Tcl_Interp * interp, CONST char * pathName, CONST char * fileName, Tcl_StatBuf * statBufPtr, Tcl_GlobTypeData * types); /* 18 */
00446 #endif /* MACOSX */
00447 } TclIntPlatStubs;
00448 
00449 #ifdef __cplusplus
00450 extern "C" {
00451 #endif
00452 extern TclIntPlatStubs *tclIntPlatStubsPtr;
00453 #ifdef __cplusplus
00454 }
00455 #endif
00456 
00457 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
00458 
00459 /*
00460  * Inline function declarations:
00461  */
00462 
00463 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
00464 #ifndef TclGetAndDetachPids
00465 #define TclGetAndDetachPids \
00466         (tclIntPlatStubsPtr->tclGetAndDetachPids) /* 0 */
00467 #endif
00468 #ifndef TclpCloseFile
00469 #define TclpCloseFile \
00470         (tclIntPlatStubsPtr->tclpCloseFile) /* 1 */
00471 #endif
00472 #ifndef TclpCreateCommandChannel
00473 #define TclpCreateCommandChannel \
00474         (tclIntPlatStubsPtr->tclpCreateCommandChannel) /* 2 */
00475 #endif
00476 #ifndef TclpCreatePipe
00477 #define TclpCreatePipe \
00478         (tclIntPlatStubsPtr->tclpCreatePipe) /* 3 */
00479 #endif
00480 #ifndef TclpCreateProcess
00481 #define TclpCreateProcess \
00482         (tclIntPlatStubsPtr->tclpCreateProcess) /* 4 */
00483 #endif
00484 /* Slot 5 is reserved */
00485 #ifndef TclpMakeFile
00486 #define TclpMakeFile \
00487         (tclIntPlatStubsPtr->tclpMakeFile) /* 6 */
00488 #endif
00489 #ifndef TclpOpenFile
00490 #define TclpOpenFile \
00491         (tclIntPlatStubsPtr->tclpOpenFile) /* 7 */
00492 #endif
00493 #ifndef TclUnixWaitForFile
00494 #define TclUnixWaitForFile \
00495         (tclIntPlatStubsPtr->tclUnixWaitForFile) /* 8 */
00496 #endif
00497 #ifndef TclpCreateTempFile
00498 #define TclpCreateTempFile \
00499         (tclIntPlatStubsPtr->tclpCreateTempFile) /* 9 */
00500 #endif
00501 #ifndef TclpReaddir
00502 #define TclpReaddir \
00503         (tclIntPlatStubsPtr->tclpReaddir) /* 10 */
00504 #endif
00505 #ifndef TclpLocaltime_unix
00506 #define TclpLocaltime_unix \
00507         (tclIntPlatStubsPtr->tclpLocaltime_unix) /* 11 */
00508 #endif
00509 #ifndef TclpGmtime_unix
00510 #define TclpGmtime_unix \
00511         (tclIntPlatStubsPtr->tclpGmtime_unix) /* 12 */
00512 #endif
00513 #ifndef TclpInetNtoa
00514 #define TclpInetNtoa \
00515         (tclIntPlatStubsPtr->tclpInetNtoa) /* 13 */
00516 #endif
00517 #ifndef TclUnixCopyFile
00518 #define TclUnixCopyFile \
00519         (tclIntPlatStubsPtr->tclUnixCopyFile) /* 14 */
00520 #endif
00521 #endif /* UNIX */
00522 #ifdef __WIN32__ /* WIN */
00523 #ifndef TclWinConvertError
00524 #define TclWinConvertError \
00525         (tclIntPlatStubsPtr->tclWinConvertError) /* 0 */
00526 #endif
00527 #ifndef TclWinConvertWSAError
00528 #define TclWinConvertWSAError \
00529         (tclIntPlatStubsPtr->tclWinConvertWSAError) /* 1 */
00530 #endif
00531 #ifndef TclWinGetServByName
00532 #define TclWinGetServByName \
00533         (tclIntPlatStubsPtr->tclWinGetServByName) /* 2 */
00534 #endif
00535 #ifndef TclWinGetSockOpt
00536 #define TclWinGetSockOpt \
00537         (tclIntPlatStubsPtr->tclWinGetSockOpt) /* 3 */
00538 #endif
00539 #ifndef TclWinGetTclInstance
00540 #define TclWinGetTclInstance \
00541         (tclIntPlatStubsPtr->tclWinGetTclInstance) /* 4 */
00542 #endif
00543 /* Slot 5 is reserved */
00544 #ifndef TclWinNToHS
00545 #define TclWinNToHS \
00546         (tclIntPlatStubsPtr->tclWinNToHS) /* 6 */
00547 #endif
00548 #ifndef TclWinSetSockOpt
00549 #define TclWinSetSockOpt \
00550         (tclIntPlatStubsPtr->tclWinSetSockOpt) /* 7 */
00551 #endif
00552 #ifndef TclpGetPid
00553 #define TclpGetPid \
00554         (tclIntPlatStubsPtr->tclpGetPid) /* 8 */
00555 #endif
00556 #ifndef TclWinGetPlatformId
00557 #define TclWinGetPlatformId \
00558         (tclIntPlatStubsPtr->tclWinGetPlatformId) /* 9 */
00559 #endif
00560 /* Slot 10 is reserved */
00561 #ifndef TclGetAndDetachPids
00562 #define TclGetAndDetachPids \
00563         (tclIntPlatStubsPtr->tclGetAndDetachPids) /* 11 */
00564 #endif
00565 #ifndef TclpCloseFile
00566 #define TclpCloseFile \
00567         (tclIntPlatStubsPtr->tclpCloseFile) /* 12 */
00568 #endif
00569 #ifndef TclpCreateCommandChannel
00570 #define TclpCreateCommandChannel \
00571         (tclIntPlatStubsPtr->tclpCreateCommandChannel) /* 13 */
00572 #endif
00573 #ifndef TclpCreatePipe
00574 #define TclpCreatePipe \
00575         (tclIntPlatStubsPtr->tclpCreatePipe) /* 14 */
00576 #endif
00577 #ifndef TclpCreateProcess
00578 #define TclpCreateProcess \
00579         (tclIntPlatStubsPtr->tclpCreateProcess) /* 15 */
00580 #endif
00581 /* Slot 16 is reserved */
00582 /* Slot 17 is reserved */
00583 #ifndef TclpMakeFile
00584 #define TclpMakeFile \
00585         (tclIntPlatStubsPtr->tclpMakeFile) /* 18 */
00586 #endif
00587 #ifndef TclpOpenFile
00588 #define TclpOpenFile \
00589         (tclIntPlatStubsPtr->tclpOpenFile) /* 19 */
00590 #endif
00591 #ifndef TclWinAddProcess
00592 #define TclWinAddProcess \
00593         (tclIntPlatStubsPtr->tclWinAddProcess) /* 20 */
00594 #endif
00595 /* Slot 21 is reserved */
00596 #ifndef TclpCreateTempFile
00597 #define TclpCreateTempFile \
00598         (tclIntPlatStubsPtr->tclpCreateTempFile) /* 22 */
00599 #endif
00600 #ifndef TclpGetTZName
00601 #define TclpGetTZName \
00602         (tclIntPlatStubsPtr->tclpGetTZName) /* 23 */
00603 #endif
00604 #ifndef TclWinNoBackslash
00605 #define TclWinNoBackslash \
00606         (tclIntPlatStubsPtr->tclWinNoBackslash) /* 24 */
00607 #endif
00608 /* Slot 25 is reserved */
00609 #ifndef TclWinSetInterfaces
00610 #define TclWinSetInterfaces \
00611         (tclIntPlatStubsPtr->tclWinSetInterfaces) /* 26 */
00612 #endif
00613 #ifndef TclWinFlushDirtyChannels
00614 #define TclWinFlushDirtyChannels \
00615         (tclIntPlatStubsPtr->tclWinFlushDirtyChannels) /* 27 */
00616 #endif
00617 #ifndef TclWinResetInterfaces
00618 #define TclWinResetInterfaces \
00619         (tclIntPlatStubsPtr->tclWinResetInterfaces) /* 28 */
00620 #endif
00621 #ifndef TclWinCPUID
00622 #define TclWinCPUID \
00623         (tclIntPlatStubsPtr->tclWinCPUID) /* 29 */
00624 #endif
00625 #endif /* WIN */
00626 #ifdef MAC_OSX_TCL /* MACOSX */
00627 #ifndef TclGetAndDetachPids
00628 #define TclGetAndDetachPids \
00629         (tclIntPlatStubsPtr->tclGetAndDetachPids) /* 0 */
00630 #endif
00631 #ifndef TclpCloseFile
00632 #define TclpCloseFile \
00633         (tclIntPlatStubsPtr->tclpCloseFile) /* 1 */
00634 #endif
00635 #ifndef TclpCreateCommandChannel
00636 #define TclpCreateCommandChannel \
00637         (tclIntPlatStubsPtr->tclpCreateCommandChannel) /* 2 */
00638 #endif
00639 #ifndef TclpCreatePipe
00640 #define TclpCreatePipe \
00641         (tclIntPlatStubsPtr->tclpCreatePipe) /* 3 */
00642 #endif
00643 #ifndef TclpCreateProcess
00644 #define TclpCreateProcess \
00645         (tclIntPlatStubsPtr->tclpCreateProcess) /* 4 */
00646 #endif
00647 /* Slot 5 is reserved */
00648 #ifndef TclpMakeFile
00649 #define TclpMakeFile \
00650         (tclIntPlatStubsPtr->tclpMakeFile) /* 6 */
00651 #endif
00652 #ifndef TclpOpenFile
00653 #define TclpOpenFile \
00654         (tclIntPlatStubsPtr->tclpOpenFile) /* 7 */
00655 #endif
00656 #ifndef TclUnixWaitForFile
00657 #define TclUnixWaitForFile \
00658         (tclIntPlatStubsPtr->tclUnixWaitForFile) /* 8 */
00659 #endif
00660 #ifndef TclpCreateTempFile
00661 #define TclpCreateTempFile \
00662         (tclIntPlatStubsPtr->tclpCreateTempFile) /* 9 */
00663 #endif
00664 #ifndef TclpReaddir
00665 #define TclpReaddir \
00666         (tclIntPlatStubsPtr->tclpReaddir) /* 10 */
00667 #endif
00668 #ifndef TclpLocaltime_unix
00669 #define TclpLocaltime_unix \
00670         (tclIntPlatStubsPtr->tclpLocaltime_unix) /* 11 */
00671 #endif
00672 #ifndef TclpGmtime_unix
00673 #define TclpGmtime_unix \
00674         (tclIntPlatStubsPtr->tclpGmtime_unix) /* 12 */
00675 #endif
00676 #ifndef TclpInetNtoa
00677 #define TclpInetNtoa \
00678         (tclIntPlatStubsPtr->tclpInetNtoa) /* 13 */
00679 #endif
00680 #ifndef TclUnixCopyFile
00681 #define TclUnixCopyFile \
00682         (tclIntPlatStubsPtr->tclUnixCopyFile) /* 14 */
00683 #endif
00684 #ifndef TclMacOSXGetFileAttribute
00685 #define TclMacOSXGetFileAttribute \
00686         (tclIntPlatStubsPtr->tclMacOSXGetFileAttribute) /* 15 */
00687 #endif
00688 #ifndef TclMacOSXSetFileAttribute
00689 #define TclMacOSXSetFileAttribute \
00690         (tclIntPlatStubsPtr->tclMacOSXSetFileAttribute) /* 16 */
00691 #endif
00692 #ifndef TclMacOSXCopyFileAttributes
00693 #define TclMacOSXCopyFileAttributes \
00694         (tclIntPlatStubsPtr->tclMacOSXCopyFileAttributes) /* 17 */
00695 #endif
00696 #ifndef TclMacOSXMatchType
00697 #define TclMacOSXMatchType \
00698         (tclIntPlatStubsPtr->tclMacOSXMatchType) /* 18 */
00699 #endif
00700 #endif /* MACOSX */
00701 
00702 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
00703 
00704 /* !END!: Do not edit above this line. */
00705 
00706 #undef TCL_STORAGE_CLASS
00707 #define TCL_STORAGE_CLASS DLLIMPORT
00708 
00709 #endif /* _TCLINTPLATDECLS */


Generated on Wed Mar 12 12:18:17 2008 by  doxygen 1.5.1