os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/generic/tclIntDecls.h
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
     1 /*
     2  * tclIntDecls.h --
     3  *
     4  *	This file contains the declarations for all unsupported
     5  *	functions that are exported by the Tcl library.  These
     6  *	interfaces are not guaranteed to remain the same between
     7  *	versions.  Use at your own risk.
     8  *
     9  * Copyright (c) 1998-1999 by Scriptics Corporation.
    10  *
    11  * See the file "license.terms" for information on usage and redistribution
    12  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
    13  *
    14  * RCS: @(#) $Id: tclIntDecls.h,v 1.49.2.9 2007/04/21 19:52:14 kennykb Exp $
    15  */
    16 
    17 #ifndef _TCLINTDECLS
    18 #define _TCLINTDECLS
    19 
    20 /*
    21  * WARNING: This file is automatically generated by the tools/genStubs.tcl
    22  * script.  Any modifications to the function declarations below should be made
    23  * in the generic/tclInt.decls script.
    24  */
    25 
    26 /* !BEGIN!: Do not edit below this line. */
    27 
    28 /*
    29  * Exported function declarations:
    30  */
    31 
    32 /* Slot 0 is reserved */
    33 /* 1 */
    34 EXTERN int		TclAccessDeleteProc _ANSI_ARGS_((
    35 				TclAccessProc_ * proc));
    36 /* 2 */
    37 EXTERN int		TclAccessInsertProc _ANSI_ARGS_((
    38 				TclAccessProc_ * proc));
    39 /* 3 */
    40 EXTERN void		TclAllocateFreeObjects _ANSI_ARGS_((void));
    41 /* Slot 4 is reserved */
    42 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
    43 /* 5 */
    44 EXTERN int		TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp, 
    45 				int numPids, Tcl_Pid * pidPtr, 
    46 				Tcl_Channel errorChan));
    47 #endif /* UNIX */
    48 #ifdef __WIN32__
    49 /* 5 */
    50 EXTERN int		TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp, 
    51 				int numPids, Tcl_Pid * pidPtr, 
    52 				Tcl_Channel errorChan));
    53 #endif /* __WIN32__ */
    54 /* 6 */
    55 EXTERN void		TclCleanupCommand _ANSI_ARGS_((Command * cmdPtr));
    56 /* 7 */
    57 EXTERN int		TclCopyAndCollapse _ANSI_ARGS_((int count, 
    58 				CONST char * src, char * dst));
    59 /* 8 */
    60 EXTERN int		TclCopyChannel _ANSI_ARGS_((Tcl_Interp * interp, 
    61 				Tcl_Channel inChan, Tcl_Channel outChan, 
    62 				int toRead, Tcl_Obj * cmdPtr));
    63 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
    64 /* 9 */
    65 EXTERN int		TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp, 
    66 				int argc, CONST char ** argv, 
    67 				Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, 
    68 				TclFile * outPipePtr, TclFile * errFilePtr));
    69 #endif /* UNIX */
    70 #ifdef __WIN32__
    71 /* 9 */
    72 EXTERN int		TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp, 
    73 				int argc, CONST char ** argv, 
    74 				Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, 
    75 				TclFile * outPipePtr, TclFile * errFilePtr));
    76 #endif /* __WIN32__ */
    77 /* 10 */
    78 EXTERN int		TclCreateProc _ANSI_ARGS_((Tcl_Interp * interp, 
    79 				Namespace * nsPtr, CONST char * procName, 
    80 				Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, 
    81 				Proc ** procPtrPtr));
    82 /* 11 */
    83 EXTERN void		TclDeleteCompiledLocalVars _ANSI_ARGS_((
    84 				Interp * iPtr, CallFrame * framePtr));
    85 /* 12 */
    86 EXTERN void		TclDeleteVars _ANSI_ARGS_((Interp * iPtr, 
    87 				Tcl_HashTable * tablePtr));
    88 /* 13 */
    89 EXTERN int		TclDoGlob _ANSI_ARGS_((Tcl_Interp * interp, 
    90 				char * separators, Tcl_DString * headPtr, 
    91 				char * tail, Tcl_GlobTypeData * types));
    92 /* 14 */
    93 EXTERN void		TclDumpMemoryInfo _ANSI_ARGS_((FILE * outFile));
    94 /* Slot 15 is reserved */
    95 /* 16 */
    96 EXTERN void		TclExprFloatError _ANSI_ARGS_((Tcl_Interp * interp, 
    97 				double value));
    98 /* Slot 17 is reserved */
    99 /* Slot 18 is reserved */
   100 /* Slot 19 is reserved */
   101 /* Slot 20 is reserved */
   102 /* Slot 21 is reserved */
   103 /* 22 */
   104 EXTERN int		TclFindElement _ANSI_ARGS_((Tcl_Interp * interp, 
   105 				CONST char * listStr, int listLength, 
   106 				CONST char ** elementPtr, 
   107 				CONST char ** nextPtr, int * sizePtr, 
   108 				int * bracePtr));
   109 /* 23 */
   110 EXTERN Proc *		TclFindProc _ANSI_ARGS_((Interp * iPtr, 
   111 				CONST char * procName));
   112 /* 24 */
   113 EXTERN int		TclFormatInt _ANSI_ARGS_((char * buffer, long n));
   114 /* 25 */
   115 EXTERN void		TclFreePackageInfo _ANSI_ARGS_((Interp * iPtr));
   116 /* Slot 26 is reserved */
   117 /* 27 */
   118 EXTERN int		TclGetDate _ANSI_ARGS_((char * p, Tcl_WideInt now, 
   119 				long zone, Tcl_WideInt * timePtr));
   120 /* 28 */
   121 EXTERN Tcl_Channel	TclpGetDefaultStdChannel _ANSI_ARGS_((int type));
   122 /* Slot 29 is reserved */
   123 /* Slot 30 is reserved */
   124 /* 31 */
   125 EXTERN char *		TclGetExtension _ANSI_ARGS_((char * name));
   126 /* 32 */
   127 EXTERN int		TclGetFrame _ANSI_ARGS_((Tcl_Interp * interp, 
   128 				CONST char * str, CallFrame ** framePtrPtr));
   129 /* 33 */
   130 EXTERN TclCmdProcType	TclGetInterpProc _ANSI_ARGS_((void));
   131 /* 34 */
   132 EXTERN int		TclGetIntForIndex _ANSI_ARGS_((Tcl_Interp * interp, 
   133 				Tcl_Obj * objPtr, int endValue, 
   134 				int * indexPtr));
   135 /* Slot 35 is reserved */
   136 /* 36 */
   137 EXTERN int		TclGetLong _ANSI_ARGS_((Tcl_Interp * interp, 
   138 				CONST char * str, long * longPtr));
   139 /* 37 */
   140 EXTERN int		TclGetLoadedPackages _ANSI_ARGS_((
   141 				Tcl_Interp * interp, char * targetName));
   142 /* 38 */
   143 EXTERN int		TclGetNamespaceForQualName _ANSI_ARGS_((
   144 				Tcl_Interp * interp, CONST char * qualName, 
   145 				Namespace * cxtNsPtr, int flags, 
   146 				Namespace ** nsPtrPtr, 
   147 				Namespace ** altNsPtrPtr, 
   148 				Namespace ** actualCxtPtrPtr, 
   149 				CONST char ** simpleNamePtr));
   150 /* 39 */
   151 EXTERN TclObjCmdProcType TclGetObjInterpProc _ANSI_ARGS_((void));
   152 /* 40 */
   153 EXTERN int		TclGetOpenMode _ANSI_ARGS_((Tcl_Interp * interp, 
   154 				CONST char * str, int * seekFlagPtr));
   155 /* 41 */
   156 EXTERN Tcl_Command	TclGetOriginalCommand _ANSI_ARGS_((
   157 				Tcl_Command command));
   158 /* 42 */
   159 EXTERN char *		TclpGetUserHome _ANSI_ARGS_((CONST char * name, 
   160 				Tcl_DString * bufferPtr));
   161 /* 43 */
   162 EXTERN int		TclGlobalInvoke _ANSI_ARGS_((Tcl_Interp * interp, 
   163 				int argc, CONST84 char ** argv, int flags));
   164 /* 44 */
   165 EXTERN int		TclGuessPackageName _ANSI_ARGS_((
   166 				CONST char * fileName, Tcl_DString * bufPtr));
   167 /* 45 */
   168 EXTERN int		TclHideUnsafeCommands _ANSI_ARGS_((
   169 				Tcl_Interp * interp));
   170 /* 46 */
   171 EXTERN int		TclInExit _ANSI_ARGS_((void));
   172 /* Slot 47 is reserved */
   173 /* Slot 48 is reserved */
   174 /* 49 */
   175 EXTERN Tcl_Obj *	TclIncrVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
   176 				Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, 
   177 				long incrAmount, int part1NotParsed));
   178 /* 50 */
   179 EXTERN void		TclInitCompiledLocals _ANSI_ARGS_((
   180 				Tcl_Interp * interp, CallFrame * framePtr, 
   181 				Namespace * nsPtr));
   182 /* 51 */
   183 EXTERN int		TclInterpInit _ANSI_ARGS_((Tcl_Interp * interp));
   184 /* 52 */
   185 EXTERN int		TclInvoke _ANSI_ARGS_((Tcl_Interp * interp, int argc, 
   186 				CONST84 char ** argv, int flags));
   187 /* 53 */
   188 EXTERN int		TclInvokeObjectCommand _ANSI_ARGS_((
   189 				ClientData clientData, Tcl_Interp * interp, 
   190 				int argc, CONST84 char ** argv));
   191 /* 54 */
   192 EXTERN int		TclInvokeStringCommand _ANSI_ARGS_((
   193 				ClientData clientData, Tcl_Interp * interp, 
   194 				int objc, Tcl_Obj *CONST objv[]));
   195 /* 55 */
   196 EXTERN Proc *		TclIsProc _ANSI_ARGS_((Command * cmdPtr));
   197 /* Slot 56 is reserved */
   198 /* Slot 57 is reserved */
   199 /* 58 */
   200 EXTERN Var *		TclLookupVar _ANSI_ARGS_((Tcl_Interp * interp, 
   201 				CONST char * part1, CONST char * part2, 
   202 				int flags, CONST char * msg, int createPart1, 
   203 				int createPart2, Var ** arrayPtrPtr));
   204 /* Slot 59 is reserved */
   205 /* 60 */
   206 EXTERN int		TclNeedSpace _ANSI_ARGS_((CONST char * start, 
   207 				CONST char * end));
   208 /* 61 */
   209 EXTERN Tcl_Obj *	TclNewProcBodyObj _ANSI_ARGS_((Proc * procPtr));
   210 /* 62 */
   211 EXTERN int		TclObjCommandComplete _ANSI_ARGS_((Tcl_Obj * cmdPtr));
   212 /* 63 */
   213 EXTERN int		TclObjInterpProc _ANSI_ARGS_((ClientData clientData, 
   214 				Tcl_Interp * interp, int objc, 
   215 				Tcl_Obj *CONST objv[]));
   216 /* 64 */
   217 EXTERN int		TclObjInvoke _ANSI_ARGS_((Tcl_Interp * interp, 
   218 				int objc, Tcl_Obj *CONST objv[], int flags));
   219 /* 65 */
   220 EXTERN int		TclObjInvokeGlobal _ANSI_ARGS_((Tcl_Interp * interp, 
   221 				int objc, Tcl_Obj *CONST objv[], int flags));
   222 /* 66 */
   223 EXTERN int		TclOpenFileChannelDeleteProc _ANSI_ARGS_((
   224 				TclOpenFileChannelProc_ * proc));
   225 /* 67 */
   226 EXTERN int		TclOpenFileChannelInsertProc _ANSI_ARGS_((
   227 				TclOpenFileChannelProc_ * proc));
   228 /* Slot 68 is reserved */
   229 /* 69 */
   230 EXTERN char *		TclpAlloc _ANSI_ARGS_((unsigned int size));
   231 /* Slot 70 is reserved */
   232 /* Slot 71 is reserved */
   233 /* Slot 72 is reserved */
   234 /* Slot 73 is reserved */
   235 /* 74 */
   236 EXTERN void		TclpFree _ANSI_ARGS_((char * ptr));
   237 /* 75 */
   238 EXTERN unsigned long	TclpGetClicks _ANSI_ARGS_((void));
   239 /* 76 */
   240 EXTERN unsigned long	TclpGetSeconds _ANSI_ARGS_((void));
   241 /* 77 */
   242 EXTERN void		TclpGetTime _ANSI_ARGS_((Tcl_Time * time));
   243 /* 78 */
   244 EXTERN int		TclpGetTimeZone _ANSI_ARGS_((Tcl_WideInt time));
   245 /* Slot 79 is reserved */
   246 /* Slot 80 is reserved */
   247 /* 81 */
   248 EXTERN char *		TclpRealloc _ANSI_ARGS_((char * ptr, 
   249 				unsigned int size));
   250 /* Slot 82 is reserved */
   251 /* Slot 83 is reserved */
   252 /* Slot 84 is reserved */
   253 /* Slot 85 is reserved */
   254 /* Slot 86 is reserved */
   255 /* Slot 87 is reserved */
   256 /* 88 */
   257 EXTERN char *		TclPrecTraceProc _ANSI_ARGS_((ClientData clientData, 
   258 				Tcl_Interp * interp, CONST char * name1, 
   259 				CONST char * name2, int flags));
   260 /* 89 */
   261 EXTERN int		TclPreventAliasLoop _ANSI_ARGS_((Tcl_Interp * interp, 
   262 				Tcl_Interp * cmdInterp, Tcl_Command cmd));
   263 /* Slot 90 is reserved */
   264 /* 91 */
   265 EXTERN void		TclProcCleanupProc _ANSI_ARGS_((Proc * procPtr));
   266 /* 92 */
   267 EXTERN int		TclProcCompileProc _ANSI_ARGS_((Tcl_Interp * interp, 
   268 				Proc * procPtr, Tcl_Obj * bodyPtr, 
   269 				Namespace * nsPtr, CONST char * description, 
   270 				CONST char * procName));
   271 /* 93 */
   272 EXTERN void		TclProcDeleteProc _ANSI_ARGS_((ClientData clientData));
   273 /* 94 */
   274 EXTERN int		TclProcInterpProc _ANSI_ARGS_((ClientData clientData, 
   275 				Tcl_Interp * interp, int argc, 
   276 				CONST84 char ** argv));
   277 /* Slot 95 is reserved */
   278 /* 96 */
   279 EXTERN int		TclRenameCommand _ANSI_ARGS_((Tcl_Interp * interp, 
   280 				char * oldName, char * newName));
   281 /* 97 */
   282 EXTERN void		TclResetShadowedCmdRefs _ANSI_ARGS_((
   283 				Tcl_Interp * interp, Command * newCmdPtr));
   284 /* 98 */
   285 EXTERN int		TclServiceIdle _ANSI_ARGS_((void));
   286 /* Slot 99 is reserved */
   287 /* Slot 100 is reserved */
   288 /* 101 */
   289 EXTERN char *		TclSetPreInitScript _ANSI_ARGS_((char * string));
   290 /* 102 */
   291 EXTERN void		TclSetupEnv _ANSI_ARGS_((Tcl_Interp * interp));
   292 /* 103 */
   293 EXTERN int		TclSockGetPort _ANSI_ARGS_((Tcl_Interp * interp, 
   294 				char * str, char * proto, int * portPtr));
   295 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
   296 /* 104 */
   297 EXTERN int		TclSockMinimumBuffers _ANSI_ARGS_((int sock, 
   298 				int size));
   299 #endif /* UNIX */
   300 #ifdef __WIN32__
   301 /* 104 */
   302 EXTERN int		TclSockMinimumBuffers _ANSI_ARGS_((int sock, 
   303 				int size));
   304 #endif /* __WIN32__ */
   305 /* Slot 105 is reserved */
   306 /* 106 */
   307 EXTERN int		TclStatDeleteProc _ANSI_ARGS_((TclStatProc_ * proc));
   308 /* 107 */
   309 EXTERN int		TclStatInsertProc _ANSI_ARGS_((TclStatProc_ * proc));
   310 /* 108 */
   311 EXTERN void		TclTeardownNamespace _ANSI_ARGS_((Namespace * nsPtr));
   312 /* 109 */
   313 EXTERN int		TclUpdateReturnInfo _ANSI_ARGS_((Interp * iPtr));
   314 /* Slot 110 is reserved */
   315 /* 111 */
   316 EXTERN void		Tcl_AddInterpResolvers _ANSI_ARGS_((
   317 				Tcl_Interp * interp, CONST char * name, 
   318 				Tcl_ResolveCmdProc * cmdProc, 
   319 				Tcl_ResolveVarProc * varProc, 
   320 				Tcl_ResolveCompiledVarProc * compiledVarProc));
   321 /* 112 */
   322 EXTERN int		Tcl_AppendExportList _ANSI_ARGS_((
   323 				Tcl_Interp * interp, Tcl_Namespace * nsPtr, 
   324 				Tcl_Obj * objPtr));
   325 /* 113 */
   326 EXTERN Tcl_Namespace *	Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp * interp, 
   327 				CONST char * name, ClientData clientData, 
   328 				Tcl_NamespaceDeleteProc * deleteProc));
   329 /* 114 */
   330 EXTERN void		Tcl_DeleteNamespace _ANSI_ARGS_((
   331 				Tcl_Namespace * nsPtr));
   332 /* 115 */
   333 EXTERN int		Tcl_Export _ANSI_ARGS_((Tcl_Interp * interp, 
   334 				Tcl_Namespace * nsPtr, CONST char * pattern, 
   335 				int resetListFirst));
   336 /* 116 */
   337 EXTERN Tcl_Command	Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp * interp, 
   338 				CONST char * name, 
   339 				Tcl_Namespace * contextNsPtr, int flags));
   340 /* 117 */
   341 EXTERN Tcl_Namespace *	Tcl_FindNamespace _ANSI_ARGS_((Tcl_Interp * interp, 
   342 				CONST char * name, 
   343 				Tcl_Namespace * contextNsPtr, int flags));
   344 /* 118 */
   345 EXTERN int		Tcl_GetInterpResolvers _ANSI_ARGS_((
   346 				Tcl_Interp * interp, CONST char * name, 
   347 				Tcl_ResolverInfo * resInfo));
   348 /* 119 */
   349 EXTERN int		Tcl_GetNamespaceResolvers _ANSI_ARGS_((
   350 				Tcl_Namespace * namespacePtr, 
   351 				Tcl_ResolverInfo * resInfo));
   352 /* 120 */
   353 EXTERN Tcl_Var		Tcl_FindNamespaceVar _ANSI_ARGS_((
   354 				Tcl_Interp * interp, CONST char * name, 
   355 				Tcl_Namespace * contextNsPtr, int flags));
   356 /* 121 */
   357 EXTERN int		Tcl_ForgetImport _ANSI_ARGS_((Tcl_Interp * interp, 
   358 				Tcl_Namespace * nsPtr, CONST char * pattern));
   359 /* 122 */
   360 EXTERN Tcl_Command	Tcl_GetCommandFromObj _ANSI_ARGS_((
   361 				Tcl_Interp * interp, Tcl_Obj * objPtr));
   362 /* 123 */
   363 EXTERN void		Tcl_GetCommandFullName _ANSI_ARGS_((
   364 				Tcl_Interp * interp, Tcl_Command command, 
   365 				Tcl_Obj * objPtr));
   366 /* 124 */
   367 EXTERN Tcl_Namespace *	Tcl_GetCurrentNamespace _ANSI_ARGS_((
   368 				Tcl_Interp * interp));
   369 /* 125 */
   370 EXTERN Tcl_Namespace *	Tcl_GetGlobalNamespace _ANSI_ARGS_((
   371 				Tcl_Interp * interp));
   372 /* 126 */
   373 EXTERN void		Tcl_GetVariableFullName _ANSI_ARGS_((
   374 				Tcl_Interp * interp, Tcl_Var variable, 
   375 				Tcl_Obj * objPtr));
   376 /* 127 */
   377 EXTERN int		Tcl_Import _ANSI_ARGS_((Tcl_Interp * interp, 
   378 				Tcl_Namespace * nsPtr, CONST char * pattern, 
   379 				int allowOverwrite));
   380 /* 128 */
   381 EXTERN void		Tcl_PopCallFrame _ANSI_ARGS_((Tcl_Interp* interp));
   382 /* 129 */
   383 EXTERN int		Tcl_PushCallFrame _ANSI_ARGS_((Tcl_Interp* interp, 
   384 				Tcl_CallFrame * framePtr, 
   385 				Tcl_Namespace * nsPtr, int isProcCallFrame));
   386 /* 130 */
   387 EXTERN int		Tcl_RemoveInterpResolvers _ANSI_ARGS_((
   388 				Tcl_Interp * interp, CONST char * name));
   389 /* 131 */
   390 EXTERN void		Tcl_SetNamespaceResolvers _ANSI_ARGS_((
   391 				Tcl_Namespace * namespacePtr, 
   392 				Tcl_ResolveCmdProc * cmdProc, 
   393 				Tcl_ResolveVarProc * varProc, 
   394 				Tcl_ResolveCompiledVarProc * compiledVarProc));
   395 /* 132 */
   396 EXTERN int		TclpHasSockets _ANSI_ARGS_((Tcl_Interp * interp));
   397 /* 133 */
   398 EXTERN struct tm *	TclpGetDate _ANSI_ARGS_((TclpTime_t time, int useGMT));
   399 /* 134 */
   400 EXTERN size_t		TclpStrftime _ANSI_ARGS_((char * s, size_t maxsize, 
   401 				CONST char * format, CONST struct tm * t, 
   402 				int useGMT));
   403 /* 135 */
   404 EXTERN int		TclpCheckStackSpace _ANSI_ARGS_((void));
   405 /* Slot 136 is reserved */
   406 /* Slot 137 is reserved */
   407 /* 138 */
   408 EXTERN CONST84_RETURN char * TclGetEnv _ANSI_ARGS_((CONST char * name, 
   409 				Tcl_DString * valuePtr));
   410 /* Slot 139 is reserved */
   411 /* 140 */
   412 EXTERN int		TclLooksLikeInt _ANSI_ARGS_((CONST char * bytes, 
   413 				int length));
   414 /* 141 */
   415 EXTERN CONST84_RETURN char * TclpGetCwd _ANSI_ARGS_((Tcl_Interp * interp, 
   416 				Tcl_DString * cwdPtr));
   417 /* 142 */
   418 EXTERN int		TclSetByteCodeFromAny _ANSI_ARGS_((
   419 				Tcl_Interp * interp, Tcl_Obj * objPtr, 
   420 				CompileHookProc * hookProc, 
   421 				ClientData clientData));
   422 /* 143 */
   423 EXTERN int		TclAddLiteralObj _ANSI_ARGS_((
   424 				struct CompileEnv * envPtr, Tcl_Obj * objPtr, 
   425 				LiteralEntry ** litPtrPtr));
   426 /* 144 */
   427 EXTERN void		TclHideLiteral _ANSI_ARGS_((Tcl_Interp * interp, 
   428 				struct CompileEnv * envPtr, int index));
   429 /* 145 */
   430 EXTERN struct AuxDataType * TclGetAuxDataType _ANSI_ARGS_((char * typeName));
   431 /* 146 */
   432 EXTERN TclHandle	TclHandleCreate _ANSI_ARGS_((VOID * ptr));
   433 /* 147 */
   434 EXTERN void		TclHandleFree _ANSI_ARGS_((TclHandle handle));
   435 /* 148 */
   436 EXTERN TclHandle	TclHandlePreserve _ANSI_ARGS_((TclHandle handle));
   437 /* 149 */
   438 EXTERN void		TclHandleRelease _ANSI_ARGS_((TclHandle handle));
   439 /* 150 */
   440 EXTERN int		TclRegAbout _ANSI_ARGS_((Tcl_Interp * interp, 
   441 				Tcl_RegExp re));
   442 /* 151 */
   443 EXTERN void		TclRegExpRangeUniChar _ANSI_ARGS_((Tcl_RegExp re, 
   444 				int index, int * startPtr, int * endPtr));
   445 /* 152 */
   446 EXTERN void		TclSetLibraryPath _ANSI_ARGS_((Tcl_Obj * pathPtr));
   447 /* 153 */
   448 EXTERN Tcl_Obj *	TclGetLibraryPath _ANSI_ARGS_((void));
   449 /* Slot 154 is reserved */
   450 /* Slot 155 is reserved */
   451 /* 156 */
   452 EXTERN void		TclRegError _ANSI_ARGS_((Tcl_Interp * interp, 
   453 				CONST char * msg, int status));
   454 /* 157 */
   455 EXTERN Var *		TclVarTraceExists _ANSI_ARGS_((Tcl_Interp * interp, 
   456 				CONST char * varName));
   457 /* 158 */
   458 EXTERN void		TclSetStartupScriptFileName _ANSI_ARGS_((
   459 				CONST char * filename));
   460 /* 159 */
   461 EXTERN CONST84_RETURN char * TclGetStartupScriptFileName _ANSI_ARGS_((void));
   462 /* Slot 160 is reserved */
   463 /* 161 */
   464 EXTERN int		TclChannelTransform _ANSI_ARGS_((Tcl_Interp * interp, 
   465 				Tcl_Channel chan, Tcl_Obj * cmdObjPtr));
   466 /* 162 */
   467 EXTERN void		TclChannelEventScriptInvoker _ANSI_ARGS_((
   468 				ClientData clientData, int flags));
   469 /* 163 */
   470 EXTERN void *		TclGetInstructionTable _ANSI_ARGS_((void));
   471 /* 164 */
   472 EXTERN void		TclExpandCodeArray _ANSI_ARGS_((void * envPtr));
   473 /* 165 */
   474 EXTERN void		TclpSetInitialEncodings _ANSI_ARGS_((void));
   475 /* 166 */
   476 EXTERN int		TclListObjSetElement _ANSI_ARGS_((
   477 				Tcl_Interp * interp, Tcl_Obj * listPtr, 
   478 				int index, Tcl_Obj * valuePtr));
   479 /* 167 */
   480 EXTERN void		TclSetStartupScriptPath _ANSI_ARGS_((
   481 				Tcl_Obj * pathPtr));
   482 /* 168 */
   483 EXTERN Tcl_Obj *	TclGetStartupScriptPath _ANSI_ARGS_((void));
   484 /* 169 */
   485 EXTERN int		TclpUtfNcmp2 _ANSI_ARGS_((CONST char * s1, 
   486 				CONST char * s2, unsigned long n));
   487 /* 170 */
   488 EXTERN int		TclCheckInterpTraces _ANSI_ARGS_((
   489 				Tcl_Interp * interp, CONST char * command, 
   490 				int numChars, Command * cmdPtr, int result, 
   491 				int traceFlags, int objc, 
   492 				Tcl_Obj *CONST objv[]));
   493 /* 171 */
   494 EXTERN int		TclCheckExecutionTraces _ANSI_ARGS_((
   495 				Tcl_Interp * interp, CONST char * command, 
   496 				int numChars, Command * cmdPtr, int result, 
   497 				int traceFlags, int objc, 
   498 				Tcl_Obj *CONST objv[]));
   499 /* 172 */
   500 EXTERN int		TclInThreadExit _ANSI_ARGS_((void));
   501 /* 173 */
   502 EXTERN int		TclUniCharMatch _ANSI_ARGS_((
   503 				CONST Tcl_UniChar * string, int strLen, 
   504 				CONST Tcl_UniChar * pattern, int ptnLen, 
   505 				int nocase));
   506 /* Slot 174 is reserved */
   507 /* Slot 175 is reserved */
   508 /* Slot 176 is reserved */
   509 /* Slot 177 is reserved */
   510 /* Slot 178 is reserved */
   511 /* Slot 179 is reserved */
   512 /* Slot 180 is reserved */
   513 /* Slot 181 is reserved */
   514 /* 182 */
   515 EXTERN struct tm *	TclpLocaltime _ANSI_ARGS_((TclpTime_t_CONST clock));
   516 /* 183 */
   517 EXTERN struct tm *	TclpGmtime _ANSI_ARGS_((TclpTime_t_CONST clock));
   518 /* Slot 184 is reserved */
   519 /* Slot 185 is reserved */
   520 /* Slot 186 is reserved */
   521 /* Slot 187 is reserved */
   522 /* Slot 188 is reserved */
   523 /* Slot 189 is reserved */
   524 /* Slot 190 is reserved */
   525 /* Slot 191 is reserved */
   526 /* Slot 192 is reserved */
   527 /* Slot 193 is reserved */
   528 /* Slot 194 is reserved */
   529 /* Slot 195 is reserved */
   530 /* Slot 196 is reserved */
   531 /* Slot 197 is reserved */
   532 /* Slot 198 is reserved */
   533 /* 199 */
   534 EXTERN int		TclMatchIsTrivial _ANSI_ARGS_((CONST char * pattern));
   535 
   536 typedef struct TclIntStubs {
   537     int magic;
   538     struct TclIntStubHooks *hooks;
   539 
   540     void *reserved0;
   541     int (*tclAccessDeleteProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 1 */
   542     int (*tclAccessInsertProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 2 */
   543     void (*tclAllocateFreeObjects) _ANSI_ARGS_((void)); /* 3 */
   544     void *reserved4;
   545 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
   546     int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */
   547 #endif /* UNIX */
   548 #ifdef __WIN32__
   549     int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */
   550 #endif /* __WIN32__ */
   551 #ifdef MAC_TCL
   552     void *reserved5;
   553 #endif /* MAC_TCL */
   554     void (*tclCleanupCommand) _ANSI_ARGS_((Command * cmdPtr)); /* 6 */
   555     int (*tclCopyAndCollapse) _ANSI_ARGS_((int count, CONST char * src, char * dst)); /* 7 */
   556     int (*tclCopyChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel inChan, Tcl_Channel outChan, int toRead, Tcl_Obj * cmdPtr)); /* 8 */
   557 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
   558     int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */
   559 #endif /* UNIX */
   560 #ifdef __WIN32__
   561     int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */
   562 #endif /* __WIN32__ */
   563 #ifdef MAC_TCL
   564     void *reserved9;
   565 #endif /* MAC_TCL */
   566     int (*tclCreateProc) _ANSI_ARGS_((Tcl_Interp * interp, Namespace * nsPtr, CONST char * procName, Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, Proc ** procPtrPtr)); /* 10 */
   567     void (*tclDeleteCompiledLocalVars) _ANSI_ARGS_((Interp * iPtr, CallFrame * framePtr)); /* 11 */
   568     void (*tclDeleteVars) _ANSI_ARGS_((Interp * iPtr, Tcl_HashTable * tablePtr)); /* 12 */
   569     int (*tclDoGlob) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * headPtr, char * tail, Tcl_GlobTypeData * types)); /* 13 */
   570     void (*tclDumpMemoryInfo) _ANSI_ARGS_((FILE * outFile)); /* 14 */
   571     void *reserved15;
   572     void (*tclExprFloatError) _ANSI_ARGS_((Tcl_Interp * interp, double value)); /* 16 */
   573     void *reserved17;
   574     void *reserved18;
   575     void *reserved19;
   576     void *reserved20;
   577     void *reserved21;
   578     int (*tclFindElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int listLength, CONST char ** elementPtr, CONST char ** nextPtr, int * sizePtr, int * bracePtr)); /* 22 */
   579     Proc * (*tclFindProc) _ANSI_ARGS_((Interp * iPtr, CONST char * procName)); /* 23 */
   580     int (*tclFormatInt) _ANSI_ARGS_((char * buffer, long n)); /* 24 */
   581     void (*tclFreePackageInfo) _ANSI_ARGS_((Interp * iPtr)); /* 25 */
   582     void *reserved26;
   583     int (*tclGetDate) _ANSI_ARGS_((char * p, Tcl_WideInt now, long zone, Tcl_WideInt * timePtr)); /* 27 */
   584     Tcl_Channel (*tclpGetDefaultStdChannel) _ANSI_ARGS_((int type)); /* 28 */
   585     void *reserved29;
   586     void *reserved30;
   587     char * (*tclGetExtension) _ANSI_ARGS_((char * name)); /* 31 */
   588     int (*tclGetFrame) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, CallFrame ** framePtrPtr)); /* 32 */
   589     TclCmdProcType (*tclGetInterpProc) _ANSI_ARGS_((void)); /* 33 */
   590     int (*tclGetIntForIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int endValue, int * indexPtr)); /* 34 */
   591     void *reserved35;
   592     int (*tclGetLong) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, long * longPtr)); /* 36 */
   593     int (*tclGetLoadedPackages) _ANSI_ARGS_((Tcl_Interp * interp, char * targetName)); /* 37 */
   594     int (*tclGetNamespaceForQualName) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * qualName, Namespace * cxtNsPtr, int flags, Namespace ** nsPtrPtr, Namespace ** altNsPtrPtr, Namespace ** actualCxtPtrPtr, CONST char ** simpleNamePtr)); /* 38 */
   595     TclObjCmdProcType (*tclGetObjInterpProc) _ANSI_ARGS_((void)); /* 39 */
   596     int (*tclGetOpenMode) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, int * seekFlagPtr)); /* 40 */
   597     Tcl_Command (*tclGetOriginalCommand) _ANSI_ARGS_((Tcl_Command command)); /* 41 */
   598     char * (*tclpGetUserHome) _ANSI_ARGS_((CONST char * name, Tcl_DString * bufferPtr)); /* 42 */
   599     int (*tclGlobalInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags)); /* 43 */
   600     int (*tclGuessPackageName) _ANSI_ARGS_((CONST char * fileName, Tcl_DString * bufPtr)); /* 44 */
   601     int (*tclHideUnsafeCommands) _ANSI_ARGS_((Tcl_Interp * interp)); /* 45 */
   602     int (*tclInExit) _ANSI_ARGS_((void)); /* 46 */
   603     void *reserved47;
   604     void *reserved48;
   605     Tcl_Obj * (*tclIncrVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, long incrAmount, int part1NotParsed)); /* 49 */
   606     void (*tclInitCompiledLocals) _ANSI_ARGS_((Tcl_Interp * interp, CallFrame * framePtr, Namespace * nsPtr)); /* 50 */
   607     int (*tclInterpInit) _ANSI_ARGS_((Tcl_Interp * interp)); /* 51 */
   608     int (*tclInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags)); /* 52 */
   609     int (*tclInvokeObjectCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, CONST84 char ** argv)); /* 53 */
   610     int (*tclInvokeStringCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 54 */
   611     Proc * (*tclIsProc) _ANSI_ARGS_((Command * cmdPtr)); /* 55 */
   612     void *reserved56;
   613     void *reserved57;
   614     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 */
   615     void *reserved59;
   616     int (*tclNeedSpace) _ANSI_ARGS_((CONST char * start, CONST char * end)); /* 60 */
   617     Tcl_Obj * (*tclNewProcBodyObj) _ANSI_ARGS_((Proc * procPtr)); /* 61 */
   618     int (*tclObjCommandComplete) _ANSI_ARGS_((Tcl_Obj * cmdPtr)); /* 62 */
   619     int (*tclObjInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 63 */
   620     int (*tclObjInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 64 */
   621     int (*tclObjInvokeGlobal) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 65 */
   622     int (*tclOpenFileChannelDeleteProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 66 */
   623     int (*tclOpenFileChannelInsertProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 67 */
   624     void *reserved68;
   625     char * (*tclpAlloc) _ANSI_ARGS_((unsigned int size)); /* 69 */
   626     void *reserved70;
   627     void *reserved71;
   628     void *reserved72;
   629     void *reserved73;
   630     void (*tclpFree) _ANSI_ARGS_((char * ptr)); /* 74 */
   631     unsigned long (*tclpGetClicks) _ANSI_ARGS_((void)); /* 75 */
   632     unsigned long (*tclpGetSeconds) _ANSI_ARGS_((void)); /* 76 */
   633     void (*tclpGetTime) _ANSI_ARGS_((Tcl_Time * time)); /* 77 */
   634     int (*tclpGetTimeZone) _ANSI_ARGS_((Tcl_WideInt time)); /* 78 */
   635     void *reserved79;
   636     void *reserved80;
   637     char * (*tclpRealloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 81 */
   638     void *reserved82;
   639     void *reserved83;
   640     void *reserved84;
   641     void *reserved85;
   642     void *reserved86;
   643     void *reserved87;
   644     char * (*tclPrecTraceProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, CONST char * name1, CONST char * name2, int flags)); /* 88 */
   645     int (*tclPreventAliasLoop) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Interp * cmdInterp, Tcl_Command cmd)); /* 89 */
   646     void *reserved90;
   647     void (*tclProcCleanupProc) _ANSI_ARGS_((Proc * procPtr)); /* 91 */
   648     int (*tclProcCompileProc) _ANSI_ARGS_((Tcl_Interp * interp, Proc * procPtr, Tcl_Obj * bodyPtr, Namespace * nsPtr, CONST char * description, CONST char * procName)); /* 92 */
   649     void (*tclProcDeleteProc) _ANSI_ARGS_((ClientData clientData)); /* 93 */
   650     int (*tclProcInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, CONST84 char ** argv)); /* 94 */
   651     void *reserved95;
   652     int (*tclRenameCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * oldName, char * newName)); /* 96 */
   653     void (*tclResetShadowedCmdRefs) _ANSI_ARGS_((Tcl_Interp * interp, Command * newCmdPtr)); /* 97 */
   654     int (*tclServiceIdle) _ANSI_ARGS_((void)); /* 98 */
   655     void *reserved99;
   656     void *reserved100;
   657     char * (*tclSetPreInitScript) _ANSI_ARGS_((char * string)); /* 101 */
   658     void (*tclSetupEnv) _ANSI_ARGS_((Tcl_Interp * interp)); /* 102 */
   659     int (*tclSockGetPort) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char * proto, int * portPtr)); /* 103 */
   660 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
   661     int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */
   662 #endif /* UNIX */
   663 #ifdef __WIN32__
   664     int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */
   665 #endif /* __WIN32__ */
   666 #ifdef MAC_TCL
   667     void *reserved104;
   668 #endif /* MAC_TCL */
   669     void *reserved105;
   670     int (*tclStatDeleteProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 106 */
   671     int (*tclStatInsertProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 107 */
   672     void (*tclTeardownNamespace) _ANSI_ARGS_((Namespace * nsPtr)); /* 108 */
   673     int (*tclUpdateReturnInfo) _ANSI_ARGS_((Interp * iPtr)); /* 109 */
   674     void *reserved110;
   675     void (*tcl_AddInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 111 */
   676     int (*tcl_AppendExportList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr)); /* 112 */
   677     Tcl_Namespace * (*tcl_CreateNamespace) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc)); /* 113 */
   678     void (*tcl_DeleteNamespace) _ANSI_ARGS_((Tcl_Namespace * nsPtr)); /* 114 */
   679     int (*tcl_Export) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int resetListFirst)); /* 115 */
   680     Tcl_Command (*tcl_FindCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 116 */
   681     Tcl_Namespace * (*tcl_FindNamespace) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 117 */
   682     int (*tcl_GetInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_ResolverInfo * resInfo)); /* 118 */
   683     int (*tcl_GetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolverInfo * resInfo)); /* 119 */
   684     Tcl_Var (*tcl_FindNamespaceVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 120 */
   685     int (*tcl_ForgetImport) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern)); /* 121 */
   686     Tcl_Command (*tcl_GetCommandFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 122 */
   687     void (*tcl_GetCommandFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command, Tcl_Obj * objPtr)); /* 123 */
   688     Tcl_Namespace * (*tcl_GetCurrentNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 124 */
   689     Tcl_Namespace * (*tcl_GetGlobalNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 125 */
   690     void (*tcl_GetVariableFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Var variable, Tcl_Obj * objPtr)); /* 126 */
   691     int (*tcl_Import) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int allowOverwrite)); /* 127 */
   692     void (*tcl_PopCallFrame) _ANSI_ARGS_((Tcl_Interp* interp)); /* 128 */
   693     int (*tcl_PushCallFrame) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame)); /* 129 */
   694     int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 130 */
   695     void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 131 */
   696     int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 132 */
   697     struct tm * (*tclpGetDate) _ANSI_ARGS_((TclpTime_t time, int useGMT)); /* 133 */
   698     size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, CONST char * format, CONST struct tm * t, int useGMT)); /* 134 */
   699     int (*tclpCheckStackSpace) _ANSI_ARGS_((void)); /* 135 */
   700     void *reserved136;
   701     void *reserved137;
   702     CONST84_RETURN char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name, Tcl_DString * valuePtr)); /* 138 */
   703     void *reserved139;
   704     int (*tclLooksLikeInt) _ANSI_ARGS_((CONST char * bytes, int length)); /* 140 */
   705     CONST84_RETURN char * (*tclpGetCwd) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * cwdPtr)); /* 141 */
   706     int (*tclSetByteCodeFromAny) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CompileHookProc * hookProc, ClientData clientData)); /* 142 */
   707     int (*tclAddLiteralObj) _ANSI_ARGS_((struct CompileEnv * envPtr, Tcl_Obj * objPtr, LiteralEntry ** litPtrPtr)); /* 143 */
   708     void (*tclHideLiteral) _ANSI_ARGS_((Tcl_Interp * interp, struct CompileEnv * envPtr, int index)); /* 144 */
   709     struct AuxDataType * (*tclGetAuxDataType) _ANSI_ARGS_((char * typeName)); /* 145 */
   710     TclHandle (*tclHandleCreate) _ANSI_ARGS_((VOID * ptr)); /* 146 */
   711     void (*tclHandleFree) _ANSI_ARGS_((TclHandle handle)); /* 147 */
   712     TclHandle (*tclHandlePreserve) _ANSI_ARGS_((TclHandle handle)); /* 148 */
   713     void (*tclHandleRelease) _ANSI_ARGS_((TclHandle handle)); /* 149 */
   714     int (*tclRegAbout) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp re)); /* 150 */
   715     void (*tclRegExpRangeUniChar) _ANSI_ARGS_((Tcl_RegExp re, int index, int * startPtr, int * endPtr)); /* 151 */
   716     void (*tclSetLibraryPath) _ANSI_ARGS_((Tcl_Obj * pathPtr)); /* 152 */
   717     Tcl_Obj * (*tclGetLibraryPath) _ANSI_ARGS_((void)); /* 153 */
   718     void *reserved154;
   719     void *reserved155;
   720     void (*tclRegError) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * msg, int status)); /* 156 */
   721     Var * (*tclVarTraceExists) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName)); /* 157 */
   722     void (*tclSetStartupScriptFileName) _ANSI_ARGS_((CONST char * filename)); /* 158 */
   723     CONST84_RETURN char * (*tclGetStartupScriptFileName) _ANSI_ARGS_((void)); /* 159 */
   724     void *reserved160;
   725     int (*tclChannelTransform) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, Tcl_Obj * cmdObjPtr)); /* 161 */
   726     void (*tclChannelEventScriptInvoker) _ANSI_ARGS_((ClientData clientData, int flags)); /* 162 */
   727     void * (*tclGetInstructionTable) _ANSI_ARGS_((void)); /* 163 */
   728     void (*tclExpandCodeArray) _ANSI_ARGS_((void * envPtr)); /* 164 */
   729     void (*tclpSetInitialEncodings) _ANSI_ARGS_((void)); /* 165 */
   730     int (*tclListObjSetElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj * valuePtr)); /* 166 */
   731     void (*tclSetStartupScriptPath) _ANSI_ARGS_((Tcl_Obj * pathPtr)); /* 167 */
   732     Tcl_Obj * (*tclGetStartupScriptPath) _ANSI_ARGS_((void)); /* 168 */
   733     int (*tclpUtfNcmp2) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n)); /* 169 */
   734     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 */
   735     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 */
   736     int (*tclInThreadExit) _ANSI_ARGS_((void)); /* 172 */
   737     int (*tclUniCharMatch) _ANSI_ARGS_((CONST Tcl_UniChar * string, int strLen, CONST Tcl_UniChar * pattern, int ptnLen, int nocase)); /* 173 */
   738     void *reserved174;
   739     void *reserved175;
   740     void *reserved176;
   741     void *reserved177;
   742     void *reserved178;
   743     void *reserved179;
   744     void *reserved180;
   745     void *reserved181;
   746     struct tm * (*tclpLocaltime) _ANSI_ARGS_((TclpTime_t_CONST clock)); /* 182 */
   747     struct tm * (*tclpGmtime) _ANSI_ARGS_((TclpTime_t_CONST clock)); /* 183 */
   748     void *reserved184;
   749     void *reserved185;
   750     void *reserved186;
   751     void *reserved187;
   752     void *reserved188;
   753     void *reserved189;
   754     void *reserved190;
   755     void *reserved191;
   756     void *reserved192;
   757     void *reserved193;
   758     void *reserved194;
   759     void *reserved195;
   760     void *reserved196;
   761     void *reserved197;
   762     void *reserved198;
   763     int (*tclMatchIsTrivial) _ANSI_ARGS_((CONST char * pattern)); /* 199 */
   764 } TclIntStubs;
   765 
   766 #ifdef __cplusplus
   767 extern "C" {
   768 #endif
   769 extern TclIntStubs *tclIntStubsPtr;
   770 #ifdef __cplusplus
   771 }
   772 #endif
   773 
   774 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
   775 
   776 /*
   777  * Inline function declarations:
   778  */
   779 
   780 /* Slot 0 is reserved */
   781 #ifndef TclAccessDeleteProc
   782 #define TclAccessDeleteProc \
   783 	(tclIntStubsPtr->tclAccessDeleteProc) /* 1 */
   784 #endif
   785 #ifndef TclAccessInsertProc
   786 #define TclAccessInsertProc \
   787 	(tclIntStubsPtr->tclAccessInsertProc) /* 2 */
   788 #endif
   789 #ifndef TclAllocateFreeObjects
   790 #define TclAllocateFreeObjects \
   791 	(tclIntStubsPtr->tclAllocateFreeObjects) /* 3 */
   792 #endif
   793 /* Slot 4 is reserved */
   794 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
   795 #ifndef TclCleanupChildren
   796 #define TclCleanupChildren \
   797 	(tclIntStubsPtr->tclCleanupChildren) /* 5 */
   798 #endif
   799 #endif /* UNIX */
   800 #ifdef __WIN32__
   801 #ifndef TclCleanupChildren
   802 #define TclCleanupChildren \
   803 	(tclIntStubsPtr->tclCleanupChildren) /* 5 */
   804 #endif
   805 #endif /* __WIN32__ */
   806 #ifndef TclCleanupCommand
   807 #define TclCleanupCommand \
   808 	(tclIntStubsPtr->tclCleanupCommand) /* 6 */
   809 #endif
   810 #ifndef TclCopyAndCollapse
   811 #define TclCopyAndCollapse \
   812 	(tclIntStubsPtr->tclCopyAndCollapse) /* 7 */
   813 #endif
   814 #ifndef TclCopyChannel
   815 #define TclCopyChannel \
   816 	(tclIntStubsPtr->tclCopyChannel) /* 8 */
   817 #endif
   818 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
   819 #ifndef TclCreatePipeline
   820 #define TclCreatePipeline \
   821 	(tclIntStubsPtr->tclCreatePipeline) /* 9 */
   822 #endif
   823 #endif /* UNIX */
   824 #ifdef __WIN32__
   825 #ifndef TclCreatePipeline
   826 #define TclCreatePipeline \
   827 	(tclIntStubsPtr->tclCreatePipeline) /* 9 */
   828 #endif
   829 #endif /* __WIN32__ */
   830 #ifndef TclCreateProc
   831 #define TclCreateProc \
   832 	(tclIntStubsPtr->tclCreateProc) /* 10 */
   833 #endif
   834 #ifndef TclDeleteCompiledLocalVars
   835 #define TclDeleteCompiledLocalVars \
   836 	(tclIntStubsPtr->tclDeleteCompiledLocalVars) /* 11 */
   837 #endif
   838 #ifndef TclDeleteVars
   839 #define TclDeleteVars \
   840 	(tclIntStubsPtr->tclDeleteVars) /* 12 */
   841 #endif
   842 #ifndef TclDoGlob
   843 #define TclDoGlob \
   844 	(tclIntStubsPtr->tclDoGlob) /* 13 */
   845 #endif
   846 #ifndef TclDumpMemoryInfo
   847 #define TclDumpMemoryInfo \
   848 	(tclIntStubsPtr->tclDumpMemoryInfo) /* 14 */
   849 #endif
   850 /* Slot 15 is reserved */
   851 #ifndef TclExprFloatError
   852 #define TclExprFloatError \
   853 	(tclIntStubsPtr->tclExprFloatError) /* 16 */
   854 #endif
   855 /* Slot 17 is reserved */
   856 /* Slot 18 is reserved */
   857 /* Slot 19 is reserved */
   858 /* Slot 20 is reserved */
   859 /* Slot 21 is reserved */
   860 #ifndef TclFindElement
   861 #define TclFindElement \
   862 	(tclIntStubsPtr->tclFindElement) /* 22 */
   863 #endif
   864 #ifndef TclFindProc
   865 #define TclFindProc \
   866 	(tclIntStubsPtr->tclFindProc) /* 23 */
   867 #endif
   868 #ifndef TclFormatInt
   869 #define TclFormatInt \
   870 	(tclIntStubsPtr->tclFormatInt) /* 24 */
   871 #endif
   872 #ifndef TclFreePackageInfo
   873 #define TclFreePackageInfo \
   874 	(tclIntStubsPtr->tclFreePackageInfo) /* 25 */
   875 #endif
   876 /* Slot 26 is reserved */
   877 #ifndef TclGetDate
   878 #define TclGetDate \
   879 	(tclIntStubsPtr->tclGetDate) /* 27 */
   880 #endif
   881 #ifndef TclpGetDefaultStdChannel
   882 #define TclpGetDefaultStdChannel \
   883 	(tclIntStubsPtr->tclpGetDefaultStdChannel) /* 28 */
   884 #endif
   885 /* Slot 29 is reserved */
   886 /* Slot 30 is reserved */
   887 #ifndef TclGetExtension
   888 #define TclGetExtension \
   889 	(tclIntStubsPtr->tclGetExtension) /* 31 */
   890 #endif
   891 #ifndef TclGetFrame
   892 #define TclGetFrame \
   893 	(tclIntStubsPtr->tclGetFrame) /* 32 */
   894 #endif
   895 #ifndef TclGetInterpProc
   896 #define TclGetInterpProc \
   897 	(tclIntStubsPtr->tclGetInterpProc) /* 33 */
   898 #endif
   899 #ifndef TclGetIntForIndex
   900 #define TclGetIntForIndex \
   901 	(tclIntStubsPtr->tclGetIntForIndex) /* 34 */
   902 #endif
   903 /* Slot 35 is reserved */
   904 #ifndef TclGetLong
   905 #define TclGetLong \
   906 	(tclIntStubsPtr->tclGetLong) /* 36 */
   907 #endif
   908 #ifndef TclGetLoadedPackages
   909 #define TclGetLoadedPackages \
   910 	(tclIntStubsPtr->tclGetLoadedPackages) /* 37 */
   911 #endif
   912 #ifndef TclGetNamespaceForQualName
   913 #define TclGetNamespaceForQualName \
   914 	(tclIntStubsPtr->tclGetNamespaceForQualName) /* 38 */
   915 #endif
   916 #ifndef TclGetObjInterpProc
   917 #define TclGetObjInterpProc \
   918 	(tclIntStubsPtr->tclGetObjInterpProc) /* 39 */
   919 #endif
   920 #ifndef TclGetOpenMode
   921 #define TclGetOpenMode \
   922 	(tclIntStubsPtr->tclGetOpenMode) /* 40 */
   923 #endif
   924 #ifndef TclGetOriginalCommand
   925 #define TclGetOriginalCommand \
   926 	(tclIntStubsPtr->tclGetOriginalCommand) /* 41 */
   927 #endif
   928 #ifndef TclpGetUserHome
   929 #define TclpGetUserHome \
   930 	(tclIntStubsPtr->tclpGetUserHome) /* 42 */
   931 #endif
   932 #ifndef TclGlobalInvoke
   933 #define TclGlobalInvoke \
   934 	(tclIntStubsPtr->tclGlobalInvoke) /* 43 */
   935 #endif
   936 #ifndef TclGuessPackageName
   937 #define TclGuessPackageName \
   938 	(tclIntStubsPtr->tclGuessPackageName) /* 44 */
   939 #endif
   940 #ifndef TclHideUnsafeCommands
   941 #define TclHideUnsafeCommands \
   942 	(tclIntStubsPtr->tclHideUnsafeCommands) /* 45 */
   943 #endif
   944 #ifndef TclInExit
   945 #define TclInExit \
   946 	(tclIntStubsPtr->tclInExit) /* 46 */
   947 #endif
   948 /* Slot 47 is reserved */
   949 /* Slot 48 is reserved */
   950 #ifndef TclIncrVar2
   951 #define TclIncrVar2 \
   952 	(tclIntStubsPtr->tclIncrVar2) /* 49 */
   953 #endif
   954 #ifndef TclInitCompiledLocals
   955 #define TclInitCompiledLocals \
   956 	(tclIntStubsPtr->tclInitCompiledLocals) /* 50 */
   957 #endif
   958 #ifndef TclInterpInit
   959 #define TclInterpInit \
   960 	(tclIntStubsPtr->tclInterpInit) /* 51 */
   961 #endif
   962 #ifndef TclInvoke
   963 #define TclInvoke \
   964 	(tclIntStubsPtr->tclInvoke) /* 52 */
   965 #endif
   966 #ifndef TclInvokeObjectCommand
   967 #define TclInvokeObjectCommand \
   968 	(tclIntStubsPtr->tclInvokeObjectCommand) /* 53 */
   969 #endif
   970 #ifndef TclInvokeStringCommand
   971 #define TclInvokeStringCommand \
   972 	(tclIntStubsPtr->tclInvokeStringCommand) /* 54 */
   973 #endif
   974 #ifndef TclIsProc
   975 #define TclIsProc \
   976 	(tclIntStubsPtr->tclIsProc) /* 55 */
   977 #endif
   978 /* Slot 56 is reserved */
   979 /* Slot 57 is reserved */
   980 #ifndef TclLookupVar
   981 #define TclLookupVar \
   982 	(tclIntStubsPtr->tclLookupVar) /* 58 */
   983 #endif
   984 /* Slot 59 is reserved */
   985 #ifndef TclNeedSpace
   986 #define TclNeedSpace \
   987 	(tclIntStubsPtr->tclNeedSpace) /* 60 */
   988 #endif
   989 #ifndef TclNewProcBodyObj
   990 #define TclNewProcBodyObj \
   991 	(tclIntStubsPtr->tclNewProcBodyObj) /* 61 */
   992 #endif
   993 #ifndef TclObjCommandComplete
   994 #define TclObjCommandComplete \
   995 	(tclIntStubsPtr->tclObjCommandComplete) /* 62 */
   996 #endif
   997 #ifndef TclObjInterpProc
   998 #define TclObjInterpProc \
   999 	(tclIntStubsPtr->tclObjInterpProc) /* 63 */
  1000 #endif
  1001 #ifndef TclObjInvoke
  1002 #define TclObjInvoke \
  1003 	(tclIntStubsPtr->tclObjInvoke) /* 64 */
  1004 #endif
  1005 #ifndef TclObjInvokeGlobal
  1006 #define TclObjInvokeGlobal \
  1007 	(tclIntStubsPtr->tclObjInvokeGlobal) /* 65 */
  1008 #endif
  1009 #ifndef TclOpenFileChannelDeleteProc
  1010 #define TclOpenFileChannelDeleteProc \
  1011 	(tclIntStubsPtr->tclOpenFileChannelDeleteProc) /* 66 */
  1012 #endif
  1013 #ifndef TclOpenFileChannelInsertProc
  1014 #define TclOpenFileChannelInsertProc \
  1015 	(tclIntStubsPtr->tclOpenFileChannelInsertProc) /* 67 */
  1016 #endif
  1017 /* Slot 68 is reserved */
  1018 #ifndef TclpAlloc
  1019 #define TclpAlloc \
  1020 	(tclIntStubsPtr->tclpAlloc) /* 69 */
  1021 #endif
  1022 /* Slot 70 is reserved */
  1023 /* Slot 71 is reserved */
  1024 /* Slot 72 is reserved */
  1025 /* Slot 73 is reserved */
  1026 #ifndef TclpFree
  1027 #define TclpFree \
  1028 	(tclIntStubsPtr->tclpFree) /* 74 */
  1029 #endif
  1030 #ifndef TclpGetClicks
  1031 #define TclpGetClicks \
  1032 	(tclIntStubsPtr->tclpGetClicks) /* 75 */
  1033 #endif
  1034 #ifndef TclpGetSeconds
  1035 #define TclpGetSeconds \
  1036 	(tclIntStubsPtr->tclpGetSeconds) /* 76 */
  1037 #endif
  1038 #ifndef TclpGetTime
  1039 #define TclpGetTime \
  1040 	(tclIntStubsPtr->tclpGetTime) /* 77 */
  1041 #endif
  1042 #ifndef TclpGetTimeZone
  1043 #define TclpGetTimeZone \
  1044 	(tclIntStubsPtr->tclpGetTimeZone) /* 78 */
  1045 #endif
  1046 /* Slot 79 is reserved */
  1047 /* Slot 80 is reserved */
  1048 #ifndef TclpRealloc
  1049 #define TclpRealloc \
  1050 	(tclIntStubsPtr->tclpRealloc) /* 81 */
  1051 #endif
  1052 /* Slot 82 is reserved */
  1053 /* Slot 83 is reserved */
  1054 /* Slot 84 is reserved */
  1055 /* Slot 85 is reserved */
  1056 /* Slot 86 is reserved */
  1057 /* Slot 87 is reserved */
  1058 #ifndef TclPrecTraceProc
  1059 #define TclPrecTraceProc \
  1060 	(tclIntStubsPtr->tclPrecTraceProc) /* 88 */
  1061 #endif
  1062 #ifndef TclPreventAliasLoop
  1063 #define TclPreventAliasLoop \
  1064 	(tclIntStubsPtr->tclPreventAliasLoop) /* 89 */
  1065 #endif
  1066 /* Slot 90 is reserved */
  1067 #ifndef TclProcCleanupProc
  1068 #define TclProcCleanupProc \
  1069 	(tclIntStubsPtr->tclProcCleanupProc) /* 91 */
  1070 #endif
  1071 #ifndef TclProcCompileProc
  1072 #define TclProcCompileProc \
  1073 	(tclIntStubsPtr->tclProcCompileProc) /* 92 */
  1074 #endif
  1075 #ifndef TclProcDeleteProc
  1076 #define TclProcDeleteProc \
  1077 	(tclIntStubsPtr->tclProcDeleteProc) /* 93 */
  1078 #endif
  1079 #ifndef TclProcInterpProc
  1080 #define TclProcInterpProc \
  1081 	(tclIntStubsPtr->tclProcInterpProc) /* 94 */
  1082 #endif
  1083 /* Slot 95 is reserved */
  1084 #ifndef TclRenameCommand
  1085 #define TclRenameCommand \
  1086 	(tclIntStubsPtr->tclRenameCommand) /* 96 */
  1087 #endif
  1088 #ifndef TclResetShadowedCmdRefs
  1089 #define TclResetShadowedCmdRefs \
  1090 	(tclIntStubsPtr->tclResetShadowedCmdRefs) /* 97 */
  1091 #endif
  1092 #ifndef TclServiceIdle
  1093 #define TclServiceIdle \
  1094 	(tclIntStubsPtr->tclServiceIdle) /* 98 */
  1095 #endif
  1096 /* Slot 99 is reserved */
  1097 /* Slot 100 is reserved */
  1098 #ifndef TclSetPreInitScript
  1099 #define TclSetPreInitScript \
  1100 	(tclIntStubsPtr->tclSetPreInitScript) /* 101 */
  1101 #endif
  1102 #ifndef TclSetupEnv
  1103 #define TclSetupEnv \
  1104 	(tclIntStubsPtr->tclSetupEnv) /* 102 */
  1105 #endif
  1106 #ifndef TclSockGetPort
  1107 #define TclSockGetPort \
  1108 	(tclIntStubsPtr->tclSockGetPort) /* 103 */
  1109 #endif
  1110 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
  1111 #ifndef TclSockMinimumBuffers
  1112 #define TclSockMinimumBuffers \
  1113 	(tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
  1114 #endif
  1115 #endif /* UNIX */
  1116 #ifdef __WIN32__
  1117 #ifndef TclSockMinimumBuffers
  1118 #define TclSockMinimumBuffers \
  1119 	(tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
  1120 #endif
  1121 #endif /* __WIN32__ */
  1122 /* Slot 105 is reserved */
  1123 #ifndef TclStatDeleteProc
  1124 #define TclStatDeleteProc \
  1125 	(tclIntStubsPtr->tclStatDeleteProc) /* 106 */
  1126 #endif
  1127 #ifndef TclStatInsertProc
  1128 #define TclStatInsertProc \
  1129 	(tclIntStubsPtr->tclStatInsertProc) /* 107 */
  1130 #endif
  1131 #ifndef TclTeardownNamespace
  1132 #define TclTeardownNamespace \
  1133 	(tclIntStubsPtr->tclTeardownNamespace) /* 108 */
  1134 #endif
  1135 #ifndef TclUpdateReturnInfo
  1136 #define TclUpdateReturnInfo \
  1137 	(tclIntStubsPtr->tclUpdateReturnInfo) /* 109 */
  1138 #endif
  1139 /* Slot 110 is reserved */
  1140 #ifndef Tcl_AddInterpResolvers
  1141 #define Tcl_AddInterpResolvers \
  1142 	(tclIntStubsPtr->tcl_AddInterpResolvers) /* 111 */
  1143 #endif
  1144 #ifndef Tcl_AppendExportList
  1145 #define Tcl_AppendExportList \
  1146 	(tclIntStubsPtr->tcl_AppendExportList) /* 112 */
  1147 #endif
  1148 #ifndef Tcl_CreateNamespace
  1149 #define Tcl_CreateNamespace \
  1150 	(tclIntStubsPtr->tcl_CreateNamespace) /* 113 */
  1151 #endif
  1152 #ifndef Tcl_DeleteNamespace
  1153 #define Tcl_DeleteNamespace \
  1154 	(tclIntStubsPtr->tcl_DeleteNamespace) /* 114 */
  1155 #endif
  1156 #ifndef Tcl_Export
  1157 #define Tcl_Export \
  1158 	(tclIntStubsPtr->tcl_Export) /* 115 */
  1159 #endif
  1160 #ifndef Tcl_FindCommand
  1161 #define Tcl_FindCommand \
  1162 	(tclIntStubsPtr->tcl_FindCommand) /* 116 */
  1163 #endif
  1164 #ifndef Tcl_FindNamespace
  1165 #define Tcl_FindNamespace \
  1166 	(tclIntStubsPtr->tcl_FindNamespace) /* 117 */
  1167 #endif
  1168 #ifndef Tcl_GetInterpResolvers
  1169 #define Tcl_GetInterpResolvers \
  1170 	(tclIntStubsPtr->tcl_GetInterpResolvers) /* 118 */
  1171 #endif
  1172 #ifndef Tcl_GetNamespaceResolvers
  1173 #define Tcl_GetNamespaceResolvers \
  1174 	(tclIntStubsPtr->tcl_GetNamespaceResolvers) /* 119 */
  1175 #endif
  1176 #ifndef Tcl_FindNamespaceVar
  1177 #define Tcl_FindNamespaceVar \
  1178 	(tclIntStubsPtr->tcl_FindNamespaceVar) /* 120 */
  1179 #endif
  1180 #ifndef Tcl_ForgetImport
  1181 #define Tcl_ForgetImport \
  1182 	(tclIntStubsPtr->tcl_ForgetImport) /* 121 */
  1183 #endif
  1184 #ifndef Tcl_GetCommandFromObj
  1185 #define Tcl_GetCommandFromObj \
  1186 	(tclIntStubsPtr->tcl_GetCommandFromObj) /* 122 */
  1187 #endif
  1188 #ifndef Tcl_GetCommandFullName
  1189 #define Tcl_GetCommandFullName \
  1190 	(tclIntStubsPtr->tcl_GetCommandFullName) /* 123 */
  1191 #endif
  1192 #ifndef Tcl_GetCurrentNamespace
  1193 #define Tcl_GetCurrentNamespace \
  1194 	(tclIntStubsPtr->tcl_GetCurrentNamespace) /* 124 */
  1195 #endif
  1196 #ifndef Tcl_GetGlobalNamespace
  1197 #define Tcl_GetGlobalNamespace \
  1198 	(tclIntStubsPtr->tcl_GetGlobalNamespace) /* 125 */
  1199 #endif
  1200 #ifndef Tcl_GetVariableFullName
  1201 #define Tcl_GetVariableFullName \
  1202 	(tclIntStubsPtr->tcl_GetVariableFullName) /* 126 */
  1203 #endif
  1204 #ifndef Tcl_Import
  1205 #define Tcl_Import \
  1206 	(tclIntStubsPtr->tcl_Import) /* 127 */
  1207 #endif
  1208 #ifndef Tcl_PopCallFrame
  1209 #define Tcl_PopCallFrame \
  1210 	(tclIntStubsPtr->tcl_PopCallFrame) /* 128 */
  1211 #endif
  1212 #ifndef Tcl_PushCallFrame
  1213 #define Tcl_PushCallFrame \
  1214 	(tclIntStubsPtr->tcl_PushCallFrame) /* 129 */
  1215 #endif
  1216 #ifndef Tcl_RemoveInterpResolvers
  1217 #define Tcl_RemoveInterpResolvers \
  1218 	(tclIntStubsPtr->tcl_RemoveInterpResolvers) /* 130 */
  1219 #endif
  1220 #ifndef Tcl_SetNamespaceResolvers
  1221 #define Tcl_SetNamespaceResolvers \
  1222 	(tclIntStubsPtr->tcl_SetNamespaceResolvers) /* 131 */
  1223 #endif
  1224 #ifndef TclpHasSockets
  1225 #define TclpHasSockets \
  1226 	(tclIntStubsPtr->tclpHasSockets) /* 132 */
  1227 #endif
  1228 #ifndef TclpGetDate
  1229 #define TclpGetDate \
  1230 	(tclIntStubsPtr->tclpGetDate) /* 133 */
  1231 #endif
  1232 #ifndef TclpStrftime
  1233 #define TclpStrftime \
  1234 	(tclIntStubsPtr->tclpStrftime) /* 134 */
  1235 #endif
  1236 #ifndef TclpCheckStackSpace
  1237 #define TclpCheckStackSpace \
  1238 	(tclIntStubsPtr->tclpCheckStackSpace) /* 135 */
  1239 #endif
  1240 /* Slot 136 is reserved */
  1241 /* Slot 137 is reserved */
  1242 #ifndef TclGetEnv
  1243 #define TclGetEnv \
  1244 	(tclIntStubsPtr->tclGetEnv) /* 138 */
  1245 #endif
  1246 /* Slot 139 is reserved */
  1247 #ifndef TclLooksLikeInt
  1248 #define TclLooksLikeInt \
  1249 	(tclIntStubsPtr->tclLooksLikeInt) /* 140 */
  1250 #endif
  1251 #ifndef TclpGetCwd
  1252 #define TclpGetCwd \
  1253 	(tclIntStubsPtr->tclpGetCwd) /* 141 */
  1254 #endif
  1255 #ifndef TclSetByteCodeFromAny
  1256 #define TclSetByteCodeFromAny \
  1257 	(tclIntStubsPtr->tclSetByteCodeFromAny) /* 142 */
  1258 #endif
  1259 #ifndef TclAddLiteralObj
  1260 #define TclAddLiteralObj \
  1261 	(tclIntStubsPtr->tclAddLiteralObj) /* 143 */
  1262 #endif
  1263 #ifndef TclHideLiteral
  1264 #define TclHideLiteral \
  1265 	(tclIntStubsPtr->tclHideLiteral) /* 144 */
  1266 #endif
  1267 #ifndef TclGetAuxDataType
  1268 #define TclGetAuxDataType \
  1269 	(tclIntStubsPtr->tclGetAuxDataType) /* 145 */
  1270 #endif
  1271 #ifndef TclHandleCreate
  1272 #define TclHandleCreate \
  1273 	(tclIntStubsPtr->tclHandleCreate) /* 146 */
  1274 #endif
  1275 #ifndef TclHandleFree
  1276 #define TclHandleFree \
  1277 	(tclIntStubsPtr->tclHandleFree) /* 147 */
  1278 #endif
  1279 #ifndef TclHandlePreserve
  1280 #define TclHandlePreserve \
  1281 	(tclIntStubsPtr->tclHandlePreserve) /* 148 */
  1282 #endif
  1283 #ifndef TclHandleRelease
  1284 #define TclHandleRelease \
  1285 	(tclIntStubsPtr->tclHandleRelease) /* 149 */
  1286 #endif
  1287 #ifndef TclRegAbout
  1288 #define TclRegAbout \
  1289 	(tclIntStubsPtr->tclRegAbout) /* 150 */
  1290 #endif
  1291 #ifndef TclRegExpRangeUniChar
  1292 #define TclRegExpRangeUniChar \
  1293 	(tclIntStubsPtr->tclRegExpRangeUniChar) /* 151 */
  1294 #endif
  1295 #ifndef TclSetLibraryPath
  1296 #define TclSetLibraryPath \
  1297 	(tclIntStubsPtr->tclSetLibraryPath) /* 152 */
  1298 #endif
  1299 #ifndef TclGetLibraryPath
  1300 #define TclGetLibraryPath \
  1301 	(tclIntStubsPtr->tclGetLibraryPath) /* 153 */
  1302 #endif
  1303 /* Slot 154 is reserved */
  1304 /* Slot 155 is reserved */
  1305 #ifndef TclRegError
  1306 #define TclRegError \
  1307 	(tclIntStubsPtr->tclRegError) /* 156 */
  1308 #endif
  1309 #ifndef TclVarTraceExists
  1310 #define TclVarTraceExists \
  1311 	(tclIntStubsPtr->tclVarTraceExists) /* 157 */
  1312 #endif
  1313 #ifndef TclSetStartupScriptFileName
  1314 #define TclSetStartupScriptFileName \
  1315 	(tclIntStubsPtr->tclSetStartupScriptFileName) /* 158 */
  1316 #endif
  1317 #ifndef TclGetStartupScriptFileName
  1318 #define TclGetStartupScriptFileName \
  1319 	(tclIntStubsPtr->tclGetStartupScriptFileName) /* 159 */
  1320 #endif
  1321 /* Slot 160 is reserved */
  1322 #ifndef TclChannelTransform
  1323 #define TclChannelTransform \
  1324 	(tclIntStubsPtr->tclChannelTransform) /* 161 */
  1325 #endif
  1326 #ifndef TclChannelEventScriptInvoker
  1327 #define TclChannelEventScriptInvoker \
  1328 	(tclIntStubsPtr->tclChannelEventScriptInvoker) /* 162 */
  1329 #endif
  1330 #ifndef TclGetInstructionTable
  1331 #define TclGetInstructionTable \
  1332 	(tclIntStubsPtr->tclGetInstructionTable) /* 163 */
  1333 #endif
  1334 #ifndef TclExpandCodeArray
  1335 #define TclExpandCodeArray \
  1336 	(tclIntStubsPtr->tclExpandCodeArray) /* 164 */
  1337 #endif
  1338 #ifndef TclpSetInitialEncodings
  1339 #define TclpSetInitialEncodings \
  1340 	(tclIntStubsPtr->tclpSetInitialEncodings) /* 165 */
  1341 #endif
  1342 #ifndef TclListObjSetElement
  1343 #define TclListObjSetElement \
  1344 	(tclIntStubsPtr->tclListObjSetElement) /* 166 */
  1345 #endif
  1346 #ifndef TclSetStartupScriptPath
  1347 #define TclSetStartupScriptPath \
  1348 	(tclIntStubsPtr->tclSetStartupScriptPath) /* 167 */
  1349 #endif
  1350 #ifndef TclGetStartupScriptPath
  1351 #define TclGetStartupScriptPath \
  1352 	(tclIntStubsPtr->tclGetStartupScriptPath) /* 168 */
  1353 #endif
  1354 #ifndef TclpUtfNcmp2
  1355 #define TclpUtfNcmp2 \
  1356 	(tclIntStubsPtr->tclpUtfNcmp2) /* 169 */
  1357 #endif
  1358 #ifndef TclCheckInterpTraces
  1359 #define TclCheckInterpTraces \
  1360 	(tclIntStubsPtr->tclCheckInterpTraces) /* 170 */
  1361 #endif
  1362 #ifndef TclCheckExecutionTraces
  1363 #define TclCheckExecutionTraces \
  1364 	(tclIntStubsPtr->tclCheckExecutionTraces) /* 171 */
  1365 #endif
  1366 #ifndef TclInThreadExit
  1367 #define TclInThreadExit \
  1368 	(tclIntStubsPtr->tclInThreadExit) /* 172 */
  1369 #endif
  1370 #ifndef TclUniCharMatch
  1371 #define TclUniCharMatch \
  1372 	(tclIntStubsPtr->tclUniCharMatch) /* 173 */
  1373 #endif
  1374 /* Slot 174 is reserved */
  1375 /* Slot 175 is reserved */
  1376 /* Slot 176 is reserved */
  1377 /* Slot 177 is reserved */
  1378 /* Slot 178 is reserved */
  1379 /* Slot 179 is reserved */
  1380 /* Slot 180 is reserved */
  1381 /* Slot 181 is reserved */
  1382 #ifndef TclpLocaltime
  1383 #define TclpLocaltime \
  1384 	(tclIntStubsPtr->tclpLocaltime) /* 182 */
  1385 #endif
  1386 #ifndef TclpGmtime
  1387 #define TclpGmtime \
  1388 	(tclIntStubsPtr->tclpGmtime) /* 183 */
  1389 #endif
  1390 /* Slot 184 is reserved */
  1391 /* Slot 185 is reserved */
  1392 /* Slot 186 is reserved */
  1393 /* Slot 187 is reserved */
  1394 /* Slot 188 is reserved */
  1395 /* Slot 189 is reserved */
  1396 /* Slot 190 is reserved */
  1397 /* Slot 191 is reserved */
  1398 /* Slot 192 is reserved */
  1399 /* Slot 193 is reserved */
  1400 /* Slot 194 is reserved */
  1401 /* Slot 195 is reserved */
  1402 /* Slot 196 is reserved */
  1403 /* Slot 197 is reserved */
  1404 /* Slot 198 is reserved */
  1405 #ifndef TclMatchIsTrivial
  1406 #define TclMatchIsTrivial \
  1407 	(tclIntStubsPtr->tclMatchIsTrivial) /* 199 */
  1408 #endif
  1409 
  1410 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
  1411 
  1412 /* !END!: Do not edit above this line. */
  1413 
  1414 #endif /* _TCLINTDECLS */