tclIntDecls.h

Go to the documentation of this file.
00001 /*
00002  * tclIntDecls.h --
00003  *
00004  *      This file contains the declarations for all unsupported
00005  *      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  *
00011  * See the file "license.terms" for information on usage and redistribution
00012  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
00013  *
00014  * RCS: @(#) $Id: tclIntDecls.h,v 1.1 2001/08/18 00:48:55 fmk Exp $
00015  */
00016 
00017 #ifndef _TCLINTDECLS
00018 #define _TCLINTDECLS
00019 
00020 /*
00021  * WARNING: This file is automatically generated by the tools/genStubs.tcl
00022  * script.  Any modifications to the function declarations below should be made
00023  * in the generic/tclInt.decls script.
00024  */
00025 
00026 /* !BEGIN!: Do not edit below this line. */
00027 
00028 /*
00029  * Exported function declarations:
00030  */
00031 
00032 /* 0 */
00033 EXTERN int              TclAccess _ANSI_ARGS_((CONST char * path, int mode));
00034 /* 1 */
00035 EXTERN int              TclAccessDeleteProc _ANSI_ARGS_((
00036                                 TclAccessProc_ * proc));
00037 /* 2 */
00038 EXTERN int              TclAccessInsertProc _ANSI_ARGS_((
00039                                 TclAccessProc_ * proc));
00040 /* 3 */
00041 EXTERN void             TclAllocateFreeObjects _ANSI_ARGS_((void));
00042 /* Slot 4 is reserved */
00043 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00044 /* 5 */
00045 EXTERN int              TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp, 
00046                                 int numPids, Tcl_Pid * pidPtr, 
00047                                 Tcl_Channel errorChan));
00048 #endif /* UNIX */
00049 #ifdef __WIN32__
00050 /* 5 */
00051 EXTERN int              TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp, 
00052                                 int numPids, Tcl_Pid * pidPtr, 
00053                                 Tcl_Channel errorChan));
00054 #endif /* __WIN32__ */
00055 /* 6 */
00056 EXTERN void             TclCleanupCommand _ANSI_ARGS_((Command * cmdPtr));
00057 /* 7 */
00058 EXTERN int              TclCopyAndCollapse _ANSI_ARGS_((int count, 
00059                                 CONST char * src, char * dst));
00060 /* 8 */
00061 EXTERN int              TclCopyChannel _ANSI_ARGS_((Tcl_Interp * interp, 
00062                                 Tcl_Channel inChan, Tcl_Channel outChan, 
00063                                 int toRead, Tcl_Obj * cmdPtr));
00064 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00065 /* 9 */
00066 EXTERN int              TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp, 
00067                                 int argc, char ** argv, 
00068                                 Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, 
00069                                 TclFile * outPipePtr, TclFile * errFilePtr));
00070 #endif /* UNIX */
00071 #ifdef __WIN32__
00072 /* 9 */
00073 EXTERN int              TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp, 
00074                                 int argc, char ** argv, 
00075                                 Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, 
00076                                 TclFile * outPipePtr, TclFile * errFilePtr));
00077 #endif /* __WIN32__ */
00078 /* 10 */
00079 EXTERN int              TclCreateProc _ANSI_ARGS_((Tcl_Interp * interp, 
00080                                 Namespace * nsPtr, char * procName, 
00081                                 Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, 
00082                                 Proc ** procPtrPtr));
00083 /* 11 */
00084 EXTERN void             TclDeleteCompiledLocalVars _ANSI_ARGS_((
00085                                 Interp * iPtr, CallFrame * framePtr));
00086 /* 12 */
00087 EXTERN void             TclDeleteVars _ANSI_ARGS_((Interp * iPtr, 
00088                                 Tcl_HashTable * tablePtr));
00089 /* 13 */
00090 EXTERN int              TclDoGlob _ANSI_ARGS_((Tcl_Interp * interp, 
00091                                 char * separators, Tcl_DString * headPtr, 
00092                                 char * tail, GlobTypeData * types));
00093 /* 14 */
00094 EXTERN void             TclDumpMemoryInfo _ANSI_ARGS_((FILE * outFile));
00095 /* Slot 15 is reserved */
00096 /* 16 */
00097 EXTERN void             TclExprFloatError _ANSI_ARGS_((Tcl_Interp * interp, 
00098                                 double value));
00099 /* 17 */
00100 EXTERN int              TclFileAttrsCmd _ANSI_ARGS_((Tcl_Interp * interp, 
00101                                 int objc, Tcl_Obj *CONST objv[]));
00102 /* 18 */
00103 EXTERN int              TclFileCopyCmd _ANSI_ARGS_((Tcl_Interp * interp, 
00104                                 int argc, char ** argv));
00105 /* 19 */
00106 EXTERN int              TclFileDeleteCmd _ANSI_ARGS_((Tcl_Interp * interp, 
00107                                 int argc, char ** argv));
00108 /* 20 */
00109 EXTERN int              TclFileMakeDirsCmd _ANSI_ARGS_((Tcl_Interp * interp, 
00110                                 int argc, char ** argv));
00111 /* 21 */
00112 EXTERN int              TclFileRenameCmd _ANSI_ARGS_((Tcl_Interp * interp, 
00113                                 int argc, char ** argv));
00114 /* 22 */
00115 EXTERN int              TclFindElement _ANSI_ARGS_((Tcl_Interp * interp, 
00116                                 CONST char * listStr, int listLength, 
00117                                 CONST char ** elementPtr, 
00118                                 CONST char ** nextPtr, int * sizePtr, 
00119                                 int * bracePtr));
00120 /* 23 */
00121 EXTERN Proc *           TclFindProc _ANSI_ARGS_((Interp * iPtr, 
00122                                 char * procName));
00123 /* 24 */
00124 EXTERN int              TclFormatInt _ANSI_ARGS_((char * buffer, long n));
00125 /* 25 */
00126 EXTERN void             TclFreePackageInfo _ANSI_ARGS_((Interp * iPtr));
00127 /* Slot 26 is reserved */
00128 /* 27 */
00129 EXTERN int              TclGetDate _ANSI_ARGS_((char * p, unsigned long now, 
00130                                 long zone, unsigned long * timePtr));
00131 /* 28 */
00132 EXTERN Tcl_Channel      TclpGetDefaultStdChannel _ANSI_ARGS_((int type));
00133 /* 29 */
00134 EXTERN Tcl_Obj *        TclGetElementOfIndexedArray _ANSI_ARGS_((
00135                                 Tcl_Interp * interp, int localIndex, 
00136                                 Tcl_Obj * elemPtr, int leaveErrorMsg));
00137 /* Slot 30 is reserved */
00138 /* 31 */
00139 EXTERN char *           TclGetExtension _ANSI_ARGS_((char * name));
00140 /* 32 */
00141 EXTERN int              TclGetFrame _ANSI_ARGS_((Tcl_Interp * interp, 
00142                                 char * str, CallFrame ** framePtrPtr));
00143 /* 33 */
00144 EXTERN TclCmdProcType   TclGetInterpProc _ANSI_ARGS_((void));
00145 /* 34 */
00146 EXTERN int              TclGetIntForIndex _ANSI_ARGS_((Tcl_Interp * interp, 
00147                                 Tcl_Obj * objPtr, int endValue, 
00148                                 int * indexPtr));
00149 /* 35 */
00150 EXTERN Tcl_Obj *        TclGetIndexedScalar _ANSI_ARGS_((Tcl_Interp * interp, 
00151                                 int localIndex, int leaveErrorMsg));
00152 /* 36 */
00153 EXTERN int              TclGetLong _ANSI_ARGS_((Tcl_Interp * interp, 
00154                                 char * str, long * longPtr));
00155 /* 37 */
00156 EXTERN int              TclGetLoadedPackages _ANSI_ARGS_((
00157                                 Tcl_Interp * interp, char * targetName));
00158 /* 38 */
00159 EXTERN int              TclGetNamespaceForQualName _ANSI_ARGS_((
00160                                 Tcl_Interp * interp, char * qualName, 
00161                                 Namespace * cxtNsPtr, int flags, 
00162                                 Namespace ** nsPtrPtr, 
00163                                 Namespace ** altNsPtrPtr, 
00164                                 Namespace ** actualCxtPtrPtr, 
00165                                 char ** simpleNamePtr));
00166 /* 39 */
00167 EXTERN TclObjCmdProcType TclGetObjInterpProc _ANSI_ARGS_((void));
00168 /* 40 */
00169 EXTERN int              TclGetOpenMode _ANSI_ARGS_((Tcl_Interp * interp, 
00170                                 char * str, int * seekFlagPtr));
00171 /* 41 */
00172 EXTERN Tcl_Command      TclGetOriginalCommand _ANSI_ARGS_((
00173                                 Tcl_Command command));
00174 /* 42 */
00175 EXTERN char *           TclpGetUserHome _ANSI_ARGS_((CONST char * name, 
00176                                 Tcl_DString * bufferPtr));
00177 /* 43 */
00178 EXTERN int              TclGlobalInvoke _ANSI_ARGS_((Tcl_Interp * interp, 
00179                                 int argc, char ** argv, int flags));
00180 /* 44 */
00181 EXTERN int              TclGuessPackageName _ANSI_ARGS_((char * fileName, 
00182                                 Tcl_DString * bufPtr));
00183 /* 45 */
00184 EXTERN int              TclHideUnsafeCommands _ANSI_ARGS_((
00185                                 Tcl_Interp * interp));
00186 /* 46 */
00187 EXTERN int              TclInExit _ANSI_ARGS_((void));
00188 /* 47 */
00189 EXTERN Tcl_Obj *        TclIncrElementOfIndexedArray _ANSI_ARGS_((
00190                                 Tcl_Interp * interp, int localIndex, 
00191                                 Tcl_Obj * elemPtr, long incrAmount));
00192 /* 48 */
00193 EXTERN Tcl_Obj *        TclIncrIndexedScalar _ANSI_ARGS_((
00194                                 Tcl_Interp * interp, int localIndex, 
00195                                 long incrAmount));
00196 /* 49 */
00197 EXTERN Tcl_Obj *        TclIncrVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
00198                                 Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, 
00199                                 long incrAmount, int part1NotParsed));
00200 /* 50 */
00201 EXTERN void             TclInitCompiledLocals _ANSI_ARGS_((
00202                                 Tcl_Interp * interp, CallFrame * framePtr, 
00203                                 Namespace * nsPtr));
00204 /* 51 */
00205 EXTERN int              TclInterpInit _ANSI_ARGS_((Tcl_Interp * interp));
00206 /* 52 */
00207 EXTERN int              TclInvoke _ANSI_ARGS_((Tcl_Interp * interp, int argc, 
00208                                 char ** argv, int flags));
00209 /* 53 */
00210 EXTERN int              TclInvokeObjectCommand _ANSI_ARGS_((
00211                                 ClientData clientData, Tcl_Interp * interp, 
00212                                 int argc, char ** argv));
00213 /* 54 */
00214 EXTERN int              TclInvokeStringCommand _ANSI_ARGS_((
00215                                 ClientData clientData, Tcl_Interp * interp, 
00216                                 int objc, Tcl_Obj *CONST objv[]));
00217 /* 55 */
00218 EXTERN Proc *           TclIsProc _ANSI_ARGS_((Command * cmdPtr));
00219 /* Slot 56 is reserved */
00220 /* Slot 57 is reserved */
00221 /* 58 */
00222 EXTERN Var *            TclLookupVar _ANSI_ARGS_((Tcl_Interp * interp, 
00223                                 char * part1, char * part2, int flags, 
00224                                 char * msg, int createPart1, int createPart2, 
00225                                 Var ** arrayPtrPtr));
00226 /* 59 */
00227 EXTERN int              TclpMatchFiles _ANSI_ARGS_((Tcl_Interp * interp, 
00228                                 char * separators, Tcl_DString * dirPtr, 
00229                                 char * pattern, char * tail));
00230 /* 60 */
00231 EXTERN int              TclNeedSpace _ANSI_ARGS_((char * start, char * end));
00232 /* 61 */
00233 EXTERN Tcl_Obj *        TclNewProcBodyObj _ANSI_ARGS_((Proc * procPtr));
00234 /* 62 */
00235 EXTERN int              TclObjCommandComplete _ANSI_ARGS_((Tcl_Obj * cmdPtr));
00236 /* 63 */
00237 EXTERN int              TclObjInterpProc _ANSI_ARGS_((ClientData clientData, 
00238                                 Tcl_Interp * interp, int objc, 
00239                                 Tcl_Obj *CONST objv[]));
00240 /* 64 */
00241 EXTERN int              TclObjInvoke _ANSI_ARGS_((Tcl_Interp * interp, 
00242                                 int objc, Tcl_Obj *CONST objv[], int flags));
00243 /* 65 */
00244 EXTERN int              TclObjInvokeGlobal _ANSI_ARGS_((Tcl_Interp * interp, 
00245                                 int objc, Tcl_Obj *CONST objv[], int flags));
00246 /* 66 */
00247 EXTERN int              TclOpenFileChannelDeleteProc _ANSI_ARGS_((
00248                                 TclOpenFileChannelProc_ * proc));
00249 /* 67 */
00250 EXTERN int              TclOpenFileChannelInsertProc _ANSI_ARGS_((
00251                                 TclOpenFileChannelProc_ * proc));
00252 /* 68 */
00253 EXTERN int              TclpAccess _ANSI_ARGS_((CONST char * path, int mode));
00254 /* 69 */
00255 EXTERN char *           TclpAlloc _ANSI_ARGS_((unsigned int size));
00256 /* 70 */
00257 EXTERN int              TclpCopyFile _ANSI_ARGS_((CONST char * source, 
00258                                 CONST char * dest));
00259 /* 71 */
00260 EXTERN int              TclpCopyDirectory _ANSI_ARGS_((CONST char * source, 
00261                                 CONST char * dest, Tcl_DString * errorPtr));
00262 /* 72 */
00263 EXTERN int              TclpCreateDirectory _ANSI_ARGS_((CONST char * path));
00264 /* 73 */
00265 EXTERN int              TclpDeleteFile _ANSI_ARGS_((CONST char * path));
00266 /* 74 */
00267 EXTERN void             TclpFree _ANSI_ARGS_((char * ptr));
00268 /* 75 */
00269 EXTERN unsigned long    TclpGetClicks _ANSI_ARGS_((void));
00270 /* 76 */
00271 EXTERN unsigned long    TclpGetSeconds _ANSI_ARGS_((void));
00272 /* 77 */
00273 EXTERN void             TclpGetTime _ANSI_ARGS_((Tcl_Time * time));
00274 /* 78 */
00275 EXTERN int              TclpGetTimeZone _ANSI_ARGS_((unsigned long time));
00276 /* 79 */
00277 EXTERN int              TclpListVolumes _ANSI_ARGS_((Tcl_Interp * interp));
00278 /* 80 */
00279 EXTERN Tcl_Channel      TclpOpenFileChannel _ANSI_ARGS_((Tcl_Interp * interp, 
00280                                 char * fileName, char * modeString, 
00281                                 int permissions));
00282 /* 81 */
00283 EXTERN char *           TclpRealloc _ANSI_ARGS_((char * ptr, 
00284                                 unsigned int size));
00285 /* 82 */
00286 EXTERN int              TclpRemoveDirectory _ANSI_ARGS_((CONST char * path, 
00287                                 int recursive, Tcl_DString * errorPtr));
00288 /* 83 */
00289 EXTERN int              TclpRenameFile _ANSI_ARGS_((CONST char * source, 
00290                                 CONST char * dest));
00291 /* Slot 84 is reserved */
00292 /* Slot 85 is reserved */
00293 /* Slot 86 is reserved */
00294 /* Slot 87 is reserved */
00295 /* 88 */
00296 EXTERN char *           TclPrecTraceProc _ANSI_ARGS_((ClientData clientData, 
00297                                 Tcl_Interp * interp, char * name1, 
00298                                 char * name2, int flags));
00299 /* 89 */
00300 EXTERN int              TclPreventAliasLoop _ANSI_ARGS_((Tcl_Interp * interp, 
00301                                 Tcl_Interp * cmdInterp, Tcl_Command cmd));
00302 /* Slot 90 is reserved */
00303 /* 91 */
00304 EXTERN void             TclProcCleanupProc _ANSI_ARGS_((Proc * procPtr));
00305 /* 92 */
00306 EXTERN int              TclProcCompileProc _ANSI_ARGS_((Tcl_Interp * interp, 
00307                                 Proc * procPtr, Tcl_Obj * bodyPtr, 
00308                                 Namespace * nsPtr, CONST char * description, 
00309                                 CONST char * procName));
00310 /* 93 */
00311 EXTERN void             TclProcDeleteProc _ANSI_ARGS_((ClientData clientData));
00312 /* 94 */
00313 EXTERN int              TclProcInterpProc _ANSI_ARGS_((ClientData clientData, 
00314                                 Tcl_Interp * interp, int argc, char ** argv));
00315 /* 95 */
00316 EXTERN int              TclpStat _ANSI_ARGS_((CONST char * path, 
00317                                 struct stat * buf));
00318 /* 96 */
00319 EXTERN int              TclRenameCommand _ANSI_ARGS_((Tcl_Interp * interp, 
00320                                 char * oldName, char * newName));
00321 /* 97 */
00322 EXTERN void             TclResetShadowedCmdRefs _ANSI_ARGS_((
00323                                 Tcl_Interp * interp, Command * newCmdPtr));
00324 /* 98 */
00325 EXTERN int              TclServiceIdle _ANSI_ARGS_((void));
00326 /* 99 */
00327 EXTERN Tcl_Obj *        TclSetElementOfIndexedArray _ANSI_ARGS_((
00328                                 Tcl_Interp * interp, int localIndex, 
00329                                 Tcl_Obj * elemPtr, Tcl_Obj * objPtr, 
00330                                 int leaveErrorMsg));
00331 /* 100 */
00332 EXTERN Tcl_Obj *        TclSetIndexedScalar _ANSI_ARGS_((Tcl_Interp * interp, 
00333                                 int localIndex, Tcl_Obj * objPtr, 
00334                                 int leaveErrorMsg));
00335 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00336 /* 101 */
00337 EXTERN char *           TclSetPreInitScript _ANSI_ARGS_((char * string));
00338 #endif /* UNIX */
00339 #ifdef __WIN32__
00340 /* 101 */
00341 EXTERN char *           TclSetPreInitScript _ANSI_ARGS_((char * string));
00342 #endif /* __WIN32__ */
00343 /* 102 */
00344 EXTERN void             TclSetupEnv _ANSI_ARGS_((Tcl_Interp * interp));
00345 /* 103 */
00346 EXTERN int              TclSockGetPort _ANSI_ARGS_((Tcl_Interp * interp, 
00347                                 char * str, char * proto, int * portPtr));
00348 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00349 /* 104 */
00350 EXTERN int              TclSockMinimumBuffers _ANSI_ARGS_((int sock, 
00351                                 int size));
00352 #endif /* UNIX */
00353 #ifdef __WIN32__
00354 /* 104 */
00355 EXTERN int              TclSockMinimumBuffers _ANSI_ARGS_((int sock, 
00356                                 int size));
00357 #endif /* __WIN32__ */
00358 /* 105 */
00359 EXTERN int              TclStat _ANSI_ARGS_((CONST char * path, 
00360                                 struct stat * buf));
00361 /* 106 */
00362 EXTERN int              TclStatDeleteProc _ANSI_ARGS_((TclStatProc_ * proc));
00363 /* 107 */
00364 EXTERN int              TclStatInsertProc _ANSI_ARGS_((TclStatProc_ * proc));
00365 /* 108 */
00366 EXTERN void             TclTeardownNamespace _ANSI_ARGS_((Namespace * nsPtr));
00367 /* 109 */
00368 EXTERN int              TclUpdateReturnInfo _ANSI_ARGS_((Interp * iPtr));
00369 /* Slot 110 is reserved */
00370 /* 111 */
00371 EXTERN void             Tcl_AddInterpResolvers _ANSI_ARGS_((
00372                                 Tcl_Interp * interp, char * name, 
00373                                 Tcl_ResolveCmdProc * cmdProc, 
00374                                 Tcl_ResolveVarProc * varProc, 
00375                                 Tcl_ResolveCompiledVarProc * compiledVarProc));
00376 /* 112 */
00377 EXTERN int              Tcl_AppendExportList _ANSI_ARGS_((
00378                                 Tcl_Interp * interp, Tcl_Namespace * nsPtr, 
00379                                 Tcl_Obj * objPtr));
00380 /* 113 */
00381 EXTERN Tcl_Namespace *  Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp * interp, 
00382                                 char * name, ClientData clientData, 
00383                                 Tcl_NamespaceDeleteProc * deleteProc));
00384 /* 114 */
00385 EXTERN void             Tcl_DeleteNamespace _ANSI_ARGS_((
00386                                 Tcl_Namespace * nsPtr));
00387 /* 115 */
00388 EXTERN int              Tcl_Export _ANSI_ARGS_((Tcl_Interp * interp, 
00389                                 Tcl_Namespace * nsPtr, char * pattern, 
00390                                 int resetListFirst));
00391 /* 116 */
00392 EXTERN Tcl_Command      Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp * interp, 
00393                                 char * name, Tcl_Namespace * contextNsPtr, 
00394                                 int flags));
00395 /* 117 */
00396 EXTERN Tcl_Namespace *  Tcl_FindNamespace _ANSI_ARGS_((Tcl_Interp * interp, 
00397                                 char * name, Tcl_Namespace * contextNsPtr, 
00398                                 int flags));
00399 /* 118 */
00400 EXTERN int              Tcl_GetInterpResolvers _ANSI_ARGS_((
00401                                 Tcl_Interp * interp, char * name, 
00402                                 Tcl_ResolverInfo * resInfo));
00403 /* 119 */
00404 EXTERN int              Tcl_GetNamespaceResolvers _ANSI_ARGS_((
00405                                 Tcl_Namespace * namespacePtr, 
00406                                 Tcl_ResolverInfo * resInfo));
00407 /* 120 */
00408 EXTERN Tcl_Var          Tcl_FindNamespaceVar _ANSI_ARGS_((
00409                                 Tcl_Interp * interp, char * name, 
00410                                 Tcl_Namespace * contextNsPtr, int flags));
00411 /* 121 */
00412 EXTERN int              Tcl_ForgetImport _ANSI_ARGS_((Tcl_Interp * interp, 
00413                                 Tcl_Namespace * nsPtr, char * pattern));
00414 /* 122 */
00415 EXTERN Tcl_Command      Tcl_GetCommandFromObj _ANSI_ARGS_((
00416                                 Tcl_Interp * interp, Tcl_Obj * objPtr));
00417 /* 123 */
00418 EXTERN void             Tcl_GetCommandFullName _ANSI_ARGS_((
00419                                 Tcl_Interp * interp, Tcl_Command command, 
00420                                 Tcl_Obj * objPtr));
00421 /* 124 */
00422 EXTERN Tcl_Namespace *  Tcl_GetCurrentNamespace _ANSI_ARGS_((
00423                                 Tcl_Interp * interp));
00424 /* 125 */
00425 EXTERN Tcl_Namespace *  Tcl_GetGlobalNamespace _ANSI_ARGS_((
00426                                 Tcl_Interp * interp));
00427 /* 126 */
00428 EXTERN void             Tcl_GetVariableFullName _ANSI_ARGS_((
00429                                 Tcl_Interp * interp, Tcl_Var variable, 
00430                                 Tcl_Obj * objPtr));
00431 /* 127 */
00432 EXTERN int              Tcl_Import _ANSI_ARGS_((Tcl_Interp * interp, 
00433                                 Tcl_Namespace * nsPtr, char * pattern, 
00434                                 int allowOverwrite));
00435 /* 128 */
00436 EXTERN void             Tcl_PopCallFrame _ANSI_ARGS_((Tcl_Interp* interp));
00437 /* 129 */
00438 EXTERN int              Tcl_PushCallFrame _ANSI_ARGS_((Tcl_Interp* interp, 
00439                                 Tcl_CallFrame * framePtr, 
00440                                 Tcl_Namespace * nsPtr, int isProcCallFrame));
00441 /* 130 */
00442 EXTERN int              Tcl_RemoveInterpResolvers _ANSI_ARGS_((
00443                                 Tcl_Interp * interp, char * name));
00444 /* 131 */
00445 EXTERN void             Tcl_SetNamespaceResolvers _ANSI_ARGS_((
00446                                 Tcl_Namespace * namespacePtr, 
00447                                 Tcl_ResolveCmdProc * cmdProc, 
00448                                 Tcl_ResolveVarProc * varProc, 
00449                                 Tcl_ResolveCompiledVarProc * compiledVarProc));
00450 /* 132 */
00451 EXTERN int              TclpHasSockets _ANSI_ARGS_((Tcl_Interp * interp));
00452 /* 133 */
00453 EXTERN struct tm *      TclpGetDate _ANSI_ARGS_((TclpTime_t time, int useGMT));
00454 /* 134 */
00455 EXTERN size_t           TclpStrftime _ANSI_ARGS_((char * s, size_t maxsize, 
00456                                 CONST char * format, CONST struct tm * t));
00457 /* 135 */
00458 EXTERN int              TclpCheckStackSpace _ANSI_ARGS_((void));
00459 /* Slot 136 is reserved */
00460 /* 137 */
00461 EXTERN int              TclpChdir _ANSI_ARGS_((CONST char * dirName));
00462 /* 138 */
00463 EXTERN char *           TclGetEnv _ANSI_ARGS_((CONST char * name, 
00464                                 Tcl_DString * valuePtr));
00465 /* 139 */
00466 EXTERN int              TclpLoadFile _ANSI_ARGS_((Tcl_Interp * interp, 
00467                                 char * fileName, char * sym1, char * sym2, 
00468                                 Tcl_PackageInitProc ** proc1Ptr, 
00469                                 Tcl_PackageInitProc ** proc2Ptr, 
00470                                 ClientData * clientDataPtr));
00471 /* 140 */
00472 EXTERN int              TclLooksLikeInt _ANSI_ARGS_((char * bytes, 
00473                                 int length));
00474 /* 141 */
00475 EXTERN char *           TclpGetCwd _ANSI_ARGS_((Tcl_Interp * interp, 
00476                                 Tcl_DString * cwdPtr));
00477 /* 142 */
00478 EXTERN int              TclSetByteCodeFromAny _ANSI_ARGS_((
00479                                 Tcl_Interp * interp, Tcl_Obj * objPtr, 
00480                                 CompileHookProc * hookProc, 
00481                                 ClientData clientData));
00482 /* 143 */
00483 EXTERN int              TclAddLiteralObj _ANSI_ARGS_((
00484                                 struct CompileEnv * envPtr, Tcl_Obj * objPtr, 
00485                                 LiteralEntry ** litPtrPtr));
00486 /* 144 */
00487 EXTERN void             TclHideLiteral _ANSI_ARGS_((Tcl_Interp * interp, 
00488                                 struct CompileEnv * envPtr, int index));
00489 /* 145 */
00490 EXTERN struct AuxDataType * TclGetAuxDataType _ANSI_ARGS_((char * typeName));
00491 /* 146 */
00492 EXTERN TclHandle        TclHandleCreate _ANSI_ARGS_((VOID * ptr));
00493 /* 147 */
00494 EXTERN void             TclHandleFree _ANSI_ARGS_((TclHandle handle));
00495 /* 148 */
00496 EXTERN TclHandle        TclHandlePreserve _ANSI_ARGS_((TclHandle handle));
00497 /* 149 */
00498 EXTERN void             TclHandleRelease _ANSI_ARGS_((TclHandle handle));
00499 /* 150 */
00500 EXTERN int              TclRegAbout _ANSI_ARGS_((Tcl_Interp * interp, 
00501                                 Tcl_RegExp re));
00502 /* 151 */
00503 EXTERN void             TclRegExpRangeUniChar _ANSI_ARGS_((Tcl_RegExp re, 
00504                                 int index, int * startPtr, int * endPtr));
00505 /* 152 */
00506 EXTERN void             TclSetLibraryPath _ANSI_ARGS_((Tcl_Obj * pathPtr));
00507 /* 153 */
00508 EXTERN Tcl_Obj *        TclGetLibraryPath _ANSI_ARGS_((void));
00509 /* Slot 154 is reserved */
00510 /* Slot 155 is reserved */
00511 /* 156 */
00512 EXTERN void             TclRegError _ANSI_ARGS_((Tcl_Interp * interp, 
00513                                 char * msg, int status));
00514 /* 157 */
00515 EXTERN Var *            TclVarTraceExists _ANSI_ARGS_((Tcl_Interp * interp, 
00516                                 char * varName));
00517 /* 158 */
00518 EXTERN void             TclSetStartupScriptFileName _ANSI_ARGS_((
00519                                 char * filename));
00520 /* 159 */
00521 EXTERN char *           TclGetStartupScriptFileName _ANSI_ARGS_((void));
00522 /* 160 */
00523 EXTERN int              TclpMatchFilesTypes _ANSI_ARGS_((Tcl_Interp * interp, 
00524                                 char * separators, Tcl_DString * dirPtr, 
00525                                 char * pattern, char * tail, 
00526                                 GlobTypeData * types));
00527 /* 161 */
00528 EXTERN int              TclChannelTransform _ANSI_ARGS_((Tcl_Interp * interp, 
00529                                 Tcl_Channel chan, Tcl_Obj * cmdObjPtr));
00530 /* 162 */
00531 EXTERN void             TclChannelEventScriptInvoker _ANSI_ARGS_((
00532                                 ClientData clientData, int flags));
00533 
00534 typedef struct TclIntStubs {
00535     int magic;
00536     struct TclIntStubHooks *hooks;
00537 
00538     int (*tclAccess) _ANSI_ARGS_((CONST char * path, int mode)); /* 0 */
00539     int (*tclAccessDeleteProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 1 */
00540     int (*tclAccessInsertProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 2 */
00541     void (*tclAllocateFreeObjects) _ANSI_ARGS_((void)); /* 3 */
00542     void *reserved4;
00543 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00544     int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */
00545 #endif /* UNIX */
00546 #ifdef __WIN32__
00547     int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */
00548 #endif /* __WIN32__ */
00549 #ifdef MAC_TCL
00550     void *reserved5;
00551 #endif /* MAC_TCL */
00552     void (*tclCleanupCommand) _ANSI_ARGS_((Command * cmdPtr)); /* 6 */
00553     int (*tclCopyAndCollapse) _ANSI_ARGS_((int count, CONST char * src, char * dst)); /* 7 */
00554     int (*tclCopyChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel inChan, Tcl_Channel outChan, int toRead, Tcl_Obj * cmdPtr)); /* 8 */
00555 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00556     int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */
00557 #endif /* UNIX */
00558 #ifdef __WIN32__
00559     int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */
00560 #endif /* __WIN32__ */
00561 #ifdef MAC_TCL
00562     void *reserved9;
00563 #endif /* MAC_TCL */
00564     int (*tclCreateProc) _ANSI_ARGS_((Tcl_Interp * interp, Namespace * nsPtr, char * procName, Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, Proc ** procPtrPtr)); /* 10 */
00565     void (*tclDeleteCompiledLocalVars) _ANSI_ARGS_((Interp * iPtr, CallFrame * framePtr)); /* 11 */
00566     void (*tclDeleteVars) _ANSI_ARGS_((Interp * iPtr, Tcl_HashTable * tablePtr)); /* 12 */
00567     int (*tclDoGlob) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * headPtr, char * tail, GlobTypeData * types)); /* 13 */
00568     void (*tclDumpMemoryInfo) _ANSI_ARGS_((FILE * outFile)); /* 14 */
00569     void *reserved15;
00570     void (*tclExprFloatError) _ANSI_ARGS_((Tcl_Interp * interp, double value)); /* 16 */
00571     int (*tclFileAttrsCmd) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 17 */
00572     int (*tclFileCopyCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 18 */
00573     int (*tclFileDeleteCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 19 */
00574     int (*tclFileMakeDirsCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 20 */
00575     int (*tclFileRenameCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 21 */
00576     int (*tclFindElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int listLength, CONST char ** elementPtr, CONST char ** nextPtr, int * sizePtr, int * bracePtr)); /* 22 */
00577     Proc * (*tclFindProc) _ANSI_ARGS_((Interp * iPtr, char * procName)); /* 23 */
00578     int (*tclFormatInt) _ANSI_ARGS_((char * buffer, long n)); /* 24 */
00579     void (*tclFreePackageInfo) _ANSI_ARGS_((Interp * iPtr)); /* 25 */
00580     void *reserved26;
00581     int (*tclGetDate) _ANSI_ARGS_((char * p, unsigned long now, long zone, unsigned long * timePtr)); /* 27 */
00582     Tcl_Channel (*tclpGetDefaultStdChannel) _ANSI_ARGS_((int type)); /* 28 */
00583     Tcl_Obj * (*tclGetElementOfIndexedArray) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * elemPtr, int leaveErrorMsg)); /* 29 */
00584     void *reserved30;
00585     char * (*tclGetExtension) _ANSI_ARGS_((char * name)); /* 31 */
00586     int (*tclGetFrame) _ANSI_ARGS_((Tcl_Interp * interp, char * str, CallFrame ** framePtrPtr)); /* 32 */
00587     TclCmdProcType (*tclGetInterpProc) _ANSI_ARGS_((void)); /* 33 */
00588     int (*tclGetIntForIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int endValue, int * indexPtr)); /* 34 */
00589     Tcl_Obj * (*tclGetIndexedScalar) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, int leaveErrorMsg)); /* 35 */
00590     int (*tclGetLong) _ANSI_ARGS_((Tcl_Interp * interp, char * str, long * longPtr)); /* 36 */
00591     int (*tclGetLoadedPackages) _ANSI_ARGS_((Tcl_Interp * interp, char * targetName)); /* 37 */
00592     int (*tclGetNamespaceForQualName) _ANSI_ARGS_((Tcl_Interp * interp, char * qualName, Namespace * cxtNsPtr, int flags, Namespace ** nsPtrPtr, Namespace ** altNsPtrPtr, Namespace ** actualCxtPtrPtr, char ** simpleNamePtr)); /* 38 */
00593     TclObjCmdProcType (*tclGetObjInterpProc) _ANSI_ARGS_((void)); /* 39 */
00594     int (*tclGetOpenMode) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * seekFlagPtr)); /* 40 */
00595     Tcl_Command (*tclGetOriginalCommand) _ANSI_ARGS_((Tcl_Command command)); /* 41 */
00596     char * (*tclpGetUserHome) _ANSI_ARGS_((CONST char * name, Tcl_DString * bufferPtr)); /* 42 */
00597     int (*tclGlobalInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 43 */
00598     int (*tclGuessPackageName) _ANSI_ARGS_((char * fileName, Tcl_DString * bufPtr)); /* 44 */
00599     int (*tclHideUnsafeCommands) _ANSI_ARGS_((Tcl_Interp * interp)); /* 45 */
00600     int (*tclInExit) _ANSI_ARGS_((void)); /* 46 */
00601     Tcl_Obj * (*tclIncrElementOfIndexedArray) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * elemPtr, long incrAmount)); /* 47 */
00602     Tcl_Obj * (*tclIncrIndexedScalar) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, long incrAmount)); /* 48 */
00603     Tcl_Obj * (*tclIncrVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, long incrAmount, int part1NotParsed)); /* 49 */
00604     void (*tclInitCompiledLocals) _ANSI_ARGS_((Tcl_Interp * interp, CallFrame * framePtr, Namespace * nsPtr)); /* 50 */
00605     int (*tclInterpInit) _ANSI_ARGS_((Tcl_Interp * interp)); /* 51 */
00606     int (*tclInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 52 */
00607     int (*tclInvokeObjectCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, char ** argv)); /* 53 */
00608     int (*tclInvokeStringCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 54 */
00609     Proc * (*tclIsProc) _ANSI_ARGS_((Command * cmdPtr)); /* 55 */
00610     void *reserved56;
00611     void *reserved57;
00612     Var * (*tclLookupVar) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, char * msg, int createPart1, int createPart2, Var ** arrayPtrPtr)); /* 58 */
00613     int (*tclpMatchFiles) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * dirPtr, char * pattern, char * tail)); /* 59 */
00614     int (*tclNeedSpace) _ANSI_ARGS_((char * start, char * end)); /* 60 */
00615     Tcl_Obj * (*tclNewProcBodyObj) _ANSI_ARGS_((Proc * procPtr)); /* 61 */
00616     int (*tclObjCommandComplete) _ANSI_ARGS_((Tcl_Obj * cmdPtr)); /* 62 */
00617     int (*tclObjInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 63 */
00618     int (*tclObjInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 64 */
00619     int (*tclObjInvokeGlobal) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 65 */
00620     int (*tclOpenFileChannelDeleteProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 66 */
00621     int (*tclOpenFileChannelInsertProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 67 */
00622     int (*tclpAccess) _ANSI_ARGS_((CONST char * path, int mode)); /* 68 */
00623     char * (*tclpAlloc) _ANSI_ARGS_((unsigned int size)); /* 69 */
00624     int (*tclpCopyFile) _ANSI_ARGS_((CONST char * source, CONST char * dest)); /* 70 */
00625     int (*tclpCopyDirectory) _ANSI_ARGS_((CONST char * source, CONST char * dest, Tcl_DString * errorPtr)); /* 71 */
00626     int (*tclpCreateDirectory) _ANSI_ARGS_((CONST char * path)); /* 72 */
00627     int (*tclpDeleteFile) _ANSI_ARGS_((CONST char * path)); /* 73 */
00628     void (*tclpFree) _ANSI_ARGS_((char * ptr)); /* 74 */
00629     unsigned long (*tclpGetClicks) _ANSI_ARGS_((void)); /* 75 */
00630     unsigned long (*tclpGetSeconds) _ANSI_ARGS_((void)); /* 76 */
00631     void (*tclpGetTime) _ANSI_ARGS_((Tcl_Time * time)); /* 77 */
00632     int (*tclpGetTimeZone) _ANSI_ARGS_((unsigned long time)); /* 78 */
00633     int (*tclpListVolumes) _ANSI_ARGS_((Tcl_Interp * interp)); /* 79 */
00634     Tcl_Channel (*tclpOpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * modeString, int permissions)); /* 80 */
00635     char * (*tclpRealloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 81 */
00636     int (*tclpRemoveDirectory) _ANSI_ARGS_((CONST char * path, int recursive, Tcl_DString * errorPtr)); /* 82 */
00637     int (*tclpRenameFile) _ANSI_ARGS_((CONST char * source, CONST char * dest)); /* 83 */
00638     void *reserved84;
00639     void *reserved85;
00640     void *reserved86;
00641     void *reserved87;
00642     char * (*tclPrecTraceProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, char * name1, char * name2, int flags)); /* 88 */
00643     int (*tclPreventAliasLoop) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Interp * cmdInterp, Tcl_Command cmd)); /* 89 */
00644     void *reserved90;
00645     void (*tclProcCleanupProc) _ANSI_ARGS_((Proc * procPtr)); /* 91 */
00646     int (*tclProcCompileProc) _ANSI_ARGS_((Tcl_Interp * interp, Proc * procPtr, Tcl_Obj * bodyPtr, Namespace * nsPtr, CONST char * description, CONST char * procName)); /* 92 */
00647     void (*tclProcDeleteProc) _ANSI_ARGS_((ClientData clientData)); /* 93 */
00648     int (*tclProcInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, char ** argv)); /* 94 */
00649     int (*tclpStat) _ANSI_ARGS_((CONST char * path, struct stat * buf)); /* 95 */
00650     int (*tclRenameCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * oldName, char * newName)); /* 96 */
00651     void (*tclResetShadowedCmdRefs) _ANSI_ARGS_((Tcl_Interp * interp, Command * newCmdPtr)); /* 97 */
00652     int (*tclServiceIdle) _ANSI_ARGS_((void)); /* 98 */
00653     Tcl_Obj * (*tclSetElementOfIndexedArray) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * elemPtr, Tcl_Obj * objPtr, int leaveErrorMsg)); /* 99 */
00654     Tcl_Obj * (*tclSetIndexedScalar) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * objPtr, int leaveErrorMsg)); /* 100 */
00655 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00656     char * (*tclSetPreInitScript) _ANSI_ARGS_((char * string)); /* 101 */
00657 #endif /* UNIX */
00658 #ifdef __WIN32__
00659     char * (*tclSetPreInitScript) _ANSI_ARGS_((char * string)); /* 101 */
00660 #endif /* __WIN32__ */
00661 #ifdef MAC_TCL
00662     void *reserved101;
00663 #endif /* MAC_TCL */
00664     void (*tclSetupEnv) _ANSI_ARGS_((Tcl_Interp * interp)); /* 102 */
00665     int (*tclSockGetPort) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char * proto, int * portPtr)); /* 103 */
00666 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00667     int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */
00668 #endif /* UNIX */
00669 #ifdef __WIN32__
00670     int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */
00671 #endif /* __WIN32__ */
00672 #ifdef MAC_TCL
00673     void *reserved104;
00674 #endif /* MAC_TCL */
00675     int (*tclStat) _ANSI_ARGS_((CONST char * path, struct stat * buf)); /* 105 */
00676     int (*tclStatDeleteProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 106 */
00677     int (*tclStatInsertProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 107 */
00678     void (*tclTeardownNamespace) _ANSI_ARGS_((Namespace * nsPtr)); /* 108 */
00679     int (*tclUpdateReturnInfo) _ANSI_ARGS_((Interp * iPtr)); /* 109 */
00680     void *reserved110;
00681     void (*tcl_AddInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 111 */
00682     int (*tcl_AppendExportList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr)); /* 112 */
00683     Tcl_Namespace * (*tcl_CreateNamespace) _ANSI_ARGS_((Tcl_Interp * interp, char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc)); /* 113 */
00684     void (*tcl_DeleteNamespace) _ANSI_ARGS_((Tcl_Namespace * nsPtr)); /* 114 */
00685     int (*tcl_Export) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, char * pattern, int resetListFirst)); /* 115 */
00686     Tcl_Command (*tcl_FindCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 116 */
00687     Tcl_Namespace * (*tcl_FindNamespace) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 117 */
00688     int (*tcl_GetInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_ResolverInfo * resInfo)); /* 118 */
00689     int (*tcl_GetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolverInfo * resInfo)); /* 119 */
00690     Tcl_Var (*tcl_FindNamespaceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 120 */
00691     int (*tcl_ForgetImport) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, char * pattern)); /* 121 */
00692     Tcl_Command (*tcl_GetCommandFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 122 */
00693     void (*tcl_GetCommandFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command, Tcl_Obj * objPtr)); /* 123 */
00694     Tcl_Namespace * (*tcl_GetCurrentNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 124 */
00695     Tcl_Namespace * (*tcl_GetGlobalNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 125 */
00696     void (*tcl_GetVariableFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Var variable, Tcl_Obj * objPtr)); /* 126 */
00697     int (*tcl_Import) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, char * pattern, int allowOverwrite)); /* 127 */
00698     void (*tcl_PopCallFrame) _ANSI_ARGS_((Tcl_Interp* interp)); /* 128 */
00699     int (*tcl_PushCallFrame) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame)); /* 129 */
00700     int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name)); /* 130 */
00701     void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 131 */
00702     int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 132 */
00703     struct tm * (*tclpGetDate) _ANSI_ARGS_((TclpTime_t time, int useGMT)); /* 133 */
00704     size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, CONST char * format, CONST struct tm * t)); /* 134 */
00705     int (*tclpCheckStackSpace) _ANSI_ARGS_((void)); /* 135 */
00706     void *reserved136;
00707     int (*tclpChdir) _ANSI_ARGS_((CONST char * dirName)); /* 137 */
00708     char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name, Tcl_DString * valuePtr)); /* 138 */
00709     int (*tclpLoadFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * sym1, char * sym2, Tcl_PackageInitProc ** proc1Ptr, Tcl_PackageInitProc ** proc2Ptr, ClientData * clientDataPtr)); /* 139 */
00710     int (*tclLooksLikeInt) _ANSI_ARGS_((char * bytes, int length)); /* 140 */
00711     char * (*tclpGetCwd) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * cwdPtr)); /* 141 */
00712     int (*tclSetByteCodeFromAny) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CompileHookProc * hookProc, ClientData clientData)); /* 142 */
00713     int (*tclAddLiteralObj) _ANSI_ARGS_((struct CompileEnv * envPtr, Tcl_Obj * objPtr, LiteralEntry ** litPtrPtr)); /* 143 */
00714     void (*tclHideLiteral) _ANSI_ARGS_((Tcl_Interp * interp, struct CompileEnv * envPtr, int index)); /* 144 */
00715     struct AuxDataType * (*tclGetAuxDataType) _ANSI_ARGS_((char * typeName)); /* 145 */
00716     TclHandle (*tclHandleCreate) _ANSI_ARGS_((VOID * ptr)); /* 146 */
00717     void (*tclHandleFree) _ANSI_ARGS_((TclHandle handle)); /* 147 */
00718     TclHandle (*tclHandlePreserve) _ANSI_ARGS_((TclHandle handle)); /* 148 */
00719     void (*tclHandleRelease) _ANSI_ARGS_((TclHandle handle)); /* 149 */
00720     int (*tclRegAbout) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp re)); /* 150 */
00721     void (*tclRegExpRangeUniChar) _ANSI_ARGS_((Tcl_RegExp re, int index, int * startPtr, int * endPtr)); /* 151 */
00722     void (*tclSetLibraryPath) _ANSI_ARGS_((Tcl_Obj * pathPtr)); /* 152 */
00723     Tcl_Obj * (*tclGetLibraryPath) _ANSI_ARGS_((void)); /* 153 */
00724     void *reserved154;
00725     void *reserved155;
00726     void (*tclRegError) _ANSI_ARGS_((Tcl_Interp * interp, char * msg, int status)); /* 156 */
00727     Var * (*tclVarTraceExists) _ANSI_ARGS_((Tcl_Interp * interp, char * varName)); /* 157 */
00728     void (*tclSetStartupScriptFileName) _ANSI_ARGS_((char * filename)); /* 158 */
00729     char * (*tclGetStartupScriptFileName) _ANSI_ARGS_((void)); /* 159 */
00730     int (*tclpMatchFilesTypes) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * dirPtr, char * pattern, char * tail, GlobTypeData * types)); /* 160 */
00731     int (*tclChannelTransform) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, Tcl_Obj * cmdObjPtr)); /* 161 */
00732     void (*tclChannelEventScriptInvoker) _ANSI_ARGS_((ClientData clientData, int flags)); /* 162 */
00733 } TclIntStubs;
00734 
00735 #ifdef __cplusplus
00736 extern "C" {
00737 #endif
00738 extern TclIntStubs *tclIntStubsPtr;
00739 #ifdef __cplusplus
00740 }
00741 #endif
00742 
00743 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
00744 
00745 /*
00746  * Inline function declarations:
00747  */
00748 
00749 #ifndef TclAccess
00750 #define TclAccess \
00751         (tclIntStubsPtr->tclAccess) /* 0 */
00752 #endif
00753 #ifndef TclAccessDeleteProc
00754 #define TclAccessDeleteProc \
00755         (tclIntStubsPtr->tclAccessDeleteProc) /* 1 */
00756 #endif
00757 #ifndef TclAccessInsertProc
00758 #define TclAccessInsertProc \
00759         (tclIntStubsPtr->tclAccessInsertProc) /* 2 */
00760 #endif
00761 #ifndef TclAllocateFreeObjects
00762 #define TclAllocateFreeObjects \
00763         (tclIntStubsPtr->tclAllocateFreeObjects) /* 3 */
00764 #endif
00765 /* Slot 4 is reserved */
00766 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00767 #ifndef TclCleanupChildren
00768 #define TclCleanupChildren \
00769         (tclIntStubsPtr->tclCleanupChildren) /* 5 */
00770 #endif
00771 #endif /* UNIX */
00772 #ifdef __WIN32__
00773 #ifndef TclCleanupChildren
00774 #define TclCleanupChildren \
00775         (tclIntStubsPtr->tclCleanupChildren) /* 5 */
00776 #endif
00777 #endif /* __WIN32__ */
00778 #ifndef TclCleanupCommand
00779 #define TclCleanupCommand \
00780         (tclIntStubsPtr->tclCleanupCommand) /* 6 */
00781 #endif
00782 #ifndef TclCopyAndCollapse
00783 #define TclCopyAndCollapse \
00784         (tclIntStubsPtr->tclCopyAndCollapse) /* 7 */
00785 #endif
00786 #ifndef TclCopyChannel
00787 #define TclCopyChannel \
00788         (tclIntStubsPtr->tclCopyChannel) /* 8 */
00789 #endif
00790 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
00791 #ifndef TclCreatePipeline
00792 #define TclCreatePipeline \
00793         (tclIntStubsPtr->tclCreatePipeline) /* 9 */
00794 #endif
00795 #endif /* UNIX */
00796 #ifdef __WIN32__
00797 #ifndef TclCreatePipeline
00798 #define TclCreatePipeline \
00799         (tclIntStubsPtr->tclCreatePipeline) /* 9 */
00800 #endif
00801 #endif /* __WIN32__ */
00802 #ifndef TclCreateProc
00803 #define TclCreateProc \
00804         (tclIntStubsPtr->tclCreateProc) /* 10 */
00805 #endif
00806 #ifndef TclDeleteCompiledLocalVars
00807 #define TclDeleteCompiledLocalVars \
00808         (tclIntStubsPtr->tclDeleteCompiledLocalVars) /* 11 */
00809 #endif
00810 #ifndef TclDeleteVars
00811 #define TclDeleteVars \
00812         (tclIntStubsPtr->tclDeleteVars) /* 12 */
00813 #endif
00814 #ifndef TclDoGlob
00815 #define TclDoGlob \
00816         (tclIntStubsPtr->tclDoGlob) /* 13 */
00817 #endif
00818 #ifndef TclDumpMemoryInfo
00819 #define TclDumpMemoryInfo \
00820         (tclIntStubsPtr->tclDumpMemoryInfo) /* 14 */
00821 #endif
00822 /* Slot 15 is reserved */
00823 #ifndef TclExprFloatError
00824 #define TclExprFloatError \
00825         (tclIntStubsPtr->tclExprFloatError) /* 16 */
00826 #endif
00827 #ifndef TclFileAttrsCmd
00828 #define TclFileAttrsCmd \
00829         (tclIntStubsPtr->tclFileAttrsCmd) /* 17 */
00830 #endif
00831 #ifndef TclFileCopyCmd
00832 #define TclFileCopyCmd \
00833         (tclIntStubsPtr->tclFileCopyCmd) /* 18 */
00834 #endif
00835 #ifndef TclFileDeleteCmd
00836 #define TclFileDeleteCmd \
00837         (tclIntStubsPtr->tclFileDeleteCmd) /* 19 */
00838 #endif
00839 #ifndef TclFileMakeDirsCmd
00840 #define TclFileMakeDirsCmd \
00841         (tclIntStubsPtr->tclFileMakeDirsCmd) /* 20 */
00842 #endif
00843 #ifndef TclFileRenameCmd
00844 #define TclFileRenameCmd \
00845         (tclIntStubsPtr->tclFileRenameCmd) /* 21 */
00846 #endif
00847 #ifndef TclFindElement
00848 #define TclFindElement \
00849         (tclIntStubsPtr->tclFindElement) /* 22 */
00850 #endif
00851 #ifndef TclFindProc
00852 #define TclFindProc \
00853         (tclIntStubsPtr->tclFindProc) /* 23 */
00854 #endif
00855 #ifndef TclFormatInt
00856 #define TclFormatInt \
00857         (tclIntStubsPtr->tclFormatInt) /* 24 */
00858 #endif
00859 #ifndef TclFreePackageInfo
00860 #define TclFreePackageInfo \
00861         (tclIntStubsPtr->tclFreePackageInfo) /* 25 */
00862 #endif
00863 /* Slot 26 is reserved */
00864 #ifndef TclGetDate
00865 #define TclGetDate \
00866         (tclIntStubsPtr->tclGetDate) /* 27 */
00867 #endif
00868 #ifndef TclpGetDefaultStdChannel
00869 #define TclpGetDefaultStdChannel \
00870         (tclIntStubsPtr->tclpGetDefaultStdChannel) /* 28 */
00871 #endif
00872 #ifndef TclGetElementOfIndexedArray
00873 #define TclGetElementOfIndexedArray \
00874         (tclIntStubsPtr->tclGetElementOfIndexedArray) /* 29 */
00875 #endif
00876 /* Slot 30 is reserved */
00877 #ifndef TclGetExtension
00878 #define TclGetExtension \
00879         (tclIntStubsPtr->tclGetExtension) /* 31 */
00880 #endif
00881 #ifndef TclGetFrame
00882 #define TclGetFrame \
00883         (tclIntStubsPtr->tclGetFrame) /* 32 */
00884 #endif
00885 #ifndef TclGetInterpProc
00886 #define TclGetInterpProc \
00887         (tclIntStubsPtr->tclGetInterpProc) /* 33 */
00888 #endif
00889 #ifndef TclGetIntForIndex
00890 #define TclGetIntForIndex \
00891         (tclIntStubsPtr->tclGetIntForIndex) /* 34 */
00892 #endif
00893 #ifndef TclGetIndexedScalar
00894 #define TclGetIndexedScalar \
00895         (tclIntStubsPtr->tclGetIndexedScalar) /* 35 */
00896 #endif
00897 #ifndef TclGetLong
00898 #define TclGetLong \
00899         (tclIntStubsPtr->tclGetLong) /* 36 */
00900 #endif
00901 #ifndef TclGetLoadedPackages
00902 #define TclGetLoadedPackages \
00903         (tclIntStubsPtr->tclGetLoadedPackages) /* 37 */
00904 #endif
00905 #ifndef TclGetNamespaceForQualName
00906 #define TclGetNamespaceForQualName \
00907         (tclIntStubsPtr->tclGetNamespaceForQualName) /* 38 */
00908 #endif
00909 #ifndef TclGetObjInterpProc
00910 #define TclGetObjInterpProc \
00911         (tclIntStubsPtr->tclGetObjInterpProc) /* 39 */
00912 #endif
00913 #ifndef TclGetOpenMode
00914 #define TclGetOpenMode \
00915         (tclIntStubsPtr->tclGetOpenMode) /* 40 */
00916 #endif
00917 #ifndef TclGetOriginalCommand
00918 #define TclGetOriginalCommand \
00919         (tclIntStubsPtr->tclGetOriginalCommand) /* 41 */
00920 #endif
00921 #ifndef TclpGetUserHome
00922 #define TclpGetUserHome \
00923         (tclIntStubsPtr->tclpGetUserHome) /* 42 */
00924 #endif
00925 #ifndef TclGlobalInvoke
00926 #define TclGlobalInvoke \
00927         (tclIntStubsPtr->tclGlobalInvoke) /* 43 */
00928 #endif
00929 #ifndef TclGuessPackageName
00930 #define TclGuessPackageName \
00931         (tclIntStubsPtr->tclGuessPackageName) /* 44 */
00932 #endif
00933 #ifndef TclHideUnsafeCommands
00934 #define TclHideUnsafeCommands \
00935         (tclIntStubsPtr->tclHideUnsafeCommands) /* 45 */
00936 #endif
00937 #ifndef TclInExit
00938 #define TclInExit \
00939         (tclIntStubsPtr->tclInExit) /* 46 */
00940 #endif
00941 #ifndef TclIncrElementOfIndexedArray
00942 #define TclIncrElementOfIndexedArray \
00943         (tclIntStubsPtr->tclIncrElementOfIndexedArray) /* 47 */
00944 #endif
00945 #ifndef TclIncrIndexedScalar
00946 #define TclIncrIndexedScalar \
00947         (tclIntStubsPtr->tclIncrIndexedScalar) /* 48 */
00948 #endif
00949 #ifndef TclIncrVar2
00950 #define TclIncrVar2 \
00951         (tclIntStubsPtr->tclIncrVar2) /* 49 */
00952 #endif
00953 #ifndef TclInitCompiledLocals
00954 #define TclInitCompiledLocals \
00955         (tclIntStubsPtr->tclInitCompiledLocals) /* 50 */
00956 #endif
00957 #ifndef TclInterpInit
00958 #define TclInterpInit \
00959         (tclIntStubsPtr->tclInterpInit) /* 51 */
00960 #endif
00961 #ifndef TclInvoke
00962 #define TclInvoke \
00963         (tclIntStubsPtr->tclInvoke) /* 52 */
00964 #endif
00965 #ifndef TclInvokeObjectCommand
00966 #define TclInvokeObjectCommand \
00967         (tclIntStubsPtr->tclInvokeObjectCommand) /* 53 */
00968 #endif
00969 #ifndef TclInvokeStringCommand
00970 #define TclInvokeStringCommand \
00971         (tclIntStubsPtr->tclInvokeStringCommand) /* 54 */
00972 #endif
00973 #ifndef TclIsProc
00974 #define TclIsProc \
00975         (tclIntStubsPtr->tclIsProc) /* 55 */
00976 #endif
00977 /* Slot 56 is reserved */
00978 /* Slot 57 is reserved */
00979 #ifndef TclLookupVar
00980 #define TclLookupVar \
00981         (tclIntStubsPtr->tclLookupVar) /* 58 */
00982 #endif
00983 #ifndef TclpMatchFiles
00984 #define TclpMatchFiles \
00985         (tclIntStubsPtr->tclpMatchFiles) /* 59 */
00986 #endif
00987 #ifndef TclNeedSpace
00988 #define TclNeedSpace \
00989         (tclIntStubsPtr->tclNeedSpace) /* 60 */
00990 #endif
00991 #ifndef TclNewProcBodyObj
00992 #define TclNewProcBodyObj \
00993         (tclIntStubsPtr->tclNewProcBodyObj) /* 61 */
00994 #endif
00995 #ifndef TclObjCommandComplete
00996 #define TclObjCommandComplete \
00997         (tclIntStubsPtr->tclObjCommandComplete) /* 62 */
00998 #endif
00999 #ifndef TclObjInterpProc
01000 #define TclObjInterpProc \
01001         (tclIntStubsPtr->tclObjInterpProc) /* 63 */
01002 #endif
01003 #ifndef TclObjInvoke
01004 #define TclObjInvoke \
01005         (tclIntStubsPtr->tclObjInvoke) /* 64 */
01006 #endif
01007 #ifndef TclObjInvokeGlobal
01008 #define TclObjInvokeGlobal \
01009         (tclIntStubsPtr->tclObjInvokeGlobal) /* 65 */
01010 #endif
01011 #ifndef TclOpenFileChannelDeleteProc
01012 #define TclOpenFileChannelDeleteProc \
01013         (tclIntStubsPtr->tclOpenFileChannelDeleteProc) /* 66 */
01014 #endif
01015 #ifndef TclOpenFileChannelInsertProc
01016 #define TclOpenFileChannelInsertProc \
01017         (tclIntStubsPtr->tclOpenFileChannelInsertProc) /* 67 */
01018 #endif
01019 #ifndef TclpAccess
01020 #define TclpAccess \
01021         (tclIntStubsPtr->tclpAccess) /* 68 */
01022 #endif
01023 #ifndef TclpAlloc
01024 #define TclpAlloc \
01025         (tclIntStubsPtr->tclpAlloc) /* 69 */
01026 #endif
01027 #ifndef TclpCopyFile
01028 #define TclpCopyFile \
01029         (tclIntStubsPtr->tclpCopyFile) /* 70 */
01030 #endif
01031 #ifndef TclpCopyDirectory
01032 #define TclpCopyDirectory \
01033         (tclIntStubsPtr->tclpCopyDirectory) /* 71 */
01034 #endif
01035 #ifndef TclpCreateDirectory
01036 #define TclpCreateDirectory \
01037         (tclIntStubsPtr->tclpCreateDirectory) /* 72 */
01038 #endif
01039 #ifndef TclpDeleteFile
01040 #define TclpDeleteFile \
01041         (tclIntStubsPtr->tclpDeleteFile) /* 73 */
01042 #endif
01043 #ifndef TclpFree
01044 #define TclpFree \
01045         (tclIntStubsPtr->tclpFree) /* 74 */
01046 #endif
01047 #ifndef TclpGetClicks
01048 #define TclpGetClicks \
01049         (tclIntStubsPtr->tclpGetClicks) /* 75 */
01050 #endif
01051 #ifndef TclpGetSeconds
01052 #define TclpGetSeconds \
01053         (tclIntStubsPtr->tclpGetSeconds) /* 76 */
01054 #endif
01055 #ifndef TclpGetTime
01056 #define TclpGetTime \
01057         (tclIntStubsPtr->tclpGetTime) /* 77 */
01058 #endif
01059 #ifndef TclpGetTimeZone
01060 #define TclpGetTimeZone \
01061         (tclIntStubsPtr->tclpGetTimeZone) /* 78 */
01062 #endif
01063 #ifndef TclpListVolumes
01064 #define TclpListVolumes \
01065         (tclIntStubsPtr->tclpListVolumes) /* 79 */
01066 #endif
01067 #ifndef TclpOpenFileChannel
01068 #define TclpOpenFileChannel \
01069         (tclIntStubsPtr->tclpOpenFileChannel) /* 80 */
01070 #endif
01071 #ifndef TclpRealloc
01072 #define TclpRealloc \
01073         (tclIntStubsPtr->tclpRealloc) /* 81 */
01074 #endif
01075 #ifndef TclpRemoveDirectory
01076 #define TclpRemoveDirectory \
01077         (tclIntStubsPtr->tclpRemoveDirectory) /* 82 */
01078 #endif
01079 #ifndef TclpRenameFile
01080 #define TclpRenameFile \
01081         (tclIntStubsPtr->tclpRenameFile) /* 83 */
01082 #endif
01083 /* Slot 84 is reserved */
01084 /* Slot 85 is reserved */
01085 /* Slot 86 is reserved */
01086 /* Slot 87 is reserved */
01087 #ifndef TclPrecTraceProc
01088 #define TclPrecTraceProc \
01089         (tclIntStubsPtr->tclPrecTraceProc) /* 88 */
01090 #endif
01091 #ifndef TclPreventAliasLoop
01092 #define TclPreventAliasLoop \
01093         (tclIntStubsPtr->tclPreventAliasLoop) /* 89 */
01094 #endif
01095 /* Slot 90 is reserved */
01096 #ifndef TclProcCleanupProc
01097 #define TclProcCleanupProc \
01098         (tclIntStubsPtr->tclProcCleanupProc) /* 91 */
01099 #endif
01100 #ifndef TclProcCompileProc
01101 #define TclProcCompileProc \
01102         (tclIntStubsPtr->tclProcCompileProc) /* 92 */
01103 #endif
01104 #ifndef TclProcDeleteProc
01105 #define TclProcDeleteProc \
01106         (tclIntStubsPtr->tclProcDeleteProc) /* 93 */
01107 #endif
01108 #ifndef TclProcInterpProc
01109 #define TclProcInterpProc \
01110         (tclIntStubsPtr->tclProcInterpProc) /* 94 */
01111 #endif
01112 #ifndef TclpStat
01113 #define TclpStat \
01114         (tclIntStubsPtr->tclpStat) /* 95 */
01115 #endif
01116 #ifndef TclRenameCommand
01117 #define TclRenameCommand \
01118         (tclIntStubsPtr->tclRenameCommand) /* 96 */
01119 #endif
01120 #ifndef TclResetShadowedCmdRefs
01121 #define TclResetShadowedCmdRefs \
01122         (tclIntStubsPtr->tclResetShadowedCmdRefs) /* 97 */
01123 #endif
01124 #ifndef TclServiceIdle
01125 #define TclServiceIdle \
01126         (tclIntStubsPtr->tclServiceIdle) /* 98 */
01127 #endif
01128 #ifndef TclSetElementOfIndexedArray
01129 #define TclSetElementOfIndexedArray \
01130         (tclIntStubsPtr->tclSetElementOfIndexedArray) /* 99 */
01131 #endif
01132 #ifndef TclSetIndexedScalar
01133 #define TclSetIndexedScalar \
01134         (tclIntStubsPtr->tclSetIndexedScalar) /* 100 */
01135 #endif
01136 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
01137 #ifndef TclSetPreInitScript
01138 #define TclSetPreInitScript \
01139         (tclIntStubsPtr->tclSetPreInitScript) /* 101 */
01140 #endif
01141 #endif /* UNIX */
01142 #ifdef __WIN32__
01143 #ifndef TclSetPreInitScript
01144 #define TclSetPreInitScript \
01145         (tclIntStubsPtr->tclSetPreInitScript) /* 101 */
01146 #endif
01147 #endif /* __WIN32__ */
01148 #ifndef TclSetupEnv
01149 #define TclSetupEnv \
01150         (tclIntStubsPtr->tclSetupEnv) /* 102 */
01151 #endif
01152 #ifndef TclSockGetPort
01153 #define TclSockGetPort \
01154         (tclIntStubsPtr->tclSockGetPort) /* 103 */
01155 #endif
01156 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
01157 #ifndef TclSockMinimumBuffers
01158 #define TclSockMinimumBuffers \
01159         (tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
01160 #endif
01161 #endif /* UNIX */
01162 #ifdef __WIN32__
01163 #ifndef TclSockMinimumBuffers
01164 #define TclSockMinimumBuffers \
01165         (tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
01166 #endif
01167 #endif /* __WIN32__ */
01168 #ifndef TclStat
01169 #define TclStat \
01170         (tclIntStubsPtr->tclStat) /* 105 */
01171 #endif
01172 #ifndef TclStatDeleteProc
01173 #define TclStatDeleteProc \
01174         (tclIntStubsPtr->tclStatDeleteProc) /* 106 */
01175 #endif
01176 #ifndef TclStatInsertProc
01177 #define TclStatInsertProc \
01178         (tclIntStubsPtr->tclStatInsertProc) /* 107 */
01179 #endif
01180 #ifndef TclTeardownNamespace
01181 #define TclTeardownNamespace \
01182         (tclIntStubsPtr->tclTeardownNamespace) /* 108 */
01183 #endif
01184 #ifndef TclUpdateReturnInfo
01185 #define TclUpdateReturnInfo \
01186         (tclIntStubsPtr->tclUpdateReturnInfo) /* 109 */
01187 #endif
01188 /* Slot 110 is reserved */
01189 #ifndef Tcl_AddInterpResolvers
01190 #define Tcl_AddInterpResolvers \
01191         (tclIntStubsPtr->tcl_AddInterpResolvers) /* 111 */
01192 #endif
01193 #ifndef Tcl_AppendExportList
01194 #define Tcl_AppendExportList \
01195         (tclIntStubsPtr->tcl_AppendExportList) /* 112 */
01196 #endif
01197 #ifndef Tcl_CreateNamespace
01198 #define Tcl_CreateNamespace \
01199         (tclIntStubsPtr->tcl_CreateNamespace) /* 113 */
01200 #endif
01201 #ifndef Tcl_DeleteNamespace
01202 #define Tcl_DeleteNamespace \
01203         (tclIntStubsPtr->tcl_DeleteNamespace) /* 114 */
01204 #endif
01205 #ifndef Tcl_Export
01206 #define Tcl_Export \
01207         (tclIntStubsPtr->tcl_Export) /* 115 */
01208 #endif
01209 #ifndef Tcl_FindCommand
01210 #define Tcl_FindCommand \
01211         (tclIntStubsPtr->tcl_FindCommand) /* 116 */
01212 #endif
01213 #ifndef Tcl_FindNamespace
01214 #define Tcl_FindNamespace \
01215         (tclIntStubsPtr->tcl_FindNamespace) /* 117 */
01216 #endif
01217 #ifndef Tcl_GetInterpResolvers
01218 #define Tcl_GetInterpResolvers \
01219         (tclIntStubsPtr->tcl_GetInterpResolvers) /* 118 */
01220 #endif
01221 #ifndef Tcl_GetNamespaceResolvers
01222 #define Tcl_GetNamespaceResolvers \
01223         (tclIntStubsPtr->tcl_GetNamespaceResolvers) /* 119 */
01224 #endif
01225 #ifndef Tcl_FindNamespaceVar
01226 #define Tcl_FindNamespaceVar \
01227         (tclIntStubsPtr->tcl_FindNamespaceVar) /* 120 */
01228 #endif
01229 #ifndef Tcl_ForgetImport
01230 #define Tcl_ForgetImport \
01231         (tclIntStubsPtr->tcl_ForgetImport) /* 121 */
01232 #endif
01233 #ifndef Tcl_GetCommandFromObj
01234 #define Tcl_GetCommandFromObj \
01235         (tclIntStubsPtr->tcl_GetCommandFromObj) /* 122 */
01236 #endif
01237 #ifndef Tcl_GetCommandFullName
01238 #define Tcl_GetCommandFullName \
01239         (tclIntStubsPtr->tcl_GetCommandFullName) /* 123 */
01240 #endif
01241 #ifndef Tcl_GetCurrentNamespace
01242 #define Tcl_GetCurrentNamespace \
01243         (tclIntStubsPtr->tcl_GetCurrentNamespace) /* 124 */
01244 #endif
01245 #ifndef Tcl_GetGlobalNamespace
01246 #define Tcl_GetGlobalNamespace \
01247         (tclIntStubsPtr->tcl_GetGlobalNamespace) /* 125 */
01248 #endif
01249 #ifndef Tcl_GetVariableFullName
01250 #define Tcl_GetVariableFullName \
01251         (tclIntStubsPtr->tcl_GetVariableFullName) /* 126 */
01252 #endif
01253 #ifndef Tcl_Import
01254 #define Tcl_Import \
01255         (tclIntStubsPtr->tcl_Import) /* 127 */
01256 #endif
01257 #ifndef Tcl_PopCallFrame
01258 #define Tcl_PopCallFrame \
01259         (tclIntStubsPtr->tcl_PopCallFrame) /* 128 */
01260 #endif
01261 #ifndef Tcl_PushCallFrame
01262 #define Tcl_PushCallFrame \
01263         (tclIntStubsPtr->tcl_PushCallFrame) /* 129 */
01264 #endif
01265 #ifndef Tcl_RemoveInterpResolvers
01266 #define Tcl_RemoveInterpResolvers \
01267         (tclIntStubsPtr->tcl_RemoveInterpResolvers) /* 130 */
01268 #endif
01269 #ifndef Tcl_SetNamespaceResolvers
01270 #define Tcl_SetNamespaceResolvers \
01271         (tclIntStubsPtr->tcl_SetNamespaceResolvers) /* 131 */
01272 #endif
01273 #ifndef TclpHasSockets
01274 #define TclpHasSockets \
01275         (tclIntStubsPtr->tclpHasSockets) /* 132 */
01276 #endif
01277 #ifndef TclpGetDate
01278 #define TclpGetDate \
01279         (tclIntStubsPtr->tclpGetDate) /* 133 */
01280 #endif
01281 #ifndef TclpStrftime
01282 #define TclpStrftime \
01283         (tclIntStubsPtr->tclpStrftime) /* 134 */
01284 #endif
01285 #ifndef TclpCheckStackSpace
01286 #define TclpCheckStackSpace \
01287         (tclIntStubsPtr->tclpCheckStackSpace) /* 135 */
01288 #endif
01289 /* Slot 136 is reserved */
01290 #ifndef TclpChdir
01291 #define TclpChdir \
01292         (tclIntStubsPtr->tclpChdir) /* 137 */
01293 #endif
01294 #ifndef TclGetEnv
01295 #define TclGetEnv \
01296         (tclIntStubsPtr->tclGetEnv) /* 138 */
01297 #endif
01298 #ifndef TclpLoadFile
01299 #define TclpLoadFile \
01300         (tclIntStubsPtr->tclpLoadFile) /* 139 */
01301 #endif
01302 #ifndef TclLooksLikeInt
01303 #define TclLooksLikeInt \
01304         (tclIntStubsPtr->tclLooksLikeInt) /* 140 */
01305 #endif
01306 #ifndef TclpGetCwd
01307 #define TclpGetCwd \
01308         (tclIntStubsPtr->tclpGetCwd) /* 141 */
01309 #endif
01310 #ifndef TclSetByteCodeFromAny
01311 #define TclSetByteCodeFromAny \
01312         (tclIntStubsPtr->tclSetByteCodeFromAny) /* 142 */
01313 #endif
01314 #ifndef TclAddLiteralObj
01315 #define TclAddLiteralObj \
01316         (tclIntStubsPtr->tclAddLiteralObj) /* 143 */
01317 #endif
01318 #ifndef TclHideLiteral
01319 #define TclHideLiteral \
01320         (tclIntStubsPtr->tclHideLiteral) /* 144 */
01321 #endif
01322 #ifndef TclGetAuxDataType
01323 #define TclGetAuxDataType \
01324         (tclIntStubsPtr->tclGetAuxDataType) /* 145 */
01325 #endif
01326 #ifndef TclHandleCreate
01327 #define TclHandleCreate \
01328         (tclIntStubsPtr->tclHandleCreate) /* 146 */
01329 #endif
01330 #ifndef TclHandleFree
01331 #define TclHandleFree \
01332         (tclIntStubsPtr->tclHandleFree) /* 147 */
01333 #endif
01334 #ifndef TclHandlePreserve
01335 #define TclHandlePreserve \
01336         (tclIntStubsPtr->tclHandlePreserve) /* 148 */
01337 #endif
01338 #ifndef TclHandleRelease
01339 #define TclHandleRelease \
01340         (tclIntStubsPtr->tclHandleRelease) /* 149 */
01341 #endif
01342 #ifndef TclRegAbout
01343 #define TclRegAbout \
01344         (tclIntStubsPtr->tclRegAbout) /* 150 */
01345 #endif
01346 #ifndef TclRegExpRangeUniChar
01347 #define TclRegExpRangeUniChar \
01348         (tclIntStubsPtr->tclRegExpRangeUniChar) /* 151 */
01349 #endif
01350 #ifndef TclSetLibraryPath
01351 #define TclSetLibraryPath \
01352         (tclIntStubsPtr->tclSetLibraryPath) /* 152 */
01353 #endif
01354 #ifndef TclGetLibraryPath
01355 #define TclGetLibraryPath \
01356         (tclIntStubsPtr->tclGetLibraryPath) /* 153 */
01357 #endif
01358 /* Slot 154 is reserved */
01359 /* Slot 155 is reserved */
01360 #ifndef TclRegError
01361 #define TclRegError \
01362         (tclIntStubsPtr->tclRegError) /* 156 */
01363 #endif
01364 #ifndef TclVarTraceExists
01365 #define TclVarTraceExists \
01366         (tclIntStubsPtr->tclVarTraceExists) /* 157 */
01367 #endif
01368 #ifndef TclSetStartupScriptFileName
01369 #define TclSetStartupScriptFileName \
01370         (tclIntStubsPtr->tclSetStartupScriptFileName) /* 158 */
01371 #endif
01372 #ifndef TclGetStartupScriptFileName
01373 #define TclGetStartupScriptFileName \
01374         (tclIntStubsPtr->tclGetStartupScriptFileName) /* 159 */
01375 #endif
01376 #ifndef TclpMatchFilesTypes
01377 #define TclpMatchFilesTypes \
01378         (tclIntStubsPtr->tclpMatchFilesTypes) /* 160 */
01379 #endif
01380 #ifndef TclChannelTransform
01381 #define TclChannelTransform \
01382         (tclIntStubsPtr->tclChannelTransform) /* 161 */
01383 #endif
01384 #ifndef TclChannelEventScriptInvoker
01385 #define TclChannelEventScriptInvoker \
01386         (tclIntStubsPtr->tclChannelEventScriptInvoker) /* 162 */
01387 #endif
01388 
01389 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
01390 
01391 /* !END!: Do not edit above this line. */
01392 
01393 #endif /* _TCLINTDECLS */

Generated on Mon Oct 23 15:05:30 2006 for OpenSees by doxygen 1.5.0