os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/generic/tclIntDecls.h
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/generic/tclIntDecls.h Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,1414 @@
1.4 +/*
1.5 + * tclIntDecls.h --
1.6 + *
1.7 + * This file contains the declarations for all unsupported
1.8 + * functions that are exported by the Tcl library. These
1.9 + * interfaces are not guaranteed to remain the same between
1.10 + * versions. Use at your own risk.
1.11 + *
1.12 + * Copyright (c) 1998-1999 by Scriptics Corporation.
1.13 + *
1.14 + * See the file "license.terms" for information on usage and redistribution
1.15 + * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
1.16 + *
1.17 + * RCS: @(#) $Id: tclIntDecls.h,v 1.49.2.9 2007/04/21 19:52:14 kennykb Exp $
1.18 + */
1.19 +
1.20 +#ifndef _TCLINTDECLS
1.21 +#define _TCLINTDECLS
1.22 +
1.23 +/*
1.24 + * WARNING: This file is automatically generated by the tools/genStubs.tcl
1.25 + * script. Any modifications to the function declarations below should be made
1.26 + * in the generic/tclInt.decls script.
1.27 + */
1.28 +
1.29 +/* !BEGIN!: Do not edit below this line. */
1.30 +
1.31 +/*
1.32 + * Exported function declarations:
1.33 + */
1.34 +
1.35 +/* Slot 0 is reserved */
1.36 +/* 1 */
1.37 +EXTERN int TclAccessDeleteProc _ANSI_ARGS_((
1.38 + TclAccessProc_ * proc));
1.39 +/* 2 */
1.40 +EXTERN int TclAccessInsertProc _ANSI_ARGS_((
1.41 + TclAccessProc_ * proc));
1.42 +/* 3 */
1.43 +EXTERN void TclAllocateFreeObjects _ANSI_ARGS_((void));
1.44 +/* Slot 4 is reserved */
1.45 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.46 +/* 5 */
1.47 +EXTERN int TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp,
1.48 + int numPids, Tcl_Pid * pidPtr,
1.49 + Tcl_Channel errorChan));
1.50 +#endif /* UNIX */
1.51 +#ifdef __WIN32__
1.52 +/* 5 */
1.53 +EXTERN int TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp,
1.54 + int numPids, Tcl_Pid * pidPtr,
1.55 + Tcl_Channel errorChan));
1.56 +#endif /* __WIN32__ */
1.57 +/* 6 */
1.58 +EXTERN void TclCleanupCommand _ANSI_ARGS_((Command * cmdPtr));
1.59 +/* 7 */
1.60 +EXTERN int TclCopyAndCollapse _ANSI_ARGS_((int count,
1.61 + CONST char * src, char * dst));
1.62 +/* 8 */
1.63 +EXTERN int TclCopyChannel _ANSI_ARGS_((Tcl_Interp * interp,
1.64 + Tcl_Channel inChan, Tcl_Channel outChan,
1.65 + int toRead, Tcl_Obj * cmdPtr));
1.66 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.67 +/* 9 */
1.68 +EXTERN int TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp,
1.69 + int argc, CONST char ** argv,
1.70 + Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr,
1.71 + TclFile * outPipePtr, TclFile * errFilePtr));
1.72 +#endif /* UNIX */
1.73 +#ifdef __WIN32__
1.74 +/* 9 */
1.75 +EXTERN int TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp,
1.76 + int argc, CONST char ** argv,
1.77 + Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr,
1.78 + TclFile * outPipePtr, TclFile * errFilePtr));
1.79 +#endif /* __WIN32__ */
1.80 +/* 10 */
1.81 +EXTERN int TclCreateProc _ANSI_ARGS_((Tcl_Interp * interp,
1.82 + Namespace * nsPtr, CONST char * procName,
1.83 + Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr,
1.84 + Proc ** procPtrPtr));
1.85 +/* 11 */
1.86 +EXTERN void TclDeleteCompiledLocalVars _ANSI_ARGS_((
1.87 + Interp * iPtr, CallFrame * framePtr));
1.88 +/* 12 */
1.89 +EXTERN void TclDeleteVars _ANSI_ARGS_((Interp * iPtr,
1.90 + Tcl_HashTable * tablePtr));
1.91 +/* 13 */
1.92 +EXTERN int TclDoGlob _ANSI_ARGS_((Tcl_Interp * interp,
1.93 + char * separators, Tcl_DString * headPtr,
1.94 + char * tail, Tcl_GlobTypeData * types));
1.95 +/* 14 */
1.96 +EXTERN void TclDumpMemoryInfo _ANSI_ARGS_((FILE * outFile));
1.97 +/* Slot 15 is reserved */
1.98 +/* 16 */
1.99 +EXTERN void TclExprFloatError _ANSI_ARGS_((Tcl_Interp * interp,
1.100 + double value));
1.101 +/* Slot 17 is reserved */
1.102 +/* Slot 18 is reserved */
1.103 +/* Slot 19 is reserved */
1.104 +/* Slot 20 is reserved */
1.105 +/* Slot 21 is reserved */
1.106 +/* 22 */
1.107 +EXTERN int TclFindElement _ANSI_ARGS_((Tcl_Interp * interp,
1.108 + CONST char * listStr, int listLength,
1.109 + CONST char ** elementPtr,
1.110 + CONST char ** nextPtr, int * sizePtr,
1.111 + int * bracePtr));
1.112 +/* 23 */
1.113 +EXTERN Proc * TclFindProc _ANSI_ARGS_((Interp * iPtr,
1.114 + CONST char * procName));
1.115 +/* 24 */
1.116 +EXTERN int TclFormatInt _ANSI_ARGS_((char * buffer, long n));
1.117 +/* 25 */
1.118 +EXTERN void TclFreePackageInfo _ANSI_ARGS_((Interp * iPtr));
1.119 +/* Slot 26 is reserved */
1.120 +/* 27 */
1.121 +EXTERN int TclGetDate _ANSI_ARGS_((char * p, Tcl_WideInt now,
1.122 + long zone, Tcl_WideInt * timePtr));
1.123 +/* 28 */
1.124 +EXTERN Tcl_Channel TclpGetDefaultStdChannel _ANSI_ARGS_((int type));
1.125 +/* Slot 29 is reserved */
1.126 +/* Slot 30 is reserved */
1.127 +/* 31 */
1.128 +EXTERN char * TclGetExtension _ANSI_ARGS_((char * name));
1.129 +/* 32 */
1.130 +EXTERN int TclGetFrame _ANSI_ARGS_((Tcl_Interp * interp,
1.131 + CONST char * str, CallFrame ** framePtrPtr));
1.132 +/* 33 */
1.133 +EXTERN TclCmdProcType TclGetInterpProc _ANSI_ARGS_((void));
1.134 +/* 34 */
1.135 +EXTERN int TclGetIntForIndex _ANSI_ARGS_((Tcl_Interp * interp,
1.136 + Tcl_Obj * objPtr, int endValue,
1.137 + int * indexPtr));
1.138 +/* Slot 35 is reserved */
1.139 +/* 36 */
1.140 +EXTERN int TclGetLong _ANSI_ARGS_((Tcl_Interp * interp,
1.141 + CONST char * str, long * longPtr));
1.142 +/* 37 */
1.143 +EXTERN int TclGetLoadedPackages _ANSI_ARGS_((
1.144 + Tcl_Interp * interp, char * targetName));
1.145 +/* 38 */
1.146 +EXTERN int TclGetNamespaceForQualName _ANSI_ARGS_((
1.147 + Tcl_Interp * interp, CONST char * qualName,
1.148 + Namespace * cxtNsPtr, int flags,
1.149 + Namespace ** nsPtrPtr,
1.150 + Namespace ** altNsPtrPtr,
1.151 + Namespace ** actualCxtPtrPtr,
1.152 + CONST char ** simpleNamePtr));
1.153 +/* 39 */
1.154 +EXTERN TclObjCmdProcType TclGetObjInterpProc _ANSI_ARGS_((void));
1.155 +/* 40 */
1.156 +EXTERN int TclGetOpenMode _ANSI_ARGS_((Tcl_Interp * interp,
1.157 + CONST char * str, int * seekFlagPtr));
1.158 +/* 41 */
1.159 +EXTERN Tcl_Command TclGetOriginalCommand _ANSI_ARGS_((
1.160 + Tcl_Command command));
1.161 +/* 42 */
1.162 +EXTERN char * TclpGetUserHome _ANSI_ARGS_((CONST char * name,
1.163 + Tcl_DString * bufferPtr));
1.164 +/* 43 */
1.165 +EXTERN int TclGlobalInvoke _ANSI_ARGS_((Tcl_Interp * interp,
1.166 + int argc, CONST84 char ** argv, int flags));
1.167 +/* 44 */
1.168 +EXTERN int TclGuessPackageName _ANSI_ARGS_((
1.169 + CONST char * fileName, Tcl_DString * bufPtr));
1.170 +/* 45 */
1.171 +EXTERN int TclHideUnsafeCommands _ANSI_ARGS_((
1.172 + Tcl_Interp * interp));
1.173 +/* 46 */
1.174 +EXTERN int TclInExit _ANSI_ARGS_((void));
1.175 +/* Slot 47 is reserved */
1.176 +/* Slot 48 is reserved */
1.177 +/* 49 */
1.178 +EXTERN Tcl_Obj * TclIncrVar2 _ANSI_ARGS_((Tcl_Interp * interp,
1.179 + Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr,
1.180 + long incrAmount, int part1NotParsed));
1.181 +/* 50 */
1.182 +EXTERN void TclInitCompiledLocals _ANSI_ARGS_((
1.183 + Tcl_Interp * interp, CallFrame * framePtr,
1.184 + Namespace * nsPtr));
1.185 +/* 51 */
1.186 +EXTERN int TclInterpInit _ANSI_ARGS_((Tcl_Interp * interp));
1.187 +/* 52 */
1.188 +EXTERN int TclInvoke _ANSI_ARGS_((Tcl_Interp * interp, int argc,
1.189 + CONST84 char ** argv, int flags));
1.190 +/* 53 */
1.191 +EXTERN int TclInvokeObjectCommand _ANSI_ARGS_((
1.192 + ClientData clientData, Tcl_Interp * interp,
1.193 + int argc, CONST84 char ** argv));
1.194 +/* 54 */
1.195 +EXTERN int TclInvokeStringCommand _ANSI_ARGS_((
1.196 + ClientData clientData, Tcl_Interp * interp,
1.197 + int objc, Tcl_Obj *CONST objv[]));
1.198 +/* 55 */
1.199 +EXTERN Proc * TclIsProc _ANSI_ARGS_((Command * cmdPtr));
1.200 +/* Slot 56 is reserved */
1.201 +/* Slot 57 is reserved */
1.202 +/* 58 */
1.203 +EXTERN Var * TclLookupVar _ANSI_ARGS_((Tcl_Interp * interp,
1.204 + CONST char * part1, CONST char * part2,
1.205 + int flags, CONST char * msg, int createPart1,
1.206 + int createPart2, Var ** arrayPtrPtr));
1.207 +/* Slot 59 is reserved */
1.208 +/* 60 */
1.209 +EXTERN int TclNeedSpace _ANSI_ARGS_((CONST char * start,
1.210 + CONST char * end));
1.211 +/* 61 */
1.212 +EXTERN Tcl_Obj * TclNewProcBodyObj _ANSI_ARGS_((Proc * procPtr));
1.213 +/* 62 */
1.214 +EXTERN int TclObjCommandComplete _ANSI_ARGS_((Tcl_Obj * cmdPtr));
1.215 +/* 63 */
1.216 +EXTERN int TclObjInterpProc _ANSI_ARGS_((ClientData clientData,
1.217 + Tcl_Interp * interp, int objc,
1.218 + Tcl_Obj *CONST objv[]));
1.219 +/* 64 */
1.220 +EXTERN int TclObjInvoke _ANSI_ARGS_((Tcl_Interp * interp,
1.221 + int objc, Tcl_Obj *CONST objv[], int flags));
1.222 +/* 65 */
1.223 +EXTERN int TclObjInvokeGlobal _ANSI_ARGS_((Tcl_Interp * interp,
1.224 + int objc, Tcl_Obj *CONST objv[], int flags));
1.225 +/* 66 */
1.226 +EXTERN int TclOpenFileChannelDeleteProc _ANSI_ARGS_((
1.227 + TclOpenFileChannelProc_ * proc));
1.228 +/* 67 */
1.229 +EXTERN int TclOpenFileChannelInsertProc _ANSI_ARGS_((
1.230 + TclOpenFileChannelProc_ * proc));
1.231 +/* Slot 68 is reserved */
1.232 +/* 69 */
1.233 +EXTERN char * TclpAlloc _ANSI_ARGS_((unsigned int size));
1.234 +/* Slot 70 is reserved */
1.235 +/* Slot 71 is reserved */
1.236 +/* Slot 72 is reserved */
1.237 +/* Slot 73 is reserved */
1.238 +/* 74 */
1.239 +EXTERN void TclpFree _ANSI_ARGS_((char * ptr));
1.240 +/* 75 */
1.241 +EXTERN unsigned long TclpGetClicks _ANSI_ARGS_((void));
1.242 +/* 76 */
1.243 +EXTERN unsigned long TclpGetSeconds _ANSI_ARGS_((void));
1.244 +/* 77 */
1.245 +EXTERN void TclpGetTime _ANSI_ARGS_((Tcl_Time * time));
1.246 +/* 78 */
1.247 +EXTERN int TclpGetTimeZone _ANSI_ARGS_((Tcl_WideInt time));
1.248 +/* Slot 79 is reserved */
1.249 +/* Slot 80 is reserved */
1.250 +/* 81 */
1.251 +EXTERN char * TclpRealloc _ANSI_ARGS_((char * ptr,
1.252 + unsigned int size));
1.253 +/* Slot 82 is reserved */
1.254 +/* Slot 83 is reserved */
1.255 +/* Slot 84 is reserved */
1.256 +/* Slot 85 is reserved */
1.257 +/* Slot 86 is reserved */
1.258 +/* Slot 87 is reserved */
1.259 +/* 88 */
1.260 +EXTERN char * TclPrecTraceProc _ANSI_ARGS_((ClientData clientData,
1.261 + Tcl_Interp * interp, CONST char * name1,
1.262 + CONST char * name2, int flags));
1.263 +/* 89 */
1.264 +EXTERN int TclPreventAliasLoop _ANSI_ARGS_((Tcl_Interp * interp,
1.265 + Tcl_Interp * cmdInterp, Tcl_Command cmd));
1.266 +/* Slot 90 is reserved */
1.267 +/* 91 */
1.268 +EXTERN void TclProcCleanupProc _ANSI_ARGS_((Proc * procPtr));
1.269 +/* 92 */
1.270 +EXTERN int TclProcCompileProc _ANSI_ARGS_((Tcl_Interp * interp,
1.271 + Proc * procPtr, Tcl_Obj * bodyPtr,
1.272 + Namespace * nsPtr, CONST char * description,
1.273 + CONST char * procName));
1.274 +/* 93 */
1.275 +EXTERN void TclProcDeleteProc _ANSI_ARGS_((ClientData clientData));
1.276 +/* 94 */
1.277 +EXTERN int TclProcInterpProc _ANSI_ARGS_((ClientData clientData,
1.278 + Tcl_Interp * interp, int argc,
1.279 + CONST84 char ** argv));
1.280 +/* Slot 95 is reserved */
1.281 +/* 96 */
1.282 +EXTERN int TclRenameCommand _ANSI_ARGS_((Tcl_Interp * interp,
1.283 + char * oldName, char * newName));
1.284 +/* 97 */
1.285 +EXTERN void TclResetShadowedCmdRefs _ANSI_ARGS_((
1.286 + Tcl_Interp * interp, Command * newCmdPtr));
1.287 +/* 98 */
1.288 +EXTERN int TclServiceIdle _ANSI_ARGS_((void));
1.289 +/* Slot 99 is reserved */
1.290 +/* Slot 100 is reserved */
1.291 +/* 101 */
1.292 +EXTERN char * TclSetPreInitScript _ANSI_ARGS_((char * string));
1.293 +/* 102 */
1.294 +EXTERN void TclSetupEnv _ANSI_ARGS_((Tcl_Interp * interp));
1.295 +/* 103 */
1.296 +EXTERN int TclSockGetPort _ANSI_ARGS_((Tcl_Interp * interp,
1.297 + char * str, char * proto, int * portPtr));
1.298 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.299 +/* 104 */
1.300 +EXTERN int TclSockMinimumBuffers _ANSI_ARGS_((int sock,
1.301 + int size));
1.302 +#endif /* UNIX */
1.303 +#ifdef __WIN32__
1.304 +/* 104 */
1.305 +EXTERN int TclSockMinimumBuffers _ANSI_ARGS_((int sock,
1.306 + int size));
1.307 +#endif /* __WIN32__ */
1.308 +/* Slot 105 is reserved */
1.309 +/* 106 */
1.310 +EXTERN int TclStatDeleteProc _ANSI_ARGS_((TclStatProc_ * proc));
1.311 +/* 107 */
1.312 +EXTERN int TclStatInsertProc _ANSI_ARGS_((TclStatProc_ * proc));
1.313 +/* 108 */
1.314 +EXTERN void TclTeardownNamespace _ANSI_ARGS_((Namespace * nsPtr));
1.315 +/* 109 */
1.316 +EXTERN int TclUpdateReturnInfo _ANSI_ARGS_((Interp * iPtr));
1.317 +/* Slot 110 is reserved */
1.318 +/* 111 */
1.319 +EXTERN void Tcl_AddInterpResolvers _ANSI_ARGS_((
1.320 + Tcl_Interp * interp, CONST char * name,
1.321 + Tcl_ResolveCmdProc * cmdProc,
1.322 + Tcl_ResolveVarProc * varProc,
1.323 + Tcl_ResolveCompiledVarProc * compiledVarProc));
1.324 +/* 112 */
1.325 +EXTERN int Tcl_AppendExportList _ANSI_ARGS_((
1.326 + Tcl_Interp * interp, Tcl_Namespace * nsPtr,
1.327 + Tcl_Obj * objPtr));
1.328 +/* 113 */
1.329 +EXTERN Tcl_Namespace * Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp * interp,
1.330 + CONST char * name, ClientData clientData,
1.331 + Tcl_NamespaceDeleteProc * deleteProc));
1.332 +/* 114 */
1.333 +EXTERN void Tcl_DeleteNamespace _ANSI_ARGS_((
1.334 + Tcl_Namespace * nsPtr));
1.335 +/* 115 */
1.336 +EXTERN int Tcl_Export _ANSI_ARGS_((Tcl_Interp * interp,
1.337 + Tcl_Namespace * nsPtr, CONST char * pattern,
1.338 + int resetListFirst));
1.339 +/* 116 */
1.340 +EXTERN Tcl_Command Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp * interp,
1.341 + CONST char * name,
1.342 + Tcl_Namespace * contextNsPtr, int flags));
1.343 +/* 117 */
1.344 +EXTERN Tcl_Namespace * Tcl_FindNamespace _ANSI_ARGS_((Tcl_Interp * interp,
1.345 + CONST char * name,
1.346 + Tcl_Namespace * contextNsPtr, int flags));
1.347 +/* 118 */
1.348 +EXTERN int Tcl_GetInterpResolvers _ANSI_ARGS_((
1.349 + Tcl_Interp * interp, CONST char * name,
1.350 + Tcl_ResolverInfo * resInfo));
1.351 +/* 119 */
1.352 +EXTERN int Tcl_GetNamespaceResolvers _ANSI_ARGS_((
1.353 + Tcl_Namespace * namespacePtr,
1.354 + Tcl_ResolverInfo * resInfo));
1.355 +/* 120 */
1.356 +EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_((
1.357 + Tcl_Interp * interp, CONST char * name,
1.358 + Tcl_Namespace * contextNsPtr, int flags));
1.359 +/* 121 */
1.360 +EXTERN int Tcl_ForgetImport _ANSI_ARGS_((Tcl_Interp * interp,
1.361 + Tcl_Namespace * nsPtr, CONST char * pattern));
1.362 +/* 122 */
1.363 +EXTERN Tcl_Command Tcl_GetCommandFromObj _ANSI_ARGS_((
1.364 + Tcl_Interp * interp, Tcl_Obj * objPtr));
1.365 +/* 123 */
1.366 +EXTERN void Tcl_GetCommandFullName _ANSI_ARGS_((
1.367 + Tcl_Interp * interp, Tcl_Command command,
1.368 + Tcl_Obj * objPtr));
1.369 +/* 124 */
1.370 +EXTERN Tcl_Namespace * Tcl_GetCurrentNamespace _ANSI_ARGS_((
1.371 + Tcl_Interp * interp));
1.372 +/* 125 */
1.373 +EXTERN Tcl_Namespace * Tcl_GetGlobalNamespace _ANSI_ARGS_((
1.374 + Tcl_Interp * interp));
1.375 +/* 126 */
1.376 +EXTERN void Tcl_GetVariableFullName _ANSI_ARGS_((
1.377 + Tcl_Interp * interp, Tcl_Var variable,
1.378 + Tcl_Obj * objPtr));
1.379 +/* 127 */
1.380 +EXTERN int Tcl_Import _ANSI_ARGS_((Tcl_Interp * interp,
1.381 + Tcl_Namespace * nsPtr, CONST char * pattern,
1.382 + int allowOverwrite));
1.383 +/* 128 */
1.384 +EXTERN void Tcl_PopCallFrame _ANSI_ARGS_((Tcl_Interp* interp));
1.385 +/* 129 */
1.386 +EXTERN int Tcl_PushCallFrame _ANSI_ARGS_((Tcl_Interp* interp,
1.387 + Tcl_CallFrame * framePtr,
1.388 + Tcl_Namespace * nsPtr, int isProcCallFrame));
1.389 +/* 130 */
1.390 +EXTERN int Tcl_RemoveInterpResolvers _ANSI_ARGS_((
1.391 + Tcl_Interp * interp, CONST char * name));
1.392 +/* 131 */
1.393 +EXTERN void Tcl_SetNamespaceResolvers _ANSI_ARGS_((
1.394 + Tcl_Namespace * namespacePtr,
1.395 + Tcl_ResolveCmdProc * cmdProc,
1.396 + Tcl_ResolveVarProc * varProc,
1.397 + Tcl_ResolveCompiledVarProc * compiledVarProc));
1.398 +/* 132 */
1.399 +EXTERN int TclpHasSockets _ANSI_ARGS_((Tcl_Interp * interp));
1.400 +/* 133 */
1.401 +EXTERN struct tm * TclpGetDate _ANSI_ARGS_((TclpTime_t time, int useGMT));
1.402 +/* 134 */
1.403 +EXTERN size_t TclpStrftime _ANSI_ARGS_((char * s, size_t maxsize,
1.404 + CONST char * format, CONST struct tm * t,
1.405 + int useGMT));
1.406 +/* 135 */
1.407 +EXTERN int TclpCheckStackSpace _ANSI_ARGS_((void));
1.408 +/* Slot 136 is reserved */
1.409 +/* Slot 137 is reserved */
1.410 +/* 138 */
1.411 +EXTERN CONST84_RETURN char * TclGetEnv _ANSI_ARGS_((CONST char * name,
1.412 + Tcl_DString * valuePtr));
1.413 +/* Slot 139 is reserved */
1.414 +/* 140 */
1.415 +EXTERN int TclLooksLikeInt _ANSI_ARGS_((CONST char * bytes,
1.416 + int length));
1.417 +/* 141 */
1.418 +EXTERN CONST84_RETURN char * TclpGetCwd _ANSI_ARGS_((Tcl_Interp * interp,
1.419 + Tcl_DString * cwdPtr));
1.420 +/* 142 */
1.421 +EXTERN int TclSetByteCodeFromAny _ANSI_ARGS_((
1.422 + Tcl_Interp * interp, Tcl_Obj * objPtr,
1.423 + CompileHookProc * hookProc,
1.424 + ClientData clientData));
1.425 +/* 143 */
1.426 +EXTERN int TclAddLiteralObj _ANSI_ARGS_((
1.427 + struct CompileEnv * envPtr, Tcl_Obj * objPtr,
1.428 + LiteralEntry ** litPtrPtr));
1.429 +/* 144 */
1.430 +EXTERN void TclHideLiteral _ANSI_ARGS_((Tcl_Interp * interp,
1.431 + struct CompileEnv * envPtr, int index));
1.432 +/* 145 */
1.433 +EXTERN struct AuxDataType * TclGetAuxDataType _ANSI_ARGS_((char * typeName));
1.434 +/* 146 */
1.435 +EXTERN TclHandle TclHandleCreate _ANSI_ARGS_((VOID * ptr));
1.436 +/* 147 */
1.437 +EXTERN void TclHandleFree _ANSI_ARGS_((TclHandle handle));
1.438 +/* 148 */
1.439 +EXTERN TclHandle TclHandlePreserve _ANSI_ARGS_((TclHandle handle));
1.440 +/* 149 */
1.441 +EXTERN void TclHandleRelease _ANSI_ARGS_((TclHandle handle));
1.442 +/* 150 */
1.443 +EXTERN int TclRegAbout _ANSI_ARGS_((Tcl_Interp * interp,
1.444 + Tcl_RegExp re));
1.445 +/* 151 */
1.446 +EXTERN void TclRegExpRangeUniChar _ANSI_ARGS_((Tcl_RegExp re,
1.447 + int index, int * startPtr, int * endPtr));
1.448 +/* 152 */
1.449 +EXTERN void TclSetLibraryPath _ANSI_ARGS_((Tcl_Obj * pathPtr));
1.450 +/* 153 */
1.451 +EXTERN Tcl_Obj * TclGetLibraryPath _ANSI_ARGS_((void));
1.452 +/* Slot 154 is reserved */
1.453 +/* Slot 155 is reserved */
1.454 +/* 156 */
1.455 +EXTERN void TclRegError _ANSI_ARGS_((Tcl_Interp * interp,
1.456 + CONST char * msg, int status));
1.457 +/* 157 */
1.458 +EXTERN Var * TclVarTraceExists _ANSI_ARGS_((Tcl_Interp * interp,
1.459 + CONST char * varName));
1.460 +/* 158 */
1.461 +EXTERN void TclSetStartupScriptFileName _ANSI_ARGS_((
1.462 + CONST char * filename));
1.463 +/* 159 */
1.464 +EXTERN CONST84_RETURN char * TclGetStartupScriptFileName _ANSI_ARGS_((void));
1.465 +/* Slot 160 is reserved */
1.466 +/* 161 */
1.467 +EXTERN int TclChannelTransform _ANSI_ARGS_((Tcl_Interp * interp,
1.468 + Tcl_Channel chan, Tcl_Obj * cmdObjPtr));
1.469 +/* 162 */
1.470 +EXTERN void TclChannelEventScriptInvoker _ANSI_ARGS_((
1.471 + ClientData clientData, int flags));
1.472 +/* 163 */
1.473 +EXTERN void * TclGetInstructionTable _ANSI_ARGS_((void));
1.474 +/* 164 */
1.475 +EXTERN void TclExpandCodeArray _ANSI_ARGS_((void * envPtr));
1.476 +/* 165 */
1.477 +EXTERN void TclpSetInitialEncodings _ANSI_ARGS_((void));
1.478 +/* 166 */
1.479 +EXTERN int TclListObjSetElement _ANSI_ARGS_((
1.480 + Tcl_Interp * interp, Tcl_Obj * listPtr,
1.481 + int index, Tcl_Obj * valuePtr));
1.482 +/* 167 */
1.483 +EXTERN void TclSetStartupScriptPath _ANSI_ARGS_((
1.484 + Tcl_Obj * pathPtr));
1.485 +/* 168 */
1.486 +EXTERN Tcl_Obj * TclGetStartupScriptPath _ANSI_ARGS_((void));
1.487 +/* 169 */
1.488 +EXTERN int TclpUtfNcmp2 _ANSI_ARGS_((CONST char * s1,
1.489 + CONST char * s2, unsigned long n));
1.490 +/* 170 */
1.491 +EXTERN int TclCheckInterpTraces _ANSI_ARGS_((
1.492 + Tcl_Interp * interp, CONST char * command,
1.493 + int numChars, Command * cmdPtr, int result,
1.494 + int traceFlags, int objc,
1.495 + Tcl_Obj *CONST objv[]));
1.496 +/* 171 */
1.497 +EXTERN int TclCheckExecutionTraces _ANSI_ARGS_((
1.498 + Tcl_Interp * interp, CONST char * command,
1.499 + int numChars, Command * cmdPtr, int result,
1.500 + int traceFlags, int objc,
1.501 + Tcl_Obj *CONST objv[]));
1.502 +/* 172 */
1.503 +EXTERN int TclInThreadExit _ANSI_ARGS_((void));
1.504 +/* 173 */
1.505 +EXTERN int TclUniCharMatch _ANSI_ARGS_((
1.506 + CONST Tcl_UniChar * string, int strLen,
1.507 + CONST Tcl_UniChar * pattern, int ptnLen,
1.508 + int nocase));
1.509 +/* Slot 174 is reserved */
1.510 +/* Slot 175 is reserved */
1.511 +/* Slot 176 is reserved */
1.512 +/* Slot 177 is reserved */
1.513 +/* Slot 178 is reserved */
1.514 +/* Slot 179 is reserved */
1.515 +/* Slot 180 is reserved */
1.516 +/* Slot 181 is reserved */
1.517 +/* 182 */
1.518 +EXTERN struct tm * TclpLocaltime _ANSI_ARGS_((TclpTime_t_CONST clock));
1.519 +/* 183 */
1.520 +EXTERN struct tm * TclpGmtime _ANSI_ARGS_((TclpTime_t_CONST clock));
1.521 +/* Slot 184 is reserved */
1.522 +/* Slot 185 is reserved */
1.523 +/* Slot 186 is reserved */
1.524 +/* Slot 187 is reserved */
1.525 +/* Slot 188 is reserved */
1.526 +/* Slot 189 is reserved */
1.527 +/* Slot 190 is reserved */
1.528 +/* Slot 191 is reserved */
1.529 +/* Slot 192 is reserved */
1.530 +/* Slot 193 is reserved */
1.531 +/* Slot 194 is reserved */
1.532 +/* Slot 195 is reserved */
1.533 +/* Slot 196 is reserved */
1.534 +/* Slot 197 is reserved */
1.535 +/* Slot 198 is reserved */
1.536 +/* 199 */
1.537 +EXTERN int TclMatchIsTrivial _ANSI_ARGS_((CONST char * pattern));
1.538 +
1.539 +typedef struct TclIntStubs {
1.540 + int magic;
1.541 + struct TclIntStubHooks *hooks;
1.542 +
1.543 + void *reserved0;
1.544 + int (*tclAccessDeleteProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 1 */
1.545 + int (*tclAccessInsertProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 2 */
1.546 + void (*tclAllocateFreeObjects) _ANSI_ARGS_((void)); /* 3 */
1.547 + void *reserved4;
1.548 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.549 + int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */
1.550 +#endif /* UNIX */
1.551 +#ifdef __WIN32__
1.552 + int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */
1.553 +#endif /* __WIN32__ */
1.554 +#ifdef MAC_TCL
1.555 + void *reserved5;
1.556 +#endif /* MAC_TCL */
1.557 + void (*tclCleanupCommand) _ANSI_ARGS_((Command * cmdPtr)); /* 6 */
1.558 + int (*tclCopyAndCollapse) _ANSI_ARGS_((int count, CONST char * src, char * dst)); /* 7 */
1.559 + int (*tclCopyChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel inChan, Tcl_Channel outChan, int toRead, Tcl_Obj * cmdPtr)); /* 8 */
1.560 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.561 + int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */
1.562 +#endif /* UNIX */
1.563 +#ifdef __WIN32__
1.564 + int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */
1.565 +#endif /* __WIN32__ */
1.566 +#ifdef MAC_TCL
1.567 + void *reserved9;
1.568 +#endif /* MAC_TCL */
1.569 + int (*tclCreateProc) _ANSI_ARGS_((Tcl_Interp * interp, Namespace * nsPtr, CONST char * procName, Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, Proc ** procPtrPtr)); /* 10 */
1.570 + void (*tclDeleteCompiledLocalVars) _ANSI_ARGS_((Interp * iPtr, CallFrame * framePtr)); /* 11 */
1.571 + void (*tclDeleteVars) _ANSI_ARGS_((Interp * iPtr, Tcl_HashTable * tablePtr)); /* 12 */
1.572 + int (*tclDoGlob) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * headPtr, char * tail, Tcl_GlobTypeData * types)); /* 13 */
1.573 + void (*tclDumpMemoryInfo) _ANSI_ARGS_((FILE * outFile)); /* 14 */
1.574 + void *reserved15;
1.575 + void (*tclExprFloatError) _ANSI_ARGS_((Tcl_Interp * interp, double value)); /* 16 */
1.576 + void *reserved17;
1.577 + void *reserved18;
1.578 + void *reserved19;
1.579 + void *reserved20;
1.580 + void *reserved21;
1.581 + int (*tclFindElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int listLength, CONST char ** elementPtr, CONST char ** nextPtr, int * sizePtr, int * bracePtr)); /* 22 */
1.582 + Proc * (*tclFindProc) _ANSI_ARGS_((Interp * iPtr, CONST char * procName)); /* 23 */
1.583 + int (*tclFormatInt) _ANSI_ARGS_((char * buffer, long n)); /* 24 */
1.584 + void (*tclFreePackageInfo) _ANSI_ARGS_((Interp * iPtr)); /* 25 */
1.585 + void *reserved26;
1.586 + int (*tclGetDate) _ANSI_ARGS_((char * p, Tcl_WideInt now, long zone, Tcl_WideInt * timePtr)); /* 27 */
1.587 + Tcl_Channel (*tclpGetDefaultStdChannel) _ANSI_ARGS_((int type)); /* 28 */
1.588 + void *reserved29;
1.589 + void *reserved30;
1.590 + char * (*tclGetExtension) _ANSI_ARGS_((char * name)); /* 31 */
1.591 + int (*tclGetFrame) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, CallFrame ** framePtrPtr)); /* 32 */
1.592 + TclCmdProcType (*tclGetInterpProc) _ANSI_ARGS_((void)); /* 33 */
1.593 + int (*tclGetIntForIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int endValue, int * indexPtr)); /* 34 */
1.594 + void *reserved35;
1.595 + int (*tclGetLong) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, long * longPtr)); /* 36 */
1.596 + int (*tclGetLoadedPackages) _ANSI_ARGS_((Tcl_Interp * interp, char * targetName)); /* 37 */
1.597 + int (*tclGetNamespaceForQualName) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * qualName, Namespace * cxtNsPtr, int flags, Namespace ** nsPtrPtr, Namespace ** altNsPtrPtr, Namespace ** actualCxtPtrPtr, CONST char ** simpleNamePtr)); /* 38 */
1.598 + TclObjCmdProcType (*tclGetObjInterpProc) _ANSI_ARGS_((void)); /* 39 */
1.599 + int (*tclGetOpenMode) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, int * seekFlagPtr)); /* 40 */
1.600 + Tcl_Command (*tclGetOriginalCommand) _ANSI_ARGS_((Tcl_Command command)); /* 41 */
1.601 + char * (*tclpGetUserHome) _ANSI_ARGS_((CONST char * name, Tcl_DString * bufferPtr)); /* 42 */
1.602 + int (*tclGlobalInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags)); /* 43 */
1.603 + int (*tclGuessPackageName) _ANSI_ARGS_((CONST char * fileName, Tcl_DString * bufPtr)); /* 44 */
1.604 + int (*tclHideUnsafeCommands) _ANSI_ARGS_((Tcl_Interp * interp)); /* 45 */
1.605 + int (*tclInExit) _ANSI_ARGS_((void)); /* 46 */
1.606 + void *reserved47;
1.607 + void *reserved48;
1.608 + Tcl_Obj * (*tclIncrVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, long incrAmount, int part1NotParsed)); /* 49 */
1.609 + void (*tclInitCompiledLocals) _ANSI_ARGS_((Tcl_Interp * interp, CallFrame * framePtr, Namespace * nsPtr)); /* 50 */
1.610 + int (*tclInterpInit) _ANSI_ARGS_((Tcl_Interp * interp)); /* 51 */
1.611 + int (*tclInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags)); /* 52 */
1.612 + int (*tclInvokeObjectCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, CONST84 char ** argv)); /* 53 */
1.613 + int (*tclInvokeStringCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 54 */
1.614 + Proc * (*tclIsProc) _ANSI_ARGS_((Command * cmdPtr)); /* 55 */
1.615 + void *reserved56;
1.616 + void *reserved57;
1.617 + Var * (*tclLookupVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, CONST char * msg, int createPart1, int createPart2, Var ** arrayPtrPtr)); /* 58 */
1.618 + void *reserved59;
1.619 + int (*tclNeedSpace) _ANSI_ARGS_((CONST char * start, CONST char * end)); /* 60 */
1.620 + Tcl_Obj * (*tclNewProcBodyObj) _ANSI_ARGS_((Proc * procPtr)); /* 61 */
1.621 + int (*tclObjCommandComplete) _ANSI_ARGS_((Tcl_Obj * cmdPtr)); /* 62 */
1.622 + int (*tclObjInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 63 */
1.623 + int (*tclObjInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 64 */
1.624 + int (*tclObjInvokeGlobal) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 65 */
1.625 + int (*tclOpenFileChannelDeleteProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 66 */
1.626 + int (*tclOpenFileChannelInsertProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 67 */
1.627 + void *reserved68;
1.628 + char * (*tclpAlloc) _ANSI_ARGS_((unsigned int size)); /* 69 */
1.629 + void *reserved70;
1.630 + void *reserved71;
1.631 + void *reserved72;
1.632 + void *reserved73;
1.633 + void (*tclpFree) _ANSI_ARGS_((char * ptr)); /* 74 */
1.634 + unsigned long (*tclpGetClicks) _ANSI_ARGS_((void)); /* 75 */
1.635 + unsigned long (*tclpGetSeconds) _ANSI_ARGS_((void)); /* 76 */
1.636 + void (*tclpGetTime) _ANSI_ARGS_((Tcl_Time * time)); /* 77 */
1.637 + int (*tclpGetTimeZone) _ANSI_ARGS_((Tcl_WideInt time)); /* 78 */
1.638 + void *reserved79;
1.639 + void *reserved80;
1.640 + char * (*tclpRealloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 81 */
1.641 + void *reserved82;
1.642 + void *reserved83;
1.643 + void *reserved84;
1.644 + void *reserved85;
1.645 + void *reserved86;
1.646 + void *reserved87;
1.647 + char * (*tclPrecTraceProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, CONST char * name1, CONST char * name2, int flags)); /* 88 */
1.648 + int (*tclPreventAliasLoop) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Interp * cmdInterp, Tcl_Command cmd)); /* 89 */
1.649 + void *reserved90;
1.650 + void (*tclProcCleanupProc) _ANSI_ARGS_((Proc * procPtr)); /* 91 */
1.651 + int (*tclProcCompileProc) _ANSI_ARGS_((Tcl_Interp * interp, Proc * procPtr, Tcl_Obj * bodyPtr, Namespace * nsPtr, CONST char * description, CONST char * procName)); /* 92 */
1.652 + void (*tclProcDeleteProc) _ANSI_ARGS_((ClientData clientData)); /* 93 */
1.653 + int (*tclProcInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, CONST84 char ** argv)); /* 94 */
1.654 + void *reserved95;
1.655 + int (*tclRenameCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * oldName, char * newName)); /* 96 */
1.656 + void (*tclResetShadowedCmdRefs) _ANSI_ARGS_((Tcl_Interp * interp, Command * newCmdPtr)); /* 97 */
1.657 + int (*tclServiceIdle) _ANSI_ARGS_((void)); /* 98 */
1.658 + void *reserved99;
1.659 + void *reserved100;
1.660 + char * (*tclSetPreInitScript) _ANSI_ARGS_((char * string)); /* 101 */
1.661 + void (*tclSetupEnv) _ANSI_ARGS_((Tcl_Interp * interp)); /* 102 */
1.662 + int (*tclSockGetPort) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char * proto, int * portPtr)); /* 103 */
1.663 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.664 + int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */
1.665 +#endif /* UNIX */
1.666 +#ifdef __WIN32__
1.667 + int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */
1.668 +#endif /* __WIN32__ */
1.669 +#ifdef MAC_TCL
1.670 + void *reserved104;
1.671 +#endif /* MAC_TCL */
1.672 + void *reserved105;
1.673 + int (*tclStatDeleteProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 106 */
1.674 + int (*tclStatInsertProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 107 */
1.675 + void (*tclTeardownNamespace) _ANSI_ARGS_((Namespace * nsPtr)); /* 108 */
1.676 + int (*tclUpdateReturnInfo) _ANSI_ARGS_((Interp * iPtr)); /* 109 */
1.677 + void *reserved110;
1.678 + void (*tcl_AddInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 111 */
1.679 + int (*tcl_AppendExportList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr)); /* 112 */
1.680 + Tcl_Namespace * (*tcl_CreateNamespace) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc)); /* 113 */
1.681 + void (*tcl_DeleteNamespace) _ANSI_ARGS_((Tcl_Namespace * nsPtr)); /* 114 */
1.682 + int (*tcl_Export) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int resetListFirst)); /* 115 */
1.683 + Tcl_Command (*tcl_FindCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 116 */
1.684 + Tcl_Namespace * (*tcl_FindNamespace) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 117 */
1.685 + int (*tcl_GetInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_ResolverInfo * resInfo)); /* 118 */
1.686 + int (*tcl_GetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolverInfo * resInfo)); /* 119 */
1.687 + Tcl_Var (*tcl_FindNamespaceVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 120 */
1.688 + int (*tcl_ForgetImport) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern)); /* 121 */
1.689 + Tcl_Command (*tcl_GetCommandFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 122 */
1.690 + void (*tcl_GetCommandFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command, Tcl_Obj * objPtr)); /* 123 */
1.691 + Tcl_Namespace * (*tcl_GetCurrentNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 124 */
1.692 + Tcl_Namespace * (*tcl_GetGlobalNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 125 */
1.693 + void (*tcl_GetVariableFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Var variable, Tcl_Obj * objPtr)); /* 126 */
1.694 + int (*tcl_Import) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int allowOverwrite)); /* 127 */
1.695 + void (*tcl_PopCallFrame) _ANSI_ARGS_((Tcl_Interp* interp)); /* 128 */
1.696 + int (*tcl_PushCallFrame) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame)); /* 129 */
1.697 + int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 130 */
1.698 + void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 131 */
1.699 + int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 132 */
1.700 + struct tm * (*tclpGetDate) _ANSI_ARGS_((TclpTime_t time, int useGMT)); /* 133 */
1.701 + size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, CONST char * format, CONST struct tm * t, int useGMT)); /* 134 */
1.702 + int (*tclpCheckStackSpace) _ANSI_ARGS_((void)); /* 135 */
1.703 + void *reserved136;
1.704 + void *reserved137;
1.705 + CONST84_RETURN char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name, Tcl_DString * valuePtr)); /* 138 */
1.706 + void *reserved139;
1.707 + int (*tclLooksLikeInt) _ANSI_ARGS_((CONST char * bytes, int length)); /* 140 */
1.708 + CONST84_RETURN char * (*tclpGetCwd) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * cwdPtr)); /* 141 */
1.709 + int (*tclSetByteCodeFromAny) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CompileHookProc * hookProc, ClientData clientData)); /* 142 */
1.710 + int (*tclAddLiteralObj) _ANSI_ARGS_((struct CompileEnv * envPtr, Tcl_Obj * objPtr, LiteralEntry ** litPtrPtr)); /* 143 */
1.711 + void (*tclHideLiteral) _ANSI_ARGS_((Tcl_Interp * interp, struct CompileEnv * envPtr, int index)); /* 144 */
1.712 + struct AuxDataType * (*tclGetAuxDataType) _ANSI_ARGS_((char * typeName)); /* 145 */
1.713 + TclHandle (*tclHandleCreate) _ANSI_ARGS_((VOID * ptr)); /* 146 */
1.714 + void (*tclHandleFree) _ANSI_ARGS_((TclHandle handle)); /* 147 */
1.715 + TclHandle (*tclHandlePreserve) _ANSI_ARGS_((TclHandle handle)); /* 148 */
1.716 + void (*tclHandleRelease) _ANSI_ARGS_((TclHandle handle)); /* 149 */
1.717 + int (*tclRegAbout) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp re)); /* 150 */
1.718 + void (*tclRegExpRangeUniChar) _ANSI_ARGS_((Tcl_RegExp re, int index, int * startPtr, int * endPtr)); /* 151 */
1.719 + void (*tclSetLibraryPath) _ANSI_ARGS_((Tcl_Obj * pathPtr)); /* 152 */
1.720 + Tcl_Obj * (*tclGetLibraryPath) _ANSI_ARGS_((void)); /* 153 */
1.721 + void *reserved154;
1.722 + void *reserved155;
1.723 + void (*tclRegError) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * msg, int status)); /* 156 */
1.724 + Var * (*tclVarTraceExists) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName)); /* 157 */
1.725 + void (*tclSetStartupScriptFileName) _ANSI_ARGS_((CONST char * filename)); /* 158 */
1.726 + CONST84_RETURN char * (*tclGetStartupScriptFileName) _ANSI_ARGS_((void)); /* 159 */
1.727 + void *reserved160;
1.728 + int (*tclChannelTransform) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, Tcl_Obj * cmdObjPtr)); /* 161 */
1.729 + void (*tclChannelEventScriptInvoker) _ANSI_ARGS_((ClientData clientData, int flags)); /* 162 */
1.730 + void * (*tclGetInstructionTable) _ANSI_ARGS_((void)); /* 163 */
1.731 + void (*tclExpandCodeArray) _ANSI_ARGS_((void * envPtr)); /* 164 */
1.732 + void (*tclpSetInitialEncodings) _ANSI_ARGS_((void)); /* 165 */
1.733 + int (*tclListObjSetElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj * valuePtr)); /* 166 */
1.734 + void (*tclSetStartupScriptPath) _ANSI_ARGS_((Tcl_Obj * pathPtr)); /* 167 */
1.735 + Tcl_Obj * (*tclGetStartupScriptPath) _ANSI_ARGS_((void)); /* 168 */
1.736 + int (*tclpUtfNcmp2) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n)); /* 169 */
1.737 + int (*tclCheckInterpTraces) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * command, int numChars, Command * cmdPtr, int result, int traceFlags, int objc, Tcl_Obj *CONST objv[])); /* 170 */
1.738 + int (*tclCheckExecutionTraces) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * command, int numChars, Command * cmdPtr, int result, int traceFlags, int objc, Tcl_Obj *CONST objv[])); /* 171 */
1.739 + int (*tclInThreadExit) _ANSI_ARGS_((void)); /* 172 */
1.740 + int (*tclUniCharMatch) _ANSI_ARGS_((CONST Tcl_UniChar * string, int strLen, CONST Tcl_UniChar * pattern, int ptnLen, int nocase)); /* 173 */
1.741 + void *reserved174;
1.742 + void *reserved175;
1.743 + void *reserved176;
1.744 + void *reserved177;
1.745 + void *reserved178;
1.746 + void *reserved179;
1.747 + void *reserved180;
1.748 + void *reserved181;
1.749 + struct tm * (*tclpLocaltime) _ANSI_ARGS_((TclpTime_t_CONST clock)); /* 182 */
1.750 + struct tm * (*tclpGmtime) _ANSI_ARGS_((TclpTime_t_CONST clock)); /* 183 */
1.751 + void *reserved184;
1.752 + void *reserved185;
1.753 + void *reserved186;
1.754 + void *reserved187;
1.755 + void *reserved188;
1.756 + void *reserved189;
1.757 + void *reserved190;
1.758 + void *reserved191;
1.759 + void *reserved192;
1.760 + void *reserved193;
1.761 + void *reserved194;
1.762 + void *reserved195;
1.763 + void *reserved196;
1.764 + void *reserved197;
1.765 + void *reserved198;
1.766 + int (*tclMatchIsTrivial) _ANSI_ARGS_((CONST char * pattern)); /* 199 */
1.767 +} TclIntStubs;
1.768 +
1.769 +#ifdef __cplusplus
1.770 +extern "C" {
1.771 +#endif
1.772 +extern TclIntStubs *tclIntStubsPtr;
1.773 +#ifdef __cplusplus
1.774 +}
1.775 +#endif
1.776 +
1.777 +#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
1.778 +
1.779 +/*
1.780 + * Inline function declarations:
1.781 + */
1.782 +
1.783 +/* Slot 0 is reserved */
1.784 +#ifndef TclAccessDeleteProc
1.785 +#define TclAccessDeleteProc \
1.786 + (tclIntStubsPtr->tclAccessDeleteProc) /* 1 */
1.787 +#endif
1.788 +#ifndef TclAccessInsertProc
1.789 +#define TclAccessInsertProc \
1.790 + (tclIntStubsPtr->tclAccessInsertProc) /* 2 */
1.791 +#endif
1.792 +#ifndef TclAllocateFreeObjects
1.793 +#define TclAllocateFreeObjects \
1.794 + (tclIntStubsPtr->tclAllocateFreeObjects) /* 3 */
1.795 +#endif
1.796 +/* Slot 4 is reserved */
1.797 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.798 +#ifndef TclCleanupChildren
1.799 +#define TclCleanupChildren \
1.800 + (tclIntStubsPtr->tclCleanupChildren) /* 5 */
1.801 +#endif
1.802 +#endif /* UNIX */
1.803 +#ifdef __WIN32__
1.804 +#ifndef TclCleanupChildren
1.805 +#define TclCleanupChildren \
1.806 + (tclIntStubsPtr->tclCleanupChildren) /* 5 */
1.807 +#endif
1.808 +#endif /* __WIN32__ */
1.809 +#ifndef TclCleanupCommand
1.810 +#define TclCleanupCommand \
1.811 + (tclIntStubsPtr->tclCleanupCommand) /* 6 */
1.812 +#endif
1.813 +#ifndef TclCopyAndCollapse
1.814 +#define TclCopyAndCollapse \
1.815 + (tclIntStubsPtr->tclCopyAndCollapse) /* 7 */
1.816 +#endif
1.817 +#ifndef TclCopyChannel
1.818 +#define TclCopyChannel \
1.819 + (tclIntStubsPtr->tclCopyChannel) /* 8 */
1.820 +#endif
1.821 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.822 +#ifndef TclCreatePipeline
1.823 +#define TclCreatePipeline \
1.824 + (tclIntStubsPtr->tclCreatePipeline) /* 9 */
1.825 +#endif
1.826 +#endif /* UNIX */
1.827 +#ifdef __WIN32__
1.828 +#ifndef TclCreatePipeline
1.829 +#define TclCreatePipeline \
1.830 + (tclIntStubsPtr->tclCreatePipeline) /* 9 */
1.831 +#endif
1.832 +#endif /* __WIN32__ */
1.833 +#ifndef TclCreateProc
1.834 +#define TclCreateProc \
1.835 + (tclIntStubsPtr->tclCreateProc) /* 10 */
1.836 +#endif
1.837 +#ifndef TclDeleteCompiledLocalVars
1.838 +#define TclDeleteCompiledLocalVars \
1.839 + (tclIntStubsPtr->tclDeleteCompiledLocalVars) /* 11 */
1.840 +#endif
1.841 +#ifndef TclDeleteVars
1.842 +#define TclDeleteVars \
1.843 + (tclIntStubsPtr->tclDeleteVars) /* 12 */
1.844 +#endif
1.845 +#ifndef TclDoGlob
1.846 +#define TclDoGlob \
1.847 + (tclIntStubsPtr->tclDoGlob) /* 13 */
1.848 +#endif
1.849 +#ifndef TclDumpMemoryInfo
1.850 +#define TclDumpMemoryInfo \
1.851 + (tclIntStubsPtr->tclDumpMemoryInfo) /* 14 */
1.852 +#endif
1.853 +/* Slot 15 is reserved */
1.854 +#ifndef TclExprFloatError
1.855 +#define TclExprFloatError \
1.856 + (tclIntStubsPtr->tclExprFloatError) /* 16 */
1.857 +#endif
1.858 +/* Slot 17 is reserved */
1.859 +/* Slot 18 is reserved */
1.860 +/* Slot 19 is reserved */
1.861 +/* Slot 20 is reserved */
1.862 +/* Slot 21 is reserved */
1.863 +#ifndef TclFindElement
1.864 +#define TclFindElement \
1.865 + (tclIntStubsPtr->tclFindElement) /* 22 */
1.866 +#endif
1.867 +#ifndef TclFindProc
1.868 +#define TclFindProc \
1.869 + (tclIntStubsPtr->tclFindProc) /* 23 */
1.870 +#endif
1.871 +#ifndef TclFormatInt
1.872 +#define TclFormatInt \
1.873 + (tclIntStubsPtr->tclFormatInt) /* 24 */
1.874 +#endif
1.875 +#ifndef TclFreePackageInfo
1.876 +#define TclFreePackageInfo \
1.877 + (tclIntStubsPtr->tclFreePackageInfo) /* 25 */
1.878 +#endif
1.879 +/* Slot 26 is reserved */
1.880 +#ifndef TclGetDate
1.881 +#define TclGetDate \
1.882 + (tclIntStubsPtr->tclGetDate) /* 27 */
1.883 +#endif
1.884 +#ifndef TclpGetDefaultStdChannel
1.885 +#define TclpGetDefaultStdChannel \
1.886 + (tclIntStubsPtr->tclpGetDefaultStdChannel) /* 28 */
1.887 +#endif
1.888 +/* Slot 29 is reserved */
1.889 +/* Slot 30 is reserved */
1.890 +#ifndef TclGetExtension
1.891 +#define TclGetExtension \
1.892 + (tclIntStubsPtr->tclGetExtension) /* 31 */
1.893 +#endif
1.894 +#ifndef TclGetFrame
1.895 +#define TclGetFrame \
1.896 + (tclIntStubsPtr->tclGetFrame) /* 32 */
1.897 +#endif
1.898 +#ifndef TclGetInterpProc
1.899 +#define TclGetInterpProc \
1.900 + (tclIntStubsPtr->tclGetInterpProc) /* 33 */
1.901 +#endif
1.902 +#ifndef TclGetIntForIndex
1.903 +#define TclGetIntForIndex \
1.904 + (tclIntStubsPtr->tclGetIntForIndex) /* 34 */
1.905 +#endif
1.906 +/* Slot 35 is reserved */
1.907 +#ifndef TclGetLong
1.908 +#define TclGetLong \
1.909 + (tclIntStubsPtr->tclGetLong) /* 36 */
1.910 +#endif
1.911 +#ifndef TclGetLoadedPackages
1.912 +#define TclGetLoadedPackages \
1.913 + (tclIntStubsPtr->tclGetLoadedPackages) /* 37 */
1.914 +#endif
1.915 +#ifndef TclGetNamespaceForQualName
1.916 +#define TclGetNamespaceForQualName \
1.917 + (tclIntStubsPtr->tclGetNamespaceForQualName) /* 38 */
1.918 +#endif
1.919 +#ifndef TclGetObjInterpProc
1.920 +#define TclGetObjInterpProc \
1.921 + (tclIntStubsPtr->tclGetObjInterpProc) /* 39 */
1.922 +#endif
1.923 +#ifndef TclGetOpenMode
1.924 +#define TclGetOpenMode \
1.925 + (tclIntStubsPtr->tclGetOpenMode) /* 40 */
1.926 +#endif
1.927 +#ifndef TclGetOriginalCommand
1.928 +#define TclGetOriginalCommand \
1.929 + (tclIntStubsPtr->tclGetOriginalCommand) /* 41 */
1.930 +#endif
1.931 +#ifndef TclpGetUserHome
1.932 +#define TclpGetUserHome \
1.933 + (tclIntStubsPtr->tclpGetUserHome) /* 42 */
1.934 +#endif
1.935 +#ifndef TclGlobalInvoke
1.936 +#define TclGlobalInvoke \
1.937 + (tclIntStubsPtr->tclGlobalInvoke) /* 43 */
1.938 +#endif
1.939 +#ifndef TclGuessPackageName
1.940 +#define TclGuessPackageName \
1.941 + (tclIntStubsPtr->tclGuessPackageName) /* 44 */
1.942 +#endif
1.943 +#ifndef TclHideUnsafeCommands
1.944 +#define TclHideUnsafeCommands \
1.945 + (tclIntStubsPtr->tclHideUnsafeCommands) /* 45 */
1.946 +#endif
1.947 +#ifndef TclInExit
1.948 +#define TclInExit \
1.949 + (tclIntStubsPtr->tclInExit) /* 46 */
1.950 +#endif
1.951 +/* Slot 47 is reserved */
1.952 +/* Slot 48 is reserved */
1.953 +#ifndef TclIncrVar2
1.954 +#define TclIncrVar2 \
1.955 + (tclIntStubsPtr->tclIncrVar2) /* 49 */
1.956 +#endif
1.957 +#ifndef TclInitCompiledLocals
1.958 +#define TclInitCompiledLocals \
1.959 + (tclIntStubsPtr->tclInitCompiledLocals) /* 50 */
1.960 +#endif
1.961 +#ifndef TclInterpInit
1.962 +#define TclInterpInit \
1.963 + (tclIntStubsPtr->tclInterpInit) /* 51 */
1.964 +#endif
1.965 +#ifndef TclInvoke
1.966 +#define TclInvoke \
1.967 + (tclIntStubsPtr->tclInvoke) /* 52 */
1.968 +#endif
1.969 +#ifndef TclInvokeObjectCommand
1.970 +#define TclInvokeObjectCommand \
1.971 + (tclIntStubsPtr->tclInvokeObjectCommand) /* 53 */
1.972 +#endif
1.973 +#ifndef TclInvokeStringCommand
1.974 +#define TclInvokeStringCommand \
1.975 + (tclIntStubsPtr->tclInvokeStringCommand) /* 54 */
1.976 +#endif
1.977 +#ifndef TclIsProc
1.978 +#define TclIsProc \
1.979 + (tclIntStubsPtr->tclIsProc) /* 55 */
1.980 +#endif
1.981 +/* Slot 56 is reserved */
1.982 +/* Slot 57 is reserved */
1.983 +#ifndef TclLookupVar
1.984 +#define TclLookupVar \
1.985 + (tclIntStubsPtr->tclLookupVar) /* 58 */
1.986 +#endif
1.987 +/* Slot 59 is reserved */
1.988 +#ifndef TclNeedSpace
1.989 +#define TclNeedSpace \
1.990 + (tclIntStubsPtr->tclNeedSpace) /* 60 */
1.991 +#endif
1.992 +#ifndef TclNewProcBodyObj
1.993 +#define TclNewProcBodyObj \
1.994 + (tclIntStubsPtr->tclNewProcBodyObj) /* 61 */
1.995 +#endif
1.996 +#ifndef TclObjCommandComplete
1.997 +#define TclObjCommandComplete \
1.998 + (tclIntStubsPtr->tclObjCommandComplete) /* 62 */
1.999 +#endif
1.1000 +#ifndef TclObjInterpProc
1.1001 +#define TclObjInterpProc \
1.1002 + (tclIntStubsPtr->tclObjInterpProc) /* 63 */
1.1003 +#endif
1.1004 +#ifndef TclObjInvoke
1.1005 +#define TclObjInvoke \
1.1006 + (tclIntStubsPtr->tclObjInvoke) /* 64 */
1.1007 +#endif
1.1008 +#ifndef TclObjInvokeGlobal
1.1009 +#define TclObjInvokeGlobal \
1.1010 + (tclIntStubsPtr->tclObjInvokeGlobal) /* 65 */
1.1011 +#endif
1.1012 +#ifndef TclOpenFileChannelDeleteProc
1.1013 +#define TclOpenFileChannelDeleteProc \
1.1014 + (tclIntStubsPtr->tclOpenFileChannelDeleteProc) /* 66 */
1.1015 +#endif
1.1016 +#ifndef TclOpenFileChannelInsertProc
1.1017 +#define TclOpenFileChannelInsertProc \
1.1018 + (tclIntStubsPtr->tclOpenFileChannelInsertProc) /* 67 */
1.1019 +#endif
1.1020 +/* Slot 68 is reserved */
1.1021 +#ifndef TclpAlloc
1.1022 +#define TclpAlloc \
1.1023 + (tclIntStubsPtr->tclpAlloc) /* 69 */
1.1024 +#endif
1.1025 +/* Slot 70 is reserved */
1.1026 +/* Slot 71 is reserved */
1.1027 +/* Slot 72 is reserved */
1.1028 +/* Slot 73 is reserved */
1.1029 +#ifndef TclpFree
1.1030 +#define TclpFree \
1.1031 + (tclIntStubsPtr->tclpFree) /* 74 */
1.1032 +#endif
1.1033 +#ifndef TclpGetClicks
1.1034 +#define TclpGetClicks \
1.1035 + (tclIntStubsPtr->tclpGetClicks) /* 75 */
1.1036 +#endif
1.1037 +#ifndef TclpGetSeconds
1.1038 +#define TclpGetSeconds \
1.1039 + (tclIntStubsPtr->tclpGetSeconds) /* 76 */
1.1040 +#endif
1.1041 +#ifndef TclpGetTime
1.1042 +#define TclpGetTime \
1.1043 + (tclIntStubsPtr->tclpGetTime) /* 77 */
1.1044 +#endif
1.1045 +#ifndef TclpGetTimeZone
1.1046 +#define TclpGetTimeZone \
1.1047 + (tclIntStubsPtr->tclpGetTimeZone) /* 78 */
1.1048 +#endif
1.1049 +/* Slot 79 is reserved */
1.1050 +/* Slot 80 is reserved */
1.1051 +#ifndef TclpRealloc
1.1052 +#define TclpRealloc \
1.1053 + (tclIntStubsPtr->tclpRealloc) /* 81 */
1.1054 +#endif
1.1055 +/* Slot 82 is reserved */
1.1056 +/* Slot 83 is reserved */
1.1057 +/* Slot 84 is reserved */
1.1058 +/* Slot 85 is reserved */
1.1059 +/* Slot 86 is reserved */
1.1060 +/* Slot 87 is reserved */
1.1061 +#ifndef TclPrecTraceProc
1.1062 +#define TclPrecTraceProc \
1.1063 + (tclIntStubsPtr->tclPrecTraceProc) /* 88 */
1.1064 +#endif
1.1065 +#ifndef TclPreventAliasLoop
1.1066 +#define TclPreventAliasLoop \
1.1067 + (tclIntStubsPtr->tclPreventAliasLoop) /* 89 */
1.1068 +#endif
1.1069 +/* Slot 90 is reserved */
1.1070 +#ifndef TclProcCleanupProc
1.1071 +#define TclProcCleanupProc \
1.1072 + (tclIntStubsPtr->tclProcCleanupProc) /* 91 */
1.1073 +#endif
1.1074 +#ifndef TclProcCompileProc
1.1075 +#define TclProcCompileProc \
1.1076 + (tclIntStubsPtr->tclProcCompileProc) /* 92 */
1.1077 +#endif
1.1078 +#ifndef TclProcDeleteProc
1.1079 +#define TclProcDeleteProc \
1.1080 + (tclIntStubsPtr->tclProcDeleteProc) /* 93 */
1.1081 +#endif
1.1082 +#ifndef TclProcInterpProc
1.1083 +#define TclProcInterpProc \
1.1084 + (tclIntStubsPtr->tclProcInterpProc) /* 94 */
1.1085 +#endif
1.1086 +/* Slot 95 is reserved */
1.1087 +#ifndef TclRenameCommand
1.1088 +#define TclRenameCommand \
1.1089 + (tclIntStubsPtr->tclRenameCommand) /* 96 */
1.1090 +#endif
1.1091 +#ifndef TclResetShadowedCmdRefs
1.1092 +#define TclResetShadowedCmdRefs \
1.1093 + (tclIntStubsPtr->tclResetShadowedCmdRefs) /* 97 */
1.1094 +#endif
1.1095 +#ifndef TclServiceIdle
1.1096 +#define TclServiceIdle \
1.1097 + (tclIntStubsPtr->tclServiceIdle) /* 98 */
1.1098 +#endif
1.1099 +/* Slot 99 is reserved */
1.1100 +/* Slot 100 is reserved */
1.1101 +#ifndef TclSetPreInitScript
1.1102 +#define TclSetPreInitScript \
1.1103 + (tclIntStubsPtr->tclSetPreInitScript) /* 101 */
1.1104 +#endif
1.1105 +#ifndef TclSetupEnv
1.1106 +#define TclSetupEnv \
1.1107 + (tclIntStubsPtr->tclSetupEnv) /* 102 */
1.1108 +#endif
1.1109 +#ifndef TclSockGetPort
1.1110 +#define TclSockGetPort \
1.1111 + (tclIntStubsPtr->tclSockGetPort) /* 103 */
1.1112 +#endif
1.1113 +#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1.1114 +#ifndef TclSockMinimumBuffers
1.1115 +#define TclSockMinimumBuffers \
1.1116 + (tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
1.1117 +#endif
1.1118 +#endif /* UNIX */
1.1119 +#ifdef __WIN32__
1.1120 +#ifndef TclSockMinimumBuffers
1.1121 +#define TclSockMinimumBuffers \
1.1122 + (tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
1.1123 +#endif
1.1124 +#endif /* __WIN32__ */
1.1125 +/* Slot 105 is reserved */
1.1126 +#ifndef TclStatDeleteProc
1.1127 +#define TclStatDeleteProc \
1.1128 + (tclIntStubsPtr->tclStatDeleteProc) /* 106 */
1.1129 +#endif
1.1130 +#ifndef TclStatInsertProc
1.1131 +#define TclStatInsertProc \
1.1132 + (tclIntStubsPtr->tclStatInsertProc) /* 107 */
1.1133 +#endif
1.1134 +#ifndef TclTeardownNamespace
1.1135 +#define TclTeardownNamespace \
1.1136 + (tclIntStubsPtr->tclTeardownNamespace) /* 108 */
1.1137 +#endif
1.1138 +#ifndef TclUpdateReturnInfo
1.1139 +#define TclUpdateReturnInfo \
1.1140 + (tclIntStubsPtr->tclUpdateReturnInfo) /* 109 */
1.1141 +#endif
1.1142 +/* Slot 110 is reserved */
1.1143 +#ifndef Tcl_AddInterpResolvers
1.1144 +#define Tcl_AddInterpResolvers \
1.1145 + (tclIntStubsPtr->tcl_AddInterpResolvers) /* 111 */
1.1146 +#endif
1.1147 +#ifndef Tcl_AppendExportList
1.1148 +#define Tcl_AppendExportList \
1.1149 + (tclIntStubsPtr->tcl_AppendExportList) /* 112 */
1.1150 +#endif
1.1151 +#ifndef Tcl_CreateNamespace
1.1152 +#define Tcl_CreateNamespace \
1.1153 + (tclIntStubsPtr->tcl_CreateNamespace) /* 113 */
1.1154 +#endif
1.1155 +#ifndef Tcl_DeleteNamespace
1.1156 +#define Tcl_DeleteNamespace \
1.1157 + (tclIntStubsPtr->tcl_DeleteNamespace) /* 114 */
1.1158 +#endif
1.1159 +#ifndef Tcl_Export
1.1160 +#define Tcl_Export \
1.1161 + (tclIntStubsPtr->tcl_Export) /* 115 */
1.1162 +#endif
1.1163 +#ifndef Tcl_FindCommand
1.1164 +#define Tcl_FindCommand \
1.1165 + (tclIntStubsPtr->tcl_FindCommand) /* 116 */
1.1166 +#endif
1.1167 +#ifndef Tcl_FindNamespace
1.1168 +#define Tcl_FindNamespace \
1.1169 + (tclIntStubsPtr->tcl_FindNamespace) /* 117 */
1.1170 +#endif
1.1171 +#ifndef Tcl_GetInterpResolvers
1.1172 +#define Tcl_GetInterpResolvers \
1.1173 + (tclIntStubsPtr->tcl_GetInterpResolvers) /* 118 */
1.1174 +#endif
1.1175 +#ifndef Tcl_GetNamespaceResolvers
1.1176 +#define Tcl_GetNamespaceResolvers \
1.1177 + (tclIntStubsPtr->tcl_GetNamespaceResolvers) /* 119 */
1.1178 +#endif
1.1179 +#ifndef Tcl_FindNamespaceVar
1.1180 +#define Tcl_FindNamespaceVar \
1.1181 + (tclIntStubsPtr->tcl_FindNamespaceVar) /* 120 */
1.1182 +#endif
1.1183 +#ifndef Tcl_ForgetImport
1.1184 +#define Tcl_ForgetImport \
1.1185 + (tclIntStubsPtr->tcl_ForgetImport) /* 121 */
1.1186 +#endif
1.1187 +#ifndef Tcl_GetCommandFromObj
1.1188 +#define Tcl_GetCommandFromObj \
1.1189 + (tclIntStubsPtr->tcl_GetCommandFromObj) /* 122 */
1.1190 +#endif
1.1191 +#ifndef Tcl_GetCommandFullName
1.1192 +#define Tcl_GetCommandFullName \
1.1193 + (tclIntStubsPtr->tcl_GetCommandFullName) /* 123 */
1.1194 +#endif
1.1195 +#ifndef Tcl_GetCurrentNamespace
1.1196 +#define Tcl_GetCurrentNamespace \
1.1197 + (tclIntStubsPtr->tcl_GetCurrentNamespace) /* 124 */
1.1198 +#endif
1.1199 +#ifndef Tcl_GetGlobalNamespace
1.1200 +#define Tcl_GetGlobalNamespace \
1.1201 + (tclIntStubsPtr->tcl_GetGlobalNamespace) /* 125 */
1.1202 +#endif
1.1203 +#ifndef Tcl_GetVariableFullName
1.1204 +#define Tcl_GetVariableFullName \
1.1205 + (tclIntStubsPtr->tcl_GetVariableFullName) /* 126 */
1.1206 +#endif
1.1207 +#ifndef Tcl_Import
1.1208 +#define Tcl_Import \
1.1209 + (tclIntStubsPtr->tcl_Import) /* 127 */
1.1210 +#endif
1.1211 +#ifndef Tcl_PopCallFrame
1.1212 +#define Tcl_PopCallFrame \
1.1213 + (tclIntStubsPtr->tcl_PopCallFrame) /* 128 */
1.1214 +#endif
1.1215 +#ifndef Tcl_PushCallFrame
1.1216 +#define Tcl_PushCallFrame \
1.1217 + (tclIntStubsPtr->tcl_PushCallFrame) /* 129 */
1.1218 +#endif
1.1219 +#ifndef Tcl_RemoveInterpResolvers
1.1220 +#define Tcl_RemoveInterpResolvers \
1.1221 + (tclIntStubsPtr->tcl_RemoveInterpResolvers) /* 130 */
1.1222 +#endif
1.1223 +#ifndef Tcl_SetNamespaceResolvers
1.1224 +#define Tcl_SetNamespaceResolvers \
1.1225 + (tclIntStubsPtr->tcl_SetNamespaceResolvers) /* 131 */
1.1226 +#endif
1.1227 +#ifndef TclpHasSockets
1.1228 +#define TclpHasSockets \
1.1229 + (tclIntStubsPtr->tclpHasSockets) /* 132 */
1.1230 +#endif
1.1231 +#ifndef TclpGetDate
1.1232 +#define TclpGetDate \
1.1233 + (tclIntStubsPtr->tclpGetDate) /* 133 */
1.1234 +#endif
1.1235 +#ifndef TclpStrftime
1.1236 +#define TclpStrftime \
1.1237 + (tclIntStubsPtr->tclpStrftime) /* 134 */
1.1238 +#endif
1.1239 +#ifndef TclpCheckStackSpace
1.1240 +#define TclpCheckStackSpace \
1.1241 + (tclIntStubsPtr->tclpCheckStackSpace) /* 135 */
1.1242 +#endif
1.1243 +/* Slot 136 is reserved */
1.1244 +/* Slot 137 is reserved */
1.1245 +#ifndef TclGetEnv
1.1246 +#define TclGetEnv \
1.1247 + (tclIntStubsPtr->tclGetEnv) /* 138 */
1.1248 +#endif
1.1249 +/* Slot 139 is reserved */
1.1250 +#ifndef TclLooksLikeInt
1.1251 +#define TclLooksLikeInt \
1.1252 + (tclIntStubsPtr->tclLooksLikeInt) /* 140 */
1.1253 +#endif
1.1254 +#ifndef TclpGetCwd
1.1255 +#define TclpGetCwd \
1.1256 + (tclIntStubsPtr->tclpGetCwd) /* 141 */
1.1257 +#endif
1.1258 +#ifndef TclSetByteCodeFromAny
1.1259 +#define TclSetByteCodeFromAny \
1.1260 + (tclIntStubsPtr->tclSetByteCodeFromAny) /* 142 */
1.1261 +#endif
1.1262 +#ifndef TclAddLiteralObj
1.1263 +#define TclAddLiteralObj \
1.1264 + (tclIntStubsPtr->tclAddLiteralObj) /* 143 */
1.1265 +#endif
1.1266 +#ifndef TclHideLiteral
1.1267 +#define TclHideLiteral \
1.1268 + (tclIntStubsPtr->tclHideLiteral) /* 144 */
1.1269 +#endif
1.1270 +#ifndef TclGetAuxDataType
1.1271 +#define TclGetAuxDataType \
1.1272 + (tclIntStubsPtr->tclGetAuxDataType) /* 145 */
1.1273 +#endif
1.1274 +#ifndef TclHandleCreate
1.1275 +#define TclHandleCreate \
1.1276 + (tclIntStubsPtr->tclHandleCreate) /* 146 */
1.1277 +#endif
1.1278 +#ifndef TclHandleFree
1.1279 +#define TclHandleFree \
1.1280 + (tclIntStubsPtr->tclHandleFree) /* 147 */
1.1281 +#endif
1.1282 +#ifndef TclHandlePreserve
1.1283 +#define TclHandlePreserve \
1.1284 + (tclIntStubsPtr->tclHandlePreserve) /* 148 */
1.1285 +#endif
1.1286 +#ifndef TclHandleRelease
1.1287 +#define TclHandleRelease \
1.1288 + (tclIntStubsPtr->tclHandleRelease) /* 149 */
1.1289 +#endif
1.1290 +#ifndef TclRegAbout
1.1291 +#define TclRegAbout \
1.1292 + (tclIntStubsPtr->tclRegAbout) /* 150 */
1.1293 +#endif
1.1294 +#ifndef TclRegExpRangeUniChar
1.1295 +#define TclRegExpRangeUniChar \
1.1296 + (tclIntStubsPtr->tclRegExpRangeUniChar) /* 151 */
1.1297 +#endif
1.1298 +#ifndef TclSetLibraryPath
1.1299 +#define TclSetLibraryPath \
1.1300 + (tclIntStubsPtr->tclSetLibraryPath) /* 152 */
1.1301 +#endif
1.1302 +#ifndef TclGetLibraryPath
1.1303 +#define TclGetLibraryPath \
1.1304 + (tclIntStubsPtr->tclGetLibraryPath) /* 153 */
1.1305 +#endif
1.1306 +/* Slot 154 is reserved */
1.1307 +/* Slot 155 is reserved */
1.1308 +#ifndef TclRegError
1.1309 +#define TclRegError \
1.1310 + (tclIntStubsPtr->tclRegError) /* 156 */
1.1311 +#endif
1.1312 +#ifndef TclVarTraceExists
1.1313 +#define TclVarTraceExists \
1.1314 + (tclIntStubsPtr->tclVarTraceExists) /* 157 */
1.1315 +#endif
1.1316 +#ifndef TclSetStartupScriptFileName
1.1317 +#define TclSetStartupScriptFileName \
1.1318 + (tclIntStubsPtr->tclSetStartupScriptFileName) /* 158 */
1.1319 +#endif
1.1320 +#ifndef TclGetStartupScriptFileName
1.1321 +#define TclGetStartupScriptFileName \
1.1322 + (tclIntStubsPtr->tclGetStartupScriptFileName) /* 159 */
1.1323 +#endif
1.1324 +/* Slot 160 is reserved */
1.1325 +#ifndef TclChannelTransform
1.1326 +#define TclChannelTransform \
1.1327 + (tclIntStubsPtr->tclChannelTransform) /* 161 */
1.1328 +#endif
1.1329 +#ifndef TclChannelEventScriptInvoker
1.1330 +#define TclChannelEventScriptInvoker \
1.1331 + (tclIntStubsPtr->tclChannelEventScriptInvoker) /* 162 */
1.1332 +#endif
1.1333 +#ifndef TclGetInstructionTable
1.1334 +#define TclGetInstructionTable \
1.1335 + (tclIntStubsPtr->tclGetInstructionTable) /* 163 */
1.1336 +#endif
1.1337 +#ifndef TclExpandCodeArray
1.1338 +#define TclExpandCodeArray \
1.1339 + (tclIntStubsPtr->tclExpandCodeArray) /* 164 */
1.1340 +#endif
1.1341 +#ifndef TclpSetInitialEncodings
1.1342 +#define TclpSetInitialEncodings \
1.1343 + (tclIntStubsPtr->tclpSetInitialEncodings) /* 165 */
1.1344 +#endif
1.1345 +#ifndef TclListObjSetElement
1.1346 +#define TclListObjSetElement \
1.1347 + (tclIntStubsPtr->tclListObjSetElement) /* 166 */
1.1348 +#endif
1.1349 +#ifndef TclSetStartupScriptPath
1.1350 +#define TclSetStartupScriptPath \
1.1351 + (tclIntStubsPtr->tclSetStartupScriptPath) /* 167 */
1.1352 +#endif
1.1353 +#ifndef TclGetStartupScriptPath
1.1354 +#define TclGetStartupScriptPath \
1.1355 + (tclIntStubsPtr->tclGetStartupScriptPath) /* 168 */
1.1356 +#endif
1.1357 +#ifndef TclpUtfNcmp2
1.1358 +#define TclpUtfNcmp2 \
1.1359 + (tclIntStubsPtr->tclpUtfNcmp2) /* 169 */
1.1360 +#endif
1.1361 +#ifndef TclCheckInterpTraces
1.1362 +#define TclCheckInterpTraces \
1.1363 + (tclIntStubsPtr->tclCheckInterpTraces) /* 170 */
1.1364 +#endif
1.1365 +#ifndef TclCheckExecutionTraces
1.1366 +#define TclCheckExecutionTraces \
1.1367 + (tclIntStubsPtr->tclCheckExecutionTraces) /* 171 */
1.1368 +#endif
1.1369 +#ifndef TclInThreadExit
1.1370 +#define TclInThreadExit \
1.1371 + (tclIntStubsPtr->tclInThreadExit) /* 172 */
1.1372 +#endif
1.1373 +#ifndef TclUniCharMatch
1.1374 +#define TclUniCharMatch \
1.1375 + (tclIntStubsPtr->tclUniCharMatch) /* 173 */
1.1376 +#endif
1.1377 +/* Slot 174 is reserved */
1.1378 +/* Slot 175 is reserved */
1.1379 +/* Slot 176 is reserved */
1.1380 +/* Slot 177 is reserved */
1.1381 +/* Slot 178 is reserved */
1.1382 +/* Slot 179 is reserved */
1.1383 +/* Slot 180 is reserved */
1.1384 +/* Slot 181 is reserved */
1.1385 +#ifndef TclpLocaltime
1.1386 +#define TclpLocaltime \
1.1387 + (tclIntStubsPtr->tclpLocaltime) /* 182 */
1.1388 +#endif
1.1389 +#ifndef TclpGmtime
1.1390 +#define TclpGmtime \
1.1391 + (tclIntStubsPtr->tclpGmtime) /* 183 */
1.1392 +#endif
1.1393 +/* Slot 184 is reserved */
1.1394 +/* Slot 185 is reserved */
1.1395 +/* Slot 186 is reserved */
1.1396 +/* Slot 187 is reserved */
1.1397 +/* Slot 188 is reserved */
1.1398 +/* Slot 189 is reserved */
1.1399 +/* Slot 190 is reserved */
1.1400 +/* Slot 191 is reserved */
1.1401 +/* Slot 192 is reserved */
1.1402 +/* Slot 193 is reserved */
1.1403 +/* Slot 194 is reserved */
1.1404 +/* Slot 195 is reserved */
1.1405 +/* Slot 196 is reserved */
1.1406 +/* Slot 197 is reserved */
1.1407 +/* Slot 198 is reserved */
1.1408 +#ifndef TclMatchIsTrivial
1.1409 +#define TclMatchIsTrivial \
1.1410 + (tclIntStubsPtr->tclMatchIsTrivial) /* 199 */
1.1411 +#endif
1.1412 +
1.1413 +#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
1.1414 +
1.1415 +/* !END!: Do not edit above this line. */
1.1416 +
1.1417 +#endif /* _TCLINTDECLS */