summaryrefslogtreecommitdiffstats
path: root/generic/tclIntDecls.h
diff options
context:
space:
mode:
authorstanton <stanton>1999-03-03 00:38:35 (GMT)
committerstanton <stanton>1999-03-03 00:38:35 (GMT)
commit531a666d600bbb937c43e9ec3a90e230548710a4 (patch)
tree76e694a9fbdd6ed515de6186a840d8cd40cee06e /generic/tclIntDecls.h
parent8f97fc1f429811f069993f10d6adaff739b6c805 (diff)
downloadtcl-531a666d600bbb937c43e9ec3a90e230548710a4.zip
tcl-531a666d600bbb937c43e9ec3a90e230548710a4.tar.gz
tcl-531a666d600bbb937c43e9ec3a90e230548710a4.tar.bz2
* unix/Makefile.in:
* unix/configure.in: * unix/ldAix: Enhanced AIX shared library support. * win/tclWinSock.c: Removed a bunch of extraneous PASCAL FAR attributes from internal functions. * win/tclWinReg.c: Changed registry package to use stubs mechanism so it no longer depends on the specific version of Tcl. * doc/AddErrInfo.3: * doc/Eval.3: * doc/PkgRequire.3: * doc/SetResult.3: * doc/StringObj.3: * generic/tcl.h: * generic/tclBasic.c: * generic/tclPanic.c: * generic/tclStringObj.c: * generic/tclUtil.c: * unix/mkLinks: Added va_list versions of all VARARGS functions so they can be invoked from the stub functions. * doc/package.n: * doc/PkgRequire.3: * generic/tclPkg.c: Added Tcl_PkgProvideEx, Tcl_RequireEx, Tcl_PresentEx, and Tcl_PkgPresent. Added "package present" command. * generic/tclFileName.c: * mac/tclMacFile.c: * mac/tclMacShLib.exp: * unix/tclUnixFile.c: * win/tclWinFile.c: Changed so TclGetUserHome is defined on all platforms, even though it is currently a noop on mac and windows, and renamed it to TclpGetUserHome. * generic/tclCkalloc.c: Added stub versions of memory checking functions when compiling without TCL_MEM_DEBUG. * doc/ByteArrObj.3: * generic/tcl.h: * generic/tclBinary.c: * generic/tclObj.c: Ported the 8.1 ByteArray type back to 8.0. * generic/tcl.decls: * generic/tcl.h: * generic/tclBasic.c: * generic/tclDecls.h: * generic/tclInt.decls: * generic/tclInt.h: * generic/tclIntDecls.h: * generic/tclIntPlatDecls.h: * generic/tclIntPlatStubs.c: * generic/tclIntStubs.c: * generic/tclPlatDecls.h: * generic/tclPlatStubs.c: * generic/tclStubInit.c: * generic/tclStubLib.c: * generic/tclStubs.c: * tools/genStubs.tcl: * unix/configure.in: * unix/Makefile.in: * unix/tclConfig.sh.in: * win/makefile.vc: * win/tclWinPort.h: Added Tcl stubs implementation. There are now two new macros USE_TCL_STUBS and USE_TCL_STUB_PROCS that enable use of stubs and disable stub macros respectively. All of the public and private function declarations from tcl.h and tclInt.h have moved into the *.decls files and the *Stubs.c and *Decls.h files are generated using the genStubs.tcl script. * generic/tclPanic.c: * generic/panic.c: renamed panic to Tcl_Panic, added macro for backwards compatibility, renamed file to tclPanic.c
Diffstat (limited to 'generic/tclIntDecls.h')
-rw-r--r--generic/tclIntDecls.h1324
1 files changed, 1324 insertions, 0 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h
new file mode 100644
index 0000000..6f9dba0
--- /dev/null
+++ b/generic/tclIntDecls.h
@@ -0,0 +1,1324 @@
+/*
+ * tclIntDecls.h --
+ *
+ * This file contains the declarations for all unsupported
+ * functions that are exported by the Tcl library. These
+ * interfaces are not guaranteed to remain the same between
+ * versions. Use at your own risk.
+ *
+ * Copyright (c) 1998-1999 by Scriptics Corporation.
+ *
+ * See the file "license.terms" for information on usage and redistribution
+ * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
+ *
+ * RCS: @(#) $Id: tclIntDecls.h,v 1.1 1999/03/03 00:38:41 stanton Exp $
+ */
+
+#ifndef _TCLINTDECLS
+#define _TCLINTDECLS
+
+/*
+ * WARNING: This file is automatically generated by the tools/genStubs.tcl
+ * script. Any modifications to the function declarations below should be made
+ * in the generic/tclInt.decls script.
+ */
+
+/* !BEGIN!: Do not edit below this line. */
+
+/*
+ * Exported function declarations:
+ */
+
+/* 0 */
+EXTERN int TclAccess _ANSI_ARGS_((CONST char * path, int mode));
+/* 1 */
+EXTERN int TclAccessDeleteProc _ANSI_ARGS_((
+ TclAccessProc_ * proc));
+/* 2 */
+EXTERN int TclAccessInsertProc _ANSI_ARGS_((
+ TclAccessProc_ * proc));
+/* 3 */
+EXTERN void TclAllocateFreeObjects _ANSI_ARGS_((void));
+/* 4 */
+EXTERN int TclChdir _ANSI_ARGS_((Tcl_Interp * interp,
+ char * dirName));
+/* 5 */
+EXTERN int TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp,
+ int numPids, Tcl_Pid * pidPtr,
+ Tcl_Channel errorChan));
+/* 6 */
+EXTERN void TclCleanupCommand _ANSI_ARGS_((Command * cmdPtr));
+/* 7 */
+EXTERN int TclCopyAndCollapse _ANSI_ARGS_((int count,
+ char * src, char * dst));
+/* 8 */
+EXTERN int TclCopyChannel _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Channel inChan, Tcl_Channel outChan,
+ int toRead, Tcl_Obj * cmdPtr));
+/* 9 */
+EXTERN int TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp,
+ int argc, char ** argv,
+ Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr,
+ TclFile * outPipePtr, TclFile * errFilePtr));
+/* 10 */
+EXTERN int TclCreateProc _ANSI_ARGS_((Tcl_Interp * interp,
+ Namespace * nsPtr, char * procName,
+ Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr,
+ Proc ** procPtrPtr));
+/* 11 */
+EXTERN void TclDeleteCompiledLocalVars _ANSI_ARGS_((
+ Interp * iPtr, CallFrame * framePtr));
+/* 12 */
+EXTERN void TclDeleteVars _ANSI_ARGS_((Interp * iPtr,
+ Tcl_HashTable * tablePtr));
+/* 13 */
+EXTERN int TclDoGlob _ANSI_ARGS_((Tcl_Interp * interp,
+ char * separators, Tcl_DString * headPtr,
+ char * tail));
+/* 14 */
+EXTERN void TclDumpMemoryInfo _ANSI_ARGS_((FILE * outFile));
+/* 15 */
+EXTERN void TclExpandParseValue _ANSI_ARGS_((ParseValue * pvPtr,
+ int needed));
+/* 16 */
+EXTERN void TclExprFloatError _ANSI_ARGS_((Tcl_Interp * interp,
+ double value));
+/* 17 */
+EXTERN int TclFileAttrsCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ int objc, Tcl_Obj *CONST objv[]));
+/* 18 */
+EXTERN int TclFileCopyCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ int argc, char ** argv));
+/* 19 */
+EXTERN int TclFileDeleteCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ int argc, char ** argv));
+/* 20 */
+EXTERN int TclFileMakeDirsCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ int argc, char ** argv));
+/* 21 */
+EXTERN int TclFileRenameCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ int argc, char ** argv));
+/* 22 */
+EXTERN void TclFinalizeCompExecEnv _ANSI_ARGS_((void));
+/* 23 */
+EXTERN void TclFinalizeEnvironment _ANSI_ARGS_((void));
+/* 24 */
+EXTERN void TclFinalizeExecEnv _ANSI_ARGS_((void));
+/* 25 */
+EXTERN int TclFindElement _ANSI_ARGS_((Tcl_Interp * interp,
+ char * list, int listLength,
+ char ** elementPtr, char ** nextPtr,
+ int * sizePtr, int * bracePtr));
+/* 26 */
+EXTERN Proc * TclFindProc _ANSI_ARGS_((Interp * iPtr,
+ char * procName));
+/* 27 */
+EXTERN int TclFormatInt _ANSI_ARGS_((char * buffer, long n));
+/* 28 */
+EXTERN void TclFreePackageInfo _ANSI_ARGS_((Interp * iPtr));
+/* 29 */
+EXTERN void TclGetAndDetachPids _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Channel chan));
+/* 30 */
+EXTERN char * TclGetCwd _ANSI_ARGS_((Tcl_Interp * interp));
+/* 31 */
+EXTERN int TclGetDate _ANSI_ARGS_((char * p, unsigned long now,
+ long zone, unsigned long * timePtr));
+/* 32 */
+EXTERN Tcl_Channel TclGetDefaultStdChannel _ANSI_ARGS_((int type));
+/* 33 */
+EXTERN Tcl_Obj * TclGetElementOfIndexedArray _ANSI_ARGS_((
+ Tcl_Interp * interp, int localIndex,
+ Tcl_Obj * elemPtr, int leaveErrorMsg));
+/* 34 */
+EXTERN char * TclGetEnv _ANSI_ARGS_((CONST char * name));
+/* 35 */
+EXTERN char * TclGetExtension _ANSI_ARGS_((char * name));
+/* 36 */
+EXTERN int TclGetFrame _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, CallFrame ** framePtrPtr));
+/* 37 */
+EXTERN TclCmdProcType TclGetInterpProc _ANSI_ARGS_((void));
+/* 38 */
+EXTERN int TclGetIntForIndex _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Obj * objPtr, int endValue,
+ int * indexPtr));
+/* 39 */
+EXTERN Tcl_Obj * TclGetIndexedScalar _ANSI_ARGS_((Tcl_Interp * interp,
+ int localIndex, int leaveErrorMsg));
+/* 40 */
+EXTERN int TclGetLong _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, long * longPtr));
+/* 41 */
+EXTERN int TclGetLoadedPackages _ANSI_ARGS_((
+ Tcl_Interp * interp, char * targetName));
+/* 42 */
+EXTERN int TclGetNamespaceForQualName _ANSI_ARGS_((
+ Tcl_Interp * interp, char * qualName,
+ Namespace * cxtNsPtr, int flags,
+ Namespace ** nsPtrPtr,
+ Namespace ** altNsPtrPtr,
+ Namespace ** actualCxtPtrPtr,
+ char ** simpleNamePtr));
+/* 43 */
+EXTERN TclObjCmdProcType TclGetObjInterpProc _ANSI_ARGS_((void));
+/* 44 */
+EXTERN int TclGetOpenMode _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, int * seekFlagPtr));
+/* 45 */
+EXTERN Tcl_Command TclGetOriginalCommand _ANSI_ARGS_((
+ Tcl_Command command));
+/* 46 */
+EXTERN char * TclpGetUserHome _ANSI_ARGS_((char * name,
+ Tcl_DString * bufferPtr));
+/* 47 */
+EXTERN int TclGlobalInvoke _ANSI_ARGS_((Tcl_Interp * interp,
+ int argc, char ** argv, int flags));
+/* 48 */
+EXTERN int TclGuessPackageName _ANSI_ARGS_((char * fileName,
+ Tcl_DString * bufPtr));
+/* 49 */
+EXTERN int TclHasSockets _ANSI_ARGS_((Tcl_Interp * interp));
+/* 50 */
+EXTERN int TclHideUnsafeCommands _ANSI_ARGS_((
+ Tcl_Interp * interp));
+/* 51 */
+EXTERN int TclInExit _ANSI_ARGS_((void));
+/* 52 */
+EXTERN Tcl_Obj * TclIncrElementOfIndexedArray _ANSI_ARGS_((
+ Tcl_Interp * interp, int localIndex,
+ Tcl_Obj * elemPtr, long incrAmount));
+/* 53 */
+EXTERN Tcl_Obj * TclIncrIndexedScalar _ANSI_ARGS_((
+ Tcl_Interp * interp, int localIndex,
+ long incrAmount));
+/* 54 */
+EXTERN Tcl_Obj * TclIncrVar2 _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr,
+ long incrAmount, int part1NotParsed));
+/* 55 */
+EXTERN void TclInitCompiledLocals _ANSI_ARGS_((
+ Tcl_Interp * interp, CallFrame * framePtr,
+ Namespace * nsPtr));
+/* 56 */
+EXTERN void TclInitNamespaces _ANSI_ARGS_((void));
+/* 57 */
+EXTERN int TclInterpInit _ANSI_ARGS_((Tcl_Interp * interp));
+/* 58 */
+EXTERN int TclInvoke _ANSI_ARGS_((Tcl_Interp * interp, int argc,
+ char ** argv, int flags));
+/* 59 */
+EXTERN int TclInvokeObjectCommand _ANSI_ARGS_((
+ ClientData clientData, Tcl_Interp * interp,
+ int argc, char ** argv));
+/* 60 */
+EXTERN int TclInvokeStringCommand _ANSI_ARGS_((
+ ClientData clientData, Tcl_Interp * interp,
+ int objc, Tcl_Obj *CONST objv[]));
+/* 61 */
+EXTERN Proc * TclIsProc _ANSI_ARGS_((Command * cmdPtr));
+/* 62 */
+EXTERN int TclLoadFile _ANSI_ARGS_((Tcl_Interp * interp,
+ char * fileName, char * sym1, char * sym2,
+ Tcl_PackageInitProc ** proc1Ptr,
+ Tcl_PackageInitProc ** proc2Ptr));
+/* 63 */
+EXTERN int TclLooksLikeInt _ANSI_ARGS_((char * p));
+/* 64 */
+EXTERN Var * TclLookupVar _ANSI_ARGS_((Tcl_Interp * interp,
+ char * part1, char * part2, int flags,
+ char * msg, int createPart1, int createPart2,
+ Var ** arrayPtrPtr));
+/* 65 */
+EXTERN int TclMatchFiles _ANSI_ARGS_((Tcl_Interp * interp,
+ char * separators, Tcl_DString * dirPtr,
+ char * pattern, char * tail));
+/* 66 */
+EXTERN int TclNeedSpace _ANSI_ARGS_((char * start, char * end));
+/* 67 */
+EXTERN Tcl_Obj * TclNewProcBodyObj _ANSI_ARGS_((Proc * procPtr));
+/* 68 */
+EXTERN int TclObjCommandComplete _ANSI_ARGS_((Tcl_Obj * cmdPtr));
+/* 69 */
+EXTERN int TclObjInterpProc _ANSI_ARGS_((ClientData clientData,
+ Tcl_Interp * interp, int objc,
+ Tcl_Obj *CONST objv[]));
+/* 70 */
+EXTERN int TclObjInvoke _ANSI_ARGS_((Tcl_Interp * interp,
+ int objc, Tcl_Obj *CONST objv[], int flags));
+/* 71 */
+EXTERN int TclObjInvokeGlobal _ANSI_ARGS_((Tcl_Interp * interp,
+ int objc, Tcl_Obj *CONST objv[], int flags));
+/* 72 */
+EXTERN int TclOpenFileChannelDeleteProc _ANSI_ARGS_((
+ TclOpenFileChannelProc_ * proc));
+/* 73 */
+EXTERN int TclOpenFileChannelInsertProc _ANSI_ARGS_((
+ TclOpenFileChannelProc_ * proc));
+/* 74 */
+EXTERN char * TclpAlloc _ANSI_ARGS_((unsigned int size));
+/* 75 */
+EXTERN int TclpCloseFile _ANSI_ARGS_((TclFile file));
+/* 76 */
+EXTERN int TclpCopyFile _ANSI_ARGS_((char * source, char * dest));
+/* 77 */
+EXTERN int TclpCopyDirectory _ANSI_ARGS_((char * source,
+ char * dest, Tcl_DString * errorPtr));
+/* 78 */
+EXTERN Tcl_Channel TclpCreateCommandChannel _ANSI_ARGS_((
+ TclFile readFile, TclFile writeFile,
+ TclFile errorFile, int numPids,
+ Tcl_Pid * pidPtr));
+/* 79 */
+EXTERN int TclpCreateDirectory _ANSI_ARGS_((char * path));
+/* 80 */
+EXTERN int TclpCreatePipe _ANSI_ARGS_((TclFile * readPipe,
+ TclFile * writePipe));
+/* 81 */
+EXTERN int TclpCreateProcess _ANSI_ARGS_((Tcl_Interp * interp,
+ int argc, char ** argv, TclFile inputFile,
+ TclFile outputFile, TclFile errorFile,
+ Tcl_Pid * pidPtr));
+/* 82 */
+EXTERN TclFile TclpCreateTempFile _ANSI_ARGS_((char * contents,
+ Tcl_DString * namePtr));
+/* 83 */
+EXTERN int TclpDeleteFile _ANSI_ARGS_((char * path));
+/* 84 */
+EXTERN void TclpFinalize _ANSI_ARGS_((void));
+/* 85 */
+EXTERN void TclpFree _ANSI_ARGS_((char * ptr));
+/* 86 */
+EXTERN unsigned long TclpGetClicks _ANSI_ARGS_((void));
+/* 87 */
+EXTERN unsigned long TclpGetSeconds _ANSI_ARGS_((void));
+/* 88 */
+EXTERN void TclpGetTime _ANSI_ARGS_((Tcl_Time * time));
+/* 89 */
+EXTERN int TclpGetTimeZone _ANSI_ARGS_((unsigned long time));
+/* 90 */
+EXTERN char * TclpGetTZName _ANSI_ARGS_((void));
+/* 91 */
+EXTERN int TclpListVolumes _ANSI_ARGS_((Tcl_Interp * interp));
+/* 92 */
+EXTERN TclFile TclpMakeFile _ANSI_ARGS_((Tcl_Channel channel,
+ int direction));
+/* 93 */
+EXTERN TclFile TclpOpenFile _ANSI_ARGS_((char * fname, int mode));
+/* 94 */
+EXTERN Tcl_Channel TclpOpenFileChannel _ANSI_ARGS_((Tcl_Interp * interp,
+ char * fileName, char * modeString,
+ int permissions));
+/* 95 */
+EXTERN char * TclpRealloc _ANSI_ARGS_((char * ptr,
+ unsigned int size));
+/* 96 */
+EXTERN int TclpRemoveDirectory _ANSI_ARGS_((char * path,
+ int recursive, Tcl_DString * errorPtr));
+/* 97 */
+EXTERN int TclpRenameFile _ANSI_ARGS_((char * source,
+ char * dest));
+/* 98 */
+EXTERN int TclParseBraces _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char ** termPtr,
+ ParseValue * pvPtr));
+/* 99 */
+EXTERN int TclParseNestedCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, int flags, char ** termPtr,
+ ParseValue * pvPtr));
+/* 100 */
+EXTERN int TclParseQuotes _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, int termChar, int flags,
+ char ** termPtr, ParseValue * pvPtr));
+/* 101 */
+EXTERN void TclPlatformInit _ANSI_ARGS_((Tcl_Interp * interp));
+/* 102 */
+EXTERN char * TclPrecTraceProc _ANSI_ARGS_((ClientData clientData,
+ Tcl_Interp * interp, char * name1,
+ char * name2, int flags));
+/* 103 */
+EXTERN int TclPreventAliasLoop _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Interp * cmdInterp, Tcl_Command cmd));
+/* 104 */
+EXTERN void TclPrintByteCodeObj _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Obj * objPtr));
+/* 105 */
+EXTERN void TclProcCleanupProc _ANSI_ARGS_((Proc * procPtr));
+/* 106 */
+EXTERN int TclProcCompileProc _ANSI_ARGS_((Tcl_Interp * interp,
+ Proc * procPtr, Tcl_Obj * bodyPtr,
+ Namespace * nsPtr, CONST char * description,
+ CONST char * procName));
+/* 107 */
+EXTERN void TclProcDeleteProc _ANSI_ARGS_((ClientData clientData));
+/* 108 */
+EXTERN int TclProcInterpProc _ANSI_ARGS_((ClientData clientData,
+ Tcl_Interp * interp, int argc, char ** argv));
+/* 109 */
+EXTERN int TclRenameCommand _ANSI_ARGS_((Tcl_Interp * interp,
+ char * oldName, char * newName));
+/* 110 */
+EXTERN void TclResetShadowedCmdRefs _ANSI_ARGS_((
+ Tcl_Interp * interp, Command * newCmdPtr));
+/* 111 */
+EXTERN int TclServiceIdle _ANSI_ARGS_((void));
+/* 112 */
+EXTERN Tcl_Obj * TclSetElementOfIndexedArray _ANSI_ARGS_((
+ Tcl_Interp * interp, int localIndex,
+ Tcl_Obj * elemPtr, Tcl_Obj * objPtr,
+ int leaveErrorMsg));
+/* 113 */
+EXTERN Tcl_Obj * TclSetIndexedScalar _ANSI_ARGS_((Tcl_Interp * interp,
+ int localIndex, Tcl_Obj * objPtr,
+ int leaveErrorMsg));
+/* 114 */
+EXTERN char * TclSetPreInitScript _ANSI_ARGS_((char * string));
+/* 115 */
+EXTERN void TclSetupEnv _ANSI_ARGS_((Tcl_Interp * interp));
+/* 116 */
+EXTERN int TclSockGetPort _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * proto, int * portPtr));
+/* 117 */
+EXTERN int TclSockMinimumBuffers _ANSI_ARGS_((int sock,
+ int size));
+/* 118 */
+EXTERN int TclStat _ANSI_ARGS_((CONST char * path,
+ TclStat_ * buf));
+/* 119 */
+EXTERN int TclStatDeleteProc _ANSI_ARGS_((TclStatProc_ * proc));
+/* 120 */
+EXTERN int TclStatInsertProc _ANSI_ARGS_((TclStatProc_ * proc));
+/* 121 */
+EXTERN void TclTeardownNamespace _ANSI_ARGS_((Namespace * nsPtr));
+/* 122 */
+EXTERN int TclUpdateReturnInfo _ANSI_ARGS_((Interp * iPtr));
+/* 123 */
+EXTERN char * TclWordEnd _ANSI_ARGS_((char * start,
+ char * lastChar, int nested, int * semiPtr));
+/* 124 */
+EXTERN void Tcl_AddInterpResolvers _ANSI_ARGS_((
+ Tcl_Interp * interp, char * name,
+ Tcl_ResolveCmdProc * cmdProc,
+ Tcl_ResolveVarProc * varProc,
+ Tcl_ResolveCompiledVarProc * compiledVarProc));
+/* 125 */
+EXTERN int Tcl_AppendExportList _ANSI_ARGS_((
+ Tcl_Interp * interp, Tcl_Namespace * nsPtr,
+ Tcl_Obj * objPtr));
+/* 126 */
+EXTERN Tcl_Namespace * Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp * interp,
+ char * name, ClientData clientData,
+ Tcl_NamespaceDeleteProc * deleteProc));
+/* 127 */
+EXTERN void Tcl_DeleteNamespace _ANSI_ARGS_((
+ Tcl_Namespace * nsPtr));
+/* 128 */
+EXTERN int Tcl_Export _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Namespace * nsPtr, char * pattern,
+ int resetListFirst));
+/* 129 */
+EXTERN Tcl_Command Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp * interp,
+ char * name, Tcl_Namespace * contextNsPtr,
+ int flags));
+/* 130 */
+EXTERN Tcl_Namespace * Tcl_FindNamespace _ANSI_ARGS_((Tcl_Interp * interp,
+ char * name, Tcl_Namespace * contextNsPtr,
+ int flags));
+/* 131 */
+EXTERN int Tcl_GetInterpResolvers _ANSI_ARGS_((
+ Tcl_Interp * interp, char * name,
+ Tcl_ResolverInfo * resInfo));
+/* 132 */
+EXTERN int Tcl_GetNamespaceResolvers _ANSI_ARGS_((
+ Tcl_Namespace * namespacePtr,
+ Tcl_ResolverInfo * resInfo));
+/* 133 */
+EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_((
+ Tcl_Interp * interp, char * name,
+ Tcl_Namespace * contextNsPtr, int flags));
+/* 134 */
+EXTERN int Tcl_ForgetImport _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Namespace * nsPtr, char * pattern));
+/* 135 */
+EXTERN Tcl_Command Tcl_GetCommandFromObj _ANSI_ARGS_((
+ Tcl_Interp * interp, Tcl_Obj * objPtr));
+/* 136 */
+EXTERN void Tcl_GetCommandFullName _ANSI_ARGS_((
+ Tcl_Interp * interp, Tcl_Command command,
+ Tcl_Obj * objPtr));
+/* 137 */
+EXTERN Tcl_Namespace * Tcl_GetCurrentNamespace _ANSI_ARGS_((
+ Tcl_Interp * interp));
+/* 138 */
+EXTERN Tcl_Namespace * Tcl_GetGlobalNamespace _ANSI_ARGS_((
+ Tcl_Interp * interp));
+/* 139 */
+EXTERN void Tcl_GetVariableFullName _ANSI_ARGS_((
+ Tcl_Interp * interp, Tcl_Var variable,
+ Tcl_Obj * objPtr));
+/* 140 */
+EXTERN int Tcl_Import _ANSI_ARGS_((Tcl_Interp * interp,
+ Tcl_Namespace * nsPtr, char * pattern,
+ int allowOverwrite));
+/* 141 */
+EXTERN void Tcl_PopCallFrame _ANSI_ARGS_((Tcl_Interp* interp));
+/* 142 */
+EXTERN int Tcl_PushCallFrame _ANSI_ARGS_((Tcl_Interp* interp,
+ Tcl_CallFrame * framePtr,
+ Tcl_Namespace * nsPtr, int isProcCallFrame));
+/* 143 */
+EXTERN int Tcl_RemoveInterpResolvers _ANSI_ARGS_((
+ Tcl_Interp * interp, char * name));
+/* 144 */
+EXTERN void Tcl_SetNamespaceResolvers _ANSI_ARGS_((
+ Tcl_Namespace * namespacePtr,
+ Tcl_ResolveCmdProc * cmdProc,
+ Tcl_ResolveVarProc * varProc,
+ Tcl_ResolveCompiledVarProc * compiledVarProc));
+/* 145 */
+EXTERN int TclCompileBreakCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 146 */
+EXTERN int TclCompileCatchCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 147 */
+EXTERN int TclCompileContinueCmd _ANSI_ARGS_((
+ Tcl_Interp * interp, char * string,
+ char * lastChar, int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 148 */
+EXTERN int TclCompileExprCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 149 */
+EXTERN int TclCompileForCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 150 */
+EXTERN int TclCompileForeachCmd _ANSI_ARGS_((
+ Tcl_Interp * interp, char * string,
+ char * lastChar, int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 151 */
+EXTERN int TclCompileIfCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 152 */
+EXTERN int TclCompileIncrCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 153 */
+EXTERN int TclCompileSetCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+/* 154 */
+EXTERN int TclCompileWhileCmd _ANSI_ARGS_((Tcl_Interp * interp,
+ char * string, char * lastChar,
+ int compileFlags,
+ struct CompileEnv * compileEnvPtr));
+
+typedef struct TclIntStubs {
+ int magic;
+ struct TclIntStubHooks *hooks;
+
+ int (*tclAccess) _ANSI_ARGS_((CONST char * path, int mode)); /* 0 */
+ int (*tclAccessDeleteProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 1 */
+ int (*tclAccessInsertProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 2 */
+ void (*tclAllocateFreeObjects) _ANSI_ARGS_((void)); /* 3 */
+ int (*tclChdir) _ANSI_ARGS_((Tcl_Interp * interp, char * dirName)); /* 4 */
+ int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */
+ void (*tclCleanupCommand) _ANSI_ARGS_((Command * cmdPtr)); /* 6 */
+ int (*tclCopyAndCollapse) _ANSI_ARGS_((int count, char * src, char * dst)); /* 7 */
+ int (*tclCopyChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel inChan, Tcl_Channel outChan, int toRead, Tcl_Obj * cmdPtr)); /* 8 */
+ int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */
+ int (*tclCreateProc) _ANSI_ARGS_((Tcl_Interp * interp, Namespace * nsPtr, char * procName, Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, Proc ** procPtrPtr)); /* 10 */
+ void (*tclDeleteCompiledLocalVars) _ANSI_ARGS_((Interp * iPtr, CallFrame * framePtr)); /* 11 */
+ void (*tclDeleteVars) _ANSI_ARGS_((Interp * iPtr, Tcl_HashTable * tablePtr)); /* 12 */
+ int (*tclDoGlob) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * headPtr, char * tail)); /* 13 */
+ void (*tclDumpMemoryInfo) _ANSI_ARGS_((FILE * outFile)); /* 14 */
+ void (*tclExpandParseValue) _ANSI_ARGS_((ParseValue * pvPtr, int needed)); /* 15 */
+ void (*tclExprFloatError) _ANSI_ARGS_((Tcl_Interp * interp, double value)); /* 16 */
+ int (*tclFileAttrsCmd) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 17 */
+ int (*tclFileCopyCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 18 */
+ int (*tclFileDeleteCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 19 */
+ int (*tclFileMakeDirsCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 20 */
+ int (*tclFileRenameCmd) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv)); /* 21 */
+ void (*tclFinalizeCompExecEnv) _ANSI_ARGS_((void)); /* 22 */
+ void (*tclFinalizeEnvironment) _ANSI_ARGS_((void)); /* 23 */
+ void (*tclFinalizeExecEnv) _ANSI_ARGS_((void)); /* 24 */
+ int (*tclFindElement) _ANSI_ARGS_((Tcl_Interp * interp, char * list, int listLength, char ** elementPtr, char ** nextPtr, int * sizePtr, int * bracePtr)); /* 25 */
+ Proc * (*tclFindProc) _ANSI_ARGS_((Interp * iPtr, char * procName)); /* 26 */
+ int (*tclFormatInt) _ANSI_ARGS_((char * buffer, long n)); /* 27 */
+ void (*tclFreePackageInfo) _ANSI_ARGS_((Interp * iPtr)); /* 28 */
+ void (*tclGetAndDetachPids) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 29 */
+ char * (*tclGetCwd) _ANSI_ARGS_((Tcl_Interp * interp)); /* 30 */
+ int (*tclGetDate) _ANSI_ARGS_((char * p, unsigned long now, long zone, unsigned long * timePtr)); /* 31 */
+ Tcl_Channel (*tclGetDefaultStdChannel) _ANSI_ARGS_((int type)); /* 32 */
+ Tcl_Obj * (*tclGetElementOfIndexedArray) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * elemPtr, int leaveErrorMsg)); /* 33 */
+ char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name)); /* 34 */
+ char * (*tclGetExtension) _ANSI_ARGS_((char * name)); /* 35 */
+ int (*tclGetFrame) _ANSI_ARGS_((Tcl_Interp * interp, char * string, CallFrame ** framePtrPtr)); /* 36 */
+ TclCmdProcType (*tclGetInterpProc) _ANSI_ARGS_((void)); /* 37 */
+ int (*tclGetIntForIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int endValue, int * indexPtr)); /* 38 */
+ Tcl_Obj * (*tclGetIndexedScalar) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, int leaveErrorMsg)); /* 39 */
+ int (*tclGetLong) _ANSI_ARGS_((Tcl_Interp * interp, char * string, long * longPtr)); /* 40 */
+ int (*tclGetLoadedPackages) _ANSI_ARGS_((Tcl_Interp * interp, char * targetName)); /* 41 */
+ int (*tclGetNamespaceForQualName) _ANSI_ARGS_((Tcl_Interp * interp, char * qualName, Namespace * cxtNsPtr, int flags, Namespace ** nsPtrPtr, Namespace ** altNsPtrPtr, Namespace ** actualCxtPtrPtr, char ** simpleNamePtr)); /* 42 */
+ TclObjCmdProcType (*tclGetObjInterpProc) _ANSI_ARGS_((void)); /* 43 */
+ int (*tclGetOpenMode) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int * seekFlagPtr)); /* 44 */
+ Tcl_Command (*tclGetOriginalCommand) _ANSI_ARGS_((Tcl_Command command)); /* 45 */
+ char * (*tclpGetUserHome) _ANSI_ARGS_((char * name, Tcl_DString * bufferPtr)); /* 46 */
+ int (*tclGlobalInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 47 */
+ int (*tclGuessPackageName) _ANSI_ARGS_((char * fileName, Tcl_DString * bufPtr)); /* 48 */
+ int (*tclHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 49 */
+ int (*tclHideUnsafeCommands) _ANSI_ARGS_((Tcl_Interp * interp)); /* 50 */
+ int (*tclInExit) _ANSI_ARGS_((void)); /* 51 */
+ Tcl_Obj * (*tclIncrElementOfIndexedArray) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * elemPtr, long incrAmount)); /* 52 */
+ Tcl_Obj * (*tclIncrIndexedScalar) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, long incrAmount)); /* 53 */
+ Tcl_Obj * (*tclIncrVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, long incrAmount, int part1NotParsed)); /* 54 */
+ void (*tclInitCompiledLocals) _ANSI_ARGS_((Tcl_Interp * interp, CallFrame * framePtr, Namespace * nsPtr)); /* 55 */
+ void (*tclInitNamespaces) _ANSI_ARGS_((void)); /* 56 */
+ int (*tclInterpInit) _ANSI_ARGS_((Tcl_Interp * interp)); /* 57 */
+ int (*tclInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 58 */
+ int (*tclInvokeObjectCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, char ** argv)); /* 59 */
+ int (*tclInvokeStringCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 60 */
+ Proc * (*tclIsProc) _ANSI_ARGS_((Command * cmdPtr)); /* 61 */
+ int (*tclLoadFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * sym1, char * sym2, Tcl_PackageInitProc ** proc1Ptr, Tcl_PackageInitProc ** proc2Ptr)); /* 62 */
+ int (*tclLooksLikeInt) _ANSI_ARGS_((char * p)); /* 63 */
+ Var * (*tclLookupVar) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, char * msg, int createPart1, int createPart2, Var ** arrayPtrPtr)); /* 64 */
+ int (*tclMatchFiles) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * dirPtr, char * pattern, char * tail)); /* 65 */
+ int (*tclNeedSpace) _ANSI_ARGS_((char * start, char * end)); /* 66 */
+ Tcl_Obj * (*tclNewProcBodyObj) _ANSI_ARGS_((Proc * procPtr)); /* 67 */
+ int (*tclObjCommandComplete) _ANSI_ARGS_((Tcl_Obj * cmdPtr)); /* 68 */
+ int (*tclObjInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 69 */
+ int (*tclObjInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 70 */
+ int (*tclObjInvokeGlobal) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 71 */
+ int (*tclOpenFileChannelDeleteProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 72 */
+ int (*tclOpenFileChannelInsertProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 73 */
+ char * (*tclpAlloc) _ANSI_ARGS_((unsigned int size)); /* 74 */
+ int (*tclpCloseFile) _ANSI_ARGS_((TclFile file)); /* 75 */
+ int (*tclpCopyFile) _ANSI_ARGS_((char * source, char * dest)); /* 76 */
+ int (*tclpCopyDirectory) _ANSI_ARGS_((char * source, char * dest, Tcl_DString * errorPtr)); /* 77 */
+ Tcl_Channel (*tclpCreateCommandChannel) _ANSI_ARGS_((TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr)); /* 78 */
+ int (*tclpCreateDirectory) _ANSI_ARGS_((char * path)); /* 79 */
+ int (*tclpCreatePipe) _ANSI_ARGS_((TclFile * readPipe, TclFile * writePipe)); /* 80 */
+ int (*tclpCreateProcess) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr)); /* 81 */
+ TclFile (*tclpCreateTempFile) _ANSI_ARGS_((char * contents, Tcl_DString * namePtr)); /* 82 */
+ int (*tclpDeleteFile) _ANSI_ARGS_((char * path)); /* 83 */
+ void (*tclpFinalize) _ANSI_ARGS_((void)); /* 84 */
+ void (*tclpFree) _ANSI_ARGS_((char * ptr)); /* 85 */
+ unsigned long (*tclpGetClicks) _ANSI_ARGS_((void)); /* 86 */
+ unsigned long (*tclpGetSeconds) _ANSI_ARGS_((void)); /* 87 */
+ void (*tclpGetTime) _ANSI_ARGS_((Tcl_Time * time)); /* 88 */
+ int (*tclpGetTimeZone) _ANSI_ARGS_((unsigned long time)); /* 89 */
+ char * (*tclpGetTZName) _ANSI_ARGS_((void)); /* 90 */
+ int (*tclpListVolumes) _ANSI_ARGS_((Tcl_Interp * interp)); /* 91 */
+ TclFile (*tclpMakeFile) _ANSI_ARGS_((Tcl_Channel channel, int direction)); /* 92 */
+ TclFile (*tclpOpenFile) _ANSI_ARGS_((char * fname, int mode)); /* 93 */
+ Tcl_Channel (*tclpOpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * modeString, int permissions)); /* 94 */
+ char * (*tclpRealloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 95 */
+ int (*tclpRemoveDirectory) _ANSI_ARGS_((char * path, int recursive, Tcl_DString * errorPtr)); /* 96 */
+ int (*tclpRenameFile) _ANSI_ARGS_((char * source, char * dest)); /* 97 */
+ int (*tclParseBraces) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char ** termPtr, ParseValue * pvPtr)); /* 98 */
+ int (*tclParseNestedCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int flags, char ** termPtr, ParseValue * pvPtr)); /* 99 */
+ int (*tclParseQuotes) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int termChar, int flags, char ** termPtr, ParseValue * pvPtr)); /* 100 */
+ void (*tclPlatformInit) _ANSI_ARGS_((Tcl_Interp * interp)); /* 101 */
+ char * (*tclPrecTraceProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, char * name1, char * name2, int flags)); /* 102 */
+ int (*tclPreventAliasLoop) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Interp * cmdInterp, Tcl_Command cmd)); /* 103 */
+ void (*tclPrintByteCodeObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 104 */
+ void (*tclProcCleanupProc) _ANSI_ARGS_((Proc * procPtr)); /* 105 */
+ int (*tclProcCompileProc) _ANSI_ARGS_((Tcl_Interp * interp, Proc * procPtr, Tcl_Obj * bodyPtr, Namespace * nsPtr, CONST char * description, CONST char * procName)); /* 106 */
+ void (*tclProcDeleteProc) _ANSI_ARGS_((ClientData clientData)); /* 107 */
+ int (*tclProcInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, char ** argv)); /* 108 */
+ int (*tclRenameCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * oldName, char * newName)); /* 109 */
+ void (*tclResetShadowedCmdRefs) _ANSI_ARGS_((Tcl_Interp * interp, Command * newCmdPtr)); /* 110 */
+ int (*tclServiceIdle) _ANSI_ARGS_((void)); /* 111 */
+ Tcl_Obj * (*tclSetElementOfIndexedArray) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * elemPtr, Tcl_Obj * objPtr, int leaveErrorMsg)); /* 112 */
+ Tcl_Obj * (*tclSetIndexedScalar) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * objPtr, int leaveErrorMsg)); /* 113 */
+ char * (*tclSetPreInitScript) _ANSI_ARGS_((char * string)); /* 114 */
+ void (*tclSetupEnv) _ANSI_ARGS_((Tcl_Interp * interp)); /* 115 */
+ int (*tclSockGetPort) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * proto, int * portPtr)); /* 116 */
+ int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 117 */
+ int (*tclStat) _ANSI_ARGS_((CONST char * path, TclStat_ * buf)); /* 118 */
+ int (*tclStatDeleteProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 119 */
+ int (*tclStatInsertProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 120 */
+ void (*tclTeardownNamespace) _ANSI_ARGS_((Namespace * nsPtr)); /* 121 */
+ int (*tclUpdateReturnInfo) _ANSI_ARGS_((Interp * iPtr)); /* 122 */
+ char * (*tclWordEnd) _ANSI_ARGS_((char * start, char * lastChar, int nested, int * semiPtr)); /* 123 */
+ void (*tcl_AddInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 124 */
+ int (*tcl_AppendExportList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr)); /* 125 */
+ Tcl_Namespace * (*tcl_CreateNamespace) _ANSI_ARGS_((Tcl_Interp * interp, char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc)); /* 126 */
+ void (*tcl_DeleteNamespace) _ANSI_ARGS_((Tcl_Namespace * nsPtr)); /* 127 */
+ int (*tcl_Export) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, char * pattern, int resetListFirst)); /* 128 */
+ Tcl_Command (*tcl_FindCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 129 */
+ Tcl_Namespace * (*tcl_FindNamespace) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 130 */
+ int (*tcl_GetInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_ResolverInfo * resInfo)); /* 131 */
+ int (*tcl_GetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolverInfo * resInfo)); /* 132 */
+ Tcl_Var (*tcl_FindNamespaceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 133 */
+ int (*tcl_ForgetImport) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, char * pattern)); /* 134 */
+ Tcl_Command (*tcl_GetCommandFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 135 */
+ void (*tcl_GetCommandFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command, Tcl_Obj * objPtr)); /* 136 */
+ Tcl_Namespace * (*tcl_GetCurrentNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 137 */
+ Tcl_Namespace * (*tcl_GetGlobalNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 138 */
+ void (*tcl_GetVariableFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Var variable, Tcl_Obj * objPtr)); /* 139 */
+ int (*tcl_Import) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, char * pattern, int allowOverwrite)); /* 140 */
+ void (*tcl_PopCallFrame) _ANSI_ARGS_((Tcl_Interp* interp)); /* 141 */
+ int (*tcl_PushCallFrame) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame)); /* 142 */
+ int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name)); /* 143 */
+ void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 144 */
+ int (*tclCompileBreakCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 145 */
+ int (*tclCompileCatchCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 146 */
+ int (*tclCompileContinueCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 147 */
+ int (*tclCompileExprCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 148 */
+ int (*tclCompileForCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 149 */
+ int (*tclCompileForeachCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 150 */
+ int (*tclCompileIfCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 151 */
+ int (*tclCompileIncrCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 152 */
+ int (*tclCompileSetCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 153 */
+ int (*tclCompileWhileCmd) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * lastChar, int compileFlags, struct CompileEnv * compileEnvPtr)); /* 154 */
+} TclIntStubs;
+
+extern TclIntStubs *tclIntStubsPtr;
+
+#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
+
+/*
+ * Inline function declarations:
+ */
+
+#ifndef TclAccess
+#define TclAccess(path, mode) \
+ (tclIntStubsPtr->tclAccess)(path, mode) /* 0 */
+#endif
+#ifndef TclAccessDeleteProc
+#define TclAccessDeleteProc(proc) \
+ (tclIntStubsPtr->tclAccessDeleteProc)(proc) /* 1 */
+#endif
+#ifndef TclAccessInsertProc
+#define TclAccessInsertProc(proc) \
+ (tclIntStubsPtr->tclAccessInsertProc)(proc) /* 2 */
+#endif
+#ifndef TclAllocateFreeObjects
+#define TclAllocateFreeObjects() \
+ (tclIntStubsPtr->tclAllocateFreeObjects)() /* 3 */
+#endif
+#ifndef TclChdir
+#define TclChdir(interp, dirName) \
+ (tclIntStubsPtr->tclChdir)(interp, dirName) /* 4 */
+#endif
+#ifndef TclCleanupChildren
+#define TclCleanupChildren(interp, numPids, pidPtr, errorChan) \
+ (tclIntStubsPtr->tclCleanupChildren)(interp, numPids, pidPtr, errorChan) /* 5 */
+#endif
+#ifndef TclCleanupCommand
+#define TclCleanupCommand(cmdPtr) \
+ (tclIntStubsPtr->tclCleanupCommand)(cmdPtr) /* 6 */
+#endif
+#ifndef TclCopyAndCollapse
+#define TclCopyAndCollapse(count, src, dst) \
+ (tclIntStubsPtr->tclCopyAndCollapse)(count, src, dst) /* 7 */
+#endif
+#ifndef TclCopyChannel
+#define TclCopyChannel(interp, inChan, outChan, toRead, cmdPtr) \
+ (tclIntStubsPtr->tclCopyChannel)(interp, inChan, outChan, toRead, cmdPtr) /* 8 */
+#endif
+#ifndef TclCreatePipeline
+#define TclCreatePipeline(interp, argc, argv, pidArrayPtr, inPipePtr, outPipePtr, errFilePtr) \
+ (tclIntStubsPtr->tclCreatePipeline)(interp, argc, argv, pidArrayPtr, inPipePtr, outPipePtr, errFilePtr) /* 9 */
+#endif
+#ifndef TclCreateProc
+#define TclCreateProc(interp, nsPtr, procName, argsPtr, bodyPtr, procPtrPtr) \
+ (tclIntStubsPtr->tclCreateProc)(interp, nsPtr, procName, argsPtr, bodyPtr, procPtrPtr) /* 10 */
+#endif
+#ifndef TclDeleteCompiledLocalVars
+#define TclDeleteCompiledLocalVars(iPtr, framePtr) \
+ (tclIntStubsPtr->tclDeleteCompiledLocalVars)(iPtr, framePtr) /* 11 */
+#endif
+#ifndef TclDeleteVars
+#define TclDeleteVars(iPtr, tablePtr) \
+ (tclIntStubsPtr->tclDeleteVars)(iPtr, tablePtr) /* 12 */
+#endif
+#ifndef TclDoGlob
+#define TclDoGlob(interp, separators, headPtr, tail) \
+ (tclIntStubsPtr->tclDoGlob)(interp, separators, headPtr, tail) /* 13 */
+#endif
+#ifndef TclDumpMemoryInfo
+#define TclDumpMemoryInfo(outFile) \
+ (tclIntStubsPtr->tclDumpMemoryInfo)(outFile) /* 14 */
+#endif
+#ifndef TclExpandParseValue
+#define TclExpandParseValue(pvPtr, needed) \
+ (tclIntStubsPtr->tclExpandParseValue)(pvPtr, needed) /* 15 */
+#endif
+#ifndef TclExprFloatError
+#define TclExprFloatError(interp, value) \
+ (tclIntStubsPtr->tclExprFloatError)(interp, value) /* 16 */
+#endif
+#ifndef TclFileAttrsCmd
+#define TclFileAttrsCmd(interp, objc, objv) \
+ (tclIntStubsPtr->tclFileAttrsCmd)(interp, objc, objv) /* 17 */
+#endif
+#ifndef TclFileCopyCmd
+#define TclFileCopyCmd(interp, argc, argv) \
+ (tclIntStubsPtr->tclFileCopyCmd)(interp, argc, argv) /* 18 */
+#endif
+#ifndef TclFileDeleteCmd
+#define TclFileDeleteCmd(interp, argc, argv) \
+ (tclIntStubsPtr->tclFileDeleteCmd)(interp, argc, argv) /* 19 */
+#endif
+#ifndef TclFileMakeDirsCmd
+#define TclFileMakeDirsCmd(interp, argc, argv) \
+ (tclIntStubsPtr->tclFileMakeDirsCmd)(interp, argc, argv) /* 20 */
+#endif
+#ifndef TclFileRenameCmd
+#define TclFileRenameCmd(interp, argc, argv) \
+ (tclIntStubsPtr->tclFileRenameCmd)(interp, argc, argv) /* 21 */
+#endif
+#ifndef TclFinalizeCompExecEnv
+#define TclFinalizeCompExecEnv() \
+ (tclIntStubsPtr->tclFinalizeCompExecEnv)() /* 22 */
+#endif
+#ifndef TclFinalizeEnvironment
+#define TclFinalizeEnvironment() \
+ (tclIntStubsPtr->tclFinalizeEnvironment)() /* 23 */
+#endif
+#ifndef TclFinalizeExecEnv
+#define TclFinalizeExecEnv() \
+ (tclIntStubsPtr->tclFinalizeExecEnv)() /* 24 */
+#endif
+#ifndef TclFindElement
+#define TclFindElement(interp, list, listLength, elementPtr, nextPtr, sizePtr, bracePtr) \
+ (tclIntStubsPtr->tclFindElement)(interp, list, listLength, elementPtr, nextPtr, sizePtr, bracePtr) /* 25 */
+#endif
+#ifndef TclFindProc
+#define TclFindProc(iPtr, procName) \
+ (tclIntStubsPtr->tclFindProc)(iPtr, procName) /* 26 */
+#endif
+#ifndef TclFormatInt
+#define TclFormatInt(buffer, n) \
+ (tclIntStubsPtr->tclFormatInt)(buffer, n) /* 27 */
+#endif
+#ifndef TclFreePackageInfo
+#define TclFreePackageInfo(iPtr) \
+ (tclIntStubsPtr->tclFreePackageInfo)(iPtr) /* 28 */
+#endif
+#ifndef TclGetAndDetachPids
+#define TclGetAndDetachPids(interp, chan) \
+ (tclIntStubsPtr->tclGetAndDetachPids)(interp, chan) /* 29 */
+#endif
+#ifndef TclGetCwd
+#define TclGetCwd(interp) \
+ (tclIntStubsPtr->tclGetCwd)(interp) /* 30 */
+#endif
+#ifndef TclGetDate
+#define TclGetDate(p, now, zone, timePtr) \
+ (tclIntStubsPtr->tclGetDate)(p, now, zone, timePtr) /* 31 */
+#endif
+#ifndef TclGetDefaultStdChannel
+#define TclGetDefaultStdChannel(type) \
+ (tclIntStubsPtr->tclGetDefaultStdChannel)(type) /* 32 */
+#endif
+#ifndef TclGetElementOfIndexedArray
+#define TclGetElementOfIndexedArray(interp, localIndex, elemPtr, leaveErrorMsg) \
+ (tclIntStubsPtr->tclGetElementOfIndexedArray)(interp, localIndex, elemPtr, leaveErrorMsg) /* 33 */
+#endif
+#ifndef TclGetEnv
+#define TclGetEnv(name) \
+ (tclIntStubsPtr->tclGetEnv)(name) /* 34 */
+#endif
+#ifndef TclGetExtension
+#define TclGetExtension(name) \
+ (tclIntStubsPtr->tclGetExtension)(name) /* 35 */
+#endif
+#ifndef TclGetFrame
+#define TclGetFrame(interp, string, framePtrPtr) \
+ (tclIntStubsPtr->tclGetFrame)(interp, string, framePtrPtr) /* 36 */
+#endif
+#ifndef TclGetInterpProc
+#define TclGetInterpProc() \
+ (tclIntStubsPtr->tclGetInterpProc)() /* 37 */
+#endif
+#ifndef TclGetIntForIndex
+#define TclGetIntForIndex(interp, objPtr, endValue, indexPtr) \
+ (tclIntStubsPtr->tclGetIntForIndex)(interp, objPtr, endValue, indexPtr) /* 38 */
+#endif
+#ifndef TclGetIndexedScalar
+#define TclGetIndexedScalar(interp, localIndex, leaveErrorMsg) \
+ (tclIntStubsPtr->tclGetIndexedScalar)(interp, localIndex, leaveErrorMsg) /* 39 */
+#endif
+#ifndef TclGetLong
+#define TclGetLong(interp, string, longPtr) \
+ (tclIntStubsPtr->tclGetLong)(interp, string, longPtr) /* 40 */
+#endif
+#ifndef TclGetLoadedPackages
+#define TclGetLoadedPackages(interp, targetName) \
+ (tclIntStubsPtr->tclGetLoadedPackages)(interp, targetName) /* 41 */
+#endif
+#ifndef TclGetNamespaceForQualName
+#define TclGetNamespaceForQualName(interp, qualName, cxtNsPtr, flags, nsPtrPtr, altNsPtrPtr, actualCxtPtrPtr, simpleNamePtr) \
+ (tclIntStubsPtr->tclGetNamespaceForQualName)(interp, qualName, cxtNsPtr, flags, nsPtrPtr, altNsPtrPtr, actualCxtPtrPtr, simpleNamePtr) /* 42 */
+#endif
+#ifndef TclGetObjInterpProc
+#define TclGetObjInterpProc() \
+ (tclIntStubsPtr->tclGetObjInterpProc)() /* 43 */
+#endif
+#ifndef TclGetOpenMode
+#define TclGetOpenMode(interp, string, seekFlagPtr) \
+ (tclIntStubsPtr->tclGetOpenMode)(interp, string, seekFlagPtr) /* 44 */
+#endif
+#ifndef TclGetOriginalCommand
+#define TclGetOriginalCommand(command) \
+ (tclIntStubsPtr->tclGetOriginalCommand)(command) /* 45 */
+#endif
+#ifndef TclpGetUserHome
+#define TclpGetUserHome(name, bufferPtr) \
+ (tclIntStubsPtr->tclpGetUserHome)(name, bufferPtr) /* 46 */
+#endif
+#ifndef TclGlobalInvoke
+#define TclGlobalInvoke(interp, argc, argv, flags) \
+ (tclIntStubsPtr->tclGlobalInvoke)(interp, argc, argv, flags) /* 47 */
+#endif
+#ifndef TclGuessPackageName
+#define TclGuessPackageName(fileName, bufPtr) \
+ (tclIntStubsPtr->tclGuessPackageName)(fileName, bufPtr) /* 48 */
+#endif
+#ifndef TclHasSockets
+#define TclHasSockets(interp) \
+ (tclIntStubsPtr->tclHasSockets)(interp) /* 49 */
+#endif
+#ifndef TclHideUnsafeCommands
+#define TclHideUnsafeCommands(interp) \
+ (tclIntStubsPtr->tclHideUnsafeCommands)(interp) /* 50 */
+#endif
+#ifndef TclInExit
+#define TclInExit() \
+ (tclIntStubsPtr->tclInExit)() /* 51 */
+#endif
+#ifndef TclIncrElementOfIndexedArray
+#define TclIncrElementOfIndexedArray(interp, localIndex, elemPtr, incrAmount) \
+ (tclIntStubsPtr->tclIncrElementOfIndexedArray)(interp, localIndex, elemPtr, incrAmount) /* 52 */
+#endif
+#ifndef TclIncrIndexedScalar
+#define TclIncrIndexedScalar(interp, localIndex, incrAmount) \
+ (tclIntStubsPtr->tclIncrIndexedScalar)(interp, localIndex, incrAmount) /* 53 */
+#endif
+#ifndef TclIncrVar2
+#define TclIncrVar2(interp, part1Ptr, part2Ptr, incrAmount, part1NotParsed) \
+ (tclIntStubsPtr->tclIncrVar2)(interp, part1Ptr, part2Ptr, incrAmount, part1NotParsed) /* 54 */
+#endif
+#ifndef TclInitCompiledLocals
+#define TclInitCompiledLocals(interp, framePtr, nsPtr) \
+ (tclIntStubsPtr->tclInitCompiledLocals)(interp, framePtr, nsPtr) /* 55 */
+#endif
+#ifndef TclInitNamespaces
+#define TclInitNamespaces() \
+ (tclIntStubsPtr->tclInitNamespaces)() /* 56 */
+#endif
+#ifndef TclInterpInit
+#define TclInterpInit(interp) \
+ (tclIntStubsPtr->tclInterpInit)(interp) /* 57 */
+#endif
+#ifndef TclInvoke
+#define TclInvoke(interp, argc, argv, flags) \
+ (tclIntStubsPtr->tclInvoke)(interp, argc, argv, flags) /* 58 */
+#endif
+#ifndef TclInvokeObjectCommand
+#define TclInvokeObjectCommand(clientData, interp, argc, argv) \
+ (tclIntStubsPtr->tclInvokeObjectCommand)(clientData, interp, argc, argv) /* 59 */
+#endif
+#ifndef TclInvokeStringCommand
+#define TclInvokeStringCommand(clientData, interp, objc, objv) \
+ (tclIntStubsPtr->tclInvokeStringCommand)(clientData, interp, objc, objv) /* 60 */
+#endif
+#ifndef TclIsProc
+#define TclIsProc(cmdPtr) \
+ (tclIntStubsPtr->tclIsProc)(cmdPtr) /* 61 */
+#endif
+#ifndef TclLoadFile
+#define TclLoadFile(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr) \
+ (tclIntStubsPtr->tclLoadFile)(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr) /* 62 */
+#endif
+#ifndef TclLooksLikeInt
+#define TclLooksLikeInt(p) \
+ (tclIntStubsPtr->tclLooksLikeInt)(p) /* 63 */
+#endif
+#ifndef TclLookupVar
+#define TclLookupVar(interp, part1, part2, flags, msg, createPart1, createPart2, arrayPtrPtr) \
+ (tclIntStubsPtr->tclLookupVar)(interp, part1, part2, flags, msg, createPart1, createPart2, arrayPtrPtr) /* 64 */
+#endif
+#ifndef TclMatchFiles
+#define TclMatchFiles(interp, separators, dirPtr, pattern, tail) \
+ (tclIntStubsPtr->tclMatchFiles)(interp, separators, dirPtr, pattern, tail) /* 65 */
+#endif
+#ifndef TclNeedSpace
+#define TclNeedSpace(start, end) \
+ (tclIntStubsPtr->tclNeedSpace)(start, end) /* 66 */
+#endif
+#ifndef TclNewProcBodyObj
+#define TclNewProcBodyObj(procPtr) \
+ (tclIntStubsPtr->tclNewProcBodyObj)(procPtr) /* 67 */
+#endif
+#ifndef TclObjCommandComplete
+#define TclObjCommandComplete(cmdPtr) \
+ (tclIntStubsPtr->tclObjCommandComplete)(cmdPtr) /* 68 */
+#endif
+#ifndef TclObjInterpProc
+#define TclObjInterpProc(clientData, interp, objc, objv) \
+ (tclIntStubsPtr->tclObjInterpProc)(clientData, interp, objc, objv) /* 69 */
+#endif
+#ifndef TclObjInvoke
+#define TclObjInvoke(interp, objc, objv, flags) \
+ (tclIntStubsPtr->tclObjInvoke)(interp, objc, objv, flags) /* 70 */
+#endif
+#ifndef TclObjInvokeGlobal
+#define TclObjInvokeGlobal(interp, objc, objv, flags) \
+ (tclIntStubsPtr->tclObjInvokeGlobal)(interp, objc, objv, flags) /* 71 */
+#endif
+#ifndef TclOpenFileChannelDeleteProc
+#define TclOpenFileChannelDeleteProc(proc) \
+ (tclIntStubsPtr->tclOpenFileChannelDeleteProc)(proc) /* 72 */
+#endif
+#ifndef TclOpenFileChannelInsertProc
+#define TclOpenFileChannelInsertProc(proc) \
+ (tclIntStubsPtr->tclOpenFileChannelInsertProc)(proc) /* 73 */
+#endif
+#ifndef TclpAlloc
+#define TclpAlloc(size) \
+ (tclIntStubsPtr->tclpAlloc)(size) /* 74 */
+#endif
+#ifndef TclpCloseFile
+#define TclpCloseFile(file) \
+ (tclIntStubsPtr->tclpCloseFile)(file) /* 75 */
+#endif
+#ifndef TclpCopyFile
+#define TclpCopyFile(source, dest) \
+ (tclIntStubsPtr->tclpCopyFile)(source, dest) /* 76 */
+#endif
+#ifndef TclpCopyDirectory
+#define TclpCopyDirectory(source, dest, errorPtr) \
+ (tclIntStubsPtr->tclpCopyDirectory)(source, dest, errorPtr) /* 77 */
+#endif
+#ifndef TclpCreateCommandChannel
+#define TclpCreateCommandChannel(readFile, writeFile, errorFile, numPids, pidPtr) \
+ (tclIntStubsPtr->tclpCreateCommandChannel)(readFile, writeFile, errorFile, numPids, pidPtr) /* 78 */
+#endif
+#ifndef TclpCreateDirectory
+#define TclpCreateDirectory(path) \
+ (tclIntStubsPtr->tclpCreateDirectory)(path) /* 79 */
+#endif
+#ifndef TclpCreatePipe
+#define TclpCreatePipe(readPipe, writePipe) \
+ (tclIntStubsPtr->tclpCreatePipe)(readPipe, writePipe) /* 80 */
+#endif
+#ifndef TclpCreateProcess
+#define TclpCreateProcess(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr) \
+ (tclIntStubsPtr->tclpCreateProcess)(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr) /* 81 */
+#endif
+#ifndef TclpCreateTempFile
+#define TclpCreateTempFile(contents, namePtr) \
+ (tclIntStubsPtr->tclpCreateTempFile)(contents, namePtr) /* 82 */
+#endif
+#ifndef TclpDeleteFile
+#define TclpDeleteFile(path) \
+ (tclIntStubsPtr->tclpDeleteFile)(path) /* 83 */
+#endif
+#ifndef TclpFinalize
+#define TclpFinalize() \
+ (tclIntStubsPtr->tclpFinalize)() /* 84 */
+#endif
+#ifndef TclpFree
+#define TclpFree(ptr) \
+ (tclIntStubsPtr->tclpFree)(ptr) /* 85 */
+#endif
+#ifndef TclpGetClicks
+#define TclpGetClicks() \
+ (tclIntStubsPtr->tclpGetClicks)() /* 86 */
+#endif
+#ifndef TclpGetSeconds
+#define TclpGetSeconds() \
+ (tclIntStubsPtr->tclpGetSeconds)() /* 87 */
+#endif
+#ifndef TclpGetTime
+#define TclpGetTime(time) \
+ (tclIntStubsPtr->tclpGetTime)(time) /* 88 */
+#endif
+#ifndef TclpGetTimeZone
+#define TclpGetTimeZone(time) \
+ (tclIntStubsPtr->tclpGetTimeZone)(time) /* 89 */
+#endif
+#ifndef TclpGetTZName
+#define TclpGetTZName() \
+ (tclIntStubsPtr->tclpGetTZName)() /* 90 */
+#endif
+#ifndef TclpListVolumes
+#define TclpListVolumes(interp) \
+ (tclIntStubsPtr->tclpListVolumes)(interp) /* 91 */
+#endif
+#ifndef TclpMakeFile
+#define TclpMakeFile(channel, direction) \
+ (tclIntStubsPtr->tclpMakeFile)(channel, direction) /* 92 */
+#endif
+#ifndef TclpOpenFile
+#define TclpOpenFile(fname, mode) \
+ (tclIntStubsPtr->tclpOpenFile)(fname, mode) /* 93 */
+#endif
+#ifndef TclpOpenFileChannel
+#define TclpOpenFileChannel(interp, fileName, modeString, permissions) \
+ (tclIntStubsPtr->tclpOpenFileChannel)(interp, fileName, modeString, permissions) /* 94 */
+#endif
+#ifndef TclpRealloc
+#define TclpRealloc(ptr, size) \
+ (tclIntStubsPtr->tclpRealloc)(ptr, size) /* 95 */
+#endif
+#ifndef TclpRemoveDirectory
+#define TclpRemoveDirectory(path, recursive, errorPtr) \
+ (tclIntStubsPtr->tclpRemoveDirectory)(path, recursive, errorPtr) /* 96 */
+#endif
+#ifndef TclpRenameFile
+#define TclpRenameFile(source, dest) \
+ (tclIntStubsPtr->tclpRenameFile)(source, dest) /* 97 */
+#endif
+#ifndef TclParseBraces
+#define TclParseBraces(interp, string, termPtr, pvPtr) \
+ (tclIntStubsPtr->tclParseBraces)(interp, string, termPtr, pvPtr) /* 98 */
+#endif
+#ifndef TclParseNestedCmd
+#define TclParseNestedCmd(interp, string, flags, termPtr, pvPtr) \
+ (tclIntStubsPtr->tclParseNestedCmd)(interp, string, flags, termPtr, pvPtr) /* 99 */
+#endif
+#ifndef TclParseQuotes
+#define TclParseQuotes(interp, string, termChar, flags, termPtr, pvPtr) \
+ (tclIntStubsPtr->tclParseQuotes)(interp, string, termChar, flags, termPtr, pvPtr) /* 100 */
+#endif
+#ifndef TclPlatformInit
+#define TclPlatformInit(interp) \
+ (tclIntStubsPtr->tclPlatformInit)(interp) /* 101 */
+#endif
+#ifndef TclPrecTraceProc
+#define TclPrecTraceProc(clientData, interp, name1, name2, flags) \
+ (tclIntStubsPtr->tclPrecTraceProc)(clientData, interp, name1, name2, flags) /* 102 */
+#endif
+#ifndef TclPreventAliasLoop
+#define TclPreventAliasLoop(interp, cmdInterp, cmd) \
+ (tclIntStubsPtr->tclPreventAliasLoop)(interp, cmdInterp, cmd) /* 103 */
+#endif
+#ifndef TclPrintByteCodeObj
+#define TclPrintByteCodeObj(interp, objPtr) \
+ (tclIntStubsPtr->tclPrintByteCodeObj)(interp, objPtr) /* 104 */
+#endif
+#ifndef TclProcCleanupProc
+#define TclProcCleanupProc(procPtr) \
+ (tclIntStubsPtr->tclProcCleanupProc)(procPtr) /* 105 */
+#endif
+#ifndef TclProcCompileProc
+#define TclProcCompileProc(interp, procPtr, bodyPtr, nsPtr, description, procName) \
+ (tclIntStubsPtr->tclProcCompileProc)(interp, procPtr, bodyPtr, nsPtr, description, procName) /* 106 */
+#endif
+#ifndef TclProcDeleteProc
+#define TclProcDeleteProc(clientData) \
+ (tclIntStubsPtr->tclProcDeleteProc)(clientData) /* 107 */
+#endif
+#ifndef TclProcInterpProc
+#define TclProcInterpProc(clientData, interp, argc, argv) \
+ (tclIntStubsPtr->tclProcInterpProc)(clientData, interp, argc, argv) /* 108 */
+#endif
+#ifndef TclRenameCommand
+#define TclRenameCommand(interp, oldName, newName) \
+ (tclIntStubsPtr->tclRenameCommand)(interp, oldName, newName) /* 109 */
+#endif
+#ifndef TclResetShadowedCmdRefs
+#define TclResetShadowedCmdRefs(interp, newCmdPtr) \
+ (tclIntStubsPtr->tclResetShadowedCmdRefs)(interp, newCmdPtr) /* 110 */
+#endif
+#ifndef TclServiceIdle
+#define TclServiceIdle() \
+ (tclIntStubsPtr->tclServiceIdle)() /* 111 */
+#endif
+#ifndef TclSetElementOfIndexedArray
+#define TclSetElementOfIndexedArray(interp, localIndex, elemPtr, objPtr, leaveErrorMsg) \
+ (tclIntStubsPtr->tclSetElementOfIndexedArray)(interp, localIndex, elemPtr, objPtr, leaveErrorMsg) /* 112 */
+#endif
+#ifndef TclSetIndexedScalar
+#define TclSetIndexedScalar(interp, localIndex, objPtr, leaveErrorMsg) \
+ (tclIntStubsPtr->tclSetIndexedScalar)(interp, localIndex, objPtr, leaveErrorMsg) /* 113 */
+#endif
+#ifndef TclSetPreInitScript
+#define TclSetPreInitScript(string) \
+ (tclIntStubsPtr->tclSetPreInitScript)(string) /* 114 */
+#endif
+#ifndef TclSetupEnv
+#define TclSetupEnv(interp) \
+ (tclIntStubsPtr->tclSetupEnv)(interp) /* 115 */
+#endif
+#ifndef TclSockGetPort
+#define TclSockGetPort(interp, string, proto, portPtr) \
+ (tclIntStubsPtr->tclSockGetPort)(interp, string, proto, portPtr) /* 116 */
+#endif
+#ifndef TclSockMinimumBuffers
+#define TclSockMinimumBuffers(sock, size) \
+ (tclIntStubsPtr->tclSockMinimumBuffers)(sock, size) /* 117 */
+#endif
+#ifndef TclStat
+#define TclStat(path, buf) \
+ (tclIntStubsPtr->tclStat)(path, buf) /* 118 */
+#endif
+#ifndef TclStatDeleteProc
+#define TclStatDeleteProc(proc) \
+ (tclIntStubsPtr->tclStatDeleteProc)(proc) /* 119 */
+#endif
+#ifndef TclStatInsertProc
+#define TclStatInsertProc(proc) \
+ (tclIntStubsPtr->tclStatInsertProc)(proc) /* 120 */
+#endif
+#ifndef TclTeardownNamespace
+#define TclTeardownNamespace(nsPtr) \
+ (tclIntStubsPtr->tclTeardownNamespace)(nsPtr) /* 121 */
+#endif
+#ifndef TclUpdateReturnInfo
+#define TclUpdateReturnInfo(iPtr) \
+ (tclIntStubsPtr->tclUpdateReturnInfo)(iPtr) /* 122 */
+#endif
+#ifndef TclWordEnd
+#define TclWordEnd(start, lastChar, nested, semiPtr) \
+ (tclIntStubsPtr->tclWordEnd)(start, lastChar, nested, semiPtr) /* 123 */
+#endif
+#ifndef Tcl_AddInterpResolvers
+#define Tcl_AddInterpResolvers(interp, name, cmdProc, varProc, compiledVarProc) \
+ (tclIntStubsPtr->tcl_AddInterpResolvers)(interp, name, cmdProc, varProc, compiledVarProc) /* 124 */
+#endif
+#ifndef Tcl_AppendExportList
+#define Tcl_AppendExportList(interp, nsPtr, objPtr) \
+ (tclIntStubsPtr->tcl_AppendExportList)(interp, nsPtr, objPtr) /* 125 */
+#endif
+#ifndef Tcl_CreateNamespace
+#define Tcl_CreateNamespace(interp, name, clientData, deleteProc) \
+ (tclIntStubsPtr->tcl_CreateNamespace)(interp, name, clientData, deleteProc) /* 126 */
+#endif
+#ifndef Tcl_DeleteNamespace
+#define Tcl_DeleteNamespace(nsPtr) \
+ (tclIntStubsPtr->tcl_DeleteNamespace)(nsPtr) /* 127 */
+#endif
+#ifndef Tcl_Export
+#define Tcl_Export(interp, nsPtr, pattern, resetListFirst) \
+ (tclIntStubsPtr->tcl_Export)(interp, nsPtr, pattern, resetListFirst) /* 128 */
+#endif
+#ifndef Tcl_FindCommand
+#define Tcl_FindCommand(interp, name, contextNsPtr, flags) \
+ (tclIntStubsPtr->tcl_FindCommand)(interp, name, contextNsPtr, flags) /* 129 */
+#endif
+#ifndef Tcl_FindNamespace
+#define Tcl_FindNamespace(interp, name, contextNsPtr, flags) \
+ (tclIntStubsPtr->tcl_FindNamespace)(interp, name, contextNsPtr, flags) /* 130 */
+#endif
+#ifndef Tcl_GetInterpResolvers
+#define Tcl_GetInterpResolvers(interp, name, resInfo) \
+ (tclIntStubsPtr->tcl_GetInterpResolvers)(interp, name, resInfo) /* 131 */
+#endif
+#ifndef Tcl_GetNamespaceResolvers
+#define Tcl_GetNamespaceResolvers(namespacePtr, resInfo) \
+ (tclIntStubsPtr->tcl_GetNamespaceResolvers)(namespacePtr, resInfo) /* 132 */
+#endif
+#ifndef Tcl_FindNamespaceVar
+#define Tcl_FindNamespaceVar(interp, name, contextNsPtr, flags) \
+ (tclIntStubsPtr->tcl_FindNamespaceVar)(interp, name, contextNsPtr, flags) /* 133 */
+#endif
+#ifndef Tcl_ForgetImport
+#define Tcl_ForgetImport(interp, nsPtr, pattern) \
+ (tclIntStubsPtr->tcl_ForgetImport)(interp, nsPtr, pattern) /* 134 */
+#endif
+#ifndef Tcl_GetCommandFromObj
+#define Tcl_GetCommandFromObj(interp, objPtr) \
+ (tclIntStubsPtr->tcl_GetCommandFromObj)(interp, objPtr) /* 135 */
+#endif
+#ifndef Tcl_GetCommandFullName
+#define Tcl_GetCommandFullName(interp, command, objPtr) \
+ (tclIntStubsPtr->tcl_GetCommandFullName)(interp, command, objPtr) /* 136 */
+#endif
+#ifndef Tcl_GetCurrentNamespace
+#define Tcl_GetCurrentNamespace(interp) \
+ (tclIntStubsPtr->tcl_GetCurrentNamespace)(interp) /* 137 */
+#endif
+#ifndef Tcl_GetGlobalNamespace
+#define Tcl_GetGlobalNamespace(interp) \
+ (tclIntStubsPtr->tcl_GetGlobalNamespace)(interp) /* 138 */
+#endif
+#ifndef Tcl_GetVariableFullName
+#define Tcl_GetVariableFullName(interp, variable, objPtr) \
+ (tclIntStubsPtr->tcl_GetVariableFullName)(interp, variable, objPtr) /* 139 */
+#endif
+#ifndef Tcl_Import
+#define Tcl_Import(interp, nsPtr, pattern, allowOverwrite) \
+ (tclIntStubsPtr->tcl_Import)(interp, nsPtr, pattern, allowOverwrite) /* 140 */
+#endif
+#ifndef Tcl_PopCallFrame
+#define Tcl_PopCallFrame(interp) \
+ (tclIntStubsPtr->tcl_PopCallFrame)(interp) /* 141 */
+#endif
+#ifndef Tcl_PushCallFrame
+#define Tcl_PushCallFrame(interp, framePtr, nsPtr, isProcCallFrame) \
+ (tclIntStubsPtr->tcl_PushCallFrame)(interp, framePtr, nsPtr, isProcCallFrame) /* 142 */
+#endif
+#ifndef Tcl_RemoveInterpResolvers
+#define Tcl_RemoveInterpResolvers(interp, name) \
+ (tclIntStubsPtr->tcl_RemoveInterpResolvers)(interp, name) /* 143 */
+#endif
+#ifndef Tcl_SetNamespaceResolvers
+#define Tcl_SetNamespaceResolvers(namespacePtr, cmdProc, varProc, compiledVarProc) \
+ (tclIntStubsPtr->tcl_SetNamespaceResolvers)(namespacePtr, cmdProc, varProc, compiledVarProc) /* 144 */
+#endif
+#ifndef TclCompileBreakCmd
+#define TclCompileBreakCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileBreakCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 145 */
+#endif
+#ifndef TclCompileCatchCmd
+#define TclCompileCatchCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileCatchCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 146 */
+#endif
+#ifndef TclCompileContinueCmd
+#define TclCompileContinueCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileContinueCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 147 */
+#endif
+#ifndef TclCompileExprCmd
+#define TclCompileExprCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileExprCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 148 */
+#endif
+#ifndef TclCompileForCmd
+#define TclCompileForCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileForCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 149 */
+#endif
+#ifndef TclCompileForeachCmd
+#define TclCompileForeachCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileForeachCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 150 */
+#endif
+#ifndef TclCompileIfCmd
+#define TclCompileIfCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileIfCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 151 */
+#endif
+#ifndef TclCompileIncrCmd
+#define TclCompileIncrCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileIncrCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 152 */
+#endif
+#ifndef TclCompileSetCmd
+#define TclCompileSetCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileSetCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 153 */
+#endif
+#ifndef TclCompileWhileCmd
+#define TclCompileWhileCmd(interp, string, lastChar, compileFlags, compileEnvPtr) \
+ (tclIntStubsPtr->tclCompileWhileCmd)(interp, string, lastChar, compileFlags, compileEnvPtr) /* 154 */
+#endif
+
+#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
+
+/* !END!: Do not edit above this line. */
+
+#endif /* _TCLINTDECLS */
+