/[dtapublic]/projs/trunk/shared_source/c_tcl_base_7_5_w_mods/tclintdecls.h
ViewVC logotype

Diff of /projs/trunk/shared_source/c_tcl_base_7_5_w_mods/tclintdecls.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

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