/[dtapublic]/to_be_filed/sf_code/esrgpcpj/shared/tcl_base/tclintdecls.h
ViewVC logotype

Annotation of /to_be_filed/sf_code/esrgpcpj/shared/tcl_base/tclintdecls.h

Parent Directory Parent Directory | Revision Log Revision Log


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

dashley@gmail.com
ViewVC Help
Powered by ViewVC 1.1.25