Planet

navi

home

PPS

about

screenshots

download

development

forum

Context Navigation

source: downloads/tcl8.5.2/generic/tclIntDecls.h @ 63

Last change on this file since 63 was 25, checked in by landauf, 17 years ago
added tcl to libs
File size: 68.6 KB

Line
1	/*
2	* tclIntDecls.h --
3	*
4	* This file contains the declarations for all unsupported
5	* functions that are exported by the Tcl library. These
6	* interfaces are not guaranteed to remain the same between
7	* versions. Use at your own risk.
8	*
9	* Copyright (c) 1998-1999 by Scriptics Corporation.
10	*
11	* See the file "license.terms" for information on usage and redistribution
12	* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
13	*
14	* RCS: @(#) $Id: tclIntDecls.h,v 1.112 2008/01/23 17:31:42 dgp Exp $
15	*/
16
17	#ifndef _TCLINTDECLS
18	#define _TCLINTDECLS
19
20	#include "tclPort.h"
21
22	#undef TCL_STORAGE_CLASS
23	#ifdef BUILD_tcl
24	# define TCL_STORAGE_CLASS DLLEXPORT
25	#else
26	# ifdef USE_TCL_STUBS
27	# define TCL_STORAGE_CLASS
28	# else
29	# define TCL_STORAGE_CLASS DLLIMPORT
30	# endif
31	#endif
32
33	/*
34	* WARNING: This file is automatically generated by the tools/genStubs.tcl
35	* script. Any modifications to the function declarations below should be made
36	* in the generic/tclInt.decls script.
37	*/
38
39	/* !BEGIN!: Do not edit below this line. */
40
41	/*
42	* Exported function declarations:
43	*/
44
45	/* Slot 0 is reserved */
46	/* Slot 1 is reserved */
47	/* Slot 2 is reserved */
48	#ifndef TclAllocateFreeObjects_TCL_DECLARED
49	#define TclAllocateFreeObjects_TCL_DECLARED
50	/* 3 */
51	EXTERN void TclAllocateFreeObjects (void);
52	#endif
53	/* Slot 4 is reserved */
54	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
55	#ifndef TclCleanupChildren_TCL_DECLARED
56	#define TclCleanupChildren_TCL_DECLARED
57	/* 5 */
58	EXTERN int TclCleanupChildren (Tcl_Interp * interp, int numPids,
59	Tcl_Pid * pidPtr, Tcl_Channel errorChan);
60	#endif
61	#endif /* UNIX */
62	#ifdef __WIN32__ /* WIN */
63	#ifndef TclCleanupChildren_TCL_DECLARED
64	#define TclCleanupChildren_TCL_DECLARED
65	/* 5 */
66	EXTERN int TclCleanupChildren (Tcl_Interp * interp, int numPids,
67	Tcl_Pid * pidPtr, Tcl_Channel errorChan);
68	#endif
69	#endif /* WIN */
70	#ifdef MAC_OSX_TCL /* MACOSX */
71	#ifndef TclCleanupChildren_TCL_DECLARED
72	#define TclCleanupChildren_TCL_DECLARED
73	/* 5 */
74	EXTERN int TclCleanupChildren (Tcl_Interp * interp, int numPids,
75	Tcl_Pid * pidPtr, Tcl_Channel errorChan);
76	#endif
77	#endif /* MACOSX */
78	#ifndef TclCleanupCommand_TCL_DECLARED
79	#define TclCleanupCommand_TCL_DECLARED
80	/* 6 */
81	EXTERN void TclCleanupCommand (Command * cmdPtr);
82	#endif
83	#ifndef TclCopyAndCollapse_TCL_DECLARED
84	#define TclCopyAndCollapse_TCL_DECLARED
85	/* 7 */
86	EXTERN int TclCopyAndCollapse (int count, CONST char * src,
87	char * dst);
88	#endif
89	#ifndef TclCopyChannel_TCL_DECLARED
90	#define TclCopyChannel_TCL_DECLARED
91	/* 8 */
92	EXTERN int TclCopyChannel (Tcl_Interp * interp,
93	Tcl_Channel inChan, Tcl_Channel outChan,
94	int toRead, Tcl_Obj * cmdPtr);
95	#endif
96	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
97	#ifndef TclCreatePipeline_TCL_DECLARED
98	#define TclCreatePipeline_TCL_DECLARED
99	/* 9 */
100	EXTERN int TclCreatePipeline (Tcl_Interp * interp, int argc,
101	CONST char argv, Tcl_Pid pidArrayPtr,
102	TclFile * inPipePtr, TclFile * outPipePtr,
103	TclFile * errFilePtr);
104	#endif
105	#endif /* UNIX */
106	#ifdef __WIN32__ /* WIN */
107	#ifndef TclCreatePipeline_TCL_DECLARED
108	#define TclCreatePipeline_TCL_DECLARED
109	/* 9 */
110	EXTERN int TclCreatePipeline (Tcl_Interp * interp, int argc,
111	CONST char argv, Tcl_Pid pidArrayPtr,
112	TclFile * inPipePtr, TclFile * outPipePtr,
113	TclFile * errFilePtr);
114	#endif
115	#endif /* WIN */
116	#ifdef MAC_OSX_TCL /* MACOSX */
117	#ifndef TclCreatePipeline_TCL_DECLARED
118	#define TclCreatePipeline_TCL_DECLARED
119	/* 9 */
120	EXTERN int TclCreatePipeline (Tcl_Interp * interp, int argc,
121	CONST char argv, Tcl_Pid pidArrayPtr,
122	TclFile * inPipePtr, TclFile * outPipePtr,
123	TclFile * errFilePtr);
124	#endif
125	#endif /* MACOSX */
126	#ifndef TclCreateProc_TCL_DECLARED
127	#define TclCreateProc_TCL_DECLARED
128	/* 10 */
129	EXTERN int TclCreateProc (Tcl_Interp * interp,
130	Namespace * nsPtr, CONST char * procName,
131	Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr,
132	Proc ** procPtrPtr);
133	#endif
134	#ifndef TclDeleteCompiledLocalVars_TCL_DECLARED
135	#define TclDeleteCompiledLocalVars_TCL_DECLARED
136	/* 11 */
137	EXTERN void TclDeleteCompiledLocalVars (Interp * iPtr,
138	CallFrame * framePtr);
139	#endif
140	#ifndef TclDeleteVars_TCL_DECLARED
141	#define TclDeleteVars_TCL_DECLARED
142	/* 12 */
143	EXTERN void TclDeleteVars (Interp * iPtr,
144	TclVarHashTable * tablePtr);
145	#endif
146	/* Slot 13 is reserved */
147	#ifndef TclDumpMemoryInfo_TCL_DECLARED
148	#define TclDumpMemoryInfo_TCL_DECLARED
149	/* 14 */
150	EXTERN void TclDumpMemoryInfo (FILE * outFile);
151	#endif
152	/* Slot 15 is reserved */
153	#ifndef TclExprFloatError_TCL_DECLARED
154	#define TclExprFloatError_TCL_DECLARED
155	/* 16 */
156	EXTERN void TclExprFloatError (Tcl_Interp * interp, double value);
157	#endif
158	/* Slot 17 is reserved */
159	/* Slot 18 is reserved */
160	/* Slot 19 is reserved */
161	/* Slot 20 is reserved */
162	/* Slot 21 is reserved */
163	#ifndef TclFindElement_TCL_DECLARED
164	#define TclFindElement_TCL_DECLARED
165	/* 22 */
166	EXTERN int TclFindElement (Tcl_Interp * interp,
167	CONST char * listStr, int listLength,
168	CONST char ** elementPtr,
169	CONST char ** nextPtr, int * sizePtr,
170	int * bracePtr);
171	#endif
172	#ifndef TclFindProc_TCL_DECLARED
173	#define TclFindProc_TCL_DECLARED
174	/* 23 */
175	EXTERN Proc * TclFindProc (Interp * iPtr, CONST char * procName);
176	#endif
177	/* Slot 24 is reserved */
178	#ifndef TclFreePackageInfo_TCL_DECLARED
179	#define TclFreePackageInfo_TCL_DECLARED
180	/* 25 */
181	EXTERN void TclFreePackageInfo (Interp * iPtr);
182	#endif
183	/* Slot 26 is reserved */
184	/* Slot 27 is reserved */
185	#ifndef TclpGetDefaultStdChannel_TCL_DECLARED
186	#define TclpGetDefaultStdChannel_TCL_DECLARED
187	/* 28 */
188	EXTERN Tcl_Channel TclpGetDefaultStdChannel (int type);
189	#endif
190	/* Slot 29 is reserved */
191	/* Slot 30 is reserved */
192	#ifndef TclGetExtension_TCL_DECLARED
193	#define TclGetExtension_TCL_DECLARED
194	/* 31 */
195	EXTERN CONST char * TclGetExtension (CONST char * name);
196	#endif
197	#ifndef TclGetFrame_TCL_DECLARED
198	#define TclGetFrame_TCL_DECLARED
199	/* 32 */
200	EXTERN int TclGetFrame (Tcl_Interp * interp, CONST char * str,
201	CallFrame ** framePtrPtr);
202	#endif
203	/* Slot 33 is reserved */
204	#ifndef TclGetIntForIndex_TCL_DECLARED
205	#define TclGetIntForIndex_TCL_DECLARED
206	/* 34 */
207	EXTERN int TclGetIntForIndex (Tcl_Interp * interp,
208	Tcl_Obj * objPtr, int endValue,
209	int * indexPtr);
210	#endif
211	/* Slot 35 is reserved */
212	#ifndef TclGetLong_TCL_DECLARED
213	#define TclGetLong_TCL_DECLARED
214	/* 36 */
215	EXTERN int TclGetLong (Tcl_Interp * interp, CONST char * str,
216	long * longPtr);
217	#endif
218	#ifndef TclGetLoadedPackages_TCL_DECLARED
219	#define TclGetLoadedPackages_TCL_DECLARED
220	/* 37 */
221	EXTERN int TclGetLoadedPackages (Tcl_Interp * interp,
222	char * targetName);
223	#endif
224	#ifndef TclGetNamespaceForQualName_TCL_DECLARED
225	#define TclGetNamespaceForQualName_TCL_DECLARED
226	/* 38 */
227	EXTERN int TclGetNamespaceForQualName (Tcl_Interp * interp,
228	CONST char * qualName, Namespace * cxtNsPtr,
229	int flags, Namespace ** nsPtrPtr,
230	Namespace ** altNsPtrPtr,
231	Namespace ** actualCxtPtrPtr,
232	CONST char ** simpleNamePtr);
233	#endif
234	#ifndef TclGetObjInterpProc_TCL_DECLARED
235	#define TclGetObjInterpProc_TCL_DECLARED
236	/* 39 */
237	EXTERN TclObjCmdProcType TclGetObjInterpProc (void);
238	#endif
239	#ifndef TclGetOpenMode_TCL_DECLARED
240	#define TclGetOpenMode_TCL_DECLARED
241	/* 40 */
242	EXTERN int TclGetOpenMode (Tcl_Interp * interp,
243	CONST char * str, int * seekFlagPtr);
244	#endif
245	#ifndef TclGetOriginalCommand_TCL_DECLARED
246	#define TclGetOriginalCommand_TCL_DECLARED
247	/* 41 */
248	EXTERN Tcl_Command TclGetOriginalCommand (Tcl_Command command);
249	#endif
250	#ifndef TclpGetUserHome_TCL_DECLARED
251	#define TclpGetUserHome_TCL_DECLARED
252	/* 42 */
253	EXTERN char * TclpGetUserHome (CONST char * name,
254	Tcl_DString * bufferPtr);
255	#endif
256	/* Slot 43 is reserved */
257	#ifndef TclGuessPackageName_TCL_DECLARED
258	#define TclGuessPackageName_TCL_DECLARED
259	/* 44 */
260	EXTERN int TclGuessPackageName (CONST char * fileName,
261	Tcl_DString * bufPtr);
262	#endif
263	#ifndef TclHideUnsafeCommands_TCL_DECLARED
264	#define TclHideUnsafeCommands_TCL_DECLARED
265	/* 45 */
266	EXTERN int TclHideUnsafeCommands (Tcl_Interp * interp);
267	#endif
268	#ifndef TclInExit_TCL_DECLARED
269	#define TclInExit_TCL_DECLARED
270	/* 46 */
271	EXTERN int TclInExit (void);
272	#endif
273	/* Slot 47 is reserved */
274	/* Slot 48 is reserved */
275	/* Slot 49 is reserved */
276	#ifndef TclInitCompiledLocals_TCL_DECLARED
277	#define TclInitCompiledLocals_TCL_DECLARED
278	/* 50 */
279	EXTERN void TclInitCompiledLocals (Tcl_Interp * interp,
280	CallFrame * framePtr, Namespace * nsPtr);
281	#endif
282	#ifndef TclInterpInit_TCL_DECLARED
283	#define TclInterpInit_TCL_DECLARED
284	/* 51 */
285	EXTERN int TclInterpInit (Tcl_Interp * interp);
286	#endif
287	/* Slot 52 is reserved */
288	#ifndef TclInvokeObjectCommand_TCL_DECLARED
289	#define TclInvokeObjectCommand_TCL_DECLARED
290	/* 53 */
291	EXTERN int TclInvokeObjectCommand (ClientData clientData,
292	Tcl_Interp * interp, int argc,
293	CONST84 char ** argv);
294	#endif
295	#ifndef TclInvokeStringCommand_TCL_DECLARED
296	#define TclInvokeStringCommand_TCL_DECLARED
297	/* 54 */
298	EXTERN int TclInvokeStringCommand (ClientData clientData,
299	Tcl_Interp * interp, int objc,
300	Tcl_Obj *CONST objv[]);
301	#endif
302	#ifndef TclIsProc_TCL_DECLARED
303	#define TclIsProc_TCL_DECLARED
304	/* 55 */
305	EXTERN Proc * TclIsProc (Command * cmdPtr);
306	#endif
307	/* Slot 56 is reserved */
308	/* Slot 57 is reserved */
309	#ifndef TclLookupVar_TCL_DECLARED
310	#define TclLookupVar_TCL_DECLARED
311	/* 58 */
312	EXTERN Var * TclLookupVar (Tcl_Interp * interp,
313	CONST char * part1, CONST char * part2,
314	int flags, CONST char * msg, int createPart1,
315	int createPart2, Var ** arrayPtrPtr);
316	#endif
317	/* Slot 59 is reserved */
318	#ifndef TclNeedSpace_TCL_DECLARED
319	#define TclNeedSpace_TCL_DECLARED
320	/* 60 */
321	EXTERN int TclNeedSpace (CONST char * start, CONST char * end);
322	#endif
323	#ifndef TclNewProcBodyObj_TCL_DECLARED
324	#define TclNewProcBodyObj_TCL_DECLARED
325	/* 61 */
326	EXTERN Tcl_Obj * TclNewProcBodyObj (Proc * procPtr);
327	#endif
328	#ifndef TclObjCommandComplete_TCL_DECLARED
329	#define TclObjCommandComplete_TCL_DECLARED
330	/* 62 */
331	EXTERN int TclObjCommandComplete (Tcl_Obj * cmdPtr);
332	#endif
333	#ifndef TclObjInterpProc_TCL_DECLARED
334	#define TclObjInterpProc_TCL_DECLARED
335	/* 63 */
336	EXTERN int TclObjInterpProc (ClientData clientData,
337	Tcl_Interp * interp, int objc,
338	Tcl_Obj *CONST objv[]);
339	#endif
340	#ifndef TclObjInvoke_TCL_DECLARED
341	#define TclObjInvoke_TCL_DECLARED
342	/* 64 */
343	EXTERN int TclObjInvoke (Tcl_Interp * interp, int objc,
344	Tcl_Obj *CONST objv[], int flags);
345	#endif
346	/* Slot 65 is reserved */
347	/* Slot 66 is reserved */
348	/* Slot 67 is reserved */
349	/* Slot 68 is reserved */
350	#ifndef TclpAlloc_TCL_DECLARED
351	#define TclpAlloc_TCL_DECLARED
352	/* 69 */
353	EXTERN char * TclpAlloc (unsigned int size);
354	#endif
355	/* Slot 70 is reserved */
356	/* Slot 71 is reserved */
357	/* Slot 72 is reserved */
358	/* Slot 73 is reserved */
359	#ifndef TclpFree_TCL_DECLARED
360	#define TclpFree_TCL_DECLARED
361	/* 74 */
362	EXTERN void TclpFree (char * ptr);
363	#endif
364	#ifndef TclpGetClicks_TCL_DECLARED
365	#define TclpGetClicks_TCL_DECLARED
366	/* 75 */
367	EXTERN unsigned long TclpGetClicks (void);
368	#endif
369	#ifndef TclpGetSeconds_TCL_DECLARED
370	#define TclpGetSeconds_TCL_DECLARED
371	/* 76 */
372	EXTERN unsigned long TclpGetSeconds (void);
373	#endif
374	#ifndef TclpGetTime_TCL_DECLARED
375	#define TclpGetTime_TCL_DECLARED
376	/* 77 */
377	EXTERN void TclpGetTime (Tcl_Time * time);
378	#endif
379	#ifndef TclpGetTimeZone_TCL_DECLARED
380	#define TclpGetTimeZone_TCL_DECLARED
381	/* 78 */
382	EXTERN int TclpGetTimeZone (unsigned long time);
383	#endif
384	/* Slot 79 is reserved */
385	/* Slot 80 is reserved */
386	#ifndef TclpRealloc_TCL_DECLARED
387	#define TclpRealloc_TCL_DECLARED
388	/* 81 */
389	EXTERN char * TclpRealloc (char * ptr, unsigned int size);
390	#endif
391	/* Slot 82 is reserved */
392	/* Slot 83 is reserved */
393	/* Slot 84 is reserved */
394	/* Slot 85 is reserved */
395	/* Slot 86 is reserved */
396	/* Slot 87 is reserved */
397	#ifndef TclPrecTraceProc_TCL_DECLARED
398	#define TclPrecTraceProc_TCL_DECLARED
399	/* 88 */
400	EXTERN char * TclPrecTraceProc (ClientData clientData,
401	Tcl_Interp * interp, CONST char * name1,
402	CONST char * name2, int flags);
403	#endif
404	#ifndef TclPreventAliasLoop_TCL_DECLARED
405	#define TclPreventAliasLoop_TCL_DECLARED
406	/* 89 */
407	EXTERN int TclPreventAliasLoop (Tcl_Interp * interp,
408	Tcl_Interp * cmdInterp, Tcl_Command cmd);
409	#endif
410	/* Slot 90 is reserved */
411	#ifndef TclProcCleanupProc_TCL_DECLARED
412	#define TclProcCleanupProc_TCL_DECLARED
413	/* 91 */
414	EXTERN void TclProcCleanupProc (Proc * procPtr);
415	#endif
416	#ifndef TclProcCompileProc_TCL_DECLARED
417	#define TclProcCompileProc_TCL_DECLARED
418	/* 92 */
419	EXTERN int TclProcCompileProc (Tcl_Interp * interp,
420	Proc * procPtr, Tcl_Obj * bodyPtr,
421	Namespace * nsPtr, CONST char * description,
422	CONST char * procName);
423	#endif
424	#ifndef TclProcDeleteProc_TCL_DECLARED
425	#define TclProcDeleteProc_TCL_DECLARED
426	/* 93 */
427	EXTERN void TclProcDeleteProc (ClientData clientData);
428	#endif
429	/* Slot 94 is reserved */
430	/* Slot 95 is reserved */
431	#ifndef TclRenameCommand_TCL_DECLARED
432	#define TclRenameCommand_TCL_DECLARED
433	/* 96 */
434	EXTERN int TclRenameCommand (Tcl_Interp * interp,
435	CONST char * oldName, CONST char * newName);
436	#endif
437	#ifndef TclResetShadowedCmdRefs_TCL_DECLARED
438	#define TclResetShadowedCmdRefs_TCL_DECLARED
439	/* 97 */
440	EXTERN void TclResetShadowedCmdRefs (Tcl_Interp * interp,
441	Command * newCmdPtr);
442	#endif
443	#ifndef TclServiceIdle_TCL_DECLARED
444	#define TclServiceIdle_TCL_DECLARED
445	/* 98 */
446	EXTERN int TclServiceIdle (void);
447	#endif
448	/* Slot 99 is reserved */
449	/* Slot 100 is reserved */
450	#ifndef TclSetPreInitScript_TCL_DECLARED
451	#define TclSetPreInitScript_TCL_DECLARED
452	/* 101 */
453	EXTERN char * TclSetPreInitScript (char * string);
454	#endif
455	#ifndef TclSetupEnv_TCL_DECLARED
456	#define TclSetupEnv_TCL_DECLARED
457	/* 102 */
458	EXTERN void TclSetupEnv (Tcl_Interp * interp);
459	#endif
460	#ifndef TclSockGetPort_TCL_DECLARED
461	#define TclSockGetPort_TCL_DECLARED
462	/* 103 */
463	EXTERN int TclSockGetPort (Tcl_Interp * interp,
464	CONST char * str, CONST char * proto,
465	int * portPtr);
466	#endif
467	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
468	#ifndef TclSockMinimumBuffers_TCL_DECLARED
469	#define TclSockMinimumBuffers_TCL_DECLARED
470	/* 104 */
471	EXTERN int TclSockMinimumBuffers (int sock, int size);
472	#endif
473	#endif /* UNIX */
474	#ifdef __WIN32__ /* WIN */
475	#ifndef TclSockMinimumBuffers_TCL_DECLARED
476	#define TclSockMinimumBuffers_TCL_DECLARED
477	/* 104 */
478	EXTERN int TclSockMinimumBuffers (int sock, int size);
479	#endif
480	#endif /* WIN */
481	#ifdef MAC_OSX_TCL /* MACOSX */
482	#ifndef TclSockMinimumBuffers_TCL_DECLARED
483	#define TclSockMinimumBuffers_TCL_DECLARED
484	/* 104 */
485	EXTERN int TclSockMinimumBuffers (int sock, int size);
486	#endif
487	#endif /* MACOSX */
488	/* Slot 105 is reserved */
489	/* Slot 106 is reserved */
490	/* Slot 107 is reserved */
491	#ifndef TclTeardownNamespace_TCL_DECLARED
492	#define TclTeardownNamespace_TCL_DECLARED
493	/* 108 */
494	EXTERN void TclTeardownNamespace (Namespace * nsPtr);
495	#endif
496	#ifndef TclUpdateReturnInfo_TCL_DECLARED
497	#define TclUpdateReturnInfo_TCL_DECLARED
498	/* 109 */
499	EXTERN int TclUpdateReturnInfo (Interp * iPtr);
500	#endif
501	/* Slot 110 is reserved */
502	#ifndef Tcl_AddInterpResolvers_TCL_DECLARED
503	#define Tcl_AddInterpResolvers_TCL_DECLARED
504	/* 111 */
505	EXTERN void Tcl_AddInterpResolvers (Tcl_Interp * interp,
506	CONST char * name,
507	Tcl_ResolveCmdProc * cmdProc,
508	Tcl_ResolveVarProc * varProc,
509	Tcl_ResolveCompiledVarProc * compiledVarProc);
510	#endif
511	#ifndef Tcl_AppendExportList_TCL_DECLARED
512	#define Tcl_AppendExportList_TCL_DECLARED
513	/* 112 */
514	EXTERN int Tcl_AppendExportList (Tcl_Interp * interp,
515	Tcl_Namespace * nsPtr, Tcl_Obj * objPtr);
516	#endif
517	#ifndef Tcl_CreateNamespace_TCL_DECLARED
518	#define Tcl_CreateNamespace_TCL_DECLARED
519	/* 113 */
520	EXTERN Tcl_Namespace * Tcl_CreateNamespace (Tcl_Interp * interp,
521	CONST char * name, ClientData clientData,
522	Tcl_NamespaceDeleteProc * deleteProc);
523	#endif
524	#ifndef Tcl_DeleteNamespace_TCL_DECLARED
525	#define Tcl_DeleteNamespace_TCL_DECLARED
526	/* 114 */
527	EXTERN void Tcl_DeleteNamespace (Tcl_Namespace * nsPtr);
528	#endif
529	#ifndef Tcl_Export_TCL_DECLARED
530	#define Tcl_Export_TCL_DECLARED
531	/* 115 */
532	EXTERN int Tcl_Export (Tcl_Interp * interp,
533	Tcl_Namespace * nsPtr, CONST char * pattern,
534	int resetListFirst);
535	#endif
536	#ifndef Tcl_FindCommand_TCL_DECLARED
537	#define Tcl_FindCommand_TCL_DECLARED
538	/* 116 */
539	EXTERN Tcl_Command Tcl_FindCommand (Tcl_Interp * interp,
540	CONST char * name,
541	Tcl_Namespace * contextNsPtr, int flags);
542	#endif
543	#ifndef Tcl_FindNamespace_TCL_DECLARED
544	#define Tcl_FindNamespace_TCL_DECLARED
545	/* 117 */
546	EXTERN Tcl_Namespace * Tcl_FindNamespace (Tcl_Interp * interp,
547	CONST char * name,
548	Tcl_Namespace * contextNsPtr, int flags);
549	#endif
550	#ifndef Tcl_GetInterpResolvers_TCL_DECLARED
551	#define Tcl_GetInterpResolvers_TCL_DECLARED
552	/* 118 */
553	EXTERN int Tcl_GetInterpResolvers (Tcl_Interp * interp,
554	CONST char * name,
555	Tcl_ResolverInfo * resInfo);
556	#endif
557	#ifndef Tcl_GetNamespaceResolvers_TCL_DECLARED
558	#define Tcl_GetNamespaceResolvers_TCL_DECLARED
559	/* 119 */
560	EXTERN int Tcl_GetNamespaceResolvers (
561	Tcl_Namespace * namespacePtr,
562	Tcl_ResolverInfo * resInfo);
563	#endif
564	#ifndef Tcl_FindNamespaceVar_TCL_DECLARED
565	#define Tcl_FindNamespaceVar_TCL_DECLARED
566	/* 120 */
567	EXTERN Tcl_Var Tcl_FindNamespaceVar (Tcl_Interp * interp,
568	CONST char * name,
569	Tcl_Namespace * contextNsPtr, int flags);
570	#endif
571	#ifndef Tcl_ForgetImport_TCL_DECLARED
572	#define Tcl_ForgetImport_TCL_DECLARED
573	/* 121 */
574	EXTERN int Tcl_ForgetImport (Tcl_Interp * interp,
575	Tcl_Namespace * nsPtr, CONST char * pattern);
576	#endif
577	#ifndef Tcl_GetCommandFromObj_TCL_DECLARED
578	#define Tcl_GetCommandFromObj_TCL_DECLARED
579	/* 122 */
580	EXTERN Tcl_Command Tcl_GetCommandFromObj (Tcl_Interp * interp,
581	Tcl_Obj * objPtr);
582	#endif
583	#ifndef Tcl_GetCommandFullName_TCL_DECLARED
584	#define Tcl_GetCommandFullName_TCL_DECLARED
585	/* 123 */
586	EXTERN void Tcl_GetCommandFullName (Tcl_Interp * interp,
587	Tcl_Command command, Tcl_Obj * objPtr);
588	#endif
589	#ifndef Tcl_GetCurrentNamespace_TCL_DECLARED
590	#define Tcl_GetCurrentNamespace_TCL_DECLARED
591	/* 124 */
592	EXTERN Tcl_Namespace * Tcl_GetCurrentNamespace (Tcl_Interp * interp);
593	#endif
594	#ifndef Tcl_GetGlobalNamespace_TCL_DECLARED
595	#define Tcl_GetGlobalNamespace_TCL_DECLARED
596	/* 125 */
597	EXTERN Tcl_Namespace * Tcl_GetGlobalNamespace (Tcl_Interp * interp);
598	#endif
599	#ifndef Tcl_GetVariableFullName_TCL_DECLARED
600	#define Tcl_GetVariableFullName_TCL_DECLARED
601	/* 126 */
602	EXTERN void Tcl_GetVariableFullName (Tcl_Interp * interp,
603	Tcl_Var variable, Tcl_Obj * objPtr);
604	#endif
605	#ifndef Tcl_Import_TCL_DECLARED
606	#define Tcl_Import_TCL_DECLARED
607	/* 127 */
608	EXTERN int Tcl_Import (Tcl_Interp * interp,
609	Tcl_Namespace * nsPtr, CONST char * pattern,
610	int allowOverwrite);
611	#endif
612	#ifndef Tcl_PopCallFrame_TCL_DECLARED
613	#define Tcl_PopCallFrame_TCL_DECLARED
614	/* 128 */
615	EXTERN void Tcl_PopCallFrame (Tcl_Interp * interp);
616	#endif
617	#ifndef Tcl_PushCallFrame_TCL_DECLARED
618	#define Tcl_PushCallFrame_TCL_DECLARED
619	/* 129 */
620	EXTERN int Tcl_PushCallFrame (Tcl_Interp * interp,
621	Tcl_CallFrame * framePtr,
622	Tcl_Namespace * nsPtr, int isProcCallFrame);
623	#endif
624	#ifndef Tcl_RemoveInterpResolvers_TCL_DECLARED
625	#define Tcl_RemoveInterpResolvers_TCL_DECLARED
626	/* 130 */
627	EXTERN int Tcl_RemoveInterpResolvers (Tcl_Interp * interp,
628	CONST char * name);
629	#endif
630	#ifndef Tcl_SetNamespaceResolvers_TCL_DECLARED
631	#define Tcl_SetNamespaceResolvers_TCL_DECLARED
632	/* 131 */
633	EXTERN void Tcl_SetNamespaceResolvers (
634	Tcl_Namespace * namespacePtr,
635	Tcl_ResolveCmdProc * cmdProc,
636	Tcl_ResolveVarProc * varProc,
637	Tcl_ResolveCompiledVarProc * compiledVarProc);
638	#endif
639	#ifndef TclpHasSockets_TCL_DECLARED
640	#define TclpHasSockets_TCL_DECLARED
641	/* 132 */
642	EXTERN int TclpHasSockets (Tcl_Interp * interp);
643	#endif
644	#ifndef TclpGetDate_TCL_DECLARED
645	#define TclpGetDate_TCL_DECLARED
646	/* 133 */
647	EXTERN struct tm * TclpGetDate (CONST time_t * time, int useGMT);
648	#endif
649	/* Slot 134 is reserved */
650	/* Slot 135 is reserved */
651	/* Slot 136 is reserved */
652	/* Slot 137 is reserved */
653	#ifndef TclGetEnv_TCL_DECLARED
654	#define TclGetEnv_TCL_DECLARED
655	/* 138 */
656	EXTERN CONST84_RETURN char * TclGetEnv (CONST char * name,
657	Tcl_DString * valuePtr);
658	#endif
659	/* Slot 139 is reserved */
660	/* Slot 140 is reserved */
661	#ifndef TclpGetCwd_TCL_DECLARED
662	#define TclpGetCwd_TCL_DECLARED
663	/* 141 */
664	EXTERN CONST84_RETURN char * TclpGetCwd (Tcl_Interp * interp,
665	Tcl_DString * cwdPtr);
666	#endif
667	#ifndef TclSetByteCodeFromAny_TCL_DECLARED
668	#define TclSetByteCodeFromAny_TCL_DECLARED
669	/* 142 */
670	EXTERN int TclSetByteCodeFromAny (Tcl_Interp * interp,
671	Tcl_Obj * objPtr, CompileHookProc * hookProc,
672	ClientData clientData);
673	#endif
674	#ifndef TclAddLiteralObj_TCL_DECLARED
675	#define TclAddLiteralObj_TCL_DECLARED
676	/* 143 */
677	EXTERN int TclAddLiteralObj (struct CompileEnv * envPtr,
678	Tcl_Obj * objPtr, LiteralEntry ** litPtrPtr);
679	#endif
680	#ifndef TclHideLiteral_TCL_DECLARED
681	#define TclHideLiteral_TCL_DECLARED
682	/* 144 */
683	EXTERN void TclHideLiteral (Tcl_Interp * interp,
684	struct CompileEnv * envPtr, int index);
685	#endif
686	#ifndef TclGetAuxDataType_TCL_DECLARED
687	#define TclGetAuxDataType_TCL_DECLARED
688	/* 145 */
689	EXTERN struct AuxDataType * TclGetAuxDataType (char * typeName);
690	#endif
691	#ifndef TclHandleCreate_TCL_DECLARED
692	#define TclHandleCreate_TCL_DECLARED
693	/* 146 */
694	EXTERN TclHandle TclHandleCreate (VOID * ptr);
695	#endif
696	#ifndef TclHandleFree_TCL_DECLARED
697	#define TclHandleFree_TCL_DECLARED
698	/* 147 */
699	EXTERN void TclHandleFree (TclHandle handle);
700	#endif
701	#ifndef TclHandlePreserve_TCL_DECLARED
702	#define TclHandlePreserve_TCL_DECLARED
703	/* 148 */
704	EXTERN TclHandle TclHandlePreserve (TclHandle handle);
705	#endif
706	#ifndef TclHandleRelease_TCL_DECLARED
707	#define TclHandleRelease_TCL_DECLARED
708	/* 149 */
709	EXTERN void TclHandleRelease (TclHandle handle);
710	#endif
711	#ifndef TclRegAbout_TCL_DECLARED
712	#define TclRegAbout_TCL_DECLARED
713	/* 150 */
714	EXTERN int TclRegAbout (Tcl_Interp * interp, Tcl_RegExp re);
715	#endif
716	#ifndef TclRegExpRangeUniChar_TCL_DECLARED
717	#define TclRegExpRangeUniChar_TCL_DECLARED
718	/* 151 */
719	EXTERN void TclRegExpRangeUniChar (Tcl_RegExp re, int index,
720	int * startPtr, int * endPtr);
721	#endif
722	#ifndef TclSetLibraryPath_TCL_DECLARED
723	#define TclSetLibraryPath_TCL_DECLARED
724	/* 152 */
725	EXTERN void TclSetLibraryPath (Tcl_Obj * pathPtr);
726	#endif
727	#ifndef TclGetLibraryPath_TCL_DECLARED
728	#define TclGetLibraryPath_TCL_DECLARED
729	/* 153 */
730	EXTERN Tcl_Obj * TclGetLibraryPath (void);
731	#endif
732	/* Slot 154 is reserved */
733	/* Slot 155 is reserved */
734	#ifndef TclRegError_TCL_DECLARED
735	#define TclRegError_TCL_DECLARED
736	/* 156 */
737	EXTERN void TclRegError (Tcl_Interp * interp, CONST char * msg,
738	int status);
739	#endif
740	#ifndef TclVarTraceExists_TCL_DECLARED
741	#define TclVarTraceExists_TCL_DECLARED
742	/* 157 */
743	EXTERN Var * TclVarTraceExists (Tcl_Interp * interp,
744	CONST char * varName);
745	#endif
746	#ifndef TclSetStartupScriptFileName_TCL_DECLARED
747	#define TclSetStartupScriptFileName_TCL_DECLARED
748	/* 158 */
749	EXTERN void TclSetStartupScriptFileName (CONST char * filename);
750	#endif
751	#ifndef TclGetStartupScriptFileName_TCL_DECLARED
752	#define TclGetStartupScriptFileName_TCL_DECLARED
753	/* 159 */
754	EXTERN CONST84_RETURN char * TclGetStartupScriptFileName (void);
755	#endif
756	/* Slot 160 is reserved */
757	#ifndef TclChannelTransform_TCL_DECLARED
758	#define TclChannelTransform_TCL_DECLARED
759	/* 161 */
760	EXTERN int TclChannelTransform (Tcl_Interp * interp,
761	Tcl_Channel chan, Tcl_Obj * cmdObjPtr);
762	#endif
763	#ifndef TclChannelEventScriptInvoker_TCL_DECLARED
764	#define TclChannelEventScriptInvoker_TCL_DECLARED
765	/* 162 */
766	EXTERN void TclChannelEventScriptInvoker (ClientData clientData,
767	int flags);
768	#endif
769	#ifndef TclGetInstructionTable_TCL_DECLARED
770	#define TclGetInstructionTable_TCL_DECLARED
771	/* 163 */
772	EXTERN void * TclGetInstructionTable (void);
773	#endif
774	#ifndef TclExpandCodeArray_TCL_DECLARED
775	#define TclExpandCodeArray_TCL_DECLARED
776	/* 164 */
777	EXTERN void TclExpandCodeArray (void * envPtr);
778	#endif
779	#ifndef TclpSetInitialEncodings_TCL_DECLARED
780	#define TclpSetInitialEncodings_TCL_DECLARED
781	/* 165 */
782	EXTERN void TclpSetInitialEncodings (void);
783	#endif
784	#ifndef TclListObjSetElement_TCL_DECLARED
785	#define TclListObjSetElement_TCL_DECLARED
786	/* 166 */
787	EXTERN int TclListObjSetElement (Tcl_Interp * interp,
788	Tcl_Obj * listPtr, int index,
789	Tcl_Obj * valuePtr);
790	#endif
791	#ifndef TclSetStartupScriptPath_TCL_DECLARED
792	#define TclSetStartupScriptPath_TCL_DECLARED
793	/* 167 */
794	EXTERN void TclSetStartupScriptPath (Tcl_Obj * pathPtr);
795	#endif
796	#ifndef TclGetStartupScriptPath_TCL_DECLARED
797	#define TclGetStartupScriptPath_TCL_DECLARED
798	/* 168 */
799	EXTERN Tcl_Obj * TclGetStartupScriptPath (void);
800	#endif
801	#ifndef TclpUtfNcmp2_TCL_DECLARED
802	#define TclpUtfNcmp2_TCL_DECLARED
803	/* 169 */
804	EXTERN int TclpUtfNcmp2 (CONST char * s1, CONST char * s2,
805	unsigned long n);
806	#endif
807	#ifndef TclCheckInterpTraces_TCL_DECLARED
808	#define TclCheckInterpTraces_TCL_DECLARED
809	/* 170 */
810	EXTERN int TclCheckInterpTraces (Tcl_Interp * interp,
811	CONST char * command, int numChars,
812	Command * cmdPtr, int result, int traceFlags,
813	int objc, Tcl_Obj *CONST objv[]);
814	#endif
815	#ifndef TclCheckExecutionTraces_TCL_DECLARED
816	#define TclCheckExecutionTraces_TCL_DECLARED
817	/* 171 */
818	EXTERN int TclCheckExecutionTraces (Tcl_Interp * interp,
819	CONST char * command, int numChars,
820	Command * cmdPtr, int result, int traceFlags,
821	int objc, Tcl_Obj *CONST objv[]);
822	#endif
823	#ifndef TclInThreadExit_TCL_DECLARED
824	#define TclInThreadExit_TCL_DECLARED
825	/* 172 */
826	EXTERN int TclInThreadExit (void);
827	#endif
828	#ifndef TclUniCharMatch_TCL_DECLARED
829	#define TclUniCharMatch_TCL_DECLARED
830	/* 173 */
831	EXTERN int TclUniCharMatch (CONST Tcl_UniChar * string,
832	int strLen, CONST Tcl_UniChar * pattern,
833	int ptnLen, int flags);
834	#endif
835	/* Slot 174 is reserved */
836	#ifndef TclCallVarTraces_TCL_DECLARED
837	#define TclCallVarTraces_TCL_DECLARED
838	/* 175 */
839	EXTERN int TclCallVarTraces (Interp * iPtr, Var * arrayPtr,
840	Var * varPtr, CONST char * part1,
841	CONST char * part2, int flags,
842	int leaveErrMsg);
843	#endif
844	#ifndef TclCleanupVar_TCL_DECLARED
845	#define TclCleanupVar_TCL_DECLARED
846	/* 176 */
847	EXTERN void TclCleanupVar (Var * varPtr, Var * arrayPtr);
848	#endif
849	#ifndef TclVarErrMsg_TCL_DECLARED
850	#define TclVarErrMsg_TCL_DECLARED
851	/* 177 */
852	EXTERN void TclVarErrMsg (Tcl_Interp * interp,
853	CONST char * part1, CONST char * part2,
854	CONST char * operation, CONST char * reason);
855	#endif
856	#ifndef Tcl_SetStartupScript_TCL_DECLARED
857	#define Tcl_SetStartupScript_TCL_DECLARED
858	/* 178 */
859	EXTERN void Tcl_SetStartupScript (Tcl_Obj * pathPtr,
860	CONST char* encodingName);
861	#endif
862	#ifndef Tcl_GetStartupScript_TCL_DECLARED
863	#define Tcl_GetStartupScript_TCL_DECLARED
864	/* 179 */
865	EXTERN Tcl_Obj * Tcl_GetStartupScript (CONST char ** encodingNamePtr);
866	#endif
867	/* Slot 180 is reserved */
868	/* Slot 181 is reserved */
869	#ifndef TclpLocaltime_TCL_DECLARED
870	#define TclpLocaltime_TCL_DECLARED
871	/* 182 */
872	EXTERN struct tm * TclpLocaltime (CONST time_t * clock);
873	#endif
874	#ifndef TclpGmtime_TCL_DECLARED
875	#define TclpGmtime_TCL_DECLARED
876	/* 183 */
877	EXTERN struct tm * TclpGmtime (CONST time_t * clock);
878	#endif
879	/* Slot 184 is reserved */
880	/* Slot 185 is reserved */
881	/* Slot 186 is reserved */
882	/* Slot 187 is reserved */
883	/* Slot 188 is reserved */
884	/* Slot 189 is reserved */
885	/* Slot 190 is reserved */
886	/* Slot 191 is reserved */
887	/* Slot 192 is reserved */
888	/* Slot 193 is reserved */
889	/* Slot 194 is reserved */
890	/* Slot 195 is reserved */
891	/* Slot 196 is reserved */
892	/* Slot 197 is reserved */
893	#ifndef TclObjGetFrame_TCL_DECLARED
894	#define TclObjGetFrame_TCL_DECLARED
895	/* 198 */
896	EXTERN int TclObjGetFrame (Tcl_Interp * interp,
897	Tcl_Obj * objPtr, CallFrame ** framePtrPtr);
898	#endif
899	/* Slot 199 is reserved */
900	#ifndef TclpObjRemoveDirectory_TCL_DECLARED
901	#define TclpObjRemoveDirectory_TCL_DECLARED
902	/* 200 */
903	EXTERN int TclpObjRemoveDirectory (Tcl_Obj * pathPtr,
904	int recursive, Tcl_Obj ** errorPtr);
905	#endif
906	#ifndef TclpObjCopyDirectory_TCL_DECLARED
907	#define TclpObjCopyDirectory_TCL_DECLARED
908	/* 201 */
909	EXTERN int TclpObjCopyDirectory (Tcl_Obj * srcPathPtr,
910	Tcl_Obj * destPathPtr, Tcl_Obj ** errorPtr);
911	#endif
912	#ifndef TclpObjCreateDirectory_TCL_DECLARED
913	#define TclpObjCreateDirectory_TCL_DECLARED
914	/* 202 */
915	EXTERN int TclpObjCreateDirectory (Tcl_Obj * pathPtr);
916	#endif
917	#ifndef TclpObjDeleteFile_TCL_DECLARED
918	#define TclpObjDeleteFile_TCL_DECLARED
919	/* 203 */
920	EXTERN int TclpObjDeleteFile (Tcl_Obj * pathPtr);
921	#endif
922	#ifndef TclpObjCopyFile_TCL_DECLARED
923	#define TclpObjCopyFile_TCL_DECLARED
924	/* 204 */
925	EXTERN int TclpObjCopyFile (Tcl_Obj * srcPathPtr,
926	Tcl_Obj * destPathPtr);
927	#endif
928	#ifndef TclpObjRenameFile_TCL_DECLARED
929	#define TclpObjRenameFile_TCL_DECLARED
930	/* 205 */
931	EXTERN int TclpObjRenameFile (Tcl_Obj * srcPathPtr,
932	Tcl_Obj * destPathPtr);
933	#endif
934	#ifndef TclpObjStat_TCL_DECLARED
935	#define TclpObjStat_TCL_DECLARED
936	/* 206 */
937	EXTERN int TclpObjStat (Tcl_Obj * pathPtr, Tcl_StatBuf * buf);
938	#endif
939	#ifndef TclpObjAccess_TCL_DECLARED
940	#define TclpObjAccess_TCL_DECLARED
941	/* 207 */
942	EXTERN int TclpObjAccess (Tcl_Obj * pathPtr, int mode);
943	#endif
944	#ifndef TclpOpenFileChannel_TCL_DECLARED
945	#define TclpOpenFileChannel_TCL_DECLARED
946	/* 208 */
947	EXTERN Tcl_Channel TclpOpenFileChannel (Tcl_Interp * interp,
948	Tcl_Obj * pathPtr, int mode, int permissions);
949	#endif
950	/* Slot 209 is reserved */
951	/* Slot 210 is reserved */
952	/* Slot 211 is reserved */
953	#ifndef TclpFindExecutable_TCL_DECLARED
954	#define TclpFindExecutable_TCL_DECLARED
955	/* 212 */
956	EXTERN void TclpFindExecutable (CONST char * argv0);
957	#endif
958	#ifndef TclGetObjNameOfExecutable_TCL_DECLARED
959	#define TclGetObjNameOfExecutable_TCL_DECLARED
960	/* 213 */
961	EXTERN Tcl_Obj * TclGetObjNameOfExecutable (void);
962	#endif
963	#ifndef TclSetObjNameOfExecutable_TCL_DECLARED
964	#define TclSetObjNameOfExecutable_TCL_DECLARED
965	/* 214 */
966	EXTERN void TclSetObjNameOfExecutable (Tcl_Obj * name,
967	Tcl_Encoding encoding);
968	#endif
969	#ifndef TclStackAlloc_TCL_DECLARED
970	#define TclStackAlloc_TCL_DECLARED
971	/* 215 */
972	EXTERN void * TclStackAlloc (Tcl_Interp * interp, int numBytes);
973	#endif
974	#ifndef TclStackFree_TCL_DECLARED
975	#define TclStackFree_TCL_DECLARED
976	/* 216 */
977	EXTERN void TclStackFree (Tcl_Interp * interp, void * freePtr);
978	#endif
979	#ifndef TclPushStackFrame_TCL_DECLARED
980	#define TclPushStackFrame_TCL_DECLARED
981	/* 217 */
982	EXTERN int TclPushStackFrame (Tcl_Interp * interp,
983	Tcl_CallFrame ** framePtrPtr,
984	Tcl_Namespace * namespacePtr,
985	int isProcCallFrame);
986	#endif
987	#ifndef TclPopStackFrame_TCL_DECLARED
988	#define TclPopStackFrame_TCL_DECLARED
989	/* 218 */
990	EXTERN void TclPopStackFrame (Tcl_Interp * interp);
991	#endif
992	/* Slot 219 is reserved */
993	/* Slot 220 is reserved */
994	/* Slot 221 is reserved */
995	/* Slot 222 is reserved */
996	/* Slot 223 is reserved */
997	#ifndef TclGetPlatform_TCL_DECLARED
998	#define TclGetPlatform_TCL_DECLARED
999	/* 224 */
1000	EXTERN TclPlatformType * TclGetPlatform (void);
1001	#endif
1002	#ifndef TclTraceDictPath_TCL_DECLARED
1003	#define TclTraceDictPath_TCL_DECLARED
1004	/* 225 */
1005	EXTERN Tcl_Obj * TclTraceDictPath (Tcl_Interp * interp,
1006	Tcl_Obj * rootPtr, int keyc,
1007	Tcl_Obj *CONST keyv[], int flags);
1008	#endif
1009	#ifndef TclObjBeingDeleted_TCL_DECLARED
1010	#define TclObjBeingDeleted_TCL_DECLARED
1011	/* 226 */
1012	EXTERN int TclObjBeingDeleted (Tcl_Obj * objPtr);
1013	#endif
1014	#ifndef TclSetNsPath_TCL_DECLARED
1015	#define TclSetNsPath_TCL_DECLARED
1016	/* 227 */
1017	EXTERN void TclSetNsPath (Namespace * nsPtr, int pathLength,
1018	Tcl_Namespace * pathAry[]);
1019	#endif
1020	#ifndef TclObjInterpProcCore_TCL_DECLARED
1021	#define TclObjInterpProcCore_TCL_DECLARED
1022	/* 228 */
1023	EXTERN int TclObjInterpProcCore (register Tcl_Interp * interp,
1024	Tcl_Obj * procNameObj, int skip,
1025	ProcErrorProc errorProc);
1026	#endif
1027	#ifndef TclPtrMakeUpvar_TCL_DECLARED
1028	#define TclPtrMakeUpvar_TCL_DECLARED
1029	/* 229 */
1030	EXTERN int TclPtrMakeUpvar (Tcl_Interp * interp,
1031	Var * otherP1Ptr, CONST char * myName,
1032	int myFlags, int index);
1033	#endif
1034	#ifndef TclObjLookupVar_TCL_DECLARED
1035	#define TclObjLookupVar_TCL_DECLARED
1036	/* 230 */
1037	EXTERN Var * TclObjLookupVar (Tcl_Interp * interp,
1038	Tcl_Obj * part1Ptr, CONST char * part2,
1039	int flags, CONST char * msg,
1040	CONST int createPart1, CONST int createPart2,
1041	Var ** arrayPtrPtr);
1042	#endif
1043	#ifndef TclGetNamespaceFromObj_TCL_DECLARED
1044	#define TclGetNamespaceFromObj_TCL_DECLARED
1045	/* 231 */
1046	EXTERN int TclGetNamespaceFromObj (Tcl_Interp * interp,
1047	Tcl_Obj * objPtr, Tcl_Namespace ** nsPtrPtr);
1048	#endif
1049	#ifndef TclEvalObjEx_TCL_DECLARED
1050	#define TclEvalObjEx_TCL_DECLARED
1051	/* 232 */
1052	EXTERN int TclEvalObjEx (Tcl_Interp * interp, Tcl_Obj * objPtr,
1053	int flags, const CmdFrame * invoker,
1054	int word);
1055	#endif
1056	#ifndef TclGetSrcInfoForPc_TCL_DECLARED
1057	#define TclGetSrcInfoForPc_TCL_DECLARED
1058	/* 233 */
1059	EXTERN void TclGetSrcInfoForPc (CmdFrame * contextPtr);
1060	#endif
1061	#ifndef TclVarHashCreateVar_TCL_DECLARED
1062	#define TclVarHashCreateVar_TCL_DECLARED
1063	/* 234 */
1064	EXTERN Var * TclVarHashCreateVar (TclVarHashTable * tablePtr,
1065	const char * key, int * newPtr);
1066	#endif
1067	#ifndef TclInitVarHashTable_TCL_DECLARED
1068	#define TclInitVarHashTable_TCL_DECLARED
1069	/* 235 */
1070	EXTERN void TclInitVarHashTable (TclVarHashTable * tablePtr,
1071	Namespace * nsPtr);
1072	#endif
1073	#ifndef TclBackgroundException_TCL_DECLARED
1074	#define TclBackgroundException_TCL_DECLARED
1075	/* 236 */
1076	EXTERN void TclBackgroundException (Tcl_Interp * interp,
1077	int code);
1078	#endif
1079
1080	typedef struct TclIntStubs {
1081	int magic;
1082	struct TclIntStubHooks *hooks;
1083
1084	void *reserved0;
1085	void *reserved1;
1086	void *reserved2;
1087	void (tclAllocateFreeObjects) (void); / 3 */
1088	void *reserved4;
1089	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
1090	int (tclCleanupChildren) (Tcl_Interp interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan); /* 5 */
1091	#endif /* UNIX */
1092	#ifdef __WIN32__ /* WIN */
1093	int (tclCleanupChildren) (Tcl_Interp interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan); /* 5 */
1094	#endif /* WIN */
1095	#ifdef MAC_OSX_TCL /* MACOSX */
1096	int (tclCleanupChildren) (Tcl_Interp interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan); /* 5 */
1097	#endif /* MACOSX */
1098	void (tclCleanupCommand) (Command cmdPtr); /* 6 */
1099	int (tclCopyAndCollapse) (int count, CONST char src, char * dst); /* 7 */
1100	int (tclCopyChannel) (Tcl_Interp interp, Tcl_Channel inChan, Tcl_Channel outChan, int toRead, Tcl_Obj * cmdPtr); /* 8 */
1101	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
1102	int (tclCreatePipeline) (Tcl_Interp interp, int argc, CONST char argv, Tcl_Pid pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr); /* 9 */
1103	#endif /* UNIX */
1104	#ifdef __WIN32__ /* WIN */
1105	int (tclCreatePipeline) (Tcl_Interp interp, int argc, CONST char argv, Tcl_Pid pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr); /* 9 */
1106	#endif /* WIN */
1107	#ifdef MAC_OSX_TCL /* MACOSX */
1108	int (tclCreatePipeline) (Tcl_Interp interp, int argc, CONST char argv, Tcl_Pid pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr); /* 9 */
1109	#endif /* MACOSX */
1110	int (tclCreateProc) (Tcl_Interp interp, Namespace * nsPtr, CONST char * procName, Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, Proc ** procPtrPtr); /* 10 */
1111	void (tclDeleteCompiledLocalVars) (Interp iPtr, CallFrame * framePtr); /* 11 */
1112	void (tclDeleteVars) (Interp iPtr, TclVarHashTable * tablePtr); /* 12 */
1113	void *reserved13;
1114	void (tclDumpMemoryInfo) (FILE outFile); /* 14 */
1115	void *reserved15;
1116	void (tclExprFloatError) (Tcl_Interp interp, double value); /* 16 */
1117	void *reserved17;
1118	void *reserved18;
1119	void *reserved19;
1120	void *reserved20;
1121	void *reserved21;
1122	int (tclFindElement) (Tcl_Interp interp, CONST char * listStr, int listLength, CONST char elementPtr, CONST char nextPtr, int * sizePtr, int * bracePtr); /* 22 */
1123	Proc * (tclFindProc) (Interp iPtr, CONST char * procName); /* 23 */
1124	void *reserved24;
1125	void (tclFreePackageInfo) (Interp iPtr); /* 25 */
1126	void *reserved26;
1127	void *reserved27;
1128	Tcl_Channel (tclpGetDefaultStdChannel) (int type); / 28 */
1129	void *reserved29;
1130	void *reserved30;
1131	CONST char * (tclGetExtension) (CONST char name); /* 31 */
1132	int (tclGetFrame) (Tcl_Interp interp, CONST char * str, CallFrame ** framePtrPtr); /* 32 */
1133	void *reserved33;
1134	int (tclGetIntForIndex) (Tcl_Interp interp, Tcl_Obj * objPtr, int endValue, int * indexPtr); /* 34 */
1135	void *reserved35;
1136	int (tclGetLong) (Tcl_Interp interp, CONST char * str, long * longPtr); /* 36 */
1137	int (tclGetLoadedPackages) (Tcl_Interp interp, char * targetName); /* 37 */
1138	int (tclGetNamespaceForQualName) (Tcl_Interp interp, CONST char * qualName, Namespace * cxtNsPtr, int flags, Namespace nsPtrPtr, Namespace altNsPtrPtr, Namespace actualCxtPtrPtr, CONST char simpleNamePtr); /* 38 */
1139	TclObjCmdProcType (tclGetObjInterpProc) (void); / 39 */
1140	int (tclGetOpenMode) (Tcl_Interp interp, CONST char * str, int * seekFlagPtr); /* 40 */
1141	Tcl_Command (tclGetOriginalCommand) (Tcl_Command command); / 41 */
1142	char * (tclpGetUserHome) (CONST char name, Tcl_DString * bufferPtr); /* 42 */
1143	void *reserved43;
1144	int (tclGuessPackageName) (CONST char fileName, Tcl_DString * bufPtr); /* 44 */
1145	int (tclHideUnsafeCommands) (Tcl_Interp interp); /* 45 */
1146	int (tclInExit) (void); / 46 */
1147	void *reserved47;
1148	void *reserved48;
1149	void *reserved49;
1150	void (tclInitCompiledLocals) (Tcl_Interp interp, CallFrame * framePtr, Namespace * nsPtr); /* 50 */
1151	int (tclInterpInit) (Tcl_Interp interp); /* 51 */
1152	void *reserved52;
1153	int (tclInvokeObjectCommand) (ClientData clientData, Tcl_Interp interp, int argc, CONST84 char ** argv); /* 53 */
1154	int (tclInvokeStringCommand) (ClientData clientData, Tcl_Interp interp, int objc, Tcl_Obj CONST objv[]); / 54 */
1155	Proc * (tclIsProc) (Command cmdPtr); /* 55 */
1156	void *reserved56;
1157	void *reserved57;
1158	Var * (tclLookupVar) (Tcl_Interp interp, CONST char * part1, CONST char * part2, int flags, CONST char * msg, int createPart1, int createPart2, Var ** arrayPtrPtr); /* 58 */
1159	void *reserved59;
1160	int (tclNeedSpace) (CONST char start, CONST char * end); /* 60 */
1161	Tcl_Obj * (tclNewProcBodyObj) (Proc procPtr); /* 61 */
1162	int (tclObjCommandComplete) (Tcl_Obj cmdPtr); /* 62 */
1163	int (tclObjInterpProc) (ClientData clientData, Tcl_Interp interp, int objc, Tcl_Obj CONST objv[]); / 63 */
1164	int (tclObjInvoke) (Tcl_Interp interp, int objc, Tcl_Obj CONST objv[], int flags); / 64 */
1165	void *reserved65;
1166	void *reserved66;
1167	void *reserved67;
1168	void *reserved68;
1169	char * (tclpAlloc) (unsigned int size); / 69 */
1170	void *reserved70;
1171	void *reserved71;
1172	void *reserved72;
1173	void *reserved73;
1174	void (tclpFree) (char ptr); /* 74 */
1175	unsigned long (tclpGetClicks) (void); / 75 */
1176	unsigned long (tclpGetSeconds) (void); / 76 */
1177	void (tclpGetTime) (Tcl_Time time); /* 77 */
1178	int (tclpGetTimeZone) (unsigned long time); / 78 */
1179	void *reserved79;
1180	void *reserved80;
1181	char * (tclpRealloc) (char ptr, unsigned int size); /* 81 */
1182	void *reserved82;
1183	void *reserved83;
1184	void *reserved84;
1185	void *reserved85;
1186	void *reserved86;
1187	void *reserved87;
1188	char * (tclPrecTraceProc) (ClientData clientData, Tcl_Interp interp, CONST char * name1, CONST char * name2, int flags); /* 88 */
1189	int (tclPreventAliasLoop) (Tcl_Interp interp, Tcl_Interp * cmdInterp, Tcl_Command cmd); /* 89 */
1190	void *reserved90;
1191	void (tclProcCleanupProc) (Proc procPtr); /* 91 */
1192	int (tclProcCompileProc) (Tcl_Interp interp, Proc * procPtr, Tcl_Obj * bodyPtr, Namespace * nsPtr, CONST char * description, CONST char * procName); /* 92 */
1193	void (tclProcDeleteProc) (ClientData clientData); / 93 */
1194	void *reserved94;
1195	void *reserved95;
1196	int (tclRenameCommand) (Tcl_Interp interp, CONST char * oldName, CONST char * newName); /* 96 */
1197	void (tclResetShadowedCmdRefs) (Tcl_Interp interp, Command * newCmdPtr); /* 97 */
1198	int (tclServiceIdle) (void); / 98 */
1199	void *reserved99;
1200	void *reserved100;
1201	char * (tclSetPreInitScript) (char string); /* 101 */
1202	void (tclSetupEnv) (Tcl_Interp interp); /* 102 */
1203	int (tclSockGetPort) (Tcl_Interp interp, CONST char * str, CONST char * proto, int * portPtr); /* 103 */
1204	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
1205	int (tclSockMinimumBuffers) (int sock, int size); / 104 */
1206	#endif /* UNIX */
1207	#ifdef __WIN32__ /* WIN */
1208	int (tclSockMinimumBuffers) (int sock, int size); / 104 */
1209	#endif /* WIN */
1210	#ifdef MAC_OSX_TCL /* MACOSX */
1211	int (tclSockMinimumBuffers) (int sock, int size); / 104 */
1212	#endif /* MACOSX */
1213	void *reserved105;
1214	void *reserved106;
1215	void *reserved107;
1216	void (tclTeardownNamespace) (Namespace nsPtr); /* 108 */
1217	int (tclUpdateReturnInfo) (Interp iPtr); /* 109 */
1218	void *reserved110;
1219	void (tcl_AddInterpResolvers) (Tcl_Interp interp, CONST char * name, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc); /* 111 */
1220	int (tcl_AppendExportList) (Tcl_Interp interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr); /* 112 */
1221	Tcl_Namespace * (tcl_CreateNamespace) (Tcl_Interp interp, CONST char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc); /* 113 */
1222	void (tcl_DeleteNamespace) (Tcl_Namespace nsPtr); /* 114 */
1223	int (tcl_Export) (Tcl_Interp interp, Tcl_Namespace * nsPtr, CONST char * pattern, int resetListFirst); /* 115 */
1224	Tcl_Command (tcl_FindCommand) (Tcl_Interp interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags); /* 116 */
1225	Tcl_Namespace * (tcl_FindNamespace) (Tcl_Interp interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags); /* 117 */
1226	int (tcl_GetInterpResolvers) (Tcl_Interp interp, CONST char * name, Tcl_ResolverInfo * resInfo); /* 118 */
1227	int (tcl_GetNamespaceResolvers) (Tcl_Namespace namespacePtr, Tcl_ResolverInfo * resInfo); /* 119 */
1228	Tcl_Var (tcl_FindNamespaceVar) (Tcl_Interp interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags); /* 120 */
1229	int (tcl_ForgetImport) (Tcl_Interp interp, Tcl_Namespace * nsPtr, CONST char * pattern); /* 121 */
1230	Tcl_Command (tcl_GetCommandFromObj) (Tcl_Interp interp, Tcl_Obj * objPtr); /* 122 */
1231	void (tcl_GetCommandFullName) (Tcl_Interp interp, Tcl_Command command, Tcl_Obj * objPtr); /* 123 */
1232	Tcl_Namespace * (tcl_GetCurrentNamespace) (Tcl_Interp interp); /* 124 */
1233	Tcl_Namespace * (tcl_GetGlobalNamespace) (Tcl_Interp interp); /* 125 */
1234	void (tcl_GetVariableFullName) (Tcl_Interp interp, Tcl_Var variable, Tcl_Obj * objPtr); /* 126 */
1235	int (tcl_Import) (Tcl_Interp interp, Tcl_Namespace * nsPtr, CONST char * pattern, int allowOverwrite); /* 127 */
1236	void (tcl_PopCallFrame) (Tcl_Interp interp); /* 128 */
1237	int (tcl_PushCallFrame) (Tcl_Interp interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame); /* 129 */
1238	int (tcl_RemoveInterpResolvers) (Tcl_Interp interp, CONST char * name); /* 130 */
1239	void (tcl_SetNamespaceResolvers) (Tcl_Namespace namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc); /* 131 */
1240	int (tclpHasSockets) (Tcl_Interp interp); /* 132 */
1241	struct tm * (tclpGetDate) (CONST time_t time, int useGMT); /* 133 */
1242	void *reserved134;
1243	void *reserved135;
1244	void *reserved136;
1245	void *reserved137;
1246	CONST84_RETURN char * (tclGetEnv) (CONST char name, Tcl_DString * valuePtr); /* 138 */
1247	void *reserved139;
1248	void *reserved140;
1249	CONST84_RETURN char * (tclpGetCwd) (Tcl_Interp interp, Tcl_DString * cwdPtr); /* 141 */
1250	int (tclSetByteCodeFromAny) (Tcl_Interp interp, Tcl_Obj * objPtr, CompileHookProc * hookProc, ClientData clientData); /* 142 */
1251	int (tclAddLiteralObj) (struct CompileEnv envPtr, Tcl_Obj * objPtr, LiteralEntry ** litPtrPtr); /* 143 */
1252	void (tclHideLiteral) (Tcl_Interp interp, struct CompileEnv * envPtr, int index); /* 144 */
1253	struct AuxDataType * (tclGetAuxDataType) (char typeName); /* 145 */
1254	TclHandle (tclHandleCreate) (VOID ptr); /* 146 */
1255	void (tclHandleFree) (TclHandle handle); / 147 */
1256	TclHandle (tclHandlePreserve) (TclHandle handle); / 148 */
1257	void (tclHandleRelease) (TclHandle handle); / 149 */
1258	int (tclRegAbout) (Tcl_Interp interp, Tcl_RegExp re); /* 150 */
1259	void (tclRegExpRangeUniChar) (Tcl_RegExp re, int index, int startPtr, int * endPtr); /* 151 */
1260	void (tclSetLibraryPath) (Tcl_Obj pathPtr); /* 152 */
1261	Tcl_Obj * (tclGetLibraryPath) (void); / 153 */
1262	void *reserved154;
1263	void *reserved155;
1264	void (tclRegError) (Tcl_Interp interp, CONST char * msg, int status); /* 156 */
1265	Var * (tclVarTraceExists) (Tcl_Interp interp, CONST char * varName); /* 157 */
1266	void (tclSetStartupScriptFileName) (CONST char filename); /* 158 */
1267	CONST84_RETURN char * (tclGetStartupScriptFileName) (void); / 159 */
1268	void *reserved160;
1269	int (tclChannelTransform) (Tcl_Interp interp, Tcl_Channel chan, Tcl_Obj * cmdObjPtr); /* 161 */
1270	void (tclChannelEventScriptInvoker) (ClientData clientData, int flags); / 162 */
1271	void * (tclGetInstructionTable) (void); / 163 */
1272	void (tclExpandCodeArray) (void envPtr); /* 164 */
1273	void (tclpSetInitialEncodings) (void); / 165 */
1274	int (tclListObjSetElement) (Tcl_Interp interp, Tcl_Obj * listPtr, int index, Tcl_Obj * valuePtr); /* 166 */
1275	void (tclSetStartupScriptPath) (Tcl_Obj pathPtr); /* 167 */
1276	Tcl_Obj * (tclGetStartupScriptPath) (void); / 168 */
1277	int (tclpUtfNcmp2) (CONST char s1, CONST char * s2, unsigned long n); /* 169 */
1278	int (tclCheckInterpTraces) (Tcl_Interp interp, CONST char * command, int numChars, Command * cmdPtr, int result, int traceFlags, int objc, Tcl_Obj CONST objv[]); / 170 */
1279	int (tclCheckExecutionTraces) (Tcl_Interp interp, CONST char * command, int numChars, Command * cmdPtr, int result, int traceFlags, int objc, Tcl_Obj CONST objv[]); / 171 */
1280	int (tclInThreadExit) (void); / 172 */
1281	int (tclUniCharMatch) (CONST Tcl_UniChar string, int strLen, CONST Tcl_UniChar * pattern, int ptnLen, int flags); /* 173 */
1282	void *reserved174;
1283	int (tclCallVarTraces) (Interp iPtr, Var * arrayPtr, Var * varPtr, CONST char * part1, CONST char * part2, int flags, int leaveErrMsg); /* 175 */
1284	void (tclCleanupVar) (Var varPtr, Var * arrayPtr); /* 176 */
1285	void (tclVarErrMsg) (Tcl_Interp interp, CONST char * part1, CONST char * part2, CONST char * operation, CONST char * reason); /* 177 */
1286	void (tcl_SetStartupScript) (Tcl_Obj pathPtr, CONST char* encodingName); /* 178 */
1287	Tcl_Obj * (tcl_GetStartupScript) (CONST char * encodingNamePtr); /* 179 */
1288	void *reserved180;
1289	void *reserved181;
1290	struct tm * (tclpLocaltime) (CONST time_t clock); /* 182 */
1291	struct tm * (tclpGmtime) (CONST time_t clock); /* 183 */
1292	void *reserved184;
1293	void *reserved185;
1294	void *reserved186;
1295	void *reserved187;
1296	void *reserved188;
1297	void *reserved189;
1298	void *reserved190;
1299	void *reserved191;
1300	void *reserved192;
1301	void *reserved193;
1302	void *reserved194;
1303	void *reserved195;
1304	void *reserved196;
1305	void *reserved197;
1306	int (tclObjGetFrame) (Tcl_Interp interp, Tcl_Obj * objPtr, CallFrame ** framePtrPtr); /* 198 */
1307	void *reserved199;
1308	int (tclpObjRemoveDirectory) (Tcl_Obj pathPtr, int recursive, Tcl_Obj ** errorPtr); /* 200 */
1309	int (tclpObjCopyDirectory) (Tcl_Obj srcPathPtr, Tcl_Obj * destPathPtr, Tcl_Obj ** errorPtr); /* 201 */
1310	int (tclpObjCreateDirectory) (Tcl_Obj pathPtr); /* 202 */
1311	int (tclpObjDeleteFile) (Tcl_Obj pathPtr); /* 203 */
1312	int (tclpObjCopyFile) (Tcl_Obj srcPathPtr, Tcl_Obj * destPathPtr); /* 204 */
1313	int (tclpObjRenameFile) (Tcl_Obj srcPathPtr, Tcl_Obj * destPathPtr); /* 205 */
1314	int (tclpObjStat) (Tcl_Obj pathPtr, Tcl_StatBuf * buf); /* 206 */
1315	int (tclpObjAccess) (Tcl_Obj pathPtr, int mode); /* 207 */
1316	Tcl_Channel (tclpOpenFileChannel) (Tcl_Interp interp, Tcl_Obj * pathPtr, int mode, int permissions); /* 208 */
1317	void *reserved209;
1318	void *reserved210;
1319	void *reserved211;
1320	void (tclpFindExecutable) (CONST char argv0); /* 212 */
1321	Tcl_Obj * (tclGetObjNameOfExecutable) (void); / 213 */
1322	void (tclSetObjNameOfExecutable) (Tcl_Obj name, Tcl_Encoding encoding); /* 214 */
1323	void * (tclStackAlloc) (Tcl_Interp interp, int numBytes); /* 215 */
1324	void (tclStackFree) (Tcl_Interp interp, void * freePtr); /* 216 */
1325	int (tclPushStackFrame) (Tcl_Interp interp, Tcl_CallFrame ** framePtrPtr, Tcl_Namespace * namespacePtr, int isProcCallFrame); /* 217 */
1326	void (tclPopStackFrame) (Tcl_Interp interp); /* 218 */
1327	void *reserved219;
1328	void *reserved220;
1329	void *reserved221;
1330	void *reserved222;
1331	void *reserved223;
1332	TclPlatformType * (tclGetPlatform) (void); / 224 */
1333	Tcl_Obj * (tclTraceDictPath) (Tcl_Interp interp, Tcl_Obj * rootPtr, int keyc, Tcl_Obj CONST keyv[], int flags); / 225 */
1334	int (tclObjBeingDeleted) (Tcl_Obj objPtr); /* 226 */
1335	void (tclSetNsPath) (Namespace nsPtr, int pathLength, Tcl_Namespace * pathAry[]); /* 227 */
1336	int (tclObjInterpProcCore) (register Tcl_Interp interp, Tcl_Obj * procNameObj, int skip, ProcErrorProc errorProc); /* 228 */
1337	int (tclPtrMakeUpvar) (Tcl_Interp interp, Var * otherP1Ptr, CONST char * myName, int myFlags, int index); /* 229 */
1338	Var * (tclObjLookupVar) (Tcl_Interp interp, Tcl_Obj * part1Ptr, CONST char * part2, int flags, CONST char * msg, CONST int createPart1, CONST int createPart2, Var ** arrayPtrPtr); /* 230 */
1339	int (tclGetNamespaceFromObj) (Tcl_Interp interp, Tcl_Obj * objPtr, Tcl_Namespace ** nsPtrPtr); /* 231 */
1340	int (tclEvalObjEx) (Tcl_Interp interp, Tcl_Obj * objPtr, int flags, const CmdFrame * invoker, int word); /* 232 */
1341	void (tclGetSrcInfoForPc) (CmdFrame contextPtr); /* 233 */
1342	Var * (tclVarHashCreateVar) (TclVarHashTable tablePtr, const char * key, int * newPtr); /* 234 */
1343	void (tclInitVarHashTable) (TclVarHashTable tablePtr, Namespace * nsPtr); /* 235 */
1344	void (tclBackgroundException) (Tcl_Interp interp, int code); /* 236 */
1345	} TclIntStubs;
1346
1347	#ifdef __cplusplus
1348	extern "C" {
1349	#endif
1350	extern TclIntStubs *tclIntStubsPtr;
1351	#ifdef __cplusplus
1352	}
1353	#endif
1354
1355	#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
1356
1357	/*
1358	* Inline function declarations:
1359	*/
1360
1361	/* Slot 0 is reserved */
1362	/* Slot 1 is reserved */
1363	/* Slot 2 is reserved */
1364	#ifndef TclAllocateFreeObjects
1365	#define TclAllocateFreeObjects \
1366	(tclIntStubsPtr->tclAllocateFreeObjects) /* 3 */
1367	#endif
1368	/* Slot 4 is reserved */
1369	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
1370	#ifndef TclCleanupChildren
1371	#define TclCleanupChildren \
1372	(tclIntStubsPtr->tclCleanupChildren) /* 5 */
1373	#endif
1374	#endif /* UNIX */
1375	#ifdef __WIN32__ /* WIN */
1376	#ifndef TclCleanupChildren
1377	#define TclCleanupChildren \
1378	(tclIntStubsPtr->tclCleanupChildren) /* 5 */
1379	#endif
1380	#endif /* WIN */
1381	#ifdef MAC_OSX_TCL /* MACOSX */
1382	#ifndef TclCleanupChildren
1383	#define TclCleanupChildren \
1384	(tclIntStubsPtr->tclCleanupChildren) /* 5 */
1385	#endif
1386	#endif /* MACOSX */
1387	#ifndef TclCleanupCommand
1388	#define TclCleanupCommand \
1389	(tclIntStubsPtr->tclCleanupCommand) /* 6 */
1390	#endif
1391	#ifndef TclCopyAndCollapse
1392	#define TclCopyAndCollapse \
1393	(tclIntStubsPtr->tclCopyAndCollapse) /* 7 */
1394	#endif
1395	#ifndef TclCopyChannel
1396	#define TclCopyChannel \
1397	(tclIntStubsPtr->tclCopyChannel) /* 8 */
1398	#endif
1399	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
1400	#ifndef TclCreatePipeline
1401	#define TclCreatePipeline \
1402	(tclIntStubsPtr->tclCreatePipeline) /* 9 */
1403	#endif
1404	#endif /* UNIX */
1405	#ifdef __WIN32__ /* WIN */
1406	#ifndef TclCreatePipeline
1407	#define TclCreatePipeline \
1408	(tclIntStubsPtr->tclCreatePipeline) /* 9 */
1409	#endif
1410	#endif /* WIN */
1411	#ifdef MAC_OSX_TCL /* MACOSX */
1412	#ifndef TclCreatePipeline
1413	#define TclCreatePipeline \
1414	(tclIntStubsPtr->tclCreatePipeline) /* 9 */
1415	#endif
1416	#endif /* MACOSX */
1417	#ifndef TclCreateProc
1418	#define TclCreateProc \
1419	(tclIntStubsPtr->tclCreateProc) /* 10 */
1420	#endif
1421	#ifndef TclDeleteCompiledLocalVars
1422	#define TclDeleteCompiledLocalVars \
1423	(tclIntStubsPtr->tclDeleteCompiledLocalVars) /* 11 */
1424	#endif
1425	#ifndef TclDeleteVars
1426	#define TclDeleteVars \
1427	(tclIntStubsPtr->tclDeleteVars) /* 12 */
1428	#endif
1429	/* Slot 13 is reserved */
1430	#ifndef TclDumpMemoryInfo
1431	#define TclDumpMemoryInfo \
1432	(tclIntStubsPtr->tclDumpMemoryInfo) /* 14 */
1433	#endif
1434	/* Slot 15 is reserved */
1435	#ifndef TclExprFloatError
1436	#define TclExprFloatError \
1437	(tclIntStubsPtr->tclExprFloatError) /* 16 */
1438	#endif
1439	/* Slot 17 is reserved */
1440	/* Slot 18 is reserved */
1441	/* Slot 19 is reserved */
1442	/* Slot 20 is reserved */
1443	/* Slot 21 is reserved */
1444	#ifndef TclFindElement
1445	#define TclFindElement \
1446	(tclIntStubsPtr->tclFindElement) /* 22 */
1447	#endif
1448	#ifndef TclFindProc
1449	#define TclFindProc \
1450	(tclIntStubsPtr->tclFindProc) /* 23 */
1451	#endif
1452	/* Slot 24 is reserved */
1453	#ifndef TclFreePackageInfo
1454	#define TclFreePackageInfo \
1455	(tclIntStubsPtr->tclFreePackageInfo) /* 25 */
1456	#endif
1457	/* Slot 26 is reserved */
1458	/* Slot 27 is reserved */
1459	#ifndef TclpGetDefaultStdChannel
1460	#define TclpGetDefaultStdChannel \
1461	(tclIntStubsPtr->tclpGetDefaultStdChannel) /* 28 */
1462	#endif
1463	/* Slot 29 is reserved */
1464	/* Slot 30 is reserved */
1465	#ifndef TclGetExtension
1466	#define TclGetExtension \
1467	(tclIntStubsPtr->tclGetExtension) /* 31 */
1468	#endif
1469	#ifndef TclGetFrame
1470	#define TclGetFrame \
1471	(tclIntStubsPtr->tclGetFrame) /* 32 */
1472	#endif
1473	/* Slot 33 is reserved */
1474	#ifndef TclGetIntForIndex
1475	#define TclGetIntForIndex \
1476	(tclIntStubsPtr->tclGetIntForIndex) /* 34 */
1477	#endif
1478	/* Slot 35 is reserved */
1479	#ifndef TclGetLong
1480	#define TclGetLong \
1481	(tclIntStubsPtr->tclGetLong) /* 36 */
1482	#endif
1483	#ifndef TclGetLoadedPackages
1484	#define TclGetLoadedPackages \
1485	(tclIntStubsPtr->tclGetLoadedPackages) /* 37 */
1486	#endif
1487	#ifndef TclGetNamespaceForQualName
1488	#define TclGetNamespaceForQualName \
1489	(tclIntStubsPtr->tclGetNamespaceForQualName) /* 38 */
1490	#endif
1491	#ifndef TclGetObjInterpProc
1492	#define TclGetObjInterpProc \
1493	(tclIntStubsPtr->tclGetObjInterpProc) /* 39 */
1494	#endif
1495	#ifndef TclGetOpenMode
1496	#define TclGetOpenMode \
1497	(tclIntStubsPtr->tclGetOpenMode) /* 40 */
1498	#endif
1499	#ifndef TclGetOriginalCommand
1500	#define TclGetOriginalCommand \
1501	(tclIntStubsPtr->tclGetOriginalCommand) /* 41 */
1502	#endif
1503	#ifndef TclpGetUserHome
1504	#define TclpGetUserHome \
1505	(tclIntStubsPtr->tclpGetUserHome) /* 42 */
1506	#endif
1507	/* Slot 43 is reserved */
1508	#ifndef TclGuessPackageName
1509	#define TclGuessPackageName \
1510	(tclIntStubsPtr->tclGuessPackageName) /* 44 */
1511	#endif
1512	#ifndef TclHideUnsafeCommands
1513	#define TclHideUnsafeCommands \
1514	(tclIntStubsPtr->tclHideUnsafeCommands) /* 45 */
1515	#endif
1516	#ifndef TclInExit
1517	#define TclInExit \
1518	(tclIntStubsPtr->tclInExit) /* 46 */
1519	#endif
1520	/* Slot 47 is reserved */
1521	/* Slot 48 is reserved */
1522	/* Slot 49 is reserved */
1523	#ifndef TclInitCompiledLocals
1524	#define TclInitCompiledLocals \
1525	(tclIntStubsPtr->tclInitCompiledLocals) /* 50 */
1526	#endif
1527	#ifndef TclInterpInit
1528	#define TclInterpInit \
1529	(tclIntStubsPtr->tclInterpInit) /* 51 */
1530	#endif
1531	/* Slot 52 is reserved */
1532	#ifndef TclInvokeObjectCommand
1533	#define TclInvokeObjectCommand \
1534	(tclIntStubsPtr->tclInvokeObjectCommand) /* 53 */
1535	#endif
1536	#ifndef TclInvokeStringCommand
1537	#define TclInvokeStringCommand \
1538	(tclIntStubsPtr->tclInvokeStringCommand) /* 54 */
1539	#endif
1540	#ifndef TclIsProc
1541	#define TclIsProc \
1542	(tclIntStubsPtr->tclIsProc) /* 55 */
1543	#endif
1544	/* Slot 56 is reserved */
1545	/* Slot 57 is reserved */
1546	#ifndef TclLookupVar
1547	#define TclLookupVar \
1548	(tclIntStubsPtr->tclLookupVar) /* 58 */
1549	#endif
1550	/* Slot 59 is reserved */
1551	#ifndef TclNeedSpace
1552	#define TclNeedSpace \
1553	(tclIntStubsPtr->tclNeedSpace) /* 60 */
1554	#endif
1555	#ifndef TclNewProcBodyObj
1556	#define TclNewProcBodyObj \
1557	(tclIntStubsPtr->tclNewProcBodyObj) /* 61 */
1558	#endif
1559	#ifndef TclObjCommandComplete
1560	#define TclObjCommandComplete \
1561	(tclIntStubsPtr->tclObjCommandComplete) /* 62 */
1562	#endif
1563	#ifndef TclObjInterpProc
1564	#define TclObjInterpProc \
1565	(tclIntStubsPtr->tclObjInterpProc) /* 63 */
1566	#endif
1567	#ifndef TclObjInvoke
1568	#define TclObjInvoke \
1569	(tclIntStubsPtr->tclObjInvoke) /* 64 */
1570	#endif
1571	/* Slot 65 is reserved */
1572	/* Slot 66 is reserved */
1573	/* Slot 67 is reserved */
1574	/* Slot 68 is reserved */
1575	#ifndef TclpAlloc
1576	#define TclpAlloc \
1577	(tclIntStubsPtr->tclpAlloc) /* 69 */
1578	#endif
1579	/* Slot 70 is reserved */
1580	/* Slot 71 is reserved */
1581	/* Slot 72 is reserved */
1582	/* Slot 73 is reserved */
1583	#ifndef TclpFree
1584	#define TclpFree \
1585	(tclIntStubsPtr->tclpFree) /* 74 */
1586	#endif
1587	#ifndef TclpGetClicks
1588	#define TclpGetClicks \
1589	(tclIntStubsPtr->tclpGetClicks) /* 75 */
1590	#endif
1591	#ifndef TclpGetSeconds
1592	#define TclpGetSeconds \
1593	(tclIntStubsPtr->tclpGetSeconds) /* 76 */
1594	#endif
1595	#ifndef TclpGetTime
1596	#define TclpGetTime \
1597	(tclIntStubsPtr->tclpGetTime) /* 77 */
1598	#endif
1599	#ifndef TclpGetTimeZone
1600	#define TclpGetTimeZone \
1601	(tclIntStubsPtr->tclpGetTimeZone) /* 78 */
1602	#endif
1603	/* Slot 79 is reserved */
1604	/* Slot 80 is reserved */
1605	#ifndef TclpRealloc
1606	#define TclpRealloc \
1607	(tclIntStubsPtr->tclpRealloc) /* 81 */
1608	#endif
1609	/* Slot 82 is reserved */
1610	/* Slot 83 is reserved */
1611	/* Slot 84 is reserved */
1612	/* Slot 85 is reserved */
1613	/* Slot 86 is reserved */
1614	/* Slot 87 is reserved */
1615	#ifndef TclPrecTraceProc
1616	#define TclPrecTraceProc \
1617	(tclIntStubsPtr->tclPrecTraceProc) /* 88 */
1618	#endif
1619	#ifndef TclPreventAliasLoop
1620	#define TclPreventAliasLoop \
1621	(tclIntStubsPtr->tclPreventAliasLoop) /* 89 */
1622	#endif
1623	/* Slot 90 is reserved */
1624	#ifndef TclProcCleanupProc
1625	#define TclProcCleanupProc \
1626	(tclIntStubsPtr->tclProcCleanupProc) /* 91 */
1627	#endif
1628	#ifndef TclProcCompileProc
1629	#define TclProcCompileProc \
1630	(tclIntStubsPtr->tclProcCompileProc) /* 92 */
1631	#endif
1632	#ifndef TclProcDeleteProc
1633	#define TclProcDeleteProc \
1634	(tclIntStubsPtr->tclProcDeleteProc) /* 93 */
1635	#endif
1636	/* Slot 94 is reserved */
1637	/* Slot 95 is reserved */
1638	#ifndef TclRenameCommand
1639	#define TclRenameCommand \
1640	(tclIntStubsPtr->tclRenameCommand) /* 96 */
1641	#endif
1642	#ifndef TclResetShadowedCmdRefs
1643	#define TclResetShadowedCmdRefs \
1644	(tclIntStubsPtr->tclResetShadowedCmdRefs) /* 97 */
1645	#endif
1646	#ifndef TclServiceIdle
1647	#define TclServiceIdle \
1648	(tclIntStubsPtr->tclServiceIdle) /* 98 */
1649	#endif
1650	/* Slot 99 is reserved */
1651	/* Slot 100 is reserved */
1652	#ifndef TclSetPreInitScript
1653	#define TclSetPreInitScript \
1654	(tclIntStubsPtr->tclSetPreInitScript) /* 101 */
1655	#endif
1656	#ifndef TclSetupEnv
1657	#define TclSetupEnv \
1658	(tclIntStubsPtr->tclSetupEnv) /* 102 */
1659	#endif
1660	#ifndef TclSockGetPort
1661	#define TclSockGetPort \
1662	(tclIntStubsPtr->tclSockGetPort) /* 103 */
1663	#endif
1664	#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
1665	#ifndef TclSockMinimumBuffers
1666	#define TclSockMinimumBuffers \
1667	(tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
1668	#endif
1669	#endif /* UNIX */
1670	#ifdef __WIN32__ /* WIN */
1671	#ifndef TclSockMinimumBuffers
1672	#define TclSockMinimumBuffers \
1673	(tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
1674	#endif
1675	#endif /* WIN */
1676	#ifdef MAC_OSX_TCL /* MACOSX */
1677	#ifndef TclSockMinimumBuffers
1678	#define TclSockMinimumBuffers \
1679	(tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */
1680	#endif
1681	#endif /* MACOSX */
1682	/* Slot 105 is reserved */
1683	/* Slot 106 is reserved */
1684	/* Slot 107 is reserved */
1685	#ifndef TclTeardownNamespace
1686	#define TclTeardownNamespace \
1687	(tclIntStubsPtr->tclTeardownNamespace) /* 108 */
1688	#endif
1689	#ifndef TclUpdateReturnInfo
1690	#define TclUpdateReturnInfo \
1691	(tclIntStubsPtr->tclUpdateReturnInfo) /* 109 */
1692	#endif
1693	/* Slot 110 is reserved */
1694	#ifndef Tcl_AddInterpResolvers
1695	#define Tcl_AddInterpResolvers \
1696	(tclIntStubsPtr->tcl_AddInterpResolvers) /* 111 */
1697	#endif
1698	#ifndef Tcl_AppendExportList
1699	#define Tcl_AppendExportList \
1700	(tclIntStubsPtr->tcl_AppendExportList) /* 112 */
1701	#endif
1702	#ifndef Tcl_CreateNamespace
1703	#define Tcl_CreateNamespace \
1704	(tclIntStubsPtr->tcl_CreateNamespace) /* 113 */
1705	#endif
1706	#ifndef Tcl_DeleteNamespace
1707	#define Tcl_DeleteNamespace \
1708	(tclIntStubsPtr->tcl_DeleteNamespace) /* 114 */
1709	#endif
1710	#ifndef Tcl_Export
1711	#define Tcl_Export \
1712	(tclIntStubsPtr->tcl_Export) /* 115 */
1713	#endif
1714	#ifndef Tcl_FindCommand
1715	#define Tcl_FindCommand \
1716	(tclIntStubsPtr->tcl_FindCommand) /* 116 */
1717	#endif
1718	#ifndef Tcl_FindNamespace
1719	#define Tcl_FindNamespace \
1720	(tclIntStubsPtr->tcl_FindNamespace) /* 117 */
1721	#endif
1722	#ifndef Tcl_GetInterpResolvers
1723	#define Tcl_GetInterpResolvers \
1724	(tclIntStubsPtr->tcl_GetInterpResolvers) /* 118 */
1725	#endif
1726	#ifndef Tcl_GetNamespaceResolvers
1727	#define Tcl_GetNamespaceResolvers \
1728	(tclIntStubsPtr->tcl_GetNamespaceResolvers) /* 119 */
1729	#endif
1730	#ifndef Tcl_FindNamespaceVar
1731	#define Tcl_FindNamespaceVar \
1732	(tclIntStubsPtr->tcl_FindNamespaceVar) /* 120 */
1733	#endif
1734	#ifndef Tcl_ForgetImport
1735	#define Tcl_ForgetImport \
1736	(tclIntStubsPtr->tcl_ForgetImport) /* 121 */
1737	#endif
1738	#ifndef Tcl_GetCommandFromObj
1739	#define Tcl_GetCommandFromObj \
1740	(tclIntStubsPtr->tcl_GetCommandFromObj) /* 122 */
1741	#endif
1742	#ifndef Tcl_GetCommandFullName
1743	#define Tcl_GetCommandFullName \
1744	(tclIntStubsPtr->tcl_GetCommandFullName) /* 123 */
1745	#endif
1746	#ifndef Tcl_GetCurrentNamespace
1747	#define Tcl_GetCurrentNamespace \
1748	(tclIntStubsPtr->tcl_GetCurrentNamespace) /* 124 */
1749	#endif
1750	#ifndef Tcl_GetGlobalNamespace
1751	#define Tcl_GetGlobalNamespace \
1752	(tclIntStubsPtr->tcl_GetGlobalNamespace) /* 125 */
1753	#endif
1754	#ifndef Tcl_GetVariableFullName
1755	#define Tcl_GetVariableFullName \
1756	(tclIntStubsPtr->tcl_GetVariableFullName) /* 126 */
1757	#endif
1758	#ifndef Tcl_Import
1759	#define Tcl_Import \
1760	(tclIntStubsPtr->tcl_Import) /* 127 */
1761	#endif
1762	#ifndef Tcl_PopCallFrame
1763	#define Tcl_PopCallFrame \
1764	(tclIntStubsPtr->tcl_PopCallFrame) /* 128 */
1765	#endif
1766	#ifndef Tcl_PushCallFrame
1767	#define Tcl_PushCallFrame \
1768	(tclIntStubsPtr->tcl_PushCallFrame) /* 129 */
1769	#endif
1770	#ifndef Tcl_RemoveInterpResolvers
1771	#define Tcl_RemoveInterpResolvers \
1772	(tclIntStubsPtr->tcl_RemoveInterpResolvers) /* 130 */
1773	#endif
1774	#ifndef Tcl_SetNamespaceResolvers
1775	#define Tcl_SetNamespaceResolvers \
1776	(tclIntStubsPtr->tcl_SetNamespaceResolvers) /* 131 */
1777	#endif
1778	#ifndef TclpHasSockets
1779	#define TclpHasSockets \
1780	(tclIntStubsPtr->tclpHasSockets) /* 132 */
1781	#endif
1782	#ifndef TclpGetDate
1783	#define TclpGetDate \
1784	(tclIntStubsPtr->tclpGetDate) /* 133 */
1785	#endif
1786	/* Slot 134 is reserved */
1787	/* Slot 135 is reserved */
1788	/* Slot 136 is reserved */
1789	/* Slot 137 is reserved */
1790	#ifndef TclGetEnv
1791	#define TclGetEnv \
1792	(tclIntStubsPtr->tclGetEnv) /* 138 */
1793	#endif
1794	/* Slot 139 is reserved */
1795	/* Slot 140 is reserved */
1796	#ifndef TclpGetCwd
1797	#define TclpGetCwd \
1798	(tclIntStubsPtr->tclpGetCwd) /* 141 */
1799	#endif
1800	#ifndef TclSetByteCodeFromAny
1801	#define TclSetByteCodeFromAny \
1802	(tclIntStubsPtr->tclSetByteCodeFromAny) /* 142 */
1803	#endif
1804	#ifndef TclAddLiteralObj
1805	#define TclAddLiteralObj \
1806	(tclIntStubsPtr->tclAddLiteralObj) /* 143 */
1807	#endif
1808	#ifndef TclHideLiteral
1809	#define TclHideLiteral \
1810	(tclIntStubsPtr->tclHideLiteral) /* 144 */
1811	#endif
1812	#ifndef TclGetAuxDataType
1813	#define TclGetAuxDataType \
1814	(tclIntStubsPtr->tclGetAuxDataType) /* 145 */
1815	#endif
1816	#ifndef TclHandleCreate
1817	#define TclHandleCreate \
1818	(tclIntStubsPtr->tclHandleCreate) /* 146 */
1819	#endif
1820	#ifndef TclHandleFree
1821	#define TclHandleFree \
1822	(tclIntStubsPtr->tclHandleFree) /* 147 */
1823	#endif
1824	#ifndef TclHandlePreserve
1825	#define TclHandlePreserve \
1826	(tclIntStubsPtr->tclHandlePreserve) /* 148 */
1827	#endif
1828	#ifndef TclHandleRelease
1829	#define TclHandleRelease \
1830	(tclIntStubsPtr->tclHandleRelease) /* 149 */
1831	#endif
1832	#ifndef TclRegAbout
1833	#define TclRegAbout \
1834	(tclIntStubsPtr->tclRegAbout) /* 150 */
1835	#endif
1836	#ifndef TclRegExpRangeUniChar
1837	#define TclRegExpRangeUniChar \
1838	(tclIntStubsPtr->tclRegExpRangeUniChar) /* 151 */
1839	#endif
1840	#ifndef TclSetLibraryPath
1841	#define TclSetLibraryPath \
1842	(tclIntStubsPtr->tclSetLibraryPath) /* 152 */
1843	#endif
1844	#ifndef TclGetLibraryPath
1845	#define TclGetLibraryPath \
1846	(tclIntStubsPtr->tclGetLibraryPath) /* 153 */
1847	#endif
1848	/* Slot 154 is reserved */
1849	/* Slot 155 is reserved */
1850	#ifndef TclRegError
1851	#define TclRegError \
1852	(tclIntStubsPtr->tclRegError) /* 156 */
1853	#endif
1854	#ifndef TclVarTraceExists
1855	#define TclVarTraceExists \
1856	(tclIntStubsPtr->tclVarTraceExists) /* 157 */
1857	#endif
1858	#ifndef TclSetStartupScriptFileName
1859	#define TclSetStartupScriptFileName \
1860	(tclIntStubsPtr->tclSetStartupScriptFileName) /* 158 */
1861	#endif
1862	#ifndef TclGetStartupScriptFileName
1863	#define TclGetStartupScriptFileName \
1864	(tclIntStubsPtr->tclGetStartupScriptFileName) /* 159 */
1865	#endif
1866	/* Slot 160 is reserved */
1867	#ifndef TclChannelTransform
1868	#define TclChannelTransform \
1869	(tclIntStubsPtr->tclChannelTransform) /* 161 */
1870	#endif
1871	#ifndef TclChannelEventScriptInvoker
1872	#define TclChannelEventScriptInvoker \
1873	(tclIntStubsPtr->tclChannelEventScriptInvoker) /* 162 */
1874	#endif
1875	#ifndef TclGetInstructionTable
1876	#define TclGetInstructionTable \
1877	(tclIntStubsPtr->tclGetInstructionTable) /* 163 */
1878	#endif
1879	#ifndef TclExpandCodeArray
1880	#define TclExpandCodeArray \
1881	(tclIntStubsPtr->tclExpandCodeArray) /* 164 */
1882	#endif
1883	#ifndef TclpSetInitialEncodings
1884	#define TclpSetInitialEncodings \
1885	(tclIntStubsPtr->tclpSetInitialEncodings) /* 165 */
1886	#endif
1887	#ifndef TclListObjSetElement
1888	#define TclListObjSetElement \
1889	(tclIntStubsPtr->tclListObjSetElement) /* 166 */
1890	#endif
1891	#ifndef TclSetStartupScriptPath
1892	#define TclSetStartupScriptPath \
1893	(tclIntStubsPtr->tclSetStartupScriptPath) /* 167 */
1894	#endif
1895	#ifndef TclGetStartupScriptPath
1896	#define TclGetStartupScriptPath \
1897	(tclIntStubsPtr->tclGetStartupScriptPath) /* 168 */
1898	#endif
1899	#ifndef TclpUtfNcmp2
1900	#define TclpUtfNcmp2 \
1901	(tclIntStubsPtr->tclpUtfNcmp2) /* 169 */
1902	#endif
1903	#ifndef TclCheckInterpTraces
1904	#define TclCheckInterpTraces \
1905	(tclIntStubsPtr->tclCheckInterpTraces) /* 170 */
1906	#endif
1907	#ifndef TclCheckExecutionTraces
1908	#define TclCheckExecutionTraces \
1909	(tclIntStubsPtr->tclCheckExecutionTraces) /* 171 */
1910	#endif
1911	#ifndef TclInThreadExit
1912	#define TclInThreadExit \
1913	(tclIntStubsPtr->tclInThreadExit) /* 172 */
1914	#endif
1915	#ifndef TclUniCharMatch
1916	#define TclUniCharMatch \
1917	(tclIntStubsPtr->tclUniCharMatch) /* 173 */
1918	#endif
1919	/* Slot 174 is reserved */
1920	#ifndef TclCallVarTraces
1921	#define TclCallVarTraces \
1922	(tclIntStubsPtr->tclCallVarTraces) /* 175 */
1923	#endif
1924	#ifndef TclCleanupVar
1925	#define TclCleanupVar \
1926	(tclIntStubsPtr->tclCleanupVar) /* 176 */
1927	#endif
1928	#ifndef TclVarErrMsg
1929	#define TclVarErrMsg \
1930	(tclIntStubsPtr->tclVarErrMsg) /* 177 */
1931	#endif
1932	#ifndef Tcl_SetStartupScript
1933	#define Tcl_SetStartupScript \
1934	(tclIntStubsPtr->tcl_SetStartupScript) /* 178 */
1935	#endif
1936	#ifndef Tcl_GetStartupScript
1937	#define Tcl_GetStartupScript \
1938	(tclIntStubsPtr->tcl_GetStartupScript) /* 179 */
1939	#endif
1940	/* Slot 180 is reserved */
1941	/* Slot 181 is reserved */
1942	#ifndef TclpLocaltime
1943	#define TclpLocaltime \
1944	(tclIntStubsPtr->tclpLocaltime) /* 182 */
1945	#endif
1946	#ifndef TclpGmtime
1947	#define TclpGmtime \
1948	(tclIntStubsPtr->tclpGmtime) /* 183 */
1949	#endif
1950	/* Slot 184 is reserved */
1951	/* Slot 185 is reserved */
1952	/* Slot 186 is reserved */
1953	/* Slot 187 is reserved */
1954	/* Slot 188 is reserved */
1955	/* Slot 189 is reserved */
1956	/* Slot 190 is reserved */
1957	/* Slot 191 is reserved */
1958	/* Slot 192 is reserved */
1959	/* Slot 193 is reserved */
1960	/* Slot 194 is reserved */
1961	/* Slot 195 is reserved */
1962	/* Slot 196 is reserved */
1963	/* Slot 197 is reserved */
1964	#ifndef TclObjGetFrame
1965	#define TclObjGetFrame \
1966	(tclIntStubsPtr->tclObjGetFrame) /* 198 */
1967	#endif
1968	/* Slot 199 is reserved */
1969	#ifndef TclpObjRemoveDirectory
1970	#define TclpObjRemoveDirectory \
1971	(tclIntStubsPtr->tclpObjRemoveDirectory) /* 200 */
1972	#endif
1973	#ifndef TclpObjCopyDirectory
1974	#define TclpObjCopyDirectory \
1975	(tclIntStubsPtr->tclpObjCopyDirectory) /* 201 */
1976	#endif
1977	#ifndef TclpObjCreateDirectory
1978	#define TclpObjCreateDirectory \
1979	(tclIntStubsPtr->tclpObjCreateDirectory) /* 202 */
1980	#endif
1981	#ifndef TclpObjDeleteFile
1982	#define TclpObjDeleteFile \
1983	(tclIntStubsPtr->tclpObjDeleteFile) /* 203 */
1984	#endif
1985	#ifndef TclpObjCopyFile
1986	#define TclpObjCopyFile \
1987	(tclIntStubsPtr->tclpObjCopyFile) /* 204 */
1988	#endif
1989	#ifndef TclpObjRenameFile
1990	#define TclpObjRenameFile \
1991	(tclIntStubsPtr->tclpObjRenameFile) /* 205 */
1992	#endif
1993	#ifndef TclpObjStat
1994	#define TclpObjStat \
1995	(tclIntStubsPtr->tclpObjStat) /* 206 */
1996	#endif
1997	#ifndef TclpObjAccess
1998	#define TclpObjAccess \
1999	(tclIntStubsPtr->tclpObjAccess) /* 207 */
2000	#endif
2001	#ifndef TclpOpenFileChannel
2002	#define TclpOpenFileChannel \
2003	(tclIntStubsPtr->tclpOpenFileChannel) /* 208 */
2004	#endif
2005	/* Slot 209 is reserved */
2006	/* Slot 210 is reserved */
2007	/* Slot 211 is reserved */
2008	#ifndef TclpFindExecutable
2009	#define TclpFindExecutable \
2010	(tclIntStubsPtr->tclpFindExecutable) /* 212 */
2011	#endif
2012	#ifndef TclGetObjNameOfExecutable
2013	#define TclGetObjNameOfExecutable \
2014	(tclIntStubsPtr->tclGetObjNameOfExecutable) /* 213 */
2015	#endif
2016	#ifndef TclSetObjNameOfExecutable
2017	#define TclSetObjNameOfExecutable \
2018	(tclIntStubsPtr->tclSetObjNameOfExecutable) /* 214 */
2019	#endif
2020	#ifndef TclStackAlloc
2021	#define TclStackAlloc \
2022	(tclIntStubsPtr->tclStackAlloc) /* 215 */
2023	#endif
2024	#ifndef TclStackFree
2025	#define TclStackFree \
2026	(tclIntStubsPtr->tclStackFree) /* 216 */
2027	#endif
2028	#ifndef TclPushStackFrame
2029	#define TclPushStackFrame \
2030	(tclIntStubsPtr->tclPushStackFrame) /* 217 */
2031	#endif
2032	#ifndef TclPopStackFrame
2033	#define TclPopStackFrame \
2034	(tclIntStubsPtr->tclPopStackFrame) /* 218 */
2035	#endif
2036	/* Slot 219 is reserved */
2037	/* Slot 220 is reserved */
2038	/* Slot 221 is reserved */
2039	/* Slot 222 is reserved */
2040	/* Slot 223 is reserved */
2041	#ifndef TclGetPlatform
2042	#define TclGetPlatform \
2043	(tclIntStubsPtr->tclGetPlatform) /* 224 */
2044	#endif
2045	#ifndef TclTraceDictPath
2046	#define TclTraceDictPath \
2047	(tclIntStubsPtr->tclTraceDictPath) /* 225 */
2048	#endif
2049	#ifndef TclObjBeingDeleted
2050	#define TclObjBeingDeleted \
2051	(tclIntStubsPtr->tclObjBeingDeleted) /* 226 */
2052	#endif
2053	#ifndef TclSetNsPath
2054	#define TclSetNsPath \
2055	(tclIntStubsPtr->tclSetNsPath) /* 227 */
2056	#endif
2057	#ifndef TclObjInterpProcCore
2058	#define TclObjInterpProcCore \
2059	(tclIntStubsPtr->tclObjInterpProcCore) /* 228 */
2060	#endif
2061	#ifndef TclPtrMakeUpvar
2062	#define TclPtrMakeUpvar \
2063	(tclIntStubsPtr->tclPtrMakeUpvar) /* 229 */
2064	#endif
2065	#ifndef TclObjLookupVar
2066	#define TclObjLookupVar \
2067	(tclIntStubsPtr->tclObjLookupVar) /* 230 */
2068	#endif
2069	#ifndef TclGetNamespaceFromObj
2070	#define TclGetNamespaceFromObj \
2071	(tclIntStubsPtr->tclGetNamespaceFromObj) /* 231 */
2072	#endif
2073	#ifndef TclEvalObjEx
2074	#define TclEvalObjEx \
2075	(tclIntStubsPtr->tclEvalObjEx) /* 232 */
2076	#endif
2077	#ifndef TclGetSrcInfoForPc
2078	#define TclGetSrcInfoForPc \
2079	(tclIntStubsPtr->tclGetSrcInfoForPc) /* 233 */
2080	#endif
2081	#ifndef TclVarHashCreateVar
2082	#define TclVarHashCreateVar \
2083	(tclIntStubsPtr->tclVarHashCreateVar) /* 234 */
2084	#endif
2085	#ifndef TclInitVarHashTable
2086	#define TclInitVarHashTable \
2087	(tclIntStubsPtr->tclInitVarHashTable) /* 235 */
2088	#endif
2089	#ifndef TclBackgroundException
2090	#define TclBackgroundException \
2091	(tclIntStubsPtr->tclBackgroundException) /* 236 */
2092	#endif
2093
2094	#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
2095
2096	/* !END!: Do not edit above this line. */
2097
2098	#undef TCL_STORAGE_CLASS
2099	#define TCL_STORAGE_CLASS DLLIMPORT
2100
2101	#endif /* _TCLINTDECLS */

Note: See TracBrowser for help on using the repository browser.

Download in other formats: