Update tcl to version 8.5.13
[msysgit/kirr.git] / mingw / include / tclDecls.h
blob4225c96ad78246eccc80efd2e973ec5cc48ab09e
1 /*
2 * tclDecls.h --
4 * Declarations of functions in the platform independent public Tcl API.
6 * Copyright (c) 1998-1999 by Scriptics Corporation.
8 * See the file "license.terms" for information on usage and redistribution
9 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
12 #ifndef _TCLDECLS
13 #define _TCLDECLS
15 #undef TCL_STORAGE_CLASS
16 #ifdef BUILD_tcl
17 # define TCL_STORAGE_CLASS DLLEXPORT
18 #else
19 # ifdef USE_TCL_STUBS
20 # define TCL_STORAGE_CLASS
21 # else
22 # define TCL_STORAGE_CLASS DLLIMPORT
23 # endif
24 #endif
27 * WARNING: This file is automatically generated by the tools/genStubs.tcl
28 * script. Any modifications to the function declarations below should be made
29 * in the generic/tcl.decls script.
32 /* !BEGIN!: Do not edit below this line. */
35 * Exported function declarations:
38 #ifndef Tcl_PkgProvideEx_TCL_DECLARED
39 #define Tcl_PkgProvideEx_TCL_DECLARED
40 /* 0 */
41 EXTERN int Tcl_PkgProvideEx(Tcl_Interp *interp,
42 CONST char *name, CONST char *version,
43 ClientData clientData);
44 #endif
45 #ifndef Tcl_PkgRequireEx_TCL_DECLARED
46 #define Tcl_PkgRequireEx_TCL_DECLARED
47 /* 1 */
48 EXTERN CONST84_RETURN char * Tcl_PkgRequireEx(Tcl_Interp *interp,
49 CONST char *name, CONST char *version,
50 int exact, ClientData *clientDataPtr);
51 #endif
52 #ifndef Tcl_Panic_TCL_DECLARED
53 #define Tcl_Panic_TCL_DECLARED
54 /* 2 */
55 EXTERN void Tcl_Panic(CONST char *format, ...);
56 #endif
57 #ifndef Tcl_Alloc_TCL_DECLARED
58 #define Tcl_Alloc_TCL_DECLARED
59 /* 3 */
60 EXTERN char * Tcl_Alloc(unsigned int size);
61 #endif
62 #ifndef Tcl_Free_TCL_DECLARED
63 #define Tcl_Free_TCL_DECLARED
64 /* 4 */
65 EXTERN void Tcl_Free(char *ptr);
66 #endif
67 #ifndef Tcl_Realloc_TCL_DECLARED
68 #define Tcl_Realloc_TCL_DECLARED
69 /* 5 */
70 EXTERN char * Tcl_Realloc(char *ptr, unsigned int size);
71 #endif
72 #ifndef Tcl_DbCkalloc_TCL_DECLARED
73 #define Tcl_DbCkalloc_TCL_DECLARED
74 /* 6 */
75 EXTERN char * Tcl_DbCkalloc(unsigned int size, CONST char *file,
76 int line);
77 #endif
78 #ifndef Tcl_DbCkfree_TCL_DECLARED
79 #define Tcl_DbCkfree_TCL_DECLARED
80 /* 7 */
81 EXTERN void Tcl_DbCkfree(char *ptr, CONST char *file, int line);
82 #endif
83 #ifndef Tcl_DbCkrealloc_TCL_DECLARED
84 #define Tcl_DbCkrealloc_TCL_DECLARED
85 /* 8 */
86 EXTERN char * Tcl_DbCkrealloc(char *ptr, unsigned int size,
87 CONST char *file, int line);
88 #endif
89 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
90 #ifndef Tcl_CreateFileHandler_TCL_DECLARED
91 #define Tcl_CreateFileHandler_TCL_DECLARED
92 /* 9 */
93 EXTERN void Tcl_CreateFileHandler(int fd, int mask,
94 Tcl_FileProc *proc, ClientData clientData);
95 #endif
96 #endif /* UNIX */
97 #ifdef MAC_OSX_TCL /* MACOSX */
98 #ifndef Tcl_CreateFileHandler_TCL_DECLARED
99 #define Tcl_CreateFileHandler_TCL_DECLARED
100 /* 9 */
101 EXTERN void Tcl_CreateFileHandler(int fd, int mask,
102 Tcl_FileProc *proc, ClientData clientData);
103 #endif
104 #endif /* MACOSX */
105 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
106 #ifndef Tcl_DeleteFileHandler_TCL_DECLARED
107 #define Tcl_DeleteFileHandler_TCL_DECLARED
108 /* 10 */
109 EXTERN void Tcl_DeleteFileHandler(int fd);
110 #endif
111 #endif /* UNIX */
112 #ifdef MAC_OSX_TCL /* MACOSX */
113 #ifndef Tcl_DeleteFileHandler_TCL_DECLARED
114 #define Tcl_DeleteFileHandler_TCL_DECLARED
115 /* 10 */
116 EXTERN void Tcl_DeleteFileHandler(int fd);
117 #endif
118 #endif /* MACOSX */
119 #ifndef Tcl_SetTimer_TCL_DECLARED
120 #define Tcl_SetTimer_TCL_DECLARED
121 /* 11 */
122 EXTERN void Tcl_SetTimer(Tcl_Time *timePtr);
123 #endif
124 #ifndef Tcl_Sleep_TCL_DECLARED
125 #define Tcl_Sleep_TCL_DECLARED
126 /* 12 */
127 EXTERN void Tcl_Sleep(int ms);
128 #endif
129 #ifndef Tcl_WaitForEvent_TCL_DECLARED
130 #define Tcl_WaitForEvent_TCL_DECLARED
131 /* 13 */
132 EXTERN int Tcl_WaitForEvent(Tcl_Time *timePtr);
133 #endif
134 #ifndef Tcl_AppendAllObjTypes_TCL_DECLARED
135 #define Tcl_AppendAllObjTypes_TCL_DECLARED
136 /* 14 */
137 EXTERN int Tcl_AppendAllObjTypes(Tcl_Interp *interp,
138 Tcl_Obj *objPtr);
139 #endif
140 #ifndef Tcl_AppendStringsToObj_TCL_DECLARED
141 #define Tcl_AppendStringsToObj_TCL_DECLARED
142 /* 15 */
143 EXTERN void Tcl_AppendStringsToObj(Tcl_Obj *objPtr, ...);
144 #endif
145 #ifndef Tcl_AppendToObj_TCL_DECLARED
146 #define Tcl_AppendToObj_TCL_DECLARED
147 /* 16 */
148 EXTERN void Tcl_AppendToObj(Tcl_Obj *objPtr, CONST char *bytes,
149 int length);
150 #endif
151 #ifndef Tcl_ConcatObj_TCL_DECLARED
152 #define Tcl_ConcatObj_TCL_DECLARED
153 /* 17 */
154 EXTERN Tcl_Obj * Tcl_ConcatObj(int objc, Tcl_Obj *CONST objv[]);
155 #endif
156 #ifndef Tcl_ConvertToType_TCL_DECLARED
157 #define Tcl_ConvertToType_TCL_DECLARED
158 /* 18 */
159 EXTERN int Tcl_ConvertToType(Tcl_Interp *interp,
160 Tcl_Obj *objPtr, Tcl_ObjType *typePtr);
161 #endif
162 #ifndef Tcl_DbDecrRefCount_TCL_DECLARED
163 #define Tcl_DbDecrRefCount_TCL_DECLARED
164 /* 19 */
165 EXTERN void Tcl_DbDecrRefCount(Tcl_Obj *objPtr, CONST char *file,
166 int line);
167 #endif
168 #ifndef Tcl_DbIncrRefCount_TCL_DECLARED
169 #define Tcl_DbIncrRefCount_TCL_DECLARED
170 /* 20 */
171 EXTERN void Tcl_DbIncrRefCount(Tcl_Obj *objPtr, CONST char *file,
172 int line);
173 #endif
174 #ifndef Tcl_DbIsShared_TCL_DECLARED
175 #define Tcl_DbIsShared_TCL_DECLARED
176 /* 21 */
177 EXTERN int Tcl_DbIsShared(Tcl_Obj *objPtr, CONST char *file,
178 int line);
179 #endif
180 #ifndef Tcl_DbNewBooleanObj_TCL_DECLARED
181 #define Tcl_DbNewBooleanObj_TCL_DECLARED
182 /* 22 */
183 EXTERN Tcl_Obj * Tcl_DbNewBooleanObj(int boolValue, CONST char *file,
184 int line);
185 #endif
186 #ifndef Tcl_DbNewByteArrayObj_TCL_DECLARED
187 #define Tcl_DbNewByteArrayObj_TCL_DECLARED
188 /* 23 */
189 EXTERN Tcl_Obj * Tcl_DbNewByteArrayObj(CONST unsigned char *bytes,
190 int length, CONST char *file, int line);
191 #endif
192 #ifndef Tcl_DbNewDoubleObj_TCL_DECLARED
193 #define Tcl_DbNewDoubleObj_TCL_DECLARED
194 /* 24 */
195 EXTERN Tcl_Obj * Tcl_DbNewDoubleObj(double doubleValue,
196 CONST char *file, int line);
197 #endif
198 #ifndef Tcl_DbNewListObj_TCL_DECLARED
199 #define Tcl_DbNewListObj_TCL_DECLARED
200 /* 25 */
201 EXTERN Tcl_Obj * Tcl_DbNewListObj(int objc, Tcl_Obj *CONST *objv,
202 CONST char *file, int line);
203 #endif
204 #ifndef Tcl_DbNewLongObj_TCL_DECLARED
205 #define Tcl_DbNewLongObj_TCL_DECLARED
206 /* 26 */
207 EXTERN Tcl_Obj * Tcl_DbNewLongObj(long longValue, CONST char *file,
208 int line);
209 #endif
210 #ifndef Tcl_DbNewObj_TCL_DECLARED
211 #define Tcl_DbNewObj_TCL_DECLARED
212 /* 27 */
213 EXTERN Tcl_Obj * Tcl_DbNewObj(CONST char *file, int line);
214 #endif
215 #ifndef Tcl_DbNewStringObj_TCL_DECLARED
216 #define Tcl_DbNewStringObj_TCL_DECLARED
217 /* 28 */
218 EXTERN Tcl_Obj * Tcl_DbNewStringObj(CONST char *bytes, int length,
219 CONST char *file, int line);
220 #endif
221 #ifndef Tcl_DuplicateObj_TCL_DECLARED
222 #define Tcl_DuplicateObj_TCL_DECLARED
223 /* 29 */
224 EXTERN Tcl_Obj * Tcl_DuplicateObj(Tcl_Obj *objPtr);
225 #endif
226 #ifndef TclFreeObj_TCL_DECLARED
227 #define TclFreeObj_TCL_DECLARED
228 /* 30 */
229 EXTERN void TclFreeObj(Tcl_Obj *objPtr);
230 #endif
231 #ifndef Tcl_GetBoolean_TCL_DECLARED
232 #define Tcl_GetBoolean_TCL_DECLARED
233 /* 31 */
234 EXTERN int Tcl_GetBoolean(Tcl_Interp *interp, CONST char *src,
235 int *boolPtr);
236 #endif
237 #ifndef Tcl_GetBooleanFromObj_TCL_DECLARED
238 #define Tcl_GetBooleanFromObj_TCL_DECLARED
239 /* 32 */
240 EXTERN int Tcl_GetBooleanFromObj(Tcl_Interp *interp,
241 Tcl_Obj *objPtr, int *boolPtr);
242 #endif
243 #ifndef Tcl_GetByteArrayFromObj_TCL_DECLARED
244 #define Tcl_GetByteArrayFromObj_TCL_DECLARED
245 /* 33 */
246 EXTERN unsigned char * Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr,
247 int *lengthPtr);
248 #endif
249 #ifndef Tcl_GetDouble_TCL_DECLARED
250 #define Tcl_GetDouble_TCL_DECLARED
251 /* 34 */
252 EXTERN int Tcl_GetDouble(Tcl_Interp *interp, CONST char *src,
253 double *doublePtr);
254 #endif
255 #ifndef Tcl_GetDoubleFromObj_TCL_DECLARED
256 #define Tcl_GetDoubleFromObj_TCL_DECLARED
257 /* 35 */
258 EXTERN int Tcl_GetDoubleFromObj(Tcl_Interp *interp,
259 Tcl_Obj *objPtr, double *doublePtr);
260 #endif
261 #ifndef Tcl_GetIndexFromObj_TCL_DECLARED
262 #define Tcl_GetIndexFromObj_TCL_DECLARED
263 /* 36 */
264 EXTERN int Tcl_GetIndexFromObj(Tcl_Interp *interp,
265 Tcl_Obj *objPtr, CONST84 char **tablePtr,
266 CONST char *msg, int flags, int *indexPtr);
267 #endif
268 #ifndef Tcl_GetInt_TCL_DECLARED
269 #define Tcl_GetInt_TCL_DECLARED
270 /* 37 */
271 EXTERN int Tcl_GetInt(Tcl_Interp *interp, CONST char *src,
272 int *intPtr);
273 #endif
274 #ifndef Tcl_GetIntFromObj_TCL_DECLARED
275 #define Tcl_GetIntFromObj_TCL_DECLARED
276 /* 38 */
277 EXTERN int Tcl_GetIntFromObj(Tcl_Interp *interp,
278 Tcl_Obj *objPtr, int *intPtr);
279 #endif
280 #ifndef Tcl_GetLongFromObj_TCL_DECLARED
281 #define Tcl_GetLongFromObj_TCL_DECLARED
282 /* 39 */
283 EXTERN int Tcl_GetLongFromObj(Tcl_Interp *interp,
284 Tcl_Obj *objPtr, long *longPtr);
285 #endif
286 #ifndef Tcl_GetObjType_TCL_DECLARED
287 #define Tcl_GetObjType_TCL_DECLARED
288 /* 40 */
289 EXTERN Tcl_ObjType * Tcl_GetObjType(CONST char *typeName);
290 #endif
291 #ifndef Tcl_GetStringFromObj_TCL_DECLARED
292 #define Tcl_GetStringFromObj_TCL_DECLARED
293 /* 41 */
294 EXTERN char * Tcl_GetStringFromObj(Tcl_Obj *objPtr, int *lengthPtr);
295 #endif
296 #ifndef Tcl_InvalidateStringRep_TCL_DECLARED
297 #define Tcl_InvalidateStringRep_TCL_DECLARED
298 /* 42 */
299 EXTERN void Tcl_InvalidateStringRep(Tcl_Obj *objPtr);
300 #endif
301 #ifndef Tcl_ListObjAppendList_TCL_DECLARED
302 #define Tcl_ListObjAppendList_TCL_DECLARED
303 /* 43 */
304 EXTERN int Tcl_ListObjAppendList(Tcl_Interp *interp,
305 Tcl_Obj *listPtr, Tcl_Obj *elemListPtr);
306 #endif
307 #ifndef Tcl_ListObjAppendElement_TCL_DECLARED
308 #define Tcl_ListObjAppendElement_TCL_DECLARED
309 /* 44 */
310 EXTERN int Tcl_ListObjAppendElement(Tcl_Interp *interp,
311 Tcl_Obj *listPtr, Tcl_Obj *objPtr);
312 #endif
313 #ifndef Tcl_ListObjGetElements_TCL_DECLARED
314 #define Tcl_ListObjGetElements_TCL_DECLARED
315 /* 45 */
316 EXTERN int Tcl_ListObjGetElements(Tcl_Interp *interp,
317 Tcl_Obj *listPtr, int *objcPtr,
318 Tcl_Obj ***objvPtr);
319 #endif
320 #ifndef Tcl_ListObjIndex_TCL_DECLARED
321 #define Tcl_ListObjIndex_TCL_DECLARED
322 /* 46 */
323 EXTERN int Tcl_ListObjIndex(Tcl_Interp *interp,
324 Tcl_Obj *listPtr, int index,
325 Tcl_Obj **objPtrPtr);
326 #endif
327 #ifndef Tcl_ListObjLength_TCL_DECLARED
328 #define Tcl_ListObjLength_TCL_DECLARED
329 /* 47 */
330 EXTERN int Tcl_ListObjLength(Tcl_Interp *interp,
331 Tcl_Obj *listPtr, int *lengthPtr);
332 #endif
333 #ifndef Tcl_ListObjReplace_TCL_DECLARED
334 #define Tcl_ListObjReplace_TCL_DECLARED
335 /* 48 */
336 EXTERN int Tcl_ListObjReplace(Tcl_Interp *interp,
337 Tcl_Obj *listPtr, int first, int count,
338 int objc, Tcl_Obj *CONST objv[]);
339 #endif
340 #ifndef Tcl_NewBooleanObj_TCL_DECLARED
341 #define Tcl_NewBooleanObj_TCL_DECLARED
342 /* 49 */
343 EXTERN Tcl_Obj * Tcl_NewBooleanObj(int boolValue);
344 #endif
345 #ifndef Tcl_NewByteArrayObj_TCL_DECLARED
346 #define Tcl_NewByteArrayObj_TCL_DECLARED
347 /* 50 */
348 EXTERN Tcl_Obj * Tcl_NewByteArrayObj(CONST unsigned char *bytes,
349 int length);
350 #endif
351 #ifndef Tcl_NewDoubleObj_TCL_DECLARED
352 #define Tcl_NewDoubleObj_TCL_DECLARED
353 /* 51 */
354 EXTERN Tcl_Obj * Tcl_NewDoubleObj(double doubleValue);
355 #endif
356 #ifndef Tcl_NewIntObj_TCL_DECLARED
357 #define Tcl_NewIntObj_TCL_DECLARED
358 /* 52 */
359 EXTERN Tcl_Obj * Tcl_NewIntObj(int intValue);
360 #endif
361 #ifndef Tcl_NewListObj_TCL_DECLARED
362 #define Tcl_NewListObj_TCL_DECLARED
363 /* 53 */
364 EXTERN Tcl_Obj * Tcl_NewListObj(int objc, Tcl_Obj *CONST objv[]);
365 #endif
366 #ifndef Tcl_NewLongObj_TCL_DECLARED
367 #define Tcl_NewLongObj_TCL_DECLARED
368 /* 54 */
369 EXTERN Tcl_Obj * Tcl_NewLongObj(long longValue);
370 #endif
371 #ifndef Tcl_NewObj_TCL_DECLARED
372 #define Tcl_NewObj_TCL_DECLARED
373 /* 55 */
374 EXTERN Tcl_Obj * Tcl_NewObj(void);
375 #endif
376 #ifndef Tcl_NewStringObj_TCL_DECLARED
377 #define Tcl_NewStringObj_TCL_DECLARED
378 /* 56 */
379 EXTERN Tcl_Obj * Tcl_NewStringObj(CONST char *bytes, int length);
380 #endif
381 #ifndef Tcl_SetBooleanObj_TCL_DECLARED
382 #define Tcl_SetBooleanObj_TCL_DECLARED
383 /* 57 */
384 EXTERN void Tcl_SetBooleanObj(Tcl_Obj *objPtr, int boolValue);
385 #endif
386 #ifndef Tcl_SetByteArrayLength_TCL_DECLARED
387 #define Tcl_SetByteArrayLength_TCL_DECLARED
388 /* 58 */
389 EXTERN unsigned char * Tcl_SetByteArrayLength(Tcl_Obj *objPtr, int length);
390 #endif
391 #ifndef Tcl_SetByteArrayObj_TCL_DECLARED
392 #define Tcl_SetByteArrayObj_TCL_DECLARED
393 /* 59 */
394 EXTERN void Tcl_SetByteArrayObj(Tcl_Obj *objPtr,
395 CONST unsigned char *bytes, int length);
396 #endif
397 #ifndef Tcl_SetDoubleObj_TCL_DECLARED
398 #define Tcl_SetDoubleObj_TCL_DECLARED
399 /* 60 */
400 EXTERN void Tcl_SetDoubleObj(Tcl_Obj *objPtr, double doubleValue);
401 #endif
402 #ifndef Tcl_SetIntObj_TCL_DECLARED
403 #define Tcl_SetIntObj_TCL_DECLARED
404 /* 61 */
405 EXTERN void Tcl_SetIntObj(Tcl_Obj *objPtr, int intValue);
406 #endif
407 #ifndef Tcl_SetListObj_TCL_DECLARED
408 #define Tcl_SetListObj_TCL_DECLARED
409 /* 62 */
410 EXTERN void Tcl_SetListObj(Tcl_Obj *objPtr, int objc,
411 Tcl_Obj *CONST objv[]);
412 #endif
413 #ifndef Tcl_SetLongObj_TCL_DECLARED
414 #define Tcl_SetLongObj_TCL_DECLARED
415 /* 63 */
416 EXTERN void Tcl_SetLongObj(Tcl_Obj *objPtr, long longValue);
417 #endif
418 #ifndef Tcl_SetObjLength_TCL_DECLARED
419 #define Tcl_SetObjLength_TCL_DECLARED
420 /* 64 */
421 EXTERN void Tcl_SetObjLength(Tcl_Obj *objPtr, int length);
422 #endif
423 #ifndef Tcl_SetStringObj_TCL_DECLARED
424 #define Tcl_SetStringObj_TCL_DECLARED
425 /* 65 */
426 EXTERN void Tcl_SetStringObj(Tcl_Obj *objPtr, CONST char *bytes,
427 int length);
428 #endif
429 #ifndef Tcl_AddErrorInfo_TCL_DECLARED
430 #define Tcl_AddErrorInfo_TCL_DECLARED
431 /* 66 */
432 EXTERN void Tcl_AddErrorInfo(Tcl_Interp *interp,
433 CONST char *message);
434 #endif
435 #ifndef Tcl_AddObjErrorInfo_TCL_DECLARED
436 #define Tcl_AddObjErrorInfo_TCL_DECLARED
437 /* 67 */
438 EXTERN void Tcl_AddObjErrorInfo(Tcl_Interp *interp,
439 CONST char *message, int length);
440 #endif
441 #ifndef Tcl_AllowExceptions_TCL_DECLARED
442 #define Tcl_AllowExceptions_TCL_DECLARED
443 /* 68 */
444 EXTERN void Tcl_AllowExceptions(Tcl_Interp *interp);
445 #endif
446 #ifndef Tcl_AppendElement_TCL_DECLARED
447 #define Tcl_AppendElement_TCL_DECLARED
448 /* 69 */
449 EXTERN void Tcl_AppendElement(Tcl_Interp *interp,
450 CONST char *element);
451 #endif
452 #ifndef Tcl_AppendResult_TCL_DECLARED
453 #define Tcl_AppendResult_TCL_DECLARED
454 /* 70 */
455 EXTERN void Tcl_AppendResult(Tcl_Interp *interp, ...);
456 #endif
457 #ifndef Tcl_AsyncCreate_TCL_DECLARED
458 #define Tcl_AsyncCreate_TCL_DECLARED
459 /* 71 */
460 EXTERN Tcl_AsyncHandler Tcl_AsyncCreate(Tcl_AsyncProc *proc,
461 ClientData clientData);
462 #endif
463 #ifndef Tcl_AsyncDelete_TCL_DECLARED
464 #define Tcl_AsyncDelete_TCL_DECLARED
465 /* 72 */
466 EXTERN void Tcl_AsyncDelete(Tcl_AsyncHandler async);
467 #endif
468 #ifndef Tcl_AsyncInvoke_TCL_DECLARED
469 #define Tcl_AsyncInvoke_TCL_DECLARED
470 /* 73 */
471 EXTERN int Tcl_AsyncInvoke(Tcl_Interp *interp, int code);
472 #endif
473 #ifndef Tcl_AsyncMark_TCL_DECLARED
474 #define Tcl_AsyncMark_TCL_DECLARED
475 /* 74 */
476 EXTERN void Tcl_AsyncMark(Tcl_AsyncHandler async);
477 #endif
478 #ifndef Tcl_AsyncReady_TCL_DECLARED
479 #define Tcl_AsyncReady_TCL_DECLARED
480 /* 75 */
481 EXTERN int Tcl_AsyncReady(void);
482 #endif
483 #ifndef Tcl_BackgroundError_TCL_DECLARED
484 #define Tcl_BackgroundError_TCL_DECLARED
485 /* 76 */
486 EXTERN void Tcl_BackgroundError(Tcl_Interp *interp);
487 #endif
488 #ifndef Tcl_Backslash_TCL_DECLARED
489 #define Tcl_Backslash_TCL_DECLARED
490 /* 77 */
491 EXTERN char Tcl_Backslash(CONST char *src, int *readPtr);
492 #endif
493 #ifndef Tcl_BadChannelOption_TCL_DECLARED
494 #define Tcl_BadChannelOption_TCL_DECLARED
495 /* 78 */
496 EXTERN int Tcl_BadChannelOption(Tcl_Interp *interp,
497 CONST char *optionName,
498 CONST char *optionList);
499 #endif
500 #ifndef Tcl_CallWhenDeleted_TCL_DECLARED
501 #define Tcl_CallWhenDeleted_TCL_DECLARED
502 /* 79 */
503 EXTERN void Tcl_CallWhenDeleted(Tcl_Interp *interp,
504 Tcl_InterpDeleteProc *proc,
505 ClientData clientData);
506 #endif
507 #ifndef Tcl_CancelIdleCall_TCL_DECLARED
508 #define Tcl_CancelIdleCall_TCL_DECLARED
509 /* 80 */
510 EXTERN void Tcl_CancelIdleCall(Tcl_IdleProc *idleProc,
511 ClientData clientData);
512 #endif
513 #ifndef Tcl_Close_TCL_DECLARED
514 #define Tcl_Close_TCL_DECLARED
515 /* 81 */
516 EXTERN int Tcl_Close(Tcl_Interp *interp, Tcl_Channel chan);
517 #endif
518 #ifndef Tcl_CommandComplete_TCL_DECLARED
519 #define Tcl_CommandComplete_TCL_DECLARED
520 /* 82 */
521 EXTERN int Tcl_CommandComplete(CONST char *cmd);
522 #endif
523 #ifndef Tcl_Concat_TCL_DECLARED
524 #define Tcl_Concat_TCL_DECLARED
525 /* 83 */
526 EXTERN char * Tcl_Concat(int argc, CONST84 char *CONST *argv);
527 #endif
528 #ifndef Tcl_ConvertElement_TCL_DECLARED
529 #define Tcl_ConvertElement_TCL_DECLARED
530 /* 84 */
531 EXTERN int Tcl_ConvertElement(CONST char *src, char *dst,
532 int flags);
533 #endif
534 #ifndef Tcl_ConvertCountedElement_TCL_DECLARED
535 #define Tcl_ConvertCountedElement_TCL_DECLARED
536 /* 85 */
537 EXTERN int Tcl_ConvertCountedElement(CONST char *src,
538 int length, char *dst, int flags);
539 #endif
540 #ifndef Tcl_CreateAlias_TCL_DECLARED
541 #define Tcl_CreateAlias_TCL_DECLARED
542 /* 86 */
543 EXTERN int Tcl_CreateAlias(Tcl_Interp *slave,
544 CONST char *slaveCmd, Tcl_Interp *target,
545 CONST char *targetCmd, int argc,
546 CONST84 char *CONST *argv);
547 #endif
548 #ifndef Tcl_CreateAliasObj_TCL_DECLARED
549 #define Tcl_CreateAliasObj_TCL_DECLARED
550 /* 87 */
551 EXTERN int Tcl_CreateAliasObj(Tcl_Interp *slave,
552 CONST char *slaveCmd, Tcl_Interp *target,
553 CONST char *targetCmd, int objc,
554 Tcl_Obj *CONST objv[]);
555 #endif
556 #ifndef Tcl_CreateChannel_TCL_DECLARED
557 #define Tcl_CreateChannel_TCL_DECLARED
558 /* 88 */
559 EXTERN Tcl_Channel Tcl_CreateChannel(Tcl_ChannelType *typePtr,
560 CONST char *chanName,
561 ClientData instanceData, int mask);
562 #endif
563 #ifndef Tcl_CreateChannelHandler_TCL_DECLARED
564 #define Tcl_CreateChannelHandler_TCL_DECLARED
565 /* 89 */
566 EXTERN void Tcl_CreateChannelHandler(Tcl_Channel chan, int mask,
567 Tcl_ChannelProc *proc, ClientData clientData);
568 #endif
569 #ifndef Tcl_CreateCloseHandler_TCL_DECLARED
570 #define Tcl_CreateCloseHandler_TCL_DECLARED
571 /* 90 */
572 EXTERN void Tcl_CreateCloseHandler(Tcl_Channel chan,
573 Tcl_CloseProc *proc, ClientData clientData);
574 #endif
575 #ifndef Tcl_CreateCommand_TCL_DECLARED
576 #define Tcl_CreateCommand_TCL_DECLARED
577 /* 91 */
578 EXTERN Tcl_Command Tcl_CreateCommand(Tcl_Interp *interp,
579 CONST char *cmdName, Tcl_CmdProc *proc,
580 ClientData clientData,
581 Tcl_CmdDeleteProc *deleteProc);
582 #endif
583 #ifndef Tcl_CreateEventSource_TCL_DECLARED
584 #define Tcl_CreateEventSource_TCL_DECLARED
585 /* 92 */
586 EXTERN void Tcl_CreateEventSource(Tcl_EventSetupProc *setupProc,
587 Tcl_EventCheckProc *checkProc,
588 ClientData clientData);
589 #endif
590 #ifndef Tcl_CreateExitHandler_TCL_DECLARED
591 #define Tcl_CreateExitHandler_TCL_DECLARED
592 /* 93 */
593 EXTERN void Tcl_CreateExitHandler(Tcl_ExitProc *proc,
594 ClientData clientData);
595 #endif
596 #ifndef Tcl_CreateInterp_TCL_DECLARED
597 #define Tcl_CreateInterp_TCL_DECLARED
598 /* 94 */
599 EXTERN Tcl_Interp * Tcl_CreateInterp(void);
600 #endif
601 #ifndef Tcl_CreateMathFunc_TCL_DECLARED
602 #define Tcl_CreateMathFunc_TCL_DECLARED
603 /* 95 */
604 EXTERN void Tcl_CreateMathFunc(Tcl_Interp *interp,
605 CONST char *name, int numArgs,
606 Tcl_ValueType *argTypes, Tcl_MathProc *proc,
607 ClientData clientData);
608 #endif
609 #ifndef Tcl_CreateObjCommand_TCL_DECLARED
610 #define Tcl_CreateObjCommand_TCL_DECLARED
611 /* 96 */
612 EXTERN Tcl_Command Tcl_CreateObjCommand(Tcl_Interp *interp,
613 CONST char *cmdName, Tcl_ObjCmdProc *proc,
614 ClientData clientData,
615 Tcl_CmdDeleteProc *deleteProc);
616 #endif
617 #ifndef Tcl_CreateSlave_TCL_DECLARED
618 #define Tcl_CreateSlave_TCL_DECLARED
619 /* 97 */
620 EXTERN Tcl_Interp * Tcl_CreateSlave(Tcl_Interp *interp,
621 CONST char *slaveName, int isSafe);
622 #endif
623 #ifndef Tcl_CreateTimerHandler_TCL_DECLARED
624 #define Tcl_CreateTimerHandler_TCL_DECLARED
625 /* 98 */
626 EXTERN Tcl_TimerToken Tcl_CreateTimerHandler(int milliseconds,
627 Tcl_TimerProc *proc, ClientData clientData);
628 #endif
629 #ifndef Tcl_CreateTrace_TCL_DECLARED
630 #define Tcl_CreateTrace_TCL_DECLARED
631 /* 99 */
632 EXTERN Tcl_Trace Tcl_CreateTrace(Tcl_Interp *interp, int level,
633 Tcl_CmdTraceProc *proc,
634 ClientData clientData);
635 #endif
636 #ifndef Tcl_DeleteAssocData_TCL_DECLARED
637 #define Tcl_DeleteAssocData_TCL_DECLARED
638 /* 100 */
639 EXTERN void Tcl_DeleteAssocData(Tcl_Interp *interp,
640 CONST char *name);
641 #endif
642 #ifndef Tcl_DeleteChannelHandler_TCL_DECLARED
643 #define Tcl_DeleteChannelHandler_TCL_DECLARED
644 /* 101 */
645 EXTERN void Tcl_DeleteChannelHandler(Tcl_Channel chan,
646 Tcl_ChannelProc *proc, ClientData clientData);
647 #endif
648 #ifndef Tcl_DeleteCloseHandler_TCL_DECLARED
649 #define Tcl_DeleteCloseHandler_TCL_DECLARED
650 /* 102 */
651 EXTERN void Tcl_DeleteCloseHandler(Tcl_Channel chan,
652 Tcl_CloseProc *proc, ClientData clientData);
653 #endif
654 #ifndef Tcl_DeleteCommand_TCL_DECLARED
655 #define Tcl_DeleteCommand_TCL_DECLARED
656 /* 103 */
657 EXTERN int Tcl_DeleteCommand(Tcl_Interp *interp,
658 CONST char *cmdName);
659 #endif
660 #ifndef Tcl_DeleteCommandFromToken_TCL_DECLARED
661 #define Tcl_DeleteCommandFromToken_TCL_DECLARED
662 /* 104 */
663 EXTERN int Tcl_DeleteCommandFromToken(Tcl_Interp *interp,
664 Tcl_Command command);
665 #endif
666 #ifndef Tcl_DeleteEvents_TCL_DECLARED
667 #define Tcl_DeleteEvents_TCL_DECLARED
668 /* 105 */
669 EXTERN void Tcl_DeleteEvents(Tcl_EventDeleteProc *proc,
670 ClientData clientData);
671 #endif
672 #ifndef Tcl_DeleteEventSource_TCL_DECLARED
673 #define Tcl_DeleteEventSource_TCL_DECLARED
674 /* 106 */
675 EXTERN void Tcl_DeleteEventSource(Tcl_EventSetupProc *setupProc,
676 Tcl_EventCheckProc *checkProc,
677 ClientData clientData);
678 #endif
679 #ifndef Tcl_DeleteExitHandler_TCL_DECLARED
680 #define Tcl_DeleteExitHandler_TCL_DECLARED
681 /* 107 */
682 EXTERN void Tcl_DeleteExitHandler(Tcl_ExitProc *proc,
683 ClientData clientData);
684 #endif
685 #ifndef Tcl_DeleteHashEntry_TCL_DECLARED
686 #define Tcl_DeleteHashEntry_TCL_DECLARED
687 /* 108 */
688 EXTERN void Tcl_DeleteHashEntry(Tcl_HashEntry *entryPtr);
689 #endif
690 #ifndef Tcl_DeleteHashTable_TCL_DECLARED
691 #define Tcl_DeleteHashTable_TCL_DECLARED
692 /* 109 */
693 EXTERN void Tcl_DeleteHashTable(Tcl_HashTable *tablePtr);
694 #endif
695 #ifndef Tcl_DeleteInterp_TCL_DECLARED
696 #define Tcl_DeleteInterp_TCL_DECLARED
697 /* 110 */
698 EXTERN void Tcl_DeleteInterp(Tcl_Interp *interp);
699 #endif
700 #ifndef Tcl_DetachPids_TCL_DECLARED
701 #define Tcl_DetachPids_TCL_DECLARED
702 /* 111 */
703 EXTERN void Tcl_DetachPids(int numPids, Tcl_Pid *pidPtr);
704 #endif
705 #ifndef Tcl_DeleteTimerHandler_TCL_DECLARED
706 #define Tcl_DeleteTimerHandler_TCL_DECLARED
707 /* 112 */
708 EXTERN void Tcl_DeleteTimerHandler(Tcl_TimerToken token);
709 #endif
710 #ifndef Tcl_DeleteTrace_TCL_DECLARED
711 #define Tcl_DeleteTrace_TCL_DECLARED
712 /* 113 */
713 EXTERN void Tcl_DeleteTrace(Tcl_Interp *interp, Tcl_Trace trace);
714 #endif
715 #ifndef Tcl_DontCallWhenDeleted_TCL_DECLARED
716 #define Tcl_DontCallWhenDeleted_TCL_DECLARED
717 /* 114 */
718 EXTERN void Tcl_DontCallWhenDeleted(Tcl_Interp *interp,
719 Tcl_InterpDeleteProc *proc,
720 ClientData clientData);
721 #endif
722 #ifndef Tcl_DoOneEvent_TCL_DECLARED
723 #define Tcl_DoOneEvent_TCL_DECLARED
724 /* 115 */
725 EXTERN int Tcl_DoOneEvent(int flags);
726 #endif
727 #ifndef Tcl_DoWhenIdle_TCL_DECLARED
728 #define Tcl_DoWhenIdle_TCL_DECLARED
729 /* 116 */
730 EXTERN void Tcl_DoWhenIdle(Tcl_IdleProc *proc,
731 ClientData clientData);
732 #endif
733 #ifndef Tcl_DStringAppend_TCL_DECLARED
734 #define Tcl_DStringAppend_TCL_DECLARED
735 /* 117 */
736 EXTERN char * Tcl_DStringAppend(Tcl_DString *dsPtr,
737 CONST char *bytes, int length);
738 #endif
739 #ifndef Tcl_DStringAppendElement_TCL_DECLARED
740 #define Tcl_DStringAppendElement_TCL_DECLARED
741 /* 118 */
742 EXTERN char * Tcl_DStringAppendElement(Tcl_DString *dsPtr,
743 CONST char *element);
744 #endif
745 #ifndef Tcl_DStringEndSublist_TCL_DECLARED
746 #define Tcl_DStringEndSublist_TCL_DECLARED
747 /* 119 */
748 EXTERN void Tcl_DStringEndSublist(Tcl_DString *dsPtr);
749 #endif
750 #ifndef Tcl_DStringFree_TCL_DECLARED
751 #define Tcl_DStringFree_TCL_DECLARED
752 /* 120 */
753 EXTERN void Tcl_DStringFree(Tcl_DString *dsPtr);
754 #endif
755 #ifndef Tcl_DStringGetResult_TCL_DECLARED
756 #define Tcl_DStringGetResult_TCL_DECLARED
757 /* 121 */
758 EXTERN void Tcl_DStringGetResult(Tcl_Interp *interp,
759 Tcl_DString *dsPtr);
760 #endif
761 #ifndef Tcl_DStringInit_TCL_DECLARED
762 #define Tcl_DStringInit_TCL_DECLARED
763 /* 122 */
764 EXTERN void Tcl_DStringInit(Tcl_DString *dsPtr);
765 #endif
766 #ifndef Tcl_DStringResult_TCL_DECLARED
767 #define Tcl_DStringResult_TCL_DECLARED
768 /* 123 */
769 EXTERN void Tcl_DStringResult(Tcl_Interp *interp,
770 Tcl_DString *dsPtr);
771 #endif
772 #ifndef Tcl_DStringSetLength_TCL_DECLARED
773 #define Tcl_DStringSetLength_TCL_DECLARED
774 /* 124 */
775 EXTERN void Tcl_DStringSetLength(Tcl_DString *dsPtr, int length);
776 #endif
777 #ifndef Tcl_DStringStartSublist_TCL_DECLARED
778 #define Tcl_DStringStartSublist_TCL_DECLARED
779 /* 125 */
780 EXTERN void Tcl_DStringStartSublist(Tcl_DString *dsPtr);
781 #endif
782 #ifndef Tcl_Eof_TCL_DECLARED
783 #define Tcl_Eof_TCL_DECLARED
784 /* 126 */
785 EXTERN int Tcl_Eof(Tcl_Channel chan);
786 #endif
787 #ifndef Tcl_ErrnoId_TCL_DECLARED
788 #define Tcl_ErrnoId_TCL_DECLARED
789 /* 127 */
790 EXTERN CONST84_RETURN char * Tcl_ErrnoId(void);
791 #endif
792 #ifndef Tcl_ErrnoMsg_TCL_DECLARED
793 #define Tcl_ErrnoMsg_TCL_DECLARED
794 /* 128 */
795 EXTERN CONST84_RETURN char * Tcl_ErrnoMsg(int err);
796 #endif
797 #ifndef Tcl_Eval_TCL_DECLARED
798 #define Tcl_Eval_TCL_DECLARED
799 /* 129 */
800 EXTERN int Tcl_Eval(Tcl_Interp *interp, CONST char *script);
801 #endif
802 #ifndef Tcl_EvalFile_TCL_DECLARED
803 #define Tcl_EvalFile_TCL_DECLARED
804 /* 130 */
805 EXTERN int Tcl_EvalFile(Tcl_Interp *interp,
806 CONST char *fileName);
807 #endif
808 #ifndef Tcl_EvalObj_TCL_DECLARED
809 #define Tcl_EvalObj_TCL_DECLARED
810 /* 131 */
811 EXTERN int Tcl_EvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr);
812 #endif
813 #ifndef Tcl_EventuallyFree_TCL_DECLARED
814 #define Tcl_EventuallyFree_TCL_DECLARED
815 /* 132 */
816 EXTERN void Tcl_EventuallyFree(ClientData clientData,
817 Tcl_FreeProc *freeProc);
818 #endif
819 #ifndef Tcl_Exit_TCL_DECLARED
820 #define Tcl_Exit_TCL_DECLARED
821 /* 133 */
822 EXTERN void Tcl_Exit(int status);
823 #endif
824 #ifndef Tcl_ExposeCommand_TCL_DECLARED
825 #define Tcl_ExposeCommand_TCL_DECLARED
826 /* 134 */
827 EXTERN int Tcl_ExposeCommand(Tcl_Interp *interp,
828 CONST char *hiddenCmdToken,
829 CONST char *cmdName);
830 #endif
831 #ifndef Tcl_ExprBoolean_TCL_DECLARED
832 #define Tcl_ExprBoolean_TCL_DECLARED
833 /* 135 */
834 EXTERN int Tcl_ExprBoolean(Tcl_Interp *interp, CONST char *expr,
835 int *ptr);
836 #endif
837 #ifndef Tcl_ExprBooleanObj_TCL_DECLARED
838 #define Tcl_ExprBooleanObj_TCL_DECLARED
839 /* 136 */
840 EXTERN int Tcl_ExprBooleanObj(Tcl_Interp *interp,
841 Tcl_Obj *objPtr, int *ptr);
842 #endif
843 #ifndef Tcl_ExprDouble_TCL_DECLARED
844 #define Tcl_ExprDouble_TCL_DECLARED
845 /* 137 */
846 EXTERN int Tcl_ExprDouble(Tcl_Interp *interp, CONST char *expr,
847 double *ptr);
848 #endif
849 #ifndef Tcl_ExprDoubleObj_TCL_DECLARED
850 #define Tcl_ExprDoubleObj_TCL_DECLARED
851 /* 138 */
852 EXTERN int Tcl_ExprDoubleObj(Tcl_Interp *interp,
853 Tcl_Obj *objPtr, double *ptr);
854 #endif
855 #ifndef Tcl_ExprLong_TCL_DECLARED
856 #define Tcl_ExprLong_TCL_DECLARED
857 /* 139 */
858 EXTERN int Tcl_ExprLong(Tcl_Interp *interp, CONST char *expr,
859 long *ptr);
860 #endif
861 #ifndef Tcl_ExprLongObj_TCL_DECLARED
862 #define Tcl_ExprLongObj_TCL_DECLARED
863 /* 140 */
864 EXTERN int Tcl_ExprLongObj(Tcl_Interp *interp, Tcl_Obj *objPtr,
865 long *ptr);
866 #endif
867 #ifndef Tcl_ExprObj_TCL_DECLARED
868 #define Tcl_ExprObj_TCL_DECLARED
869 /* 141 */
870 EXTERN int Tcl_ExprObj(Tcl_Interp *interp, Tcl_Obj *objPtr,
871 Tcl_Obj **resultPtrPtr);
872 #endif
873 #ifndef Tcl_ExprString_TCL_DECLARED
874 #define Tcl_ExprString_TCL_DECLARED
875 /* 142 */
876 EXTERN int Tcl_ExprString(Tcl_Interp *interp, CONST char *expr);
877 #endif
878 #ifndef Tcl_Finalize_TCL_DECLARED
879 #define Tcl_Finalize_TCL_DECLARED
880 /* 143 */
881 EXTERN void Tcl_Finalize(void);
882 #endif
883 #ifndef Tcl_FindExecutable_TCL_DECLARED
884 #define Tcl_FindExecutable_TCL_DECLARED
885 /* 144 */
886 EXTERN void Tcl_FindExecutable(CONST char *argv0);
887 #endif
888 #ifndef Tcl_FirstHashEntry_TCL_DECLARED
889 #define Tcl_FirstHashEntry_TCL_DECLARED
890 /* 145 */
891 EXTERN Tcl_HashEntry * Tcl_FirstHashEntry(Tcl_HashTable *tablePtr,
892 Tcl_HashSearch *searchPtr);
893 #endif
894 #ifndef Tcl_Flush_TCL_DECLARED
895 #define Tcl_Flush_TCL_DECLARED
896 /* 146 */
897 EXTERN int Tcl_Flush(Tcl_Channel chan);
898 #endif
899 #ifndef Tcl_FreeResult_TCL_DECLARED
900 #define Tcl_FreeResult_TCL_DECLARED
901 /* 147 */
902 EXTERN void Tcl_FreeResult(Tcl_Interp *interp);
903 #endif
904 #ifndef Tcl_GetAlias_TCL_DECLARED
905 #define Tcl_GetAlias_TCL_DECLARED
906 /* 148 */
907 EXTERN int Tcl_GetAlias(Tcl_Interp *interp,
908 CONST char *slaveCmd,
909 Tcl_Interp **targetInterpPtr,
910 CONST84 char **targetCmdPtr, int *argcPtr,
911 CONST84 char ***argvPtr);
912 #endif
913 #ifndef Tcl_GetAliasObj_TCL_DECLARED
914 #define Tcl_GetAliasObj_TCL_DECLARED
915 /* 149 */
916 EXTERN int Tcl_GetAliasObj(Tcl_Interp *interp,
917 CONST char *slaveCmd,
918 Tcl_Interp **targetInterpPtr,
919 CONST84 char **targetCmdPtr, int *objcPtr,
920 Tcl_Obj ***objv);
921 #endif
922 #ifndef Tcl_GetAssocData_TCL_DECLARED
923 #define Tcl_GetAssocData_TCL_DECLARED
924 /* 150 */
925 EXTERN ClientData Tcl_GetAssocData(Tcl_Interp *interp,
926 CONST char *name,
927 Tcl_InterpDeleteProc **procPtr);
928 #endif
929 #ifndef Tcl_GetChannel_TCL_DECLARED
930 #define Tcl_GetChannel_TCL_DECLARED
931 /* 151 */
932 EXTERN Tcl_Channel Tcl_GetChannel(Tcl_Interp *interp,
933 CONST char *chanName, int *modePtr);
934 #endif
935 #ifndef Tcl_GetChannelBufferSize_TCL_DECLARED
936 #define Tcl_GetChannelBufferSize_TCL_DECLARED
937 /* 152 */
938 EXTERN int Tcl_GetChannelBufferSize(Tcl_Channel chan);
939 #endif
940 #ifndef Tcl_GetChannelHandle_TCL_DECLARED
941 #define Tcl_GetChannelHandle_TCL_DECLARED
942 /* 153 */
943 EXTERN int Tcl_GetChannelHandle(Tcl_Channel chan, int direction,
944 ClientData *handlePtr);
945 #endif
946 #ifndef Tcl_GetChannelInstanceData_TCL_DECLARED
947 #define Tcl_GetChannelInstanceData_TCL_DECLARED
948 /* 154 */
949 EXTERN ClientData Tcl_GetChannelInstanceData(Tcl_Channel chan);
950 #endif
951 #ifndef Tcl_GetChannelMode_TCL_DECLARED
952 #define Tcl_GetChannelMode_TCL_DECLARED
953 /* 155 */
954 EXTERN int Tcl_GetChannelMode(Tcl_Channel chan);
955 #endif
956 #ifndef Tcl_GetChannelName_TCL_DECLARED
957 #define Tcl_GetChannelName_TCL_DECLARED
958 /* 156 */
959 EXTERN CONST84_RETURN char * Tcl_GetChannelName(Tcl_Channel chan);
960 #endif
961 #ifndef Tcl_GetChannelOption_TCL_DECLARED
962 #define Tcl_GetChannelOption_TCL_DECLARED
963 /* 157 */
964 EXTERN int Tcl_GetChannelOption(Tcl_Interp *interp,
965 Tcl_Channel chan, CONST char *optionName,
966 Tcl_DString *dsPtr);
967 #endif
968 #ifndef Tcl_GetChannelType_TCL_DECLARED
969 #define Tcl_GetChannelType_TCL_DECLARED
970 /* 158 */
971 EXTERN Tcl_ChannelType * Tcl_GetChannelType(Tcl_Channel chan);
972 #endif
973 #ifndef Tcl_GetCommandInfo_TCL_DECLARED
974 #define Tcl_GetCommandInfo_TCL_DECLARED
975 /* 159 */
976 EXTERN int Tcl_GetCommandInfo(Tcl_Interp *interp,
977 CONST char *cmdName, Tcl_CmdInfo *infoPtr);
978 #endif
979 #ifndef Tcl_GetCommandName_TCL_DECLARED
980 #define Tcl_GetCommandName_TCL_DECLARED
981 /* 160 */
982 EXTERN CONST84_RETURN char * Tcl_GetCommandName(Tcl_Interp *interp,
983 Tcl_Command command);
984 #endif
985 #ifndef Tcl_GetErrno_TCL_DECLARED
986 #define Tcl_GetErrno_TCL_DECLARED
987 /* 161 */
988 EXTERN int Tcl_GetErrno(void);
989 #endif
990 #ifndef Tcl_GetHostName_TCL_DECLARED
991 #define Tcl_GetHostName_TCL_DECLARED
992 /* 162 */
993 EXTERN CONST84_RETURN char * Tcl_GetHostName(void);
994 #endif
995 #ifndef Tcl_GetInterpPath_TCL_DECLARED
996 #define Tcl_GetInterpPath_TCL_DECLARED
997 /* 163 */
998 EXTERN int Tcl_GetInterpPath(Tcl_Interp *askInterp,
999 Tcl_Interp *slaveInterp);
1000 #endif
1001 #ifndef Tcl_GetMaster_TCL_DECLARED
1002 #define Tcl_GetMaster_TCL_DECLARED
1003 /* 164 */
1004 EXTERN Tcl_Interp * Tcl_GetMaster(Tcl_Interp *interp);
1005 #endif
1006 #ifndef Tcl_GetNameOfExecutable_TCL_DECLARED
1007 #define Tcl_GetNameOfExecutable_TCL_DECLARED
1008 /* 165 */
1009 EXTERN CONST char * Tcl_GetNameOfExecutable(void);
1010 #endif
1011 #ifndef Tcl_GetObjResult_TCL_DECLARED
1012 #define Tcl_GetObjResult_TCL_DECLARED
1013 /* 166 */
1014 EXTERN Tcl_Obj * Tcl_GetObjResult(Tcl_Interp *interp);
1015 #endif
1016 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
1017 #ifndef Tcl_GetOpenFile_TCL_DECLARED
1018 #define Tcl_GetOpenFile_TCL_DECLARED
1019 /* 167 */
1020 EXTERN int Tcl_GetOpenFile(Tcl_Interp *interp,
1021 CONST char *chanID, int forWriting,
1022 int checkUsage, ClientData *filePtr);
1023 #endif
1024 #endif /* UNIX */
1025 #ifdef MAC_OSX_TCL /* MACOSX */
1026 #ifndef Tcl_GetOpenFile_TCL_DECLARED
1027 #define Tcl_GetOpenFile_TCL_DECLARED
1028 /* 167 */
1029 EXTERN int Tcl_GetOpenFile(Tcl_Interp *interp,
1030 CONST char *chanID, int forWriting,
1031 int checkUsage, ClientData *filePtr);
1032 #endif
1033 #endif /* MACOSX */
1034 #ifndef Tcl_GetPathType_TCL_DECLARED
1035 #define Tcl_GetPathType_TCL_DECLARED
1036 /* 168 */
1037 EXTERN Tcl_PathType Tcl_GetPathType(CONST char *path);
1038 #endif
1039 #ifndef Tcl_Gets_TCL_DECLARED
1040 #define Tcl_Gets_TCL_DECLARED
1041 /* 169 */
1042 EXTERN int Tcl_Gets(Tcl_Channel chan, Tcl_DString *dsPtr);
1043 #endif
1044 #ifndef Tcl_GetsObj_TCL_DECLARED
1045 #define Tcl_GetsObj_TCL_DECLARED
1046 /* 170 */
1047 EXTERN int Tcl_GetsObj(Tcl_Channel chan, Tcl_Obj *objPtr);
1048 #endif
1049 #ifndef Tcl_GetServiceMode_TCL_DECLARED
1050 #define Tcl_GetServiceMode_TCL_DECLARED
1051 /* 171 */
1052 EXTERN int Tcl_GetServiceMode(void);
1053 #endif
1054 #ifndef Tcl_GetSlave_TCL_DECLARED
1055 #define Tcl_GetSlave_TCL_DECLARED
1056 /* 172 */
1057 EXTERN Tcl_Interp * Tcl_GetSlave(Tcl_Interp *interp,
1058 CONST char *slaveName);
1059 #endif
1060 #ifndef Tcl_GetStdChannel_TCL_DECLARED
1061 #define Tcl_GetStdChannel_TCL_DECLARED
1062 /* 173 */
1063 EXTERN Tcl_Channel Tcl_GetStdChannel(int type);
1064 #endif
1065 #ifndef Tcl_GetStringResult_TCL_DECLARED
1066 #define Tcl_GetStringResult_TCL_DECLARED
1067 /* 174 */
1068 EXTERN CONST84_RETURN char * Tcl_GetStringResult(Tcl_Interp *interp);
1069 #endif
1070 #ifndef Tcl_GetVar_TCL_DECLARED
1071 #define Tcl_GetVar_TCL_DECLARED
1072 /* 175 */
1073 EXTERN CONST84_RETURN char * Tcl_GetVar(Tcl_Interp *interp,
1074 CONST char *varName, int flags);
1075 #endif
1076 #ifndef Tcl_GetVar2_TCL_DECLARED
1077 #define Tcl_GetVar2_TCL_DECLARED
1078 /* 176 */
1079 EXTERN CONST84_RETURN char * Tcl_GetVar2(Tcl_Interp *interp,
1080 CONST char *part1, CONST char *part2,
1081 int flags);
1082 #endif
1083 #ifndef Tcl_GlobalEval_TCL_DECLARED
1084 #define Tcl_GlobalEval_TCL_DECLARED
1085 /* 177 */
1086 EXTERN int Tcl_GlobalEval(Tcl_Interp *interp,
1087 CONST char *command);
1088 #endif
1089 #ifndef Tcl_GlobalEvalObj_TCL_DECLARED
1090 #define Tcl_GlobalEvalObj_TCL_DECLARED
1091 /* 178 */
1092 EXTERN int Tcl_GlobalEvalObj(Tcl_Interp *interp,
1093 Tcl_Obj *objPtr);
1094 #endif
1095 #ifndef Tcl_HideCommand_TCL_DECLARED
1096 #define Tcl_HideCommand_TCL_DECLARED
1097 /* 179 */
1098 EXTERN int Tcl_HideCommand(Tcl_Interp *interp,
1099 CONST char *cmdName,
1100 CONST char *hiddenCmdToken);
1101 #endif
1102 #ifndef Tcl_Init_TCL_DECLARED
1103 #define Tcl_Init_TCL_DECLARED
1104 /* 180 */
1105 EXTERN int Tcl_Init(Tcl_Interp *interp);
1106 #endif
1107 #ifndef Tcl_InitHashTable_TCL_DECLARED
1108 #define Tcl_InitHashTable_TCL_DECLARED
1109 /* 181 */
1110 EXTERN void Tcl_InitHashTable(Tcl_HashTable *tablePtr,
1111 int keyType);
1112 #endif
1113 #ifndef Tcl_InputBlocked_TCL_DECLARED
1114 #define Tcl_InputBlocked_TCL_DECLARED
1115 /* 182 */
1116 EXTERN int Tcl_InputBlocked(Tcl_Channel chan);
1117 #endif
1118 #ifndef Tcl_InputBuffered_TCL_DECLARED
1119 #define Tcl_InputBuffered_TCL_DECLARED
1120 /* 183 */
1121 EXTERN int Tcl_InputBuffered(Tcl_Channel chan);
1122 #endif
1123 #ifndef Tcl_InterpDeleted_TCL_DECLARED
1124 #define Tcl_InterpDeleted_TCL_DECLARED
1125 /* 184 */
1126 EXTERN int Tcl_InterpDeleted(Tcl_Interp *interp);
1127 #endif
1128 #ifndef Tcl_IsSafe_TCL_DECLARED
1129 #define Tcl_IsSafe_TCL_DECLARED
1130 /* 185 */
1131 EXTERN int Tcl_IsSafe(Tcl_Interp *interp);
1132 #endif
1133 #ifndef Tcl_JoinPath_TCL_DECLARED
1134 #define Tcl_JoinPath_TCL_DECLARED
1135 /* 186 */
1136 EXTERN char * Tcl_JoinPath(int argc, CONST84 char *CONST *argv,
1137 Tcl_DString *resultPtr);
1138 #endif
1139 #ifndef Tcl_LinkVar_TCL_DECLARED
1140 #define Tcl_LinkVar_TCL_DECLARED
1141 /* 187 */
1142 EXTERN int Tcl_LinkVar(Tcl_Interp *interp, CONST char *varName,
1143 char *addr, int type);
1144 #endif
1145 /* Slot 188 is reserved */
1146 #ifndef Tcl_MakeFileChannel_TCL_DECLARED
1147 #define Tcl_MakeFileChannel_TCL_DECLARED
1148 /* 189 */
1149 EXTERN Tcl_Channel Tcl_MakeFileChannel(ClientData handle, int mode);
1150 #endif
1151 #ifndef Tcl_MakeSafe_TCL_DECLARED
1152 #define Tcl_MakeSafe_TCL_DECLARED
1153 /* 190 */
1154 EXTERN int Tcl_MakeSafe(Tcl_Interp *interp);
1155 #endif
1156 #ifndef Tcl_MakeTcpClientChannel_TCL_DECLARED
1157 #define Tcl_MakeTcpClientChannel_TCL_DECLARED
1158 /* 191 */
1159 EXTERN Tcl_Channel Tcl_MakeTcpClientChannel(ClientData tcpSocket);
1160 #endif
1161 #ifndef Tcl_Merge_TCL_DECLARED
1162 #define Tcl_Merge_TCL_DECLARED
1163 /* 192 */
1164 EXTERN char * Tcl_Merge(int argc, CONST84 char *CONST *argv);
1165 #endif
1166 #ifndef Tcl_NextHashEntry_TCL_DECLARED
1167 #define Tcl_NextHashEntry_TCL_DECLARED
1168 /* 193 */
1169 EXTERN Tcl_HashEntry * Tcl_NextHashEntry(Tcl_HashSearch *searchPtr);
1170 #endif
1171 #ifndef Tcl_NotifyChannel_TCL_DECLARED
1172 #define Tcl_NotifyChannel_TCL_DECLARED
1173 /* 194 */
1174 EXTERN void Tcl_NotifyChannel(Tcl_Channel channel, int mask);
1175 #endif
1176 #ifndef Tcl_ObjGetVar2_TCL_DECLARED
1177 #define Tcl_ObjGetVar2_TCL_DECLARED
1178 /* 195 */
1179 EXTERN Tcl_Obj * Tcl_ObjGetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr,
1180 Tcl_Obj *part2Ptr, int flags);
1181 #endif
1182 #ifndef Tcl_ObjSetVar2_TCL_DECLARED
1183 #define Tcl_ObjSetVar2_TCL_DECLARED
1184 /* 196 */
1185 EXTERN Tcl_Obj * Tcl_ObjSetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr,
1186 Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr,
1187 int flags);
1188 #endif
1189 #ifndef Tcl_OpenCommandChannel_TCL_DECLARED
1190 #define Tcl_OpenCommandChannel_TCL_DECLARED
1191 /* 197 */
1192 EXTERN Tcl_Channel Tcl_OpenCommandChannel(Tcl_Interp *interp, int argc,
1193 CONST84 char **argv, int flags);
1194 #endif
1195 #ifndef Tcl_OpenFileChannel_TCL_DECLARED
1196 #define Tcl_OpenFileChannel_TCL_DECLARED
1197 /* 198 */
1198 EXTERN Tcl_Channel Tcl_OpenFileChannel(Tcl_Interp *interp,
1199 CONST char *fileName, CONST char *modeString,
1200 int permissions);
1201 #endif
1202 #ifndef Tcl_OpenTcpClient_TCL_DECLARED
1203 #define Tcl_OpenTcpClient_TCL_DECLARED
1204 /* 199 */
1205 EXTERN Tcl_Channel Tcl_OpenTcpClient(Tcl_Interp *interp, int port,
1206 CONST char *address, CONST char *myaddr,
1207 int myport, int async);
1208 #endif
1209 #ifndef Tcl_OpenTcpServer_TCL_DECLARED
1210 #define Tcl_OpenTcpServer_TCL_DECLARED
1211 /* 200 */
1212 EXTERN Tcl_Channel Tcl_OpenTcpServer(Tcl_Interp *interp, int port,
1213 CONST char *host,
1214 Tcl_TcpAcceptProc *acceptProc,
1215 ClientData callbackData);
1216 #endif
1217 #ifndef Tcl_Preserve_TCL_DECLARED
1218 #define Tcl_Preserve_TCL_DECLARED
1219 /* 201 */
1220 EXTERN void Tcl_Preserve(ClientData data);
1221 #endif
1222 #ifndef Tcl_PrintDouble_TCL_DECLARED
1223 #define Tcl_PrintDouble_TCL_DECLARED
1224 /* 202 */
1225 EXTERN void Tcl_PrintDouble(Tcl_Interp *interp, double value,
1226 char *dst);
1227 #endif
1228 #ifndef Tcl_PutEnv_TCL_DECLARED
1229 #define Tcl_PutEnv_TCL_DECLARED
1230 /* 203 */
1231 EXTERN int Tcl_PutEnv(CONST char *assignment);
1232 #endif
1233 #ifndef Tcl_PosixError_TCL_DECLARED
1234 #define Tcl_PosixError_TCL_DECLARED
1235 /* 204 */
1236 EXTERN CONST84_RETURN char * Tcl_PosixError(Tcl_Interp *interp);
1237 #endif
1238 #ifndef Tcl_QueueEvent_TCL_DECLARED
1239 #define Tcl_QueueEvent_TCL_DECLARED
1240 /* 205 */
1241 EXTERN void Tcl_QueueEvent(Tcl_Event *evPtr,
1242 Tcl_QueuePosition position);
1243 #endif
1244 #ifndef Tcl_Read_TCL_DECLARED
1245 #define Tcl_Read_TCL_DECLARED
1246 /* 206 */
1247 EXTERN int Tcl_Read(Tcl_Channel chan, char *bufPtr, int toRead);
1248 #endif
1249 #ifndef Tcl_ReapDetachedProcs_TCL_DECLARED
1250 #define Tcl_ReapDetachedProcs_TCL_DECLARED
1251 /* 207 */
1252 EXTERN void Tcl_ReapDetachedProcs(void);
1253 #endif
1254 #ifndef Tcl_RecordAndEval_TCL_DECLARED
1255 #define Tcl_RecordAndEval_TCL_DECLARED
1256 /* 208 */
1257 EXTERN int Tcl_RecordAndEval(Tcl_Interp *interp,
1258 CONST char *cmd, int flags);
1259 #endif
1260 #ifndef Tcl_RecordAndEvalObj_TCL_DECLARED
1261 #define Tcl_RecordAndEvalObj_TCL_DECLARED
1262 /* 209 */
1263 EXTERN int Tcl_RecordAndEvalObj(Tcl_Interp *interp,
1264 Tcl_Obj *cmdPtr, int flags);
1265 #endif
1266 #ifndef Tcl_RegisterChannel_TCL_DECLARED
1267 #define Tcl_RegisterChannel_TCL_DECLARED
1268 /* 210 */
1269 EXTERN void Tcl_RegisterChannel(Tcl_Interp *interp,
1270 Tcl_Channel chan);
1271 #endif
1272 #ifndef Tcl_RegisterObjType_TCL_DECLARED
1273 #define Tcl_RegisterObjType_TCL_DECLARED
1274 /* 211 */
1275 EXTERN void Tcl_RegisterObjType(Tcl_ObjType *typePtr);
1276 #endif
1277 #ifndef Tcl_RegExpCompile_TCL_DECLARED
1278 #define Tcl_RegExpCompile_TCL_DECLARED
1279 /* 212 */
1280 EXTERN Tcl_RegExp Tcl_RegExpCompile(Tcl_Interp *interp,
1281 CONST char *pattern);
1282 #endif
1283 #ifndef Tcl_RegExpExec_TCL_DECLARED
1284 #define Tcl_RegExpExec_TCL_DECLARED
1285 /* 213 */
1286 EXTERN int Tcl_RegExpExec(Tcl_Interp *interp, Tcl_RegExp regexp,
1287 CONST char *text, CONST char *start);
1288 #endif
1289 #ifndef Tcl_RegExpMatch_TCL_DECLARED
1290 #define Tcl_RegExpMatch_TCL_DECLARED
1291 /* 214 */
1292 EXTERN int Tcl_RegExpMatch(Tcl_Interp *interp, CONST char *text,
1293 CONST char *pattern);
1294 #endif
1295 #ifndef Tcl_RegExpRange_TCL_DECLARED
1296 #define Tcl_RegExpRange_TCL_DECLARED
1297 /* 215 */
1298 EXTERN void Tcl_RegExpRange(Tcl_RegExp regexp, int index,
1299 CONST84 char **startPtr,
1300 CONST84 char **endPtr);
1301 #endif
1302 #ifndef Tcl_Release_TCL_DECLARED
1303 #define Tcl_Release_TCL_DECLARED
1304 /* 216 */
1305 EXTERN void Tcl_Release(ClientData clientData);
1306 #endif
1307 #ifndef Tcl_ResetResult_TCL_DECLARED
1308 #define Tcl_ResetResult_TCL_DECLARED
1309 /* 217 */
1310 EXTERN void Tcl_ResetResult(Tcl_Interp *interp);
1311 #endif
1312 #ifndef Tcl_ScanElement_TCL_DECLARED
1313 #define Tcl_ScanElement_TCL_DECLARED
1314 /* 218 */
1315 EXTERN int Tcl_ScanElement(CONST char *src, int *flagPtr);
1316 #endif
1317 #ifndef Tcl_ScanCountedElement_TCL_DECLARED
1318 #define Tcl_ScanCountedElement_TCL_DECLARED
1319 /* 219 */
1320 EXTERN int Tcl_ScanCountedElement(CONST char *src, int length,
1321 int *flagPtr);
1322 #endif
1323 #ifndef Tcl_SeekOld_TCL_DECLARED
1324 #define Tcl_SeekOld_TCL_DECLARED
1325 /* 220 */
1326 EXTERN int Tcl_SeekOld(Tcl_Channel chan, int offset, int mode);
1327 #endif
1328 #ifndef Tcl_ServiceAll_TCL_DECLARED
1329 #define Tcl_ServiceAll_TCL_DECLARED
1330 /* 221 */
1331 EXTERN int Tcl_ServiceAll(void);
1332 #endif
1333 #ifndef Tcl_ServiceEvent_TCL_DECLARED
1334 #define Tcl_ServiceEvent_TCL_DECLARED
1335 /* 222 */
1336 EXTERN int Tcl_ServiceEvent(int flags);
1337 #endif
1338 #ifndef Tcl_SetAssocData_TCL_DECLARED
1339 #define Tcl_SetAssocData_TCL_DECLARED
1340 /* 223 */
1341 EXTERN void Tcl_SetAssocData(Tcl_Interp *interp,
1342 CONST char *name, Tcl_InterpDeleteProc *proc,
1343 ClientData clientData);
1344 #endif
1345 #ifndef Tcl_SetChannelBufferSize_TCL_DECLARED
1346 #define Tcl_SetChannelBufferSize_TCL_DECLARED
1347 /* 224 */
1348 EXTERN void Tcl_SetChannelBufferSize(Tcl_Channel chan, int sz);
1349 #endif
1350 #ifndef Tcl_SetChannelOption_TCL_DECLARED
1351 #define Tcl_SetChannelOption_TCL_DECLARED
1352 /* 225 */
1353 EXTERN int Tcl_SetChannelOption(Tcl_Interp *interp,
1354 Tcl_Channel chan, CONST char *optionName,
1355 CONST char *newValue);
1356 #endif
1357 #ifndef Tcl_SetCommandInfo_TCL_DECLARED
1358 #define Tcl_SetCommandInfo_TCL_DECLARED
1359 /* 226 */
1360 EXTERN int Tcl_SetCommandInfo(Tcl_Interp *interp,
1361 CONST char *cmdName,
1362 CONST Tcl_CmdInfo *infoPtr);
1363 #endif
1364 #ifndef Tcl_SetErrno_TCL_DECLARED
1365 #define Tcl_SetErrno_TCL_DECLARED
1366 /* 227 */
1367 EXTERN void Tcl_SetErrno(int err);
1368 #endif
1369 #ifndef Tcl_SetErrorCode_TCL_DECLARED
1370 #define Tcl_SetErrorCode_TCL_DECLARED
1371 /* 228 */
1372 EXTERN void Tcl_SetErrorCode(Tcl_Interp *interp, ...);
1373 #endif
1374 #ifndef Tcl_SetMaxBlockTime_TCL_DECLARED
1375 #define Tcl_SetMaxBlockTime_TCL_DECLARED
1376 /* 229 */
1377 EXTERN void Tcl_SetMaxBlockTime(Tcl_Time *timePtr);
1378 #endif
1379 #ifndef Tcl_SetPanicProc_TCL_DECLARED
1380 #define Tcl_SetPanicProc_TCL_DECLARED
1381 /* 230 */
1382 EXTERN void Tcl_SetPanicProc(Tcl_PanicProc *panicProc);
1383 #endif
1384 #ifndef Tcl_SetRecursionLimit_TCL_DECLARED
1385 #define Tcl_SetRecursionLimit_TCL_DECLARED
1386 /* 231 */
1387 EXTERN int Tcl_SetRecursionLimit(Tcl_Interp *interp, int depth);
1388 #endif
1389 #ifndef Tcl_SetResult_TCL_DECLARED
1390 #define Tcl_SetResult_TCL_DECLARED
1391 /* 232 */
1392 EXTERN void Tcl_SetResult(Tcl_Interp *interp, char *result,
1393 Tcl_FreeProc *freeProc);
1394 #endif
1395 #ifndef Tcl_SetServiceMode_TCL_DECLARED
1396 #define Tcl_SetServiceMode_TCL_DECLARED
1397 /* 233 */
1398 EXTERN int Tcl_SetServiceMode(int mode);
1399 #endif
1400 #ifndef Tcl_SetObjErrorCode_TCL_DECLARED
1401 #define Tcl_SetObjErrorCode_TCL_DECLARED
1402 /* 234 */
1403 EXTERN void Tcl_SetObjErrorCode(Tcl_Interp *interp,
1404 Tcl_Obj *errorObjPtr);
1405 #endif
1406 #ifndef Tcl_SetObjResult_TCL_DECLARED
1407 #define Tcl_SetObjResult_TCL_DECLARED
1408 /* 235 */
1409 EXTERN void Tcl_SetObjResult(Tcl_Interp *interp,
1410 Tcl_Obj *resultObjPtr);
1411 #endif
1412 #ifndef Tcl_SetStdChannel_TCL_DECLARED
1413 #define Tcl_SetStdChannel_TCL_DECLARED
1414 /* 236 */
1415 EXTERN void Tcl_SetStdChannel(Tcl_Channel channel, int type);
1416 #endif
1417 #ifndef Tcl_SetVar_TCL_DECLARED
1418 #define Tcl_SetVar_TCL_DECLARED
1419 /* 237 */
1420 EXTERN CONST84_RETURN char * Tcl_SetVar(Tcl_Interp *interp,
1421 CONST char *varName, CONST char *newValue,
1422 int flags);
1423 #endif
1424 #ifndef Tcl_SetVar2_TCL_DECLARED
1425 #define Tcl_SetVar2_TCL_DECLARED
1426 /* 238 */
1427 EXTERN CONST84_RETURN char * Tcl_SetVar2(Tcl_Interp *interp,
1428 CONST char *part1, CONST char *part2,
1429 CONST char *newValue, int flags);
1430 #endif
1431 #ifndef Tcl_SignalId_TCL_DECLARED
1432 #define Tcl_SignalId_TCL_DECLARED
1433 /* 239 */
1434 EXTERN CONST84_RETURN char * Tcl_SignalId(int sig);
1435 #endif
1436 #ifndef Tcl_SignalMsg_TCL_DECLARED
1437 #define Tcl_SignalMsg_TCL_DECLARED
1438 /* 240 */
1439 EXTERN CONST84_RETURN char * Tcl_SignalMsg(int sig);
1440 #endif
1441 #ifndef Tcl_SourceRCFile_TCL_DECLARED
1442 #define Tcl_SourceRCFile_TCL_DECLARED
1443 /* 241 */
1444 EXTERN void Tcl_SourceRCFile(Tcl_Interp *interp);
1445 #endif
1446 #ifndef Tcl_SplitList_TCL_DECLARED
1447 #define Tcl_SplitList_TCL_DECLARED
1448 /* 242 */
1449 EXTERN int Tcl_SplitList(Tcl_Interp *interp,
1450 CONST char *listStr, int *argcPtr,
1451 CONST84 char ***argvPtr);
1452 #endif
1453 #ifndef Tcl_SplitPath_TCL_DECLARED
1454 #define Tcl_SplitPath_TCL_DECLARED
1455 /* 243 */
1456 EXTERN void Tcl_SplitPath(CONST char *path, int *argcPtr,
1457 CONST84 char ***argvPtr);
1458 #endif
1459 #ifndef Tcl_StaticPackage_TCL_DECLARED
1460 #define Tcl_StaticPackage_TCL_DECLARED
1461 /* 244 */
1462 EXTERN void Tcl_StaticPackage(Tcl_Interp *interp,
1463 CONST char *pkgName,
1464 Tcl_PackageInitProc *initProc,
1465 Tcl_PackageInitProc *safeInitProc);
1466 #endif
1467 #ifndef Tcl_StringMatch_TCL_DECLARED
1468 #define Tcl_StringMatch_TCL_DECLARED
1469 /* 245 */
1470 EXTERN int Tcl_StringMatch(CONST char *str, CONST char *pattern);
1471 #endif
1472 #ifndef Tcl_TellOld_TCL_DECLARED
1473 #define Tcl_TellOld_TCL_DECLARED
1474 /* 246 */
1475 EXTERN int Tcl_TellOld(Tcl_Channel chan);
1476 #endif
1477 #ifndef Tcl_TraceVar_TCL_DECLARED
1478 #define Tcl_TraceVar_TCL_DECLARED
1479 /* 247 */
1480 EXTERN int Tcl_TraceVar(Tcl_Interp *interp, CONST char *varName,
1481 int flags, Tcl_VarTraceProc *proc,
1482 ClientData clientData);
1483 #endif
1484 #ifndef Tcl_TraceVar2_TCL_DECLARED
1485 #define Tcl_TraceVar2_TCL_DECLARED
1486 /* 248 */
1487 EXTERN int Tcl_TraceVar2(Tcl_Interp *interp, CONST char *part1,
1488 CONST char *part2, int flags,
1489 Tcl_VarTraceProc *proc,
1490 ClientData clientData);
1491 #endif
1492 #ifndef Tcl_TranslateFileName_TCL_DECLARED
1493 #define Tcl_TranslateFileName_TCL_DECLARED
1494 /* 249 */
1495 EXTERN char * Tcl_TranslateFileName(Tcl_Interp *interp,
1496 CONST char *name, Tcl_DString *bufferPtr);
1497 #endif
1498 #ifndef Tcl_Ungets_TCL_DECLARED
1499 #define Tcl_Ungets_TCL_DECLARED
1500 /* 250 */
1501 EXTERN int Tcl_Ungets(Tcl_Channel chan, CONST char *str,
1502 int len, int atHead);
1503 #endif
1504 #ifndef Tcl_UnlinkVar_TCL_DECLARED
1505 #define Tcl_UnlinkVar_TCL_DECLARED
1506 /* 251 */
1507 EXTERN void Tcl_UnlinkVar(Tcl_Interp *interp,
1508 CONST char *varName);
1509 #endif
1510 #ifndef Tcl_UnregisterChannel_TCL_DECLARED
1511 #define Tcl_UnregisterChannel_TCL_DECLARED
1512 /* 252 */
1513 EXTERN int Tcl_UnregisterChannel(Tcl_Interp *interp,
1514 Tcl_Channel chan);
1515 #endif
1516 #ifndef Tcl_UnsetVar_TCL_DECLARED
1517 #define Tcl_UnsetVar_TCL_DECLARED
1518 /* 253 */
1519 EXTERN int Tcl_UnsetVar(Tcl_Interp *interp, CONST char *varName,
1520 int flags);
1521 #endif
1522 #ifndef Tcl_UnsetVar2_TCL_DECLARED
1523 #define Tcl_UnsetVar2_TCL_DECLARED
1524 /* 254 */
1525 EXTERN int Tcl_UnsetVar2(Tcl_Interp *interp, CONST char *part1,
1526 CONST char *part2, int flags);
1527 #endif
1528 #ifndef Tcl_UntraceVar_TCL_DECLARED
1529 #define Tcl_UntraceVar_TCL_DECLARED
1530 /* 255 */
1531 EXTERN void Tcl_UntraceVar(Tcl_Interp *interp,
1532 CONST char *varName, int flags,
1533 Tcl_VarTraceProc *proc,
1534 ClientData clientData);
1535 #endif
1536 #ifndef Tcl_UntraceVar2_TCL_DECLARED
1537 #define Tcl_UntraceVar2_TCL_DECLARED
1538 /* 256 */
1539 EXTERN void Tcl_UntraceVar2(Tcl_Interp *interp,
1540 CONST char *part1, CONST char *part2,
1541 int flags, Tcl_VarTraceProc *proc,
1542 ClientData clientData);
1543 #endif
1544 #ifndef Tcl_UpdateLinkedVar_TCL_DECLARED
1545 #define Tcl_UpdateLinkedVar_TCL_DECLARED
1546 /* 257 */
1547 EXTERN void Tcl_UpdateLinkedVar(Tcl_Interp *interp,
1548 CONST char *varName);
1549 #endif
1550 #ifndef Tcl_UpVar_TCL_DECLARED
1551 #define Tcl_UpVar_TCL_DECLARED
1552 /* 258 */
1553 EXTERN int Tcl_UpVar(Tcl_Interp *interp, CONST char *frameName,
1554 CONST char *varName, CONST char *localName,
1555 int flags);
1556 #endif
1557 #ifndef Tcl_UpVar2_TCL_DECLARED
1558 #define Tcl_UpVar2_TCL_DECLARED
1559 /* 259 */
1560 EXTERN int Tcl_UpVar2(Tcl_Interp *interp, CONST char *frameName,
1561 CONST char *part1, CONST char *part2,
1562 CONST char *localName, int flags);
1563 #endif
1564 #ifndef Tcl_VarEval_TCL_DECLARED
1565 #define Tcl_VarEval_TCL_DECLARED
1566 /* 260 */
1567 EXTERN int Tcl_VarEval(Tcl_Interp *interp, ...);
1568 #endif
1569 #ifndef Tcl_VarTraceInfo_TCL_DECLARED
1570 #define Tcl_VarTraceInfo_TCL_DECLARED
1571 /* 261 */
1572 EXTERN ClientData Tcl_VarTraceInfo(Tcl_Interp *interp,
1573 CONST char *varName, int flags,
1574 Tcl_VarTraceProc *procPtr,
1575 ClientData prevClientData);
1576 #endif
1577 #ifndef Tcl_VarTraceInfo2_TCL_DECLARED
1578 #define Tcl_VarTraceInfo2_TCL_DECLARED
1579 /* 262 */
1580 EXTERN ClientData Tcl_VarTraceInfo2(Tcl_Interp *interp,
1581 CONST char *part1, CONST char *part2,
1582 int flags, Tcl_VarTraceProc *procPtr,
1583 ClientData prevClientData);
1584 #endif
1585 #ifndef Tcl_Write_TCL_DECLARED
1586 #define Tcl_Write_TCL_DECLARED
1587 /* 263 */
1588 EXTERN int Tcl_Write(Tcl_Channel chan, CONST char *s, int slen);
1589 #endif
1590 #ifndef Tcl_WrongNumArgs_TCL_DECLARED
1591 #define Tcl_WrongNumArgs_TCL_DECLARED
1592 /* 264 */
1593 EXTERN void Tcl_WrongNumArgs(Tcl_Interp *interp, int objc,
1594 Tcl_Obj *CONST objv[], CONST char *message);
1595 #endif
1596 #ifndef Tcl_DumpActiveMemory_TCL_DECLARED
1597 #define Tcl_DumpActiveMemory_TCL_DECLARED
1598 /* 265 */
1599 EXTERN int Tcl_DumpActiveMemory(CONST char *fileName);
1600 #endif
1601 #ifndef Tcl_ValidateAllMemory_TCL_DECLARED
1602 #define Tcl_ValidateAllMemory_TCL_DECLARED
1603 /* 266 */
1604 EXTERN void Tcl_ValidateAllMemory(CONST char *file, int line);
1605 #endif
1606 #ifndef Tcl_AppendResultVA_TCL_DECLARED
1607 #define Tcl_AppendResultVA_TCL_DECLARED
1608 /* 267 */
1609 EXTERN void Tcl_AppendResultVA(Tcl_Interp *interp,
1610 va_list argList);
1611 #endif
1612 #ifndef Tcl_AppendStringsToObjVA_TCL_DECLARED
1613 #define Tcl_AppendStringsToObjVA_TCL_DECLARED
1614 /* 268 */
1615 EXTERN void Tcl_AppendStringsToObjVA(Tcl_Obj *objPtr,
1616 va_list argList);
1617 #endif
1618 #ifndef Tcl_HashStats_TCL_DECLARED
1619 #define Tcl_HashStats_TCL_DECLARED
1620 /* 269 */
1621 EXTERN char * Tcl_HashStats(Tcl_HashTable *tablePtr);
1622 #endif
1623 #ifndef Tcl_ParseVar_TCL_DECLARED
1624 #define Tcl_ParseVar_TCL_DECLARED
1625 /* 270 */
1626 EXTERN CONST84_RETURN char * Tcl_ParseVar(Tcl_Interp *interp,
1627 CONST char *start, CONST84 char **termPtr);
1628 #endif
1629 #ifndef Tcl_PkgPresent_TCL_DECLARED
1630 #define Tcl_PkgPresent_TCL_DECLARED
1631 /* 271 */
1632 EXTERN CONST84_RETURN char * Tcl_PkgPresent(Tcl_Interp *interp,
1633 CONST char *name, CONST char *version,
1634 int exact);
1635 #endif
1636 #ifndef Tcl_PkgPresentEx_TCL_DECLARED
1637 #define Tcl_PkgPresentEx_TCL_DECLARED
1638 /* 272 */
1639 EXTERN CONST84_RETURN char * Tcl_PkgPresentEx(Tcl_Interp *interp,
1640 CONST char *name, CONST char *version,
1641 int exact, ClientData *clientDataPtr);
1642 #endif
1643 #ifndef Tcl_PkgProvide_TCL_DECLARED
1644 #define Tcl_PkgProvide_TCL_DECLARED
1645 /* 273 */
1646 EXTERN int Tcl_PkgProvide(Tcl_Interp *interp, CONST char *name,
1647 CONST char *version);
1648 #endif
1649 #ifndef Tcl_PkgRequire_TCL_DECLARED
1650 #define Tcl_PkgRequire_TCL_DECLARED
1651 /* 274 */
1652 EXTERN CONST84_RETURN char * Tcl_PkgRequire(Tcl_Interp *interp,
1653 CONST char *name, CONST char *version,
1654 int exact);
1655 #endif
1656 #ifndef Tcl_SetErrorCodeVA_TCL_DECLARED
1657 #define Tcl_SetErrorCodeVA_TCL_DECLARED
1658 /* 275 */
1659 EXTERN void Tcl_SetErrorCodeVA(Tcl_Interp *interp,
1660 va_list argList);
1661 #endif
1662 #ifndef Tcl_VarEvalVA_TCL_DECLARED
1663 #define Tcl_VarEvalVA_TCL_DECLARED
1664 /* 276 */
1665 EXTERN int Tcl_VarEvalVA(Tcl_Interp *interp, va_list argList);
1666 #endif
1667 #ifndef Tcl_WaitPid_TCL_DECLARED
1668 #define Tcl_WaitPid_TCL_DECLARED
1669 /* 277 */
1670 EXTERN Tcl_Pid Tcl_WaitPid(Tcl_Pid pid, int *statPtr, int options);
1671 #endif
1672 #ifndef Tcl_PanicVA_TCL_DECLARED
1673 #define Tcl_PanicVA_TCL_DECLARED
1674 /* 278 */
1675 EXTERN void Tcl_PanicVA(CONST char *format, va_list argList);
1676 #endif
1677 #ifndef Tcl_GetVersion_TCL_DECLARED
1678 #define Tcl_GetVersion_TCL_DECLARED
1679 /* 279 */
1680 EXTERN void Tcl_GetVersion(int *major, int *minor,
1681 int *patchLevel, int *type);
1682 #endif
1683 #ifndef Tcl_InitMemory_TCL_DECLARED
1684 #define Tcl_InitMemory_TCL_DECLARED
1685 /* 280 */
1686 EXTERN void Tcl_InitMemory(Tcl_Interp *interp);
1687 #endif
1688 #ifndef Tcl_StackChannel_TCL_DECLARED
1689 #define Tcl_StackChannel_TCL_DECLARED
1690 /* 281 */
1691 EXTERN Tcl_Channel Tcl_StackChannel(Tcl_Interp *interp,
1692 Tcl_ChannelType *typePtr,
1693 ClientData instanceData, int mask,
1694 Tcl_Channel prevChan);
1695 #endif
1696 #ifndef Tcl_UnstackChannel_TCL_DECLARED
1697 #define Tcl_UnstackChannel_TCL_DECLARED
1698 /* 282 */
1699 EXTERN int Tcl_UnstackChannel(Tcl_Interp *interp,
1700 Tcl_Channel chan);
1701 #endif
1702 #ifndef Tcl_GetStackedChannel_TCL_DECLARED
1703 #define Tcl_GetStackedChannel_TCL_DECLARED
1704 /* 283 */
1705 EXTERN Tcl_Channel Tcl_GetStackedChannel(Tcl_Channel chan);
1706 #endif
1707 #ifndef Tcl_SetMainLoop_TCL_DECLARED
1708 #define Tcl_SetMainLoop_TCL_DECLARED
1709 /* 284 */
1710 EXTERN void Tcl_SetMainLoop(Tcl_MainLoopProc *proc);
1711 #endif
1712 /* Slot 285 is reserved */
1713 #ifndef Tcl_AppendObjToObj_TCL_DECLARED
1714 #define Tcl_AppendObjToObj_TCL_DECLARED
1715 /* 286 */
1716 EXTERN void Tcl_AppendObjToObj(Tcl_Obj *objPtr,
1717 Tcl_Obj *appendObjPtr);
1718 #endif
1719 #ifndef Tcl_CreateEncoding_TCL_DECLARED
1720 #define Tcl_CreateEncoding_TCL_DECLARED
1721 /* 287 */
1722 EXTERN Tcl_Encoding Tcl_CreateEncoding(CONST Tcl_EncodingType *typePtr);
1723 #endif
1724 #ifndef Tcl_CreateThreadExitHandler_TCL_DECLARED
1725 #define Tcl_CreateThreadExitHandler_TCL_DECLARED
1726 /* 288 */
1727 EXTERN void Tcl_CreateThreadExitHandler(Tcl_ExitProc *proc,
1728 ClientData clientData);
1729 #endif
1730 #ifndef Tcl_DeleteThreadExitHandler_TCL_DECLARED
1731 #define Tcl_DeleteThreadExitHandler_TCL_DECLARED
1732 /* 289 */
1733 EXTERN void Tcl_DeleteThreadExitHandler(Tcl_ExitProc *proc,
1734 ClientData clientData);
1735 #endif
1736 #ifndef Tcl_DiscardResult_TCL_DECLARED
1737 #define Tcl_DiscardResult_TCL_DECLARED
1738 /* 290 */
1739 EXTERN void Tcl_DiscardResult(Tcl_SavedResult *statePtr);
1740 #endif
1741 #ifndef Tcl_EvalEx_TCL_DECLARED
1742 #define Tcl_EvalEx_TCL_DECLARED
1743 /* 291 */
1744 EXTERN int Tcl_EvalEx(Tcl_Interp *interp, CONST char *script,
1745 int numBytes, int flags);
1746 #endif
1747 #ifndef Tcl_EvalObjv_TCL_DECLARED
1748 #define Tcl_EvalObjv_TCL_DECLARED
1749 /* 292 */
1750 EXTERN int Tcl_EvalObjv(Tcl_Interp *interp, int objc,
1751 Tcl_Obj *CONST objv[], int flags);
1752 #endif
1753 #ifndef Tcl_EvalObjEx_TCL_DECLARED
1754 #define Tcl_EvalObjEx_TCL_DECLARED
1755 /* 293 */
1756 EXTERN int Tcl_EvalObjEx(Tcl_Interp *interp, Tcl_Obj *objPtr,
1757 int flags);
1758 #endif
1759 #ifndef Tcl_ExitThread_TCL_DECLARED
1760 #define Tcl_ExitThread_TCL_DECLARED
1761 /* 294 */
1762 EXTERN void Tcl_ExitThread(int status);
1763 #endif
1764 #ifndef Tcl_ExternalToUtf_TCL_DECLARED
1765 #define Tcl_ExternalToUtf_TCL_DECLARED
1766 /* 295 */
1767 EXTERN int Tcl_ExternalToUtf(Tcl_Interp *interp,
1768 Tcl_Encoding encoding, CONST char *src,
1769 int srcLen, int flags,
1770 Tcl_EncodingState *statePtr, char *dst,
1771 int dstLen, int *srcReadPtr,
1772 int *dstWrotePtr, int *dstCharsPtr);
1773 #endif
1774 #ifndef Tcl_ExternalToUtfDString_TCL_DECLARED
1775 #define Tcl_ExternalToUtfDString_TCL_DECLARED
1776 /* 296 */
1777 EXTERN char * Tcl_ExternalToUtfDString(Tcl_Encoding encoding,
1778 CONST char *src, int srcLen,
1779 Tcl_DString *dsPtr);
1780 #endif
1781 #ifndef Tcl_FinalizeThread_TCL_DECLARED
1782 #define Tcl_FinalizeThread_TCL_DECLARED
1783 /* 297 */
1784 EXTERN void Tcl_FinalizeThread(void);
1785 #endif
1786 #ifndef Tcl_FinalizeNotifier_TCL_DECLARED
1787 #define Tcl_FinalizeNotifier_TCL_DECLARED
1788 /* 298 */
1789 EXTERN void Tcl_FinalizeNotifier(ClientData clientData);
1790 #endif
1791 #ifndef Tcl_FreeEncoding_TCL_DECLARED
1792 #define Tcl_FreeEncoding_TCL_DECLARED
1793 /* 299 */
1794 EXTERN void Tcl_FreeEncoding(Tcl_Encoding encoding);
1795 #endif
1796 #ifndef Tcl_GetCurrentThread_TCL_DECLARED
1797 #define Tcl_GetCurrentThread_TCL_DECLARED
1798 /* 300 */
1799 EXTERN Tcl_ThreadId Tcl_GetCurrentThread(void);
1800 #endif
1801 #ifndef Tcl_GetEncoding_TCL_DECLARED
1802 #define Tcl_GetEncoding_TCL_DECLARED
1803 /* 301 */
1804 EXTERN Tcl_Encoding Tcl_GetEncoding(Tcl_Interp *interp, CONST char *name);
1805 #endif
1806 #ifndef Tcl_GetEncodingName_TCL_DECLARED
1807 #define Tcl_GetEncodingName_TCL_DECLARED
1808 /* 302 */
1809 EXTERN CONST84_RETURN char * Tcl_GetEncodingName(Tcl_Encoding encoding);
1810 #endif
1811 #ifndef Tcl_GetEncodingNames_TCL_DECLARED
1812 #define Tcl_GetEncodingNames_TCL_DECLARED
1813 /* 303 */
1814 EXTERN void Tcl_GetEncodingNames(Tcl_Interp *interp);
1815 #endif
1816 #ifndef Tcl_GetIndexFromObjStruct_TCL_DECLARED
1817 #define Tcl_GetIndexFromObjStruct_TCL_DECLARED
1818 /* 304 */
1819 EXTERN int Tcl_GetIndexFromObjStruct(Tcl_Interp *interp,
1820 Tcl_Obj *objPtr, CONST VOID *tablePtr,
1821 int offset, CONST char *msg, int flags,
1822 int *indexPtr);
1823 #endif
1824 #ifndef Tcl_GetThreadData_TCL_DECLARED
1825 #define Tcl_GetThreadData_TCL_DECLARED
1826 /* 305 */
1827 EXTERN VOID * Tcl_GetThreadData(Tcl_ThreadDataKey *keyPtr,
1828 int size);
1829 #endif
1830 #ifndef Tcl_GetVar2Ex_TCL_DECLARED
1831 #define Tcl_GetVar2Ex_TCL_DECLARED
1832 /* 306 */
1833 EXTERN Tcl_Obj * Tcl_GetVar2Ex(Tcl_Interp *interp, CONST char *part1,
1834 CONST char *part2, int flags);
1835 #endif
1836 #ifndef Tcl_InitNotifier_TCL_DECLARED
1837 #define Tcl_InitNotifier_TCL_DECLARED
1838 /* 307 */
1839 EXTERN ClientData Tcl_InitNotifier(void);
1840 #endif
1841 #ifndef Tcl_MutexLock_TCL_DECLARED
1842 #define Tcl_MutexLock_TCL_DECLARED
1843 /* 308 */
1844 EXTERN void Tcl_MutexLock(Tcl_Mutex *mutexPtr);
1845 #endif
1846 #ifndef Tcl_MutexUnlock_TCL_DECLARED
1847 #define Tcl_MutexUnlock_TCL_DECLARED
1848 /* 309 */
1849 EXTERN void Tcl_MutexUnlock(Tcl_Mutex *mutexPtr);
1850 #endif
1851 #ifndef Tcl_ConditionNotify_TCL_DECLARED
1852 #define Tcl_ConditionNotify_TCL_DECLARED
1853 /* 310 */
1854 EXTERN void Tcl_ConditionNotify(Tcl_Condition *condPtr);
1855 #endif
1856 #ifndef Tcl_ConditionWait_TCL_DECLARED
1857 #define Tcl_ConditionWait_TCL_DECLARED
1858 /* 311 */
1859 EXTERN void Tcl_ConditionWait(Tcl_Condition *condPtr,
1860 Tcl_Mutex *mutexPtr, Tcl_Time *timePtr);
1861 #endif
1862 #ifndef Tcl_NumUtfChars_TCL_DECLARED
1863 #define Tcl_NumUtfChars_TCL_DECLARED
1864 /* 312 */
1865 EXTERN int Tcl_NumUtfChars(CONST char *src, int length);
1866 #endif
1867 #ifndef Tcl_ReadChars_TCL_DECLARED
1868 #define Tcl_ReadChars_TCL_DECLARED
1869 /* 313 */
1870 EXTERN int Tcl_ReadChars(Tcl_Channel channel, Tcl_Obj *objPtr,
1871 int charsToRead, int appendFlag);
1872 #endif
1873 #ifndef Tcl_RestoreResult_TCL_DECLARED
1874 #define Tcl_RestoreResult_TCL_DECLARED
1875 /* 314 */
1876 EXTERN void Tcl_RestoreResult(Tcl_Interp *interp,
1877 Tcl_SavedResult *statePtr);
1878 #endif
1879 #ifndef Tcl_SaveResult_TCL_DECLARED
1880 #define Tcl_SaveResult_TCL_DECLARED
1881 /* 315 */
1882 EXTERN void Tcl_SaveResult(Tcl_Interp *interp,
1883 Tcl_SavedResult *statePtr);
1884 #endif
1885 #ifndef Tcl_SetSystemEncoding_TCL_DECLARED
1886 #define Tcl_SetSystemEncoding_TCL_DECLARED
1887 /* 316 */
1888 EXTERN int Tcl_SetSystemEncoding(Tcl_Interp *interp,
1889 CONST char *name);
1890 #endif
1891 #ifndef Tcl_SetVar2Ex_TCL_DECLARED
1892 #define Tcl_SetVar2Ex_TCL_DECLARED
1893 /* 317 */
1894 EXTERN Tcl_Obj * Tcl_SetVar2Ex(Tcl_Interp *interp, CONST char *part1,
1895 CONST char *part2, Tcl_Obj *newValuePtr,
1896 int flags);
1897 #endif
1898 #ifndef Tcl_ThreadAlert_TCL_DECLARED
1899 #define Tcl_ThreadAlert_TCL_DECLARED
1900 /* 318 */
1901 EXTERN void Tcl_ThreadAlert(Tcl_ThreadId threadId);
1902 #endif
1903 #ifndef Tcl_ThreadQueueEvent_TCL_DECLARED
1904 #define Tcl_ThreadQueueEvent_TCL_DECLARED
1905 /* 319 */
1906 EXTERN void Tcl_ThreadQueueEvent(Tcl_ThreadId threadId,
1907 Tcl_Event *evPtr, Tcl_QueuePosition position);
1908 #endif
1909 #ifndef Tcl_UniCharAtIndex_TCL_DECLARED
1910 #define Tcl_UniCharAtIndex_TCL_DECLARED
1911 /* 320 */
1912 EXTERN Tcl_UniChar Tcl_UniCharAtIndex(CONST char *src, int index);
1913 #endif
1914 #ifndef Tcl_UniCharToLower_TCL_DECLARED
1915 #define Tcl_UniCharToLower_TCL_DECLARED
1916 /* 321 */
1917 EXTERN Tcl_UniChar Tcl_UniCharToLower(int ch);
1918 #endif
1919 #ifndef Tcl_UniCharToTitle_TCL_DECLARED
1920 #define Tcl_UniCharToTitle_TCL_DECLARED
1921 /* 322 */
1922 EXTERN Tcl_UniChar Tcl_UniCharToTitle(int ch);
1923 #endif
1924 #ifndef Tcl_UniCharToUpper_TCL_DECLARED
1925 #define Tcl_UniCharToUpper_TCL_DECLARED
1926 /* 323 */
1927 EXTERN Tcl_UniChar Tcl_UniCharToUpper(int ch);
1928 #endif
1929 #ifndef Tcl_UniCharToUtf_TCL_DECLARED
1930 #define Tcl_UniCharToUtf_TCL_DECLARED
1931 /* 324 */
1932 EXTERN int Tcl_UniCharToUtf(int ch, char *buf);
1933 #endif
1934 #ifndef Tcl_UtfAtIndex_TCL_DECLARED
1935 #define Tcl_UtfAtIndex_TCL_DECLARED
1936 /* 325 */
1937 EXTERN CONST84_RETURN char * Tcl_UtfAtIndex(CONST char *src, int index);
1938 #endif
1939 #ifndef Tcl_UtfCharComplete_TCL_DECLARED
1940 #define Tcl_UtfCharComplete_TCL_DECLARED
1941 /* 326 */
1942 EXTERN int Tcl_UtfCharComplete(CONST char *src, int length);
1943 #endif
1944 #ifndef Tcl_UtfBackslash_TCL_DECLARED
1945 #define Tcl_UtfBackslash_TCL_DECLARED
1946 /* 327 */
1947 EXTERN int Tcl_UtfBackslash(CONST char *src, int *readPtr,
1948 char *dst);
1949 #endif
1950 #ifndef Tcl_UtfFindFirst_TCL_DECLARED
1951 #define Tcl_UtfFindFirst_TCL_DECLARED
1952 /* 328 */
1953 EXTERN CONST84_RETURN char * Tcl_UtfFindFirst(CONST char *src, int ch);
1954 #endif
1955 #ifndef Tcl_UtfFindLast_TCL_DECLARED
1956 #define Tcl_UtfFindLast_TCL_DECLARED
1957 /* 329 */
1958 EXTERN CONST84_RETURN char * Tcl_UtfFindLast(CONST char *src, int ch);
1959 #endif
1960 #ifndef Tcl_UtfNext_TCL_DECLARED
1961 #define Tcl_UtfNext_TCL_DECLARED
1962 /* 330 */
1963 EXTERN CONST84_RETURN char * Tcl_UtfNext(CONST char *src);
1964 #endif
1965 #ifndef Tcl_UtfPrev_TCL_DECLARED
1966 #define Tcl_UtfPrev_TCL_DECLARED
1967 /* 331 */
1968 EXTERN CONST84_RETURN char * Tcl_UtfPrev(CONST char *src, CONST char *start);
1969 #endif
1970 #ifndef Tcl_UtfToExternal_TCL_DECLARED
1971 #define Tcl_UtfToExternal_TCL_DECLARED
1972 /* 332 */
1973 EXTERN int Tcl_UtfToExternal(Tcl_Interp *interp,
1974 Tcl_Encoding encoding, CONST char *src,
1975 int srcLen, int flags,
1976 Tcl_EncodingState *statePtr, char *dst,
1977 int dstLen, int *srcReadPtr,
1978 int *dstWrotePtr, int *dstCharsPtr);
1979 #endif
1980 #ifndef Tcl_UtfToExternalDString_TCL_DECLARED
1981 #define Tcl_UtfToExternalDString_TCL_DECLARED
1982 /* 333 */
1983 EXTERN char * Tcl_UtfToExternalDString(Tcl_Encoding encoding,
1984 CONST char *src, int srcLen,
1985 Tcl_DString *dsPtr);
1986 #endif
1987 #ifndef Tcl_UtfToLower_TCL_DECLARED
1988 #define Tcl_UtfToLower_TCL_DECLARED
1989 /* 334 */
1990 EXTERN int Tcl_UtfToLower(char *src);
1991 #endif
1992 #ifndef Tcl_UtfToTitle_TCL_DECLARED
1993 #define Tcl_UtfToTitle_TCL_DECLARED
1994 /* 335 */
1995 EXTERN int Tcl_UtfToTitle(char *src);
1996 #endif
1997 #ifndef Tcl_UtfToUniChar_TCL_DECLARED
1998 #define Tcl_UtfToUniChar_TCL_DECLARED
1999 /* 336 */
2000 EXTERN int Tcl_UtfToUniChar(CONST char *src, Tcl_UniChar *chPtr);
2001 #endif
2002 #ifndef Tcl_UtfToUpper_TCL_DECLARED
2003 #define Tcl_UtfToUpper_TCL_DECLARED
2004 /* 337 */
2005 EXTERN int Tcl_UtfToUpper(char *src);
2006 #endif
2007 #ifndef Tcl_WriteChars_TCL_DECLARED
2008 #define Tcl_WriteChars_TCL_DECLARED
2009 /* 338 */
2010 EXTERN int Tcl_WriteChars(Tcl_Channel chan, CONST char *src,
2011 int srcLen);
2012 #endif
2013 #ifndef Tcl_WriteObj_TCL_DECLARED
2014 #define Tcl_WriteObj_TCL_DECLARED
2015 /* 339 */
2016 EXTERN int Tcl_WriteObj(Tcl_Channel chan, Tcl_Obj *objPtr);
2017 #endif
2018 #ifndef Tcl_GetString_TCL_DECLARED
2019 #define Tcl_GetString_TCL_DECLARED
2020 /* 340 */
2021 EXTERN char * Tcl_GetString(Tcl_Obj *objPtr);
2022 #endif
2023 #ifndef Tcl_GetDefaultEncodingDir_TCL_DECLARED
2024 #define Tcl_GetDefaultEncodingDir_TCL_DECLARED
2025 /* 341 */
2026 EXTERN CONST84_RETURN char * Tcl_GetDefaultEncodingDir(void);
2027 #endif
2028 #ifndef Tcl_SetDefaultEncodingDir_TCL_DECLARED
2029 #define Tcl_SetDefaultEncodingDir_TCL_DECLARED
2030 /* 342 */
2031 EXTERN void Tcl_SetDefaultEncodingDir(CONST char *path);
2032 #endif
2033 #ifndef Tcl_AlertNotifier_TCL_DECLARED
2034 #define Tcl_AlertNotifier_TCL_DECLARED
2035 /* 343 */
2036 EXTERN void Tcl_AlertNotifier(ClientData clientData);
2037 #endif
2038 #ifndef Tcl_ServiceModeHook_TCL_DECLARED
2039 #define Tcl_ServiceModeHook_TCL_DECLARED
2040 /* 344 */
2041 EXTERN void Tcl_ServiceModeHook(int mode);
2042 #endif
2043 #ifndef Tcl_UniCharIsAlnum_TCL_DECLARED
2044 #define Tcl_UniCharIsAlnum_TCL_DECLARED
2045 /* 345 */
2046 EXTERN int Tcl_UniCharIsAlnum(int ch);
2047 #endif
2048 #ifndef Tcl_UniCharIsAlpha_TCL_DECLARED
2049 #define Tcl_UniCharIsAlpha_TCL_DECLARED
2050 /* 346 */
2051 EXTERN int Tcl_UniCharIsAlpha(int ch);
2052 #endif
2053 #ifndef Tcl_UniCharIsDigit_TCL_DECLARED
2054 #define Tcl_UniCharIsDigit_TCL_DECLARED
2055 /* 347 */
2056 EXTERN int Tcl_UniCharIsDigit(int ch);
2057 #endif
2058 #ifndef Tcl_UniCharIsLower_TCL_DECLARED
2059 #define Tcl_UniCharIsLower_TCL_DECLARED
2060 /* 348 */
2061 EXTERN int Tcl_UniCharIsLower(int ch);
2062 #endif
2063 #ifndef Tcl_UniCharIsSpace_TCL_DECLARED
2064 #define Tcl_UniCharIsSpace_TCL_DECLARED
2065 /* 349 */
2066 EXTERN int Tcl_UniCharIsSpace(int ch);
2067 #endif
2068 #ifndef Tcl_UniCharIsUpper_TCL_DECLARED
2069 #define Tcl_UniCharIsUpper_TCL_DECLARED
2070 /* 350 */
2071 EXTERN int Tcl_UniCharIsUpper(int ch);
2072 #endif
2073 #ifndef Tcl_UniCharIsWordChar_TCL_DECLARED
2074 #define Tcl_UniCharIsWordChar_TCL_DECLARED
2075 /* 351 */
2076 EXTERN int Tcl_UniCharIsWordChar(int ch);
2077 #endif
2078 #ifndef Tcl_UniCharLen_TCL_DECLARED
2079 #define Tcl_UniCharLen_TCL_DECLARED
2080 /* 352 */
2081 EXTERN int Tcl_UniCharLen(CONST Tcl_UniChar *uniStr);
2082 #endif
2083 #ifndef Tcl_UniCharNcmp_TCL_DECLARED
2084 #define Tcl_UniCharNcmp_TCL_DECLARED
2085 /* 353 */
2086 EXTERN int Tcl_UniCharNcmp(CONST Tcl_UniChar *ucs,
2087 CONST Tcl_UniChar *uct,
2088 unsigned long numChars);
2089 #endif
2090 #ifndef Tcl_UniCharToUtfDString_TCL_DECLARED
2091 #define Tcl_UniCharToUtfDString_TCL_DECLARED
2092 /* 354 */
2093 EXTERN char * Tcl_UniCharToUtfDString(CONST Tcl_UniChar *uniStr,
2094 int uniLength, Tcl_DString *dsPtr);
2095 #endif
2096 #ifndef Tcl_UtfToUniCharDString_TCL_DECLARED
2097 #define Tcl_UtfToUniCharDString_TCL_DECLARED
2098 /* 355 */
2099 EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString(CONST char *src, int length,
2100 Tcl_DString *dsPtr);
2101 #endif
2102 #ifndef Tcl_GetRegExpFromObj_TCL_DECLARED
2103 #define Tcl_GetRegExpFromObj_TCL_DECLARED
2104 /* 356 */
2105 EXTERN Tcl_RegExp Tcl_GetRegExpFromObj(Tcl_Interp *interp,
2106 Tcl_Obj *patObj, int flags);
2107 #endif
2108 #ifndef Tcl_EvalTokens_TCL_DECLARED
2109 #define Tcl_EvalTokens_TCL_DECLARED
2110 /* 357 */
2111 EXTERN Tcl_Obj * Tcl_EvalTokens(Tcl_Interp *interp,
2112 Tcl_Token *tokenPtr, int count);
2113 #endif
2114 #ifndef Tcl_FreeParse_TCL_DECLARED
2115 #define Tcl_FreeParse_TCL_DECLARED
2116 /* 358 */
2117 EXTERN void Tcl_FreeParse(Tcl_Parse *parsePtr);
2118 #endif
2119 #ifndef Tcl_LogCommandInfo_TCL_DECLARED
2120 #define Tcl_LogCommandInfo_TCL_DECLARED
2121 /* 359 */
2122 EXTERN void Tcl_LogCommandInfo(Tcl_Interp *interp,
2123 CONST char *script, CONST char *command,
2124 int length);
2125 #endif
2126 #ifndef Tcl_ParseBraces_TCL_DECLARED
2127 #define Tcl_ParseBraces_TCL_DECLARED
2128 /* 360 */
2129 EXTERN int Tcl_ParseBraces(Tcl_Interp *interp,
2130 CONST char *start, int numBytes,
2131 Tcl_Parse *parsePtr, int append,
2132 CONST84 char **termPtr);
2133 #endif
2134 #ifndef Tcl_ParseCommand_TCL_DECLARED
2135 #define Tcl_ParseCommand_TCL_DECLARED
2136 /* 361 */
2137 EXTERN int Tcl_ParseCommand(Tcl_Interp *interp,
2138 CONST char *start, int numBytes, int nested,
2139 Tcl_Parse *parsePtr);
2140 #endif
2141 #ifndef Tcl_ParseExpr_TCL_DECLARED
2142 #define Tcl_ParseExpr_TCL_DECLARED
2143 /* 362 */
2144 EXTERN int Tcl_ParseExpr(Tcl_Interp *interp, CONST char *start,
2145 int numBytes, Tcl_Parse *parsePtr);
2146 #endif
2147 #ifndef Tcl_ParseQuotedString_TCL_DECLARED
2148 #define Tcl_ParseQuotedString_TCL_DECLARED
2149 /* 363 */
2150 EXTERN int Tcl_ParseQuotedString(Tcl_Interp *interp,
2151 CONST char *start, int numBytes,
2152 Tcl_Parse *parsePtr, int append,
2153 CONST84 char **termPtr);
2154 #endif
2155 #ifndef Tcl_ParseVarName_TCL_DECLARED
2156 #define Tcl_ParseVarName_TCL_DECLARED
2157 /* 364 */
2158 EXTERN int Tcl_ParseVarName(Tcl_Interp *interp,
2159 CONST char *start, int numBytes,
2160 Tcl_Parse *parsePtr, int append);
2161 #endif
2162 #ifndef Tcl_GetCwd_TCL_DECLARED
2163 #define Tcl_GetCwd_TCL_DECLARED
2164 /* 365 */
2165 EXTERN char * Tcl_GetCwd(Tcl_Interp *interp, Tcl_DString *cwdPtr);
2166 #endif
2167 #ifndef Tcl_Chdir_TCL_DECLARED
2168 #define Tcl_Chdir_TCL_DECLARED
2169 /* 366 */
2170 EXTERN int Tcl_Chdir(CONST char *dirName);
2171 #endif
2172 #ifndef Tcl_Access_TCL_DECLARED
2173 #define Tcl_Access_TCL_DECLARED
2174 /* 367 */
2175 EXTERN int Tcl_Access(CONST char *path, int mode);
2176 #endif
2177 #ifndef Tcl_Stat_TCL_DECLARED
2178 #define Tcl_Stat_TCL_DECLARED
2179 /* 368 */
2180 EXTERN int Tcl_Stat(CONST char *path, struct stat *bufPtr);
2181 #endif
2182 #ifndef Tcl_UtfNcmp_TCL_DECLARED
2183 #define Tcl_UtfNcmp_TCL_DECLARED
2184 /* 369 */
2185 EXTERN int Tcl_UtfNcmp(CONST char *s1, CONST char *s2,
2186 unsigned long n);
2187 #endif
2188 #ifndef Tcl_UtfNcasecmp_TCL_DECLARED
2189 #define Tcl_UtfNcasecmp_TCL_DECLARED
2190 /* 370 */
2191 EXTERN int Tcl_UtfNcasecmp(CONST char *s1, CONST char *s2,
2192 unsigned long n);
2193 #endif
2194 #ifndef Tcl_StringCaseMatch_TCL_DECLARED
2195 #define Tcl_StringCaseMatch_TCL_DECLARED
2196 /* 371 */
2197 EXTERN int Tcl_StringCaseMatch(CONST char *str,
2198 CONST char *pattern, int nocase);
2199 #endif
2200 #ifndef Tcl_UniCharIsControl_TCL_DECLARED
2201 #define Tcl_UniCharIsControl_TCL_DECLARED
2202 /* 372 */
2203 EXTERN int Tcl_UniCharIsControl(int ch);
2204 #endif
2205 #ifndef Tcl_UniCharIsGraph_TCL_DECLARED
2206 #define Tcl_UniCharIsGraph_TCL_DECLARED
2207 /* 373 */
2208 EXTERN int Tcl_UniCharIsGraph(int ch);
2209 #endif
2210 #ifndef Tcl_UniCharIsPrint_TCL_DECLARED
2211 #define Tcl_UniCharIsPrint_TCL_DECLARED
2212 /* 374 */
2213 EXTERN int Tcl_UniCharIsPrint(int ch);
2214 #endif
2215 #ifndef Tcl_UniCharIsPunct_TCL_DECLARED
2216 #define Tcl_UniCharIsPunct_TCL_DECLARED
2217 /* 375 */
2218 EXTERN int Tcl_UniCharIsPunct(int ch);
2219 #endif
2220 #ifndef Tcl_RegExpExecObj_TCL_DECLARED
2221 #define Tcl_RegExpExecObj_TCL_DECLARED
2222 /* 376 */
2223 EXTERN int Tcl_RegExpExecObj(Tcl_Interp *interp,
2224 Tcl_RegExp regexp, Tcl_Obj *textObj,
2225 int offset, int nmatches, int flags);
2226 #endif
2227 #ifndef Tcl_RegExpGetInfo_TCL_DECLARED
2228 #define Tcl_RegExpGetInfo_TCL_DECLARED
2229 /* 377 */
2230 EXTERN void Tcl_RegExpGetInfo(Tcl_RegExp regexp,
2231 Tcl_RegExpInfo *infoPtr);
2232 #endif
2233 #ifndef Tcl_NewUnicodeObj_TCL_DECLARED
2234 #define Tcl_NewUnicodeObj_TCL_DECLARED
2235 /* 378 */
2236 EXTERN Tcl_Obj * Tcl_NewUnicodeObj(CONST Tcl_UniChar *unicode,
2237 int numChars);
2238 #endif
2239 #ifndef Tcl_SetUnicodeObj_TCL_DECLARED
2240 #define Tcl_SetUnicodeObj_TCL_DECLARED
2241 /* 379 */
2242 EXTERN void Tcl_SetUnicodeObj(Tcl_Obj *objPtr,
2243 CONST Tcl_UniChar *unicode, int numChars);
2244 #endif
2245 #ifndef Tcl_GetCharLength_TCL_DECLARED
2246 #define Tcl_GetCharLength_TCL_DECLARED
2247 /* 380 */
2248 EXTERN int Tcl_GetCharLength(Tcl_Obj *objPtr);
2249 #endif
2250 #ifndef Tcl_GetUniChar_TCL_DECLARED
2251 #define Tcl_GetUniChar_TCL_DECLARED
2252 /* 381 */
2253 EXTERN Tcl_UniChar Tcl_GetUniChar(Tcl_Obj *objPtr, int index);
2254 #endif
2255 #ifndef Tcl_GetUnicode_TCL_DECLARED
2256 #define Tcl_GetUnicode_TCL_DECLARED
2257 /* 382 */
2258 EXTERN Tcl_UniChar * Tcl_GetUnicode(Tcl_Obj *objPtr);
2259 #endif
2260 #ifndef Tcl_GetRange_TCL_DECLARED
2261 #define Tcl_GetRange_TCL_DECLARED
2262 /* 383 */
2263 EXTERN Tcl_Obj * Tcl_GetRange(Tcl_Obj *objPtr, int first, int last);
2264 #endif
2265 #ifndef Tcl_AppendUnicodeToObj_TCL_DECLARED
2266 #define Tcl_AppendUnicodeToObj_TCL_DECLARED
2267 /* 384 */
2268 EXTERN void Tcl_AppendUnicodeToObj(Tcl_Obj *objPtr,
2269 CONST Tcl_UniChar *unicode, int length);
2270 #endif
2271 #ifndef Tcl_RegExpMatchObj_TCL_DECLARED
2272 #define Tcl_RegExpMatchObj_TCL_DECLARED
2273 /* 385 */
2274 EXTERN int Tcl_RegExpMatchObj(Tcl_Interp *interp,
2275 Tcl_Obj *textObj, Tcl_Obj *patternObj);
2276 #endif
2277 #ifndef Tcl_SetNotifier_TCL_DECLARED
2278 #define Tcl_SetNotifier_TCL_DECLARED
2279 /* 386 */
2280 EXTERN void Tcl_SetNotifier(Tcl_NotifierProcs *notifierProcPtr);
2281 #endif
2282 #ifndef Tcl_GetAllocMutex_TCL_DECLARED
2283 #define Tcl_GetAllocMutex_TCL_DECLARED
2284 /* 387 */
2285 EXTERN Tcl_Mutex * Tcl_GetAllocMutex(void);
2286 #endif
2287 #ifndef Tcl_GetChannelNames_TCL_DECLARED
2288 #define Tcl_GetChannelNames_TCL_DECLARED
2289 /* 388 */
2290 EXTERN int Tcl_GetChannelNames(Tcl_Interp *interp);
2291 #endif
2292 #ifndef Tcl_GetChannelNamesEx_TCL_DECLARED
2293 #define Tcl_GetChannelNamesEx_TCL_DECLARED
2294 /* 389 */
2295 EXTERN int Tcl_GetChannelNamesEx(Tcl_Interp *interp,
2296 CONST char *pattern);
2297 #endif
2298 #ifndef Tcl_ProcObjCmd_TCL_DECLARED
2299 #define Tcl_ProcObjCmd_TCL_DECLARED
2300 /* 390 */
2301 EXTERN int Tcl_ProcObjCmd(ClientData clientData,
2302 Tcl_Interp *interp, int objc,
2303 Tcl_Obj *CONST objv[]);
2304 #endif
2305 #ifndef Tcl_ConditionFinalize_TCL_DECLARED
2306 #define Tcl_ConditionFinalize_TCL_DECLARED
2307 /* 391 */
2308 EXTERN void Tcl_ConditionFinalize(Tcl_Condition *condPtr);
2309 #endif
2310 #ifndef Tcl_MutexFinalize_TCL_DECLARED
2311 #define Tcl_MutexFinalize_TCL_DECLARED
2312 /* 392 */
2313 EXTERN void Tcl_MutexFinalize(Tcl_Mutex *mutex);
2314 #endif
2315 #ifndef Tcl_CreateThread_TCL_DECLARED
2316 #define Tcl_CreateThread_TCL_DECLARED
2317 /* 393 */
2318 EXTERN int Tcl_CreateThread(Tcl_ThreadId *idPtr,
2319 Tcl_ThreadCreateProc proc,
2320 ClientData clientData, int stackSize,
2321 int flags);
2322 #endif
2323 #ifndef Tcl_ReadRaw_TCL_DECLARED
2324 #define Tcl_ReadRaw_TCL_DECLARED
2325 /* 394 */
2326 EXTERN int Tcl_ReadRaw(Tcl_Channel chan, char *dst,
2327 int bytesToRead);
2328 #endif
2329 #ifndef Tcl_WriteRaw_TCL_DECLARED
2330 #define Tcl_WriteRaw_TCL_DECLARED
2331 /* 395 */
2332 EXTERN int Tcl_WriteRaw(Tcl_Channel chan, CONST char *src,
2333 int srcLen);
2334 #endif
2335 #ifndef Tcl_GetTopChannel_TCL_DECLARED
2336 #define Tcl_GetTopChannel_TCL_DECLARED
2337 /* 396 */
2338 EXTERN Tcl_Channel Tcl_GetTopChannel(Tcl_Channel chan);
2339 #endif
2340 #ifndef Tcl_ChannelBuffered_TCL_DECLARED
2341 #define Tcl_ChannelBuffered_TCL_DECLARED
2342 /* 397 */
2343 EXTERN int Tcl_ChannelBuffered(Tcl_Channel chan);
2344 #endif
2345 #ifndef Tcl_ChannelName_TCL_DECLARED
2346 #define Tcl_ChannelName_TCL_DECLARED
2347 /* 398 */
2348 EXTERN CONST84_RETURN char * Tcl_ChannelName(
2349 CONST Tcl_ChannelType *chanTypePtr);
2350 #endif
2351 #ifndef Tcl_ChannelVersion_TCL_DECLARED
2352 #define Tcl_ChannelVersion_TCL_DECLARED
2353 /* 399 */
2354 EXTERN Tcl_ChannelTypeVersion Tcl_ChannelVersion(
2355 CONST Tcl_ChannelType *chanTypePtr);
2356 #endif
2357 #ifndef Tcl_ChannelBlockModeProc_TCL_DECLARED
2358 #define Tcl_ChannelBlockModeProc_TCL_DECLARED
2359 /* 400 */
2360 EXTERN Tcl_DriverBlockModeProc * Tcl_ChannelBlockModeProc(
2361 CONST Tcl_ChannelType *chanTypePtr);
2362 #endif
2363 #ifndef Tcl_ChannelCloseProc_TCL_DECLARED
2364 #define Tcl_ChannelCloseProc_TCL_DECLARED
2365 /* 401 */
2366 EXTERN Tcl_DriverCloseProc * Tcl_ChannelCloseProc(
2367 CONST Tcl_ChannelType *chanTypePtr);
2368 #endif
2369 #ifndef Tcl_ChannelClose2Proc_TCL_DECLARED
2370 #define Tcl_ChannelClose2Proc_TCL_DECLARED
2371 /* 402 */
2372 EXTERN Tcl_DriverClose2Proc * Tcl_ChannelClose2Proc(
2373 CONST Tcl_ChannelType *chanTypePtr);
2374 #endif
2375 #ifndef Tcl_ChannelInputProc_TCL_DECLARED
2376 #define Tcl_ChannelInputProc_TCL_DECLARED
2377 /* 403 */
2378 EXTERN Tcl_DriverInputProc * Tcl_ChannelInputProc(
2379 CONST Tcl_ChannelType *chanTypePtr);
2380 #endif
2381 #ifndef Tcl_ChannelOutputProc_TCL_DECLARED
2382 #define Tcl_ChannelOutputProc_TCL_DECLARED
2383 /* 404 */
2384 EXTERN Tcl_DriverOutputProc * Tcl_ChannelOutputProc(
2385 CONST Tcl_ChannelType *chanTypePtr);
2386 #endif
2387 #ifndef Tcl_ChannelSeekProc_TCL_DECLARED
2388 #define Tcl_ChannelSeekProc_TCL_DECLARED
2389 /* 405 */
2390 EXTERN Tcl_DriverSeekProc * Tcl_ChannelSeekProc(
2391 CONST Tcl_ChannelType *chanTypePtr);
2392 #endif
2393 #ifndef Tcl_ChannelSetOptionProc_TCL_DECLARED
2394 #define Tcl_ChannelSetOptionProc_TCL_DECLARED
2395 /* 406 */
2396 EXTERN Tcl_DriverSetOptionProc * Tcl_ChannelSetOptionProc(
2397 CONST Tcl_ChannelType *chanTypePtr);
2398 #endif
2399 #ifndef Tcl_ChannelGetOptionProc_TCL_DECLARED
2400 #define Tcl_ChannelGetOptionProc_TCL_DECLARED
2401 /* 407 */
2402 EXTERN Tcl_DriverGetOptionProc * Tcl_ChannelGetOptionProc(
2403 CONST Tcl_ChannelType *chanTypePtr);
2404 #endif
2405 #ifndef Tcl_ChannelWatchProc_TCL_DECLARED
2406 #define Tcl_ChannelWatchProc_TCL_DECLARED
2407 /* 408 */
2408 EXTERN Tcl_DriverWatchProc * Tcl_ChannelWatchProc(
2409 CONST Tcl_ChannelType *chanTypePtr);
2410 #endif
2411 #ifndef Tcl_ChannelGetHandleProc_TCL_DECLARED
2412 #define Tcl_ChannelGetHandleProc_TCL_DECLARED
2413 /* 409 */
2414 EXTERN Tcl_DriverGetHandleProc * Tcl_ChannelGetHandleProc(
2415 CONST Tcl_ChannelType *chanTypePtr);
2416 #endif
2417 #ifndef Tcl_ChannelFlushProc_TCL_DECLARED
2418 #define Tcl_ChannelFlushProc_TCL_DECLARED
2419 /* 410 */
2420 EXTERN Tcl_DriverFlushProc * Tcl_ChannelFlushProc(
2421 CONST Tcl_ChannelType *chanTypePtr);
2422 #endif
2423 #ifndef Tcl_ChannelHandlerProc_TCL_DECLARED
2424 #define Tcl_ChannelHandlerProc_TCL_DECLARED
2425 /* 411 */
2426 EXTERN Tcl_DriverHandlerProc * Tcl_ChannelHandlerProc(
2427 CONST Tcl_ChannelType *chanTypePtr);
2428 #endif
2429 #ifndef Tcl_JoinThread_TCL_DECLARED
2430 #define Tcl_JoinThread_TCL_DECLARED
2431 /* 412 */
2432 EXTERN int Tcl_JoinThread(Tcl_ThreadId threadId, int *result);
2433 #endif
2434 #ifndef Tcl_IsChannelShared_TCL_DECLARED
2435 #define Tcl_IsChannelShared_TCL_DECLARED
2436 /* 413 */
2437 EXTERN int Tcl_IsChannelShared(Tcl_Channel channel);
2438 #endif
2439 #ifndef Tcl_IsChannelRegistered_TCL_DECLARED
2440 #define Tcl_IsChannelRegistered_TCL_DECLARED
2441 /* 414 */
2442 EXTERN int Tcl_IsChannelRegistered(Tcl_Interp *interp,
2443 Tcl_Channel channel);
2444 #endif
2445 #ifndef Tcl_CutChannel_TCL_DECLARED
2446 #define Tcl_CutChannel_TCL_DECLARED
2447 /* 415 */
2448 EXTERN void Tcl_CutChannel(Tcl_Channel channel);
2449 #endif
2450 #ifndef Tcl_SpliceChannel_TCL_DECLARED
2451 #define Tcl_SpliceChannel_TCL_DECLARED
2452 /* 416 */
2453 EXTERN void Tcl_SpliceChannel(Tcl_Channel channel);
2454 #endif
2455 #ifndef Tcl_ClearChannelHandlers_TCL_DECLARED
2456 #define Tcl_ClearChannelHandlers_TCL_DECLARED
2457 /* 417 */
2458 EXTERN void Tcl_ClearChannelHandlers(Tcl_Channel channel);
2459 #endif
2460 #ifndef Tcl_IsChannelExisting_TCL_DECLARED
2461 #define Tcl_IsChannelExisting_TCL_DECLARED
2462 /* 418 */
2463 EXTERN int Tcl_IsChannelExisting(CONST char *channelName);
2464 #endif
2465 #ifndef Tcl_UniCharNcasecmp_TCL_DECLARED
2466 #define Tcl_UniCharNcasecmp_TCL_DECLARED
2467 /* 419 */
2468 EXTERN int Tcl_UniCharNcasecmp(CONST Tcl_UniChar *ucs,
2469 CONST Tcl_UniChar *uct,
2470 unsigned long numChars);
2471 #endif
2472 #ifndef Tcl_UniCharCaseMatch_TCL_DECLARED
2473 #define Tcl_UniCharCaseMatch_TCL_DECLARED
2474 /* 420 */
2475 EXTERN int Tcl_UniCharCaseMatch(CONST Tcl_UniChar *uniStr,
2476 CONST Tcl_UniChar *uniPattern, int nocase);
2477 #endif
2478 #ifndef Tcl_FindHashEntry_TCL_DECLARED
2479 #define Tcl_FindHashEntry_TCL_DECLARED
2480 /* 421 */
2481 EXTERN Tcl_HashEntry * Tcl_FindHashEntry(Tcl_HashTable *tablePtr,
2482 CONST char *key);
2483 #endif
2484 #ifndef Tcl_CreateHashEntry_TCL_DECLARED
2485 #define Tcl_CreateHashEntry_TCL_DECLARED
2486 /* 422 */
2487 EXTERN Tcl_HashEntry * Tcl_CreateHashEntry(Tcl_HashTable *tablePtr,
2488 CONST char *key, int *newPtr);
2489 #endif
2490 #ifndef Tcl_InitCustomHashTable_TCL_DECLARED
2491 #define Tcl_InitCustomHashTable_TCL_DECLARED
2492 /* 423 */
2493 EXTERN void Tcl_InitCustomHashTable(Tcl_HashTable *tablePtr,
2494 int keyType, Tcl_HashKeyType *typePtr);
2495 #endif
2496 #ifndef Tcl_InitObjHashTable_TCL_DECLARED
2497 #define Tcl_InitObjHashTable_TCL_DECLARED
2498 /* 424 */
2499 EXTERN void Tcl_InitObjHashTable(Tcl_HashTable *tablePtr);
2500 #endif
2501 #ifndef Tcl_CommandTraceInfo_TCL_DECLARED
2502 #define Tcl_CommandTraceInfo_TCL_DECLARED
2503 /* 425 */
2504 EXTERN ClientData Tcl_CommandTraceInfo(Tcl_Interp *interp,
2505 CONST char *varName, int flags,
2506 Tcl_CommandTraceProc *procPtr,
2507 ClientData prevClientData);
2508 #endif
2509 #ifndef Tcl_TraceCommand_TCL_DECLARED
2510 #define Tcl_TraceCommand_TCL_DECLARED
2511 /* 426 */
2512 EXTERN int Tcl_TraceCommand(Tcl_Interp *interp,
2513 CONST char *varName, int flags,
2514 Tcl_CommandTraceProc *proc,
2515 ClientData clientData);
2516 #endif
2517 #ifndef Tcl_UntraceCommand_TCL_DECLARED
2518 #define Tcl_UntraceCommand_TCL_DECLARED
2519 /* 427 */
2520 EXTERN void Tcl_UntraceCommand(Tcl_Interp *interp,
2521 CONST char *varName, int flags,
2522 Tcl_CommandTraceProc *proc,
2523 ClientData clientData);
2524 #endif
2525 #ifndef Tcl_AttemptAlloc_TCL_DECLARED
2526 #define Tcl_AttemptAlloc_TCL_DECLARED
2527 /* 428 */
2528 EXTERN char * Tcl_AttemptAlloc(unsigned int size);
2529 #endif
2530 #ifndef Tcl_AttemptDbCkalloc_TCL_DECLARED
2531 #define Tcl_AttemptDbCkalloc_TCL_DECLARED
2532 /* 429 */
2533 EXTERN char * Tcl_AttemptDbCkalloc(unsigned int size,
2534 CONST char *file, int line);
2535 #endif
2536 #ifndef Tcl_AttemptRealloc_TCL_DECLARED
2537 #define Tcl_AttemptRealloc_TCL_DECLARED
2538 /* 430 */
2539 EXTERN char * Tcl_AttemptRealloc(char *ptr, unsigned int size);
2540 #endif
2541 #ifndef Tcl_AttemptDbCkrealloc_TCL_DECLARED
2542 #define Tcl_AttemptDbCkrealloc_TCL_DECLARED
2543 /* 431 */
2544 EXTERN char * Tcl_AttemptDbCkrealloc(char *ptr, unsigned int size,
2545 CONST char *file, int line);
2546 #endif
2547 #ifndef Tcl_AttemptSetObjLength_TCL_DECLARED
2548 #define Tcl_AttemptSetObjLength_TCL_DECLARED
2549 /* 432 */
2550 EXTERN int Tcl_AttemptSetObjLength(Tcl_Obj *objPtr, int length);
2551 #endif
2552 #ifndef Tcl_GetChannelThread_TCL_DECLARED
2553 #define Tcl_GetChannelThread_TCL_DECLARED
2554 /* 433 */
2555 EXTERN Tcl_ThreadId Tcl_GetChannelThread(Tcl_Channel channel);
2556 #endif
2557 #ifndef Tcl_GetUnicodeFromObj_TCL_DECLARED
2558 #define Tcl_GetUnicodeFromObj_TCL_DECLARED
2559 /* 434 */
2560 EXTERN Tcl_UniChar * Tcl_GetUnicodeFromObj(Tcl_Obj *objPtr,
2561 int *lengthPtr);
2562 #endif
2563 #ifndef Tcl_GetMathFuncInfo_TCL_DECLARED
2564 #define Tcl_GetMathFuncInfo_TCL_DECLARED
2565 /* 435 */
2566 EXTERN int Tcl_GetMathFuncInfo(Tcl_Interp *interp,
2567 CONST char *name, int *numArgsPtr,
2568 Tcl_ValueType **argTypesPtr,
2569 Tcl_MathProc **procPtr,
2570 ClientData *clientDataPtr);
2571 #endif
2572 #ifndef Tcl_ListMathFuncs_TCL_DECLARED
2573 #define Tcl_ListMathFuncs_TCL_DECLARED
2574 /* 436 */
2575 EXTERN Tcl_Obj * Tcl_ListMathFuncs(Tcl_Interp *interp,
2576 CONST char *pattern);
2577 #endif
2578 #ifndef Tcl_SubstObj_TCL_DECLARED
2579 #define Tcl_SubstObj_TCL_DECLARED
2580 /* 437 */
2581 EXTERN Tcl_Obj * Tcl_SubstObj(Tcl_Interp *interp, Tcl_Obj *objPtr,
2582 int flags);
2583 #endif
2584 #ifndef Tcl_DetachChannel_TCL_DECLARED
2585 #define Tcl_DetachChannel_TCL_DECLARED
2586 /* 438 */
2587 EXTERN int Tcl_DetachChannel(Tcl_Interp *interp,
2588 Tcl_Channel channel);
2589 #endif
2590 #ifndef Tcl_IsStandardChannel_TCL_DECLARED
2591 #define Tcl_IsStandardChannel_TCL_DECLARED
2592 /* 439 */
2593 EXTERN int Tcl_IsStandardChannel(Tcl_Channel channel);
2594 #endif
2595 #ifndef Tcl_FSCopyFile_TCL_DECLARED
2596 #define Tcl_FSCopyFile_TCL_DECLARED
2597 /* 440 */
2598 EXTERN int Tcl_FSCopyFile(Tcl_Obj *srcPathPtr,
2599 Tcl_Obj *destPathPtr);
2600 #endif
2601 #ifndef Tcl_FSCopyDirectory_TCL_DECLARED
2602 #define Tcl_FSCopyDirectory_TCL_DECLARED
2603 /* 441 */
2604 EXTERN int Tcl_FSCopyDirectory(Tcl_Obj *srcPathPtr,
2605 Tcl_Obj *destPathPtr, Tcl_Obj **errorPtr);
2606 #endif
2607 #ifndef Tcl_FSCreateDirectory_TCL_DECLARED
2608 #define Tcl_FSCreateDirectory_TCL_DECLARED
2609 /* 442 */
2610 EXTERN int Tcl_FSCreateDirectory(Tcl_Obj *pathPtr);
2611 #endif
2612 #ifndef Tcl_FSDeleteFile_TCL_DECLARED
2613 #define Tcl_FSDeleteFile_TCL_DECLARED
2614 /* 443 */
2615 EXTERN int Tcl_FSDeleteFile(Tcl_Obj *pathPtr);
2616 #endif
2617 #ifndef Tcl_FSLoadFile_TCL_DECLARED
2618 #define Tcl_FSLoadFile_TCL_DECLARED
2619 /* 444 */
2620 EXTERN int Tcl_FSLoadFile(Tcl_Interp *interp, Tcl_Obj *pathPtr,
2621 CONST char *sym1, CONST char *sym2,
2622 Tcl_PackageInitProc **proc1Ptr,
2623 Tcl_PackageInitProc **proc2Ptr,
2624 Tcl_LoadHandle *handlePtr,
2625 Tcl_FSUnloadFileProc **unloadProcPtr);
2626 #endif
2627 #ifndef Tcl_FSMatchInDirectory_TCL_DECLARED
2628 #define Tcl_FSMatchInDirectory_TCL_DECLARED
2629 /* 445 */
2630 EXTERN int Tcl_FSMatchInDirectory(Tcl_Interp *interp,
2631 Tcl_Obj *result, Tcl_Obj *pathPtr,
2632 CONST char *pattern, Tcl_GlobTypeData *types);
2633 #endif
2634 #ifndef Tcl_FSLink_TCL_DECLARED
2635 #define Tcl_FSLink_TCL_DECLARED
2636 /* 446 */
2637 EXTERN Tcl_Obj * Tcl_FSLink(Tcl_Obj *pathPtr, Tcl_Obj *toPtr,
2638 int linkAction);
2639 #endif
2640 #ifndef Tcl_FSRemoveDirectory_TCL_DECLARED
2641 #define Tcl_FSRemoveDirectory_TCL_DECLARED
2642 /* 447 */
2643 EXTERN int Tcl_FSRemoveDirectory(Tcl_Obj *pathPtr,
2644 int recursive, Tcl_Obj **errorPtr);
2645 #endif
2646 #ifndef Tcl_FSRenameFile_TCL_DECLARED
2647 #define Tcl_FSRenameFile_TCL_DECLARED
2648 /* 448 */
2649 EXTERN int Tcl_FSRenameFile(Tcl_Obj *srcPathPtr,
2650 Tcl_Obj *destPathPtr);
2651 #endif
2652 #ifndef Tcl_FSLstat_TCL_DECLARED
2653 #define Tcl_FSLstat_TCL_DECLARED
2654 /* 449 */
2655 EXTERN int Tcl_FSLstat(Tcl_Obj *pathPtr, Tcl_StatBuf *buf);
2656 #endif
2657 #ifndef Tcl_FSUtime_TCL_DECLARED
2658 #define Tcl_FSUtime_TCL_DECLARED
2659 /* 450 */
2660 EXTERN int Tcl_FSUtime(Tcl_Obj *pathPtr, struct utimbuf *tval);
2661 #endif
2662 #ifndef Tcl_FSFileAttrsGet_TCL_DECLARED
2663 #define Tcl_FSFileAttrsGet_TCL_DECLARED
2664 /* 451 */
2665 EXTERN int Tcl_FSFileAttrsGet(Tcl_Interp *interp, int index,
2666 Tcl_Obj *pathPtr, Tcl_Obj **objPtrRef);
2667 #endif
2668 #ifndef Tcl_FSFileAttrsSet_TCL_DECLARED
2669 #define Tcl_FSFileAttrsSet_TCL_DECLARED
2670 /* 452 */
2671 EXTERN int Tcl_FSFileAttrsSet(Tcl_Interp *interp, int index,
2672 Tcl_Obj *pathPtr, Tcl_Obj *objPtr);
2673 #endif
2674 #ifndef Tcl_FSFileAttrStrings_TCL_DECLARED
2675 #define Tcl_FSFileAttrStrings_TCL_DECLARED
2676 /* 453 */
2677 EXTERN CONST char ** Tcl_FSFileAttrStrings(Tcl_Obj *pathPtr,
2678 Tcl_Obj **objPtrRef);
2679 #endif
2680 #ifndef Tcl_FSStat_TCL_DECLARED
2681 #define Tcl_FSStat_TCL_DECLARED
2682 /* 454 */
2683 EXTERN int Tcl_FSStat(Tcl_Obj *pathPtr, Tcl_StatBuf *buf);
2684 #endif
2685 #ifndef Tcl_FSAccess_TCL_DECLARED
2686 #define Tcl_FSAccess_TCL_DECLARED
2687 /* 455 */
2688 EXTERN int Tcl_FSAccess(Tcl_Obj *pathPtr, int mode);
2689 #endif
2690 #ifndef Tcl_FSOpenFileChannel_TCL_DECLARED
2691 #define Tcl_FSOpenFileChannel_TCL_DECLARED
2692 /* 456 */
2693 EXTERN Tcl_Channel Tcl_FSOpenFileChannel(Tcl_Interp *interp,
2694 Tcl_Obj *pathPtr, CONST char *modeString,
2695 int permissions);
2696 #endif
2697 #ifndef Tcl_FSGetCwd_TCL_DECLARED
2698 #define Tcl_FSGetCwd_TCL_DECLARED
2699 /* 457 */
2700 EXTERN Tcl_Obj * Tcl_FSGetCwd(Tcl_Interp *interp);
2701 #endif
2702 #ifndef Tcl_FSChdir_TCL_DECLARED
2703 #define Tcl_FSChdir_TCL_DECLARED
2704 /* 458 */
2705 EXTERN int Tcl_FSChdir(Tcl_Obj *pathPtr);
2706 #endif
2707 #ifndef Tcl_FSConvertToPathType_TCL_DECLARED
2708 #define Tcl_FSConvertToPathType_TCL_DECLARED
2709 /* 459 */
2710 EXTERN int Tcl_FSConvertToPathType(Tcl_Interp *interp,
2711 Tcl_Obj *pathPtr);
2712 #endif
2713 #ifndef Tcl_FSJoinPath_TCL_DECLARED
2714 #define Tcl_FSJoinPath_TCL_DECLARED
2715 /* 460 */
2716 EXTERN Tcl_Obj * Tcl_FSJoinPath(Tcl_Obj *listObj, int elements);
2717 #endif
2718 #ifndef Tcl_FSSplitPath_TCL_DECLARED
2719 #define Tcl_FSSplitPath_TCL_DECLARED
2720 /* 461 */
2721 EXTERN Tcl_Obj * Tcl_FSSplitPath(Tcl_Obj *pathPtr, int *lenPtr);
2722 #endif
2723 #ifndef Tcl_FSEqualPaths_TCL_DECLARED
2724 #define Tcl_FSEqualPaths_TCL_DECLARED
2725 /* 462 */
2726 EXTERN int Tcl_FSEqualPaths(Tcl_Obj *firstPtr,
2727 Tcl_Obj *secondPtr);
2728 #endif
2729 #ifndef Tcl_FSGetNormalizedPath_TCL_DECLARED
2730 #define Tcl_FSGetNormalizedPath_TCL_DECLARED
2731 /* 463 */
2732 EXTERN Tcl_Obj * Tcl_FSGetNormalizedPath(Tcl_Interp *interp,
2733 Tcl_Obj *pathPtr);
2734 #endif
2735 #ifndef Tcl_FSJoinToPath_TCL_DECLARED
2736 #define Tcl_FSJoinToPath_TCL_DECLARED
2737 /* 464 */
2738 EXTERN Tcl_Obj * Tcl_FSJoinToPath(Tcl_Obj *pathPtr, int objc,
2739 Tcl_Obj *CONST objv[]);
2740 #endif
2741 #ifndef Tcl_FSGetInternalRep_TCL_DECLARED
2742 #define Tcl_FSGetInternalRep_TCL_DECLARED
2743 /* 465 */
2744 EXTERN ClientData Tcl_FSGetInternalRep(Tcl_Obj *pathPtr,
2745 Tcl_Filesystem *fsPtr);
2746 #endif
2747 #ifndef Tcl_FSGetTranslatedPath_TCL_DECLARED
2748 #define Tcl_FSGetTranslatedPath_TCL_DECLARED
2749 /* 466 */
2750 EXTERN Tcl_Obj * Tcl_FSGetTranslatedPath(Tcl_Interp *interp,
2751 Tcl_Obj *pathPtr);
2752 #endif
2753 #ifndef Tcl_FSEvalFile_TCL_DECLARED
2754 #define Tcl_FSEvalFile_TCL_DECLARED
2755 /* 467 */
2756 EXTERN int Tcl_FSEvalFile(Tcl_Interp *interp, Tcl_Obj *fileName);
2757 #endif
2758 #ifndef Tcl_FSNewNativePath_TCL_DECLARED
2759 #define Tcl_FSNewNativePath_TCL_DECLARED
2760 /* 468 */
2761 EXTERN Tcl_Obj * Tcl_FSNewNativePath(Tcl_Filesystem *fromFilesystem,
2762 ClientData clientData);
2763 #endif
2764 #ifndef Tcl_FSGetNativePath_TCL_DECLARED
2765 #define Tcl_FSGetNativePath_TCL_DECLARED
2766 /* 469 */
2767 EXTERN CONST char * Tcl_FSGetNativePath(Tcl_Obj *pathPtr);
2768 #endif
2769 #ifndef Tcl_FSFileSystemInfo_TCL_DECLARED
2770 #define Tcl_FSFileSystemInfo_TCL_DECLARED
2771 /* 470 */
2772 EXTERN Tcl_Obj * Tcl_FSFileSystemInfo(Tcl_Obj *pathPtr);
2773 #endif
2774 #ifndef Tcl_FSPathSeparator_TCL_DECLARED
2775 #define Tcl_FSPathSeparator_TCL_DECLARED
2776 /* 471 */
2777 EXTERN Tcl_Obj * Tcl_FSPathSeparator(Tcl_Obj *pathPtr);
2778 #endif
2779 #ifndef Tcl_FSListVolumes_TCL_DECLARED
2780 #define Tcl_FSListVolumes_TCL_DECLARED
2781 /* 472 */
2782 EXTERN Tcl_Obj * Tcl_FSListVolumes(void);
2783 #endif
2784 #ifndef Tcl_FSRegister_TCL_DECLARED
2785 #define Tcl_FSRegister_TCL_DECLARED
2786 /* 473 */
2787 EXTERN int Tcl_FSRegister(ClientData clientData,
2788 Tcl_Filesystem *fsPtr);
2789 #endif
2790 #ifndef Tcl_FSUnregister_TCL_DECLARED
2791 #define Tcl_FSUnregister_TCL_DECLARED
2792 /* 474 */
2793 EXTERN int Tcl_FSUnregister(Tcl_Filesystem *fsPtr);
2794 #endif
2795 #ifndef Tcl_FSData_TCL_DECLARED
2796 #define Tcl_FSData_TCL_DECLARED
2797 /* 475 */
2798 EXTERN ClientData Tcl_FSData(Tcl_Filesystem *fsPtr);
2799 #endif
2800 #ifndef Tcl_FSGetTranslatedStringPath_TCL_DECLARED
2801 #define Tcl_FSGetTranslatedStringPath_TCL_DECLARED
2802 /* 476 */
2803 EXTERN CONST char * Tcl_FSGetTranslatedStringPath(Tcl_Interp *interp,
2804 Tcl_Obj *pathPtr);
2805 #endif
2806 #ifndef Tcl_FSGetFileSystemForPath_TCL_DECLARED
2807 #define Tcl_FSGetFileSystemForPath_TCL_DECLARED
2808 /* 477 */
2809 EXTERN Tcl_Filesystem * Tcl_FSGetFileSystemForPath(Tcl_Obj *pathPtr);
2810 #endif
2811 #ifndef Tcl_FSGetPathType_TCL_DECLARED
2812 #define Tcl_FSGetPathType_TCL_DECLARED
2813 /* 478 */
2814 EXTERN Tcl_PathType Tcl_FSGetPathType(Tcl_Obj *pathPtr);
2815 #endif
2816 #ifndef Tcl_OutputBuffered_TCL_DECLARED
2817 #define Tcl_OutputBuffered_TCL_DECLARED
2818 /* 479 */
2819 EXTERN int Tcl_OutputBuffered(Tcl_Channel chan);
2820 #endif
2821 #ifndef Tcl_FSMountsChanged_TCL_DECLARED
2822 #define Tcl_FSMountsChanged_TCL_DECLARED
2823 /* 480 */
2824 EXTERN void Tcl_FSMountsChanged(Tcl_Filesystem *fsPtr);
2825 #endif
2826 #ifndef Tcl_EvalTokensStandard_TCL_DECLARED
2827 #define Tcl_EvalTokensStandard_TCL_DECLARED
2828 /* 481 */
2829 EXTERN int Tcl_EvalTokensStandard(Tcl_Interp *interp,
2830 Tcl_Token *tokenPtr, int count);
2831 #endif
2832 #ifndef Tcl_GetTime_TCL_DECLARED
2833 #define Tcl_GetTime_TCL_DECLARED
2834 /* 482 */
2835 EXTERN void Tcl_GetTime(Tcl_Time *timeBuf);
2836 #endif
2837 #ifndef Tcl_CreateObjTrace_TCL_DECLARED
2838 #define Tcl_CreateObjTrace_TCL_DECLARED
2839 /* 483 */
2840 EXTERN Tcl_Trace Tcl_CreateObjTrace(Tcl_Interp *interp, int level,
2841 int flags, Tcl_CmdObjTraceProc *objProc,
2842 ClientData clientData,
2843 Tcl_CmdObjTraceDeleteProc *delProc);
2844 #endif
2845 #ifndef Tcl_GetCommandInfoFromToken_TCL_DECLARED
2846 #define Tcl_GetCommandInfoFromToken_TCL_DECLARED
2847 /* 484 */
2848 EXTERN int Tcl_GetCommandInfoFromToken(Tcl_Command token,
2849 Tcl_CmdInfo *infoPtr);
2850 #endif
2851 #ifndef Tcl_SetCommandInfoFromToken_TCL_DECLARED
2852 #define Tcl_SetCommandInfoFromToken_TCL_DECLARED
2853 /* 485 */
2854 EXTERN int Tcl_SetCommandInfoFromToken(Tcl_Command token,
2855 CONST Tcl_CmdInfo *infoPtr);
2856 #endif
2857 #ifndef Tcl_DbNewWideIntObj_TCL_DECLARED
2858 #define Tcl_DbNewWideIntObj_TCL_DECLARED
2859 /* 486 */
2860 EXTERN Tcl_Obj * Tcl_DbNewWideIntObj(Tcl_WideInt wideValue,
2861 CONST char *file, int line);
2862 #endif
2863 #ifndef Tcl_GetWideIntFromObj_TCL_DECLARED
2864 #define Tcl_GetWideIntFromObj_TCL_DECLARED
2865 /* 487 */
2866 EXTERN int Tcl_GetWideIntFromObj(Tcl_Interp *interp,
2867 Tcl_Obj *objPtr, Tcl_WideInt *widePtr);
2868 #endif
2869 #ifndef Tcl_NewWideIntObj_TCL_DECLARED
2870 #define Tcl_NewWideIntObj_TCL_DECLARED
2871 /* 488 */
2872 EXTERN Tcl_Obj * Tcl_NewWideIntObj(Tcl_WideInt wideValue);
2873 #endif
2874 #ifndef Tcl_SetWideIntObj_TCL_DECLARED
2875 #define Tcl_SetWideIntObj_TCL_DECLARED
2876 /* 489 */
2877 EXTERN void Tcl_SetWideIntObj(Tcl_Obj *objPtr,
2878 Tcl_WideInt wideValue);
2879 #endif
2880 #ifndef Tcl_AllocStatBuf_TCL_DECLARED
2881 #define Tcl_AllocStatBuf_TCL_DECLARED
2882 /* 490 */
2883 EXTERN Tcl_StatBuf * Tcl_AllocStatBuf(void);
2884 #endif
2885 #ifndef Tcl_Seek_TCL_DECLARED
2886 #define Tcl_Seek_TCL_DECLARED
2887 /* 491 */
2888 EXTERN Tcl_WideInt Tcl_Seek(Tcl_Channel chan, Tcl_WideInt offset,
2889 int mode);
2890 #endif
2891 #ifndef Tcl_Tell_TCL_DECLARED
2892 #define Tcl_Tell_TCL_DECLARED
2893 /* 492 */
2894 EXTERN Tcl_WideInt Tcl_Tell(Tcl_Channel chan);
2895 #endif
2896 #ifndef Tcl_ChannelWideSeekProc_TCL_DECLARED
2897 #define Tcl_ChannelWideSeekProc_TCL_DECLARED
2898 /* 493 */
2899 EXTERN Tcl_DriverWideSeekProc * Tcl_ChannelWideSeekProc(
2900 CONST Tcl_ChannelType *chanTypePtr);
2901 #endif
2902 #ifndef Tcl_DictObjPut_TCL_DECLARED
2903 #define Tcl_DictObjPut_TCL_DECLARED
2904 /* 494 */
2905 EXTERN int Tcl_DictObjPut(Tcl_Interp *interp, Tcl_Obj *dictPtr,
2906 Tcl_Obj *keyPtr, Tcl_Obj *valuePtr);
2907 #endif
2908 #ifndef Tcl_DictObjGet_TCL_DECLARED
2909 #define Tcl_DictObjGet_TCL_DECLARED
2910 /* 495 */
2911 EXTERN int Tcl_DictObjGet(Tcl_Interp *interp, Tcl_Obj *dictPtr,
2912 Tcl_Obj *keyPtr, Tcl_Obj **valuePtrPtr);
2913 #endif
2914 #ifndef Tcl_DictObjRemove_TCL_DECLARED
2915 #define Tcl_DictObjRemove_TCL_DECLARED
2916 /* 496 */
2917 EXTERN int Tcl_DictObjRemove(Tcl_Interp *interp,
2918 Tcl_Obj *dictPtr, Tcl_Obj *keyPtr);
2919 #endif
2920 #ifndef Tcl_DictObjSize_TCL_DECLARED
2921 #define Tcl_DictObjSize_TCL_DECLARED
2922 /* 497 */
2923 EXTERN int Tcl_DictObjSize(Tcl_Interp *interp, Tcl_Obj *dictPtr,
2924 int *sizePtr);
2925 #endif
2926 #ifndef Tcl_DictObjFirst_TCL_DECLARED
2927 #define Tcl_DictObjFirst_TCL_DECLARED
2928 /* 498 */
2929 EXTERN int Tcl_DictObjFirst(Tcl_Interp *interp,
2930 Tcl_Obj *dictPtr, Tcl_DictSearch *searchPtr,
2931 Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr,
2932 int *donePtr);
2933 #endif
2934 #ifndef Tcl_DictObjNext_TCL_DECLARED
2935 #define Tcl_DictObjNext_TCL_DECLARED
2936 /* 499 */
2937 EXTERN void Tcl_DictObjNext(Tcl_DictSearch *searchPtr,
2938 Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr,
2939 int *donePtr);
2940 #endif
2941 #ifndef Tcl_DictObjDone_TCL_DECLARED
2942 #define Tcl_DictObjDone_TCL_DECLARED
2943 /* 500 */
2944 EXTERN void Tcl_DictObjDone(Tcl_DictSearch *searchPtr);
2945 #endif
2946 #ifndef Tcl_DictObjPutKeyList_TCL_DECLARED
2947 #define Tcl_DictObjPutKeyList_TCL_DECLARED
2948 /* 501 */
2949 EXTERN int Tcl_DictObjPutKeyList(Tcl_Interp *interp,
2950 Tcl_Obj *dictPtr, int keyc,
2951 Tcl_Obj *CONST *keyv, Tcl_Obj *valuePtr);
2952 #endif
2953 #ifndef Tcl_DictObjRemoveKeyList_TCL_DECLARED
2954 #define Tcl_DictObjRemoveKeyList_TCL_DECLARED
2955 /* 502 */
2956 EXTERN int Tcl_DictObjRemoveKeyList(Tcl_Interp *interp,
2957 Tcl_Obj *dictPtr, int keyc,
2958 Tcl_Obj *CONST *keyv);
2959 #endif
2960 #ifndef Tcl_NewDictObj_TCL_DECLARED
2961 #define Tcl_NewDictObj_TCL_DECLARED
2962 /* 503 */
2963 EXTERN Tcl_Obj * Tcl_NewDictObj(void);
2964 #endif
2965 #ifndef Tcl_DbNewDictObj_TCL_DECLARED
2966 #define Tcl_DbNewDictObj_TCL_DECLARED
2967 /* 504 */
2968 EXTERN Tcl_Obj * Tcl_DbNewDictObj(CONST char *file, int line);
2969 #endif
2970 #ifndef Tcl_RegisterConfig_TCL_DECLARED
2971 #define Tcl_RegisterConfig_TCL_DECLARED
2972 /* 505 */
2973 EXTERN void Tcl_RegisterConfig(Tcl_Interp *interp,
2974 CONST char *pkgName,
2975 Tcl_Config *configuration,
2976 CONST char *valEncoding);
2977 #endif
2978 #ifndef Tcl_CreateNamespace_TCL_DECLARED
2979 #define Tcl_CreateNamespace_TCL_DECLARED
2980 /* 506 */
2981 EXTERN Tcl_Namespace * Tcl_CreateNamespace(Tcl_Interp *interp,
2982 CONST char *name, ClientData clientData,
2983 Tcl_NamespaceDeleteProc *deleteProc);
2984 #endif
2985 #ifndef Tcl_DeleteNamespace_TCL_DECLARED
2986 #define Tcl_DeleteNamespace_TCL_DECLARED
2987 /* 507 */
2988 EXTERN void Tcl_DeleteNamespace(Tcl_Namespace *nsPtr);
2989 #endif
2990 #ifndef Tcl_AppendExportList_TCL_DECLARED
2991 #define Tcl_AppendExportList_TCL_DECLARED
2992 /* 508 */
2993 EXTERN int Tcl_AppendExportList(Tcl_Interp *interp,
2994 Tcl_Namespace *nsPtr, Tcl_Obj *objPtr);
2995 #endif
2996 #ifndef Tcl_Export_TCL_DECLARED
2997 #define Tcl_Export_TCL_DECLARED
2998 /* 509 */
2999 EXTERN int Tcl_Export(Tcl_Interp *interp, Tcl_Namespace *nsPtr,
3000 CONST char *pattern, int resetListFirst);
3001 #endif
3002 #ifndef Tcl_Import_TCL_DECLARED
3003 #define Tcl_Import_TCL_DECLARED
3004 /* 510 */
3005 EXTERN int Tcl_Import(Tcl_Interp *interp, Tcl_Namespace *nsPtr,
3006 CONST char *pattern, int allowOverwrite);
3007 #endif
3008 #ifndef Tcl_ForgetImport_TCL_DECLARED
3009 #define Tcl_ForgetImport_TCL_DECLARED
3010 /* 511 */
3011 EXTERN int Tcl_ForgetImport(Tcl_Interp *interp,
3012 Tcl_Namespace *nsPtr, CONST char *pattern);
3013 #endif
3014 #ifndef Tcl_GetCurrentNamespace_TCL_DECLARED
3015 #define Tcl_GetCurrentNamespace_TCL_DECLARED
3016 /* 512 */
3017 EXTERN Tcl_Namespace * Tcl_GetCurrentNamespace(Tcl_Interp *interp);
3018 #endif
3019 #ifndef Tcl_GetGlobalNamespace_TCL_DECLARED
3020 #define Tcl_GetGlobalNamespace_TCL_DECLARED
3021 /* 513 */
3022 EXTERN Tcl_Namespace * Tcl_GetGlobalNamespace(Tcl_Interp *interp);
3023 #endif
3024 #ifndef Tcl_FindNamespace_TCL_DECLARED
3025 #define Tcl_FindNamespace_TCL_DECLARED
3026 /* 514 */
3027 EXTERN Tcl_Namespace * Tcl_FindNamespace(Tcl_Interp *interp,
3028 CONST char *name,
3029 Tcl_Namespace *contextNsPtr, int flags);
3030 #endif
3031 #ifndef Tcl_FindCommand_TCL_DECLARED
3032 #define Tcl_FindCommand_TCL_DECLARED
3033 /* 515 */
3034 EXTERN Tcl_Command Tcl_FindCommand(Tcl_Interp *interp, CONST char *name,
3035 Tcl_Namespace *contextNsPtr, int flags);
3036 #endif
3037 #ifndef Tcl_GetCommandFromObj_TCL_DECLARED
3038 #define Tcl_GetCommandFromObj_TCL_DECLARED
3039 /* 516 */
3040 EXTERN Tcl_Command Tcl_GetCommandFromObj(Tcl_Interp *interp,
3041 Tcl_Obj *objPtr);
3042 #endif
3043 #ifndef Tcl_GetCommandFullName_TCL_DECLARED
3044 #define Tcl_GetCommandFullName_TCL_DECLARED
3045 /* 517 */
3046 EXTERN void Tcl_GetCommandFullName(Tcl_Interp *interp,
3047 Tcl_Command command, Tcl_Obj *objPtr);
3048 #endif
3049 #ifndef Tcl_FSEvalFileEx_TCL_DECLARED
3050 #define Tcl_FSEvalFileEx_TCL_DECLARED
3051 /* 518 */
3052 EXTERN int Tcl_FSEvalFileEx(Tcl_Interp *interp,
3053 Tcl_Obj *fileName, CONST char *encodingName);
3054 #endif
3055 #ifndef Tcl_SetExitProc_TCL_DECLARED
3056 #define Tcl_SetExitProc_TCL_DECLARED
3057 /* 519 */
3058 EXTERN Tcl_ExitProc * Tcl_SetExitProc(Tcl_ExitProc *proc);
3059 #endif
3060 #ifndef Tcl_LimitAddHandler_TCL_DECLARED
3061 #define Tcl_LimitAddHandler_TCL_DECLARED
3062 /* 520 */
3063 EXTERN void Tcl_LimitAddHandler(Tcl_Interp *interp, int type,
3064 Tcl_LimitHandlerProc *handlerProc,
3065 ClientData clientData,
3066 Tcl_LimitHandlerDeleteProc *deleteProc);
3067 #endif
3068 #ifndef Tcl_LimitRemoveHandler_TCL_DECLARED
3069 #define Tcl_LimitRemoveHandler_TCL_DECLARED
3070 /* 521 */
3071 EXTERN void Tcl_LimitRemoveHandler(Tcl_Interp *interp, int type,
3072 Tcl_LimitHandlerProc *handlerProc,
3073 ClientData clientData);
3074 #endif
3075 #ifndef Tcl_LimitReady_TCL_DECLARED
3076 #define Tcl_LimitReady_TCL_DECLARED
3077 /* 522 */
3078 EXTERN int Tcl_LimitReady(Tcl_Interp *interp);
3079 #endif
3080 #ifndef Tcl_LimitCheck_TCL_DECLARED
3081 #define Tcl_LimitCheck_TCL_DECLARED
3082 /* 523 */
3083 EXTERN int Tcl_LimitCheck(Tcl_Interp *interp);
3084 #endif
3085 #ifndef Tcl_LimitExceeded_TCL_DECLARED
3086 #define Tcl_LimitExceeded_TCL_DECLARED
3087 /* 524 */
3088 EXTERN int Tcl_LimitExceeded(Tcl_Interp *interp);
3089 #endif
3090 #ifndef Tcl_LimitSetCommands_TCL_DECLARED
3091 #define Tcl_LimitSetCommands_TCL_DECLARED
3092 /* 525 */
3093 EXTERN void Tcl_LimitSetCommands(Tcl_Interp *interp,
3094 int commandLimit);
3095 #endif
3096 #ifndef Tcl_LimitSetTime_TCL_DECLARED
3097 #define Tcl_LimitSetTime_TCL_DECLARED
3098 /* 526 */
3099 EXTERN void Tcl_LimitSetTime(Tcl_Interp *interp,
3100 Tcl_Time *timeLimitPtr);
3101 #endif
3102 #ifndef Tcl_LimitSetGranularity_TCL_DECLARED
3103 #define Tcl_LimitSetGranularity_TCL_DECLARED
3104 /* 527 */
3105 EXTERN void Tcl_LimitSetGranularity(Tcl_Interp *interp, int type,
3106 int granularity);
3107 #endif
3108 #ifndef Tcl_LimitTypeEnabled_TCL_DECLARED
3109 #define Tcl_LimitTypeEnabled_TCL_DECLARED
3110 /* 528 */
3111 EXTERN int Tcl_LimitTypeEnabled(Tcl_Interp *interp, int type);
3112 #endif
3113 #ifndef Tcl_LimitTypeExceeded_TCL_DECLARED
3114 #define Tcl_LimitTypeExceeded_TCL_DECLARED
3115 /* 529 */
3116 EXTERN int Tcl_LimitTypeExceeded(Tcl_Interp *interp, int type);
3117 #endif
3118 #ifndef Tcl_LimitTypeSet_TCL_DECLARED
3119 #define Tcl_LimitTypeSet_TCL_DECLARED
3120 /* 530 */
3121 EXTERN void Tcl_LimitTypeSet(Tcl_Interp *interp, int type);
3122 #endif
3123 #ifndef Tcl_LimitTypeReset_TCL_DECLARED
3124 #define Tcl_LimitTypeReset_TCL_DECLARED
3125 /* 531 */
3126 EXTERN void Tcl_LimitTypeReset(Tcl_Interp *interp, int type);
3127 #endif
3128 #ifndef Tcl_LimitGetCommands_TCL_DECLARED
3129 #define Tcl_LimitGetCommands_TCL_DECLARED
3130 /* 532 */
3131 EXTERN int Tcl_LimitGetCommands(Tcl_Interp *interp);
3132 #endif
3133 #ifndef Tcl_LimitGetTime_TCL_DECLARED
3134 #define Tcl_LimitGetTime_TCL_DECLARED
3135 /* 533 */
3136 EXTERN void Tcl_LimitGetTime(Tcl_Interp *interp,
3137 Tcl_Time *timeLimitPtr);
3138 #endif
3139 #ifndef Tcl_LimitGetGranularity_TCL_DECLARED
3140 #define Tcl_LimitGetGranularity_TCL_DECLARED
3141 /* 534 */
3142 EXTERN int Tcl_LimitGetGranularity(Tcl_Interp *interp, int type);
3143 #endif
3144 #ifndef Tcl_SaveInterpState_TCL_DECLARED
3145 #define Tcl_SaveInterpState_TCL_DECLARED
3146 /* 535 */
3147 EXTERN Tcl_InterpState Tcl_SaveInterpState(Tcl_Interp *interp, int status);
3148 #endif
3149 #ifndef Tcl_RestoreInterpState_TCL_DECLARED
3150 #define Tcl_RestoreInterpState_TCL_DECLARED
3151 /* 536 */
3152 EXTERN int Tcl_RestoreInterpState(Tcl_Interp *interp,
3153 Tcl_InterpState state);
3154 #endif
3155 #ifndef Tcl_DiscardInterpState_TCL_DECLARED
3156 #define Tcl_DiscardInterpState_TCL_DECLARED
3157 /* 537 */
3158 EXTERN void Tcl_DiscardInterpState(Tcl_InterpState state);
3159 #endif
3160 #ifndef Tcl_SetReturnOptions_TCL_DECLARED
3161 #define Tcl_SetReturnOptions_TCL_DECLARED
3162 /* 538 */
3163 EXTERN int Tcl_SetReturnOptions(Tcl_Interp *interp,
3164 Tcl_Obj *options);
3165 #endif
3166 #ifndef Tcl_GetReturnOptions_TCL_DECLARED
3167 #define Tcl_GetReturnOptions_TCL_DECLARED
3168 /* 539 */
3169 EXTERN Tcl_Obj * Tcl_GetReturnOptions(Tcl_Interp *interp, int result);
3170 #endif
3171 #ifndef Tcl_IsEnsemble_TCL_DECLARED
3172 #define Tcl_IsEnsemble_TCL_DECLARED
3173 /* 540 */
3174 EXTERN int Tcl_IsEnsemble(Tcl_Command token);
3175 #endif
3176 #ifndef Tcl_CreateEnsemble_TCL_DECLARED
3177 #define Tcl_CreateEnsemble_TCL_DECLARED
3178 /* 541 */
3179 EXTERN Tcl_Command Tcl_CreateEnsemble(Tcl_Interp *interp,
3180 CONST char *name,
3181 Tcl_Namespace *namespacePtr, int flags);
3182 #endif
3183 #ifndef Tcl_FindEnsemble_TCL_DECLARED
3184 #define Tcl_FindEnsemble_TCL_DECLARED
3185 /* 542 */
3186 EXTERN Tcl_Command Tcl_FindEnsemble(Tcl_Interp *interp,
3187 Tcl_Obj *cmdNameObj, int flags);
3188 #endif
3189 #ifndef Tcl_SetEnsembleSubcommandList_TCL_DECLARED
3190 #define Tcl_SetEnsembleSubcommandList_TCL_DECLARED
3191 /* 543 */
3192 EXTERN int Tcl_SetEnsembleSubcommandList(Tcl_Interp *interp,
3193 Tcl_Command token, Tcl_Obj *subcmdList);
3194 #endif
3195 #ifndef Tcl_SetEnsembleMappingDict_TCL_DECLARED
3196 #define Tcl_SetEnsembleMappingDict_TCL_DECLARED
3197 /* 544 */
3198 EXTERN int Tcl_SetEnsembleMappingDict(Tcl_Interp *interp,
3199 Tcl_Command token, Tcl_Obj *mapDict);
3200 #endif
3201 #ifndef Tcl_SetEnsembleUnknownHandler_TCL_DECLARED
3202 #define Tcl_SetEnsembleUnknownHandler_TCL_DECLARED
3203 /* 545 */
3204 EXTERN int Tcl_SetEnsembleUnknownHandler(Tcl_Interp *interp,
3205 Tcl_Command token, Tcl_Obj *unknownList);
3206 #endif
3207 #ifndef Tcl_SetEnsembleFlags_TCL_DECLARED
3208 #define Tcl_SetEnsembleFlags_TCL_DECLARED
3209 /* 546 */
3210 EXTERN int Tcl_SetEnsembleFlags(Tcl_Interp *interp,
3211 Tcl_Command token, int flags);
3212 #endif
3213 #ifndef Tcl_GetEnsembleSubcommandList_TCL_DECLARED
3214 #define Tcl_GetEnsembleSubcommandList_TCL_DECLARED
3215 /* 547 */
3216 EXTERN int Tcl_GetEnsembleSubcommandList(Tcl_Interp *interp,
3217 Tcl_Command token, Tcl_Obj **subcmdListPtr);
3218 #endif
3219 #ifndef Tcl_GetEnsembleMappingDict_TCL_DECLARED
3220 #define Tcl_GetEnsembleMappingDict_TCL_DECLARED
3221 /* 548 */
3222 EXTERN int Tcl_GetEnsembleMappingDict(Tcl_Interp *interp,
3223 Tcl_Command token, Tcl_Obj **mapDictPtr);
3224 #endif
3225 #ifndef Tcl_GetEnsembleUnknownHandler_TCL_DECLARED
3226 #define Tcl_GetEnsembleUnknownHandler_TCL_DECLARED
3227 /* 549 */
3228 EXTERN int Tcl_GetEnsembleUnknownHandler(Tcl_Interp *interp,
3229 Tcl_Command token, Tcl_Obj **unknownListPtr);
3230 #endif
3231 #ifndef Tcl_GetEnsembleFlags_TCL_DECLARED
3232 #define Tcl_GetEnsembleFlags_TCL_DECLARED
3233 /* 550 */
3234 EXTERN int Tcl_GetEnsembleFlags(Tcl_Interp *interp,
3235 Tcl_Command token, int *flagsPtr);
3236 #endif
3237 #ifndef Tcl_GetEnsembleNamespace_TCL_DECLARED
3238 #define Tcl_GetEnsembleNamespace_TCL_DECLARED
3239 /* 551 */
3240 EXTERN int Tcl_GetEnsembleNamespace(Tcl_Interp *interp,
3241 Tcl_Command token,
3242 Tcl_Namespace **namespacePtrPtr);
3243 #endif
3244 #ifndef Tcl_SetTimeProc_TCL_DECLARED
3245 #define Tcl_SetTimeProc_TCL_DECLARED
3246 /* 552 */
3247 EXTERN void Tcl_SetTimeProc(Tcl_GetTimeProc *getProc,
3248 Tcl_ScaleTimeProc *scaleProc,
3249 ClientData clientData);
3250 #endif
3251 #ifndef Tcl_QueryTimeProc_TCL_DECLARED
3252 #define Tcl_QueryTimeProc_TCL_DECLARED
3253 /* 553 */
3254 EXTERN void Tcl_QueryTimeProc(Tcl_GetTimeProc **getProc,
3255 Tcl_ScaleTimeProc **scaleProc,
3256 ClientData *clientData);
3257 #endif
3258 #ifndef Tcl_ChannelThreadActionProc_TCL_DECLARED
3259 #define Tcl_ChannelThreadActionProc_TCL_DECLARED
3260 /* 554 */
3261 EXTERN Tcl_DriverThreadActionProc * Tcl_ChannelThreadActionProc(
3262 CONST Tcl_ChannelType *chanTypePtr);
3263 #endif
3264 #ifndef Tcl_NewBignumObj_TCL_DECLARED
3265 #define Tcl_NewBignumObj_TCL_DECLARED
3266 /* 555 */
3267 EXTERN Tcl_Obj * Tcl_NewBignumObj(mp_int *value);
3268 #endif
3269 #ifndef Tcl_DbNewBignumObj_TCL_DECLARED
3270 #define Tcl_DbNewBignumObj_TCL_DECLARED
3271 /* 556 */
3272 EXTERN Tcl_Obj * Tcl_DbNewBignumObj(mp_int *value, CONST char *file,
3273 int line);
3274 #endif
3275 #ifndef Tcl_SetBignumObj_TCL_DECLARED
3276 #define Tcl_SetBignumObj_TCL_DECLARED
3277 /* 557 */
3278 EXTERN void Tcl_SetBignumObj(Tcl_Obj *obj, mp_int *value);
3279 #endif
3280 #ifndef Tcl_GetBignumFromObj_TCL_DECLARED
3281 #define Tcl_GetBignumFromObj_TCL_DECLARED
3282 /* 558 */
3283 EXTERN int Tcl_GetBignumFromObj(Tcl_Interp *interp,
3284 Tcl_Obj *obj, mp_int *value);
3285 #endif
3286 #ifndef Tcl_TakeBignumFromObj_TCL_DECLARED
3287 #define Tcl_TakeBignumFromObj_TCL_DECLARED
3288 /* 559 */
3289 EXTERN int Tcl_TakeBignumFromObj(Tcl_Interp *interp,
3290 Tcl_Obj *obj, mp_int *value);
3291 #endif
3292 #ifndef Tcl_TruncateChannel_TCL_DECLARED
3293 #define Tcl_TruncateChannel_TCL_DECLARED
3294 /* 560 */
3295 EXTERN int Tcl_TruncateChannel(Tcl_Channel chan,
3296 Tcl_WideInt length);
3297 #endif
3298 #ifndef Tcl_ChannelTruncateProc_TCL_DECLARED
3299 #define Tcl_ChannelTruncateProc_TCL_DECLARED
3300 /* 561 */
3301 EXTERN Tcl_DriverTruncateProc * Tcl_ChannelTruncateProc(
3302 CONST Tcl_ChannelType *chanTypePtr);
3303 #endif
3304 #ifndef Tcl_SetChannelErrorInterp_TCL_DECLARED
3305 #define Tcl_SetChannelErrorInterp_TCL_DECLARED
3306 /* 562 */
3307 EXTERN void Tcl_SetChannelErrorInterp(Tcl_Interp *interp,
3308 Tcl_Obj *msg);
3309 #endif
3310 #ifndef Tcl_GetChannelErrorInterp_TCL_DECLARED
3311 #define Tcl_GetChannelErrorInterp_TCL_DECLARED
3312 /* 563 */
3313 EXTERN void Tcl_GetChannelErrorInterp(Tcl_Interp *interp,
3314 Tcl_Obj **msg);
3315 #endif
3316 #ifndef Tcl_SetChannelError_TCL_DECLARED
3317 #define Tcl_SetChannelError_TCL_DECLARED
3318 /* 564 */
3319 EXTERN void Tcl_SetChannelError(Tcl_Channel chan, Tcl_Obj *msg);
3320 #endif
3321 #ifndef Tcl_GetChannelError_TCL_DECLARED
3322 #define Tcl_GetChannelError_TCL_DECLARED
3323 /* 565 */
3324 EXTERN void Tcl_GetChannelError(Tcl_Channel chan, Tcl_Obj **msg);
3325 #endif
3326 #ifndef Tcl_InitBignumFromDouble_TCL_DECLARED
3327 #define Tcl_InitBignumFromDouble_TCL_DECLARED
3328 /* 566 */
3329 EXTERN int Tcl_InitBignumFromDouble(Tcl_Interp *interp,
3330 double initval, mp_int *toInit);
3331 #endif
3332 #ifndef Tcl_GetNamespaceUnknownHandler_TCL_DECLARED
3333 #define Tcl_GetNamespaceUnknownHandler_TCL_DECLARED
3334 /* 567 */
3335 EXTERN Tcl_Obj * Tcl_GetNamespaceUnknownHandler(Tcl_Interp *interp,
3336 Tcl_Namespace *nsPtr);
3337 #endif
3338 #ifndef Tcl_SetNamespaceUnknownHandler_TCL_DECLARED
3339 #define Tcl_SetNamespaceUnknownHandler_TCL_DECLARED
3340 /* 568 */
3341 EXTERN int Tcl_SetNamespaceUnknownHandler(Tcl_Interp *interp,
3342 Tcl_Namespace *nsPtr, Tcl_Obj *handlerPtr);
3343 #endif
3344 #ifndef Tcl_GetEncodingFromObj_TCL_DECLARED
3345 #define Tcl_GetEncodingFromObj_TCL_DECLARED
3346 /* 569 */
3347 EXTERN int Tcl_GetEncodingFromObj(Tcl_Interp *interp,
3348 Tcl_Obj *objPtr, Tcl_Encoding *encodingPtr);
3349 #endif
3350 #ifndef Tcl_GetEncodingSearchPath_TCL_DECLARED
3351 #define Tcl_GetEncodingSearchPath_TCL_DECLARED
3352 /* 570 */
3353 EXTERN Tcl_Obj * Tcl_GetEncodingSearchPath(void);
3354 #endif
3355 #ifndef Tcl_SetEncodingSearchPath_TCL_DECLARED
3356 #define Tcl_SetEncodingSearchPath_TCL_DECLARED
3357 /* 571 */
3358 EXTERN int Tcl_SetEncodingSearchPath(Tcl_Obj *searchPath);
3359 #endif
3360 #ifndef Tcl_GetEncodingNameFromEnvironment_TCL_DECLARED
3361 #define Tcl_GetEncodingNameFromEnvironment_TCL_DECLARED
3362 /* 572 */
3363 EXTERN CONST char * Tcl_GetEncodingNameFromEnvironment(
3364 Tcl_DString *bufPtr);
3365 #endif
3366 #ifndef Tcl_PkgRequireProc_TCL_DECLARED
3367 #define Tcl_PkgRequireProc_TCL_DECLARED
3368 /* 573 */
3369 EXTERN int Tcl_PkgRequireProc(Tcl_Interp *interp,
3370 CONST char *name, int objc,
3371 Tcl_Obj *CONST objv[],
3372 ClientData *clientDataPtr);
3373 #endif
3374 #ifndef Tcl_AppendObjToErrorInfo_TCL_DECLARED
3375 #define Tcl_AppendObjToErrorInfo_TCL_DECLARED
3376 /* 574 */
3377 EXTERN void Tcl_AppendObjToErrorInfo(Tcl_Interp *interp,
3378 Tcl_Obj *objPtr);
3379 #endif
3380 #ifndef Tcl_AppendLimitedToObj_TCL_DECLARED
3381 #define Tcl_AppendLimitedToObj_TCL_DECLARED
3382 /* 575 */
3383 EXTERN void Tcl_AppendLimitedToObj(Tcl_Obj *objPtr,
3384 CONST char *bytes, int length, int limit,
3385 CONST char *ellipsis);
3386 #endif
3387 #ifndef Tcl_Format_TCL_DECLARED
3388 #define Tcl_Format_TCL_DECLARED
3389 /* 576 */
3390 EXTERN Tcl_Obj * Tcl_Format(Tcl_Interp *interp, CONST char *format,
3391 int objc, Tcl_Obj *CONST objv[]);
3392 #endif
3393 #ifndef Tcl_AppendFormatToObj_TCL_DECLARED
3394 #define Tcl_AppendFormatToObj_TCL_DECLARED
3395 /* 577 */
3396 EXTERN int Tcl_AppendFormatToObj(Tcl_Interp *interp,
3397 Tcl_Obj *objPtr, CONST char *format,
3398 int objc, Tcl_Obj *CONST objv[]);
3399 #endif
3400 #ifndef Tcl_ObjPrintf_TCL_DECLARED
3401 #define Tcl_ObjPrintf_TCL_DECLARED
3402 /* 578 */
3403 EXTERN Tcl_Obj * Tcl_ObjPrintf(CONST char *format, ...);
3404 #endif
3405 #ifndef Tcl_AppendPrintfToObj_TCL_DECLARED
3406 #define Tcl_AppendPrintfToObj_TCL_DECLARED
3407 /* 579 */
3408 EXTERN void Tcl_AppendPrintfToObj(Tcl_Obj *objPtr,
3409 CONST char *format, ...);
3410 #endif
3412 typedef struct TclStubHooks {
3413 struct TclPlatStubs *tclPlatStubs;
3414 struct TclIntStubs *tclIntStubs;
3415 struct TclIntPlatStubs *tclIntPlatStubs;
3416 } TclStubHooks;
3418 typedef struct TclStubs {
3419 int magic;
3420 struct TclStubHooks *hooks;
3422 int (*tcl_PkgProvideEx) (Tcl_Interp *interp, CONST char *name, CONST char *version, ClientData clientData); /* 0 */
3423 CONST84_RETURN char * (*tcl_PkgRequireEx) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact, ClientData *clientDataPtr); /* 1 */
3424 void (*tcl_Panic) (CONST char *format, ...); /* 2 */
3425 char * (*tcl_Alloc) (unsigned int size); /* 3 */
3426 void (*tcl_Free) (char *ptr); /* 4 */
3427 char * (*tcl_Realloc) (char *ptr, unsigned int size); /* 5 */
3428 char * (*tcl_DbCkalloc) (unsigned int size, CONST char *file, int line); /* 6 */
3429 void (*tcl_DbCkfree) (char *ptr, CONST char *file, int line); /* 7 */
3430 char * (*tcl_DbCkrealloc) (char *ptr, unsigned int size, CONST char *file, int line); /* 8 */
3431 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
3432 void (*tcl_CreateFileHandler) (int fd, int mask, Tcl_FileProc *proc, ClientData clientData); /* 9 */
3433 #endif /* UNIX */
3434 #if defined(__WIN32__) /* WIN */
3435 VOID *reserved9;
3436 #endif /* WIN */
3437 #ifdef MAC_OSX_TCL /* MACOSX */
3438 void (*tcl_CreateFileHandler) (int fd, int mask, Tcl_FileProc *proc, ClientData clientData); /* 9 */
3439 #endif /* MACOSX */
3440 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
3441 void (*tcl_DeleteFileHandler) (int fd); /* 10 */
3442 #endif /* UNIX */
3443 #if defined(__WIN32__) /* WIN */
3444 VOID *reserved10;
3445 #endif /* WIN */
3446 #ifdef MAC_OSX_TCL /* MACOSX */
3447 void (*tcl_DeleteFileHandler) (int fd); /* 10 */
3448 #endif /* MACOSX */
3449 void (*tcl_SetTimer) (Tcl_Time *timePtr); /* 11 */
3450 void (*tcl_Sleep) (int ms); /* 12 */
3451 int (*tcl_WaitForEvent) (Tcl_Time *timePtr); /* 13 */
3452 int (*tcl_AppendAllObjTypes) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 14 */
3453 void (*tcl_AppendStringsToObj) (Tcl_Obj *objPtr, ...); /* 15 */
3454 void (*tcl_AppendToObj) (Tcl_Obj *objPtr, CONST char *bytes, int length); /* 16 */
3455 Tcl_Obj * (*tcl_ConcatObj) (int objc, Tcl_Obj *CONST objv[]); /* 17 */
3456 int (*tcl_ConvertToType) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_ObjType *typePtr); /* 18 */
3457 void (*tcl_DbDecrRefCount) (Tcl_Obj *objPtr, CONST char *file, int line); /* 19 */
3458 void (*tcl_DbIncrRefCount) (Tcl_Obj *objPtr, CONST char *file, int line); /* 20 */
3459 int (*tcl_DbIsShared) (Tcl_Obj *objPtr, CONST char *file, int line); /* 21 */
3460 Tcl_Obj * (*tcl_DbNewBooleanObj) (int boolValue, CONST char *file, int line); /* 22 */
3461 Tcl_Obj * (*tcl_DbNewByteArrayObj) (CONST unsigned char *bytes, int length, CONST char *file, int line); /* 23 */
3462 Tcl_Obj * (*tcl_DbNewDoubleObj) (double doubleValue, CONST char *file, int line); /* 24 */
3463 Tcl_Obj * (*tcl_DbNewListObj) (int objc, Tcl_Obj *CONST *objv, CONST char *file, int line); /* 25 */
3464 Tcl_Obj * (*tcl_DbNewLongObj) (long longValue, CONST char *file, int line); /* 26 */
3465 Tcl_Obj * (*tcl_DbNewObj) (CONST char *file, int line); /* 27 */
3466 Tcl_Obj * (*tcl_DbNewStringObj) (CONST char *bytes, int length, CONST char *file, int line); /* 28 */
3467 Tcl_Obj * (*tcl_DuplicateObj) (Tcl_Obj *objPtr); /* 29 */
3468 void (*tclFreeObj) (Tcl_Obj *objPtr); /* 30 */
3469 int (*tcl_GetBoolean) (Tcl_Interp *interp, CONST char *src, int *boolPtr); /* 31 */
3470 int (*tcl_GetBooleanFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *boolPtr); /* 32 */
3471 unsigned char * (*tcl_GetByteArrayFromObj) (Tcl_Obj *objPtr, int *lengthPtr); /* 33 */
3472 int (*tcl_GetDouble) (Tcl_Interp *interp, CONST char *src, double *doublePtr); /* 34 */
3473 int (*tcl_GetDoubleFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, double *doublePtr); /* 35 */
3474 int (*tcl_GetIndexFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, CONST84 char **tablePtr, CONST char *msg, int flags, int *indexPtr); /* 36 */
3475 int (*tcl_GetInt) (Tcl_Interp *interp, CONST char *src, int *intPtr); /* 37 */
3476 int (*tcl_GetIntFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *intPtr); /* 38 */
3477 int (*tcl_GetLongFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, long *longPtr); /* 39 */
3478 Tcl_ObjType * (*tcl_GetObjType) (CONST char *typeName); /* 40 */
3479 char * (*tcl_GetStringFromObj) (Tcl_Obj *objPtr, int *lengthPtr); /* 41 */
3480 void (*tcl_InvalidateStringRep) (Tcl_Obj *objPtr); /* 42 */
3481 int (*tcl_ListObjAppendList) (Tcl_Interp *interp, Tcl_Obj *listPtr, Tcl_Obj *elemListPtr); /* 43 */
3482 int (*tcl_ListObjAppendElement) (Tcl_Interp *interp, Tcl_Obj *listPtr, Tcl_Obj *objPtr); /* 44 */
3483 int (*tcl_ListObjGetElements) (Tcl_Interp *interp, Tcl_Obj *listPtr, int *objcPtr, Tcl_Obj ***objvPtr); /* 45 */
3484 int (*tcl_ListObjIndex) (Tcl_Interp *interp, Tcl_Obj *listPtr, int index, Tcl_Obj **objPtrPtr); /* 46 */
3485 int (*tcl_ListObjLength) (Tcl_Interp *interp, Tcl_Obj *listPtr, int *lengthPtr); /* 47 */
3486 int (*tcl_ListObjReplace) (Tcl_Interp *interp, Tcl_Obj *listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[]); /* 48 */
3487 Tcl_Obj * (*tcl_NewBooleanObj) (int boolValue); /* 49 */
3488 Tcl_Obj * (*tcl_NewByteArrayObj) (CONST unsigned char *bytes, int length); /* 50 */
3489 Tcl_Obj * (*tcl_NewDoubleObj) (double doubleValue); /* 51 */
3490 Tcl_Obj * (*tcl_NewIntObj) (int intValue); /* 52 */
3491 Tcl_Obj * (*tcl_NewListObj) (int objc, Tcl_Obj *CONST objv[]); /* 53 */
3492 Tcl_Obj * (*tcl_NewLongObj) (long longValue); /* 54 */
3493 Tcl_Obj * (*tcl_NewObj) (void); /* 55 */
3494 Tcl_Obj * (*tcl_NewStringObj) (CONST char *bytes, int length); /* 56 */
3495 void (*tcl_SetBooleanObj) (Tcl_Obj *objPtr, int boolValue); /* 57 */
3496 unsigned char * (*tcl_SetByteArrayLength) (Tcl_Obj *objPtr, int length); /* 58 */
3497 void (*tcl_SetByteArrayObj) (Tcl_Obj *objPtr, CONST unsigned char *bytes, int length); /* 59 */
3498 void (*tcl_SetDoubleObj) (Tcl_Obj *objPtr, double doubleValue); /* 60 */
3499 void (*tcl_SetIntObj) (Tcl_Obj *objPtr, int intValue); /* 61 */
3500 void (*tcl_SetListObj) (Tcl_Obj *objPtr, int objc, Tcl_Obj *CONST objv[]); /* 62 */
3501 void (*tcl_SetLongObj) (Tcl_Obj *objPtr, long longValue); /* 63 */
3502 void (*tcl_SetObjLength) (Tcl_Obj *objPtr, int length); /* 64 */
3503 void (*tcl_SetStringObj) (Tcl_Obj *objPtr, CONST char *bytes, int length); /* 65 */
3504 void (*tcl_AddErrorInfo) (Tcl_Interp *interp, CONST char *message); /* 66 */
3505 void (*tcl_AddObjErrorInfo) (Tcl_Interp *interp, CONST char *message, int length); /* 67 */
3506 void (*tcl_AllowExceptions) (Tcl_Interp *interp); /* 68 */
3507 void (*tcl_AppendElement) (Tcl_Interp *interp, CONST char *element); /* 69 */
3508 void (*tcl_AppendResult) (Tcl_Interp *interp, ...); /* 70 */
3509 Tcl_AsyncHandler (*tcl_AsyncCreate) (Tcl_AsyncProc *proc, ClientData clientData); /* 71 */
3510 void (*tcl_AsyncDelete) (Tcl_AsyncHandler async); /* 72 */
3511 int (*tcl_AsyncInvoke) (Tcl_Interp *interp, int code); /* 73 */
3512 void (*tcl_AsyncMark) (Tcl_AsyncHandler async); /* 74 */
3513 int (*tcl_AsyncReady) (void); /* 75 */
3514 void (*tcl_BackgroundError) (Tcl_Interp *interp); /* 76 */
3515 char (*tcl_Backslash) (CONST char *src, int *readPtr); /* 77 */
3516 int (*tcl_BadChannelOption) (Tcl_Interp *interp, CONST char *optionName, CONST char *optionList); /* 78 */
3517 void (*tcl_CallWhenDeleted) (Tcl_Interp *interp, Tcl_InterpDeleteProc *proc, ClientData clientData); /* 79 */
3518 void (*tcl_CancelIdleCall) (Tcl_IdleProc *idleProc, ClientData clientData); /* 80 */
3519 int (*tcl_Close) (Tcl_Interp *interp, Tcl_Channel chan); /* 81 */
3520 int (*tcl_CommandComplete) (CONST char *cmd); /* 82 */
3521 char * (*tcl_Concat) (int argc, CONST84 char *CONST *argv); /* 83 */
3522 int (*tcl_ConvertElement) (CONST char *src, char *dst, int flags); /* 84 */
3523 int (*tcl_ConvertCountedElement) (CONST char *src, int length, char *dst, int flags); /* 85 */
3524 int (*tcl_CreateAlias) (Tcl_Interp *slave, CONST char *slaveCmd, Tcl_Interp *target, CONST char *targetCmd, int argc, CONST84 char *CONST *argv); /* 86 */
3525 int (*tcl_CreateAliasObj) (Tcl_Interp *slave, CONST char *slaveCmd, Tcl_Interp *target, CONST char *targetCmd, int objc, Tcl_Obj *CONST objv[]); /* 87 */
3526 Tcl_Channel (*tcl_CreateChannel) (Tcl_ChannelType *typePtr, CONST char *chanName, ClientData instanceData, int mask); /* 88 */
3527 void (*tcl_CreateChannelHandler) (Tcl_Channel chan, int mask, Tcl_ChannelProc *proc, ClientData clientData); /* 89 */
3528 void (*tcl_CreateCloseHandler) (Tcl_Channel chan, Tcl_CloseProc *proc, ClientData clientData); /* 90 */
3529 Tcl_Command (*tcl_CreateCommand) (Tcl_Interp *interp, CONST char *cmdName, Tcl_CmdProc *proc, ClientData clientData, Tcl_CmdDeleteProc *deleteProc); /* 91 */
3530 void (*tcl_CreateEventSource) (Tcl_EventSetupProc *setupProc, Tcl_EventCheckProc *checkProc, ClientData clientData); /* 92 */
3531 void (*tcl_CreateExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 93 */
3532 Tcl_Interp * (*tcl_CreateInterp) (void); /* 94 */
3533 void (*tcl_CreateMathFunc) (Tcl_Interp *interp, CONST char *name, int numArgs, Tcl_ValueType *argTypes, Tcl_MathProc *proc, ClientData clientData); /* 95 */
3534 Tcl_Command (*tcl_CreateObjCommand) (Tcl_Interp *interp, CONST char *cmdName, Tcl_ObjCmdProc *proc, ClientData clientData, Tcl_CmdDeleteProc *deleteProc); /* 96 */
3535 Tcl_Interp * (*tcl_CreateSlave) (Tcl_Interp *interp, CONST char *slaveName, int isSafe); /* 97 */
3536 Tcl_TimerToken (*tcl_CreateTimerHandler) (int milliseconds, Tcl_TimerProc *proc, ClientData clientData); /* 98 */
3537 Tcl_Trace (*tcl_CreateTrace) (Tcl_Interp *interp, int level, Tcl_CmdTraceProc *proc, ClientData clientData); /* 99 */
3538 void (*tcl_DeleteAssocData) (Tcl_Interp *interp, CONST char *name); /* 100 */
3539 void (*tcl_DeleteChannelHandler) (Tcl_Channel chan, Tcl_ChannelProc *proc, ClientData clientData); /* 101 */
3540 void (*tcl_DeleteCloseHandler) (Tcl_Channel chan, Tcl_CloseProc *proc, ClientData clientData); /* 102 */
3541 int (*tcl_DeleteCommand) (Tcl_Interp *interp, CONST char *cmdName); /* 103 */
3542 int (*tcl_DeleteCommandFromToken) (Tcl_Interp *interp, Tcl_Command command); /* 104 */
3543 void (*tcl_DeleteEvents) (Tcl_EventDeleteProc *proc, ClientData clientData); /* 105 */
3544 void (*tcl_DeleteEventSource) (Tcl_EventSetupProc *setupProc, Tcl_EventCheckProc *checkProc, ClientData clientData); /* 106 */
3545 void (*tcl_DeleteExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 107 */
3546 void (*tcl_DeleteHashEntry) (Tcl_HashEntry *entryPtr); /* 108 */
3547 void (*tcl_DeleteHashTable) (Tcl_HashTable *tablePtr); /* 109 */
3548 void (*tcl_DeleteInterp) (Tcl_Interp *interp); /* 110 */
3549 void (*tcl_DetachPids) (int numPids, Tcl_Pid *pidPtr); /* 111 */
3550 void (*tcl_DeleteTimerHandler) (Tcl_TimerToken token); /* 112 */
3551 void (*tcl_DeleteTrace) (Tcl_Interp *interp, Tcl_Trace trace); /* 113 */
3552 void (*tcl_DontCallWhenDeleted) (Tcl_Interp *interp, Tcl_InterpDeleteProc *proc, ClientData clientData); /* 114 */
3553 int (*tcl_DoOneEvent) (int flags); /* 115 */
3554 void (*tcl_DoWhenIdle) (Tcl_IdleProc *proc, ClientData clientData); /* 116 */
3555 char * (*tcl_DStringAppend) (Tcl_DString *dsPtr, CONST char *bytes, int length); /* 117 */
3556 char * (*tcl_DStringAppendElement) (Tcl_DString *dsPtr, CONST char *element); /* 118 */
3557 void (*tcl_DStringEndSublist) (Tcl_DString *dsPtr); /* 119 */
3558 void (*tcl_DStringFree) (Tcl_DString *dsPtr); /* 120 */
3559 void (*tcl_DStringGetResult) (Tcl_Interp *interp, Tcl_DString *dsPtr); /* 121 */
3560 void (*tcl_DStringInit) (Tcl_DString *dsPtr); /* 122 */
3561 void (*tcl_DStringResult) (Tcl_Interp *interp, Tcl_DString *dsPtr); /* 123 */
3562 void (*tcl_DStringSetLength) (Tcl_DString *dsPtr, int length); /* 124 */
3563 void (*tcl_DStringStartSublist) (Tcl_DString *dsPtr); /* 125 */
3564 int (*tcl_Eof) (Tcl_Channel chan); /* 126 */
3565 CONST84_RETURN char * (*tcl_ErrnoId) (void); /* 127 */
3566 CONST84_RETURN char * (*tcl_ErrnoMsg) (int err); /* 128 */
3567 int (*tcl_Eval) (Tcl_Interp *interp, CONST char *script); /* 129 */
3568 int (*tcl_EvalFile) (Tcl_Interp *interp, CONST char *fileName); /* 130 */
3569 int (*tcl_EvalObj) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 131 */
3570 void (*tcl_EventuallyFree) (ClientData clientData, Tcl_FreeProc *freeProc); /* 132 */
3571 void (*tcl_Exit) (int status); /* 133 */
3572 int (*tcl_ExposeCommand) (Tcl_Interp *interp, CONST char *hiddenCmdToken, CONST char *cmdName); /* 134 */
3573 int (*tcl_ExprBoolean) (Tcl_Interp *interp, CONST char *expr, int *ptr); /* 135 */
3574 int (*tcl_ExprBooleanObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *ptr); /* 136 */
3575 int (*tcl_ExprDouble) (Tcl_Interp *interp, CONST char *expr, double *ptr); /* 137 */
3576 int (*tcl_ExprDoubleObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, double *ptr); /* 138 */
3577 int (*tcl_ExprLong) (Tcl_Interp *interp, CONST char *expr, long *ptr); /* 139 */
3578 int (*tcl_ExprLongObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, long *ptr); /* 140 */
3579 int (*tcl_ExprObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_Obj **resultPtrPtr); /* 141 */
3580 int (*tcl_ExprString) (Tcl_Interp *interp, CONST char *expr); /* 142 */
3581 void (*tcl_Finalize) (void); /* 143 */
3582 void (*tcl_FindExecutable) (CONST char *argv0); /* 144 */
3583 Tcl_HashEntry * (*tcl_FirstHashEntry) (Tcl_HashTable *tablePtr, Tcl_HashSearch *searchPtr); /* 145 */
3584 int (*tcl_Flush) (Tcl_Channel chan); /* 146 */
3585 void (*tcl_FreeResult) (Tcl_Interp *interp); /* 147 */
3586 int (*tcl_GetAlias) (Tcl_Interp *interp, CONST char *slaveCmd, Tcl_Interp **targetInterpPtr, CONST84 char **targetCmdPtr, int *argcPtr, CONST84 char ***argvPtr); /* 148 */
3587 int (*tcl_GetAliasObj) (Tcl_Interp *interp, CONST char *slaveCmd, Tcl_Interp **targetInterpPtr, CONST84 char **targetCmdPtr, int *objcPtr, Tcl_Obj ***objv); /* 149 */
3588 ClientData (*tcl_GetAssocData) (Tcl_Interp *interp, CONST char *name, Tcl_InterpDeleteProc **procPtr); /* 150 */
3589 Tcl_Channel (*tcl_GetChannel) (Tcl_Interp *interp, CONST char *chanName, int *modePtr); /* 151 */
3590 int (*tcl_GetChannelBufferSize) (Tcl_Channel chan); /* 152 */
3591 int (*tcl_GetChannelHandle) (Tcl_Channel chan, int direction, ClientData *handlePtr); /* 153 */
3592 ClientData (*tcl_GetChannelInstanceData) (Tcl_Channel chan); /* 154 */
3593 int (*tcl_GetChannelMode) (Tcl_Channel chan); /* 155 */
3594 CONST84_RETURN char * (*tcl_GetChannelName) (Tcl_Channel chan); /* 156 */
3595 int (*tcl_GetChannelOption) (Tcl_Interp *interp, Tcl_Channel chan, CONST char *optionName, Tcl_DString *dsPtr); /* 157 */
3596 Tcl_ChannelType * (*tcl_GetChannelType) (Tcl_Channel chan); /* 158 */
3597 int (*tcl_GetCommandInfo) (Tcl_Interp *interp, CONST char *cmdName, Tcl_CmdInfo *infoPtr); /* 159 */
3598 CONST84_RETURN char * (*tcl_GetCommandName) (Tcl_Interp *interp, Tcl_Command command); /* 160 */
3599 int (*tcl_GetErrno) (void); /* 161 */
3600 CONST84_RETURN char * (*tcl_GetHostName) (void); /* 162 */
3601 int (*tcl_GetInterpPath) (Tcl_Interp *askInterp, Tcl_Interp *slaveInterp); /* 163 */
3602 Tcl_Interp * (*tcl_GetMaster) (Tcl_Interp *interp); /* 164 */
3603 CONST char * (*tcl_GetNameOfExecutable) (void); /* 165 */
3604 Tcl_Obj * (*tcl_GetObjResult) (Tcl_Interp *interp); /* 166 */
3605 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
3606 int (*tcl_GetOpenFile) (Tcl_Interp *interp, CONST char *chanID, int forWriting, int checkUsage, ClientData *filePtr); /* 167 */
3607 #endif /* UNIX */
3608 #if defined(__WIN32__) /* WIN */
3609 VOID *reserved167;
3610 #endif /* WIN */
3611 #ifdef MAC_OSX_TCL /* MACOSX */
3612 int (*tcl_GetOpenFile) (Tcl_Interp *interp, CONST char *chanID, int forWriting, int checkUsage, ClientData *filePtr); /* 167 */
3613 #endif /* MACOSX */
3614 Tcl_PathType (*tcl_GetPathType) (CONST char *path); /* 168 */
3615 int (*tcl_Gets) (Tcl_Channel chan, Tcl_DString *dsPtr); /* 169 */
3616 int (*tcl_GetsObj) (Tcl_Channel chan, Tcl_Obj *objPtr); /* 170 */
3617 int (*tcl_GetServiceMode) (void); /* 171 */
3618 Tcl_Interp * (*tcl_GetSlave) (Tcl_Interp *interp, CONST char *slaveName); /* 172 */
3619 Tcl_Channel (*tcl_GetStdChannel) (int type); /* 173 */
3620 CONST84_RETURN char * (*tcl_GetStringResult) (Tcl_Interp *interp); /* 174 */
3621 CONST84_RETURN char * (*tcl_GetVar) (Tcl_Interp *interp, CONST char *varName, int flags); /* 175 */
3622 CONST84_RETURN char * (*tcl_GetVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags); /* 176 */
3623 int (*tcl_GlobalEval) (Tcl_Interp *interp, CONST char *command); /* 177 */
3624 int (*tcl_GlobalEvalObj) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 178 */
3625 int (*tcl_HideCommand) (Tcl_Interp *interp, CONST char *cmdName, CONST char *hiddenCmdToken); /* 179 */
3626 int (*tcl_Init) (Tcl_Interp *interp); /* 180 */
3627 void (*tcl_InitHashTable) (Tcl_HashTable *tablePtr, int keyType); /* 181 */
3628 int (*tcl_InputBlocked) (Tcl_Channel chan); /* 182 */
3629 int (*tcl_InputBuffered) (Tcl_Channel chan); /* 183 */
3630 int (*tcl_InterpDeleted) (Tcl_Interp *interp); /* 184 */
3631 int (*tcl_IsSafe) (Tcl_Interp *interp); /* 185 */
3632 char * (*tcl_JoinPath) (int argc, CONST84 char *CONST *argv, Tcl_DString *resultPtr); /* 186 */
3633 int (*tcl_LinkVar) (Tcl_Interp *interp, CONST char *varName, char *addr, int type); /* 187 */
3634 VOID *reserved188;
3635 Tcl_Channel (*tcl_MakeFileChannel) (ClientData handle, int mode); /* 189 */
3636 int (*tcl_MakeSafe) (Tcl_Interp *interp); /* 190 */
3637 Tcl_Channel (*tcl_MakeTcpClientChannel) (ClientData tcpSocket); /* 191 */
3638 char * (*tcl_Merge) (int argc, CONST84 char *CONST *argv); /* 192 */
3639 Tcl_HashEntry * (*tcl_NextHashEntry) (Tcl_HashSearch *searchPtr); /* 193 */
3640 void (*tcl_NotifyChannel) (Tcl_Channel channel, int mask); /* 194 */
3641 Tcl_Obj * (*tcl_ObjGetVar2) (Tcl_Interp *interp, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, int flags); /* 195 */
3642 Tcl_Obj * (*tcl_ObjSetVar2) (Tcl_Interp *interp, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, int flags); /* 196 */
3643 Tcl_Channel (*tcl_OpenCommandChannel) (Tcl_Interp *interp, int argc, CONST84 char **argv, int flags); /* 197 */
3644 Tcl_Channel (*tcl_OpenFileChannel) (Tcl_Interp *interp, CONST char *fileName, CONST char *modeString, int permissions); /* 198 */
3645 Tcl_Channel (*tcl_OpenTcpClient) (Tcl_Interp *interp, int port, CONST char *address, CONST char *myaddr, int myport, int async); /* 199 */
3646 Tcl_Channel (*tcl_OpenTcpServer) (Tcl_Interp *interp, int port, CONST char *host, Tcl_TcpAcceptProc *acceptProc, ClientData callbackData); /* 200 */
3647 void (*tcl_Preserve) (ClientData data); /* 201 */
3648 void (*tcl_PrintDouble) (Tcl_Interp *interp, double value, char *dst); /* 202 */
3649 int (*tcl_PutEnv) (CONST char *assignment); /* 203 */
3650 CONST84_RETURN char * (*tcl_PosixError) (Tcl_Interp *interp); /* 204 */
3651 void (*tcl_QueueEvent) (Tcl_Event *evPtr, Tcl_QueuePosition position); /* 205 */
3652 int (*tcl_Read) (Tcl_Channel chan, char *bufPtr, int toRead); /* 206 */
3653 void (*tcl_ReapDetachedProcs) (void); /* 207 */
3654 int (*tcl_RecordAndEval) (Tcl_Interp *interp, CONST char *cmd, int flags); /* 208 */
3655 int (*tcl_RecordAndEvalObj) (Tcl_Interp *interp, Tcl_Obj *cmdPtr, int flags); /* 209 */
3656 void (*tcl_RegisterChannel) (Tcl_Interp *interp, Tcl_Channel chan); /* 210 */
3657 void (*tcl_RegisterObjType) (Tcl_ObjType *typePtr); /* 211 */
3658 Tcl_RegExp (*tcl_RegExpCompile) (Tcl_Interp *interp, CONST char *pattern); /* 212 */
3659 int (*tcl_RegExpExec) (Tcl_Interp *interp, Tcl_RegExp regexp, CONST char *text, CONST char *start); /* 213 */
3660 int (*tcl_RegExpMatch) (Tcl_Interp *interp, CONST char *text, CONST char *pattern); /* 214 */
3661 void (*tcl_RegExpRange) (Tcl_RegExp regexp, int index, CONST84 char **startPtr, CONST84 char **endPtr); /* 215 */
3662 void (*tcl_Release) (ClientData clientData); /* 216 */
3663 void (*tcl_ResetResult) (Tcl_Interp *interp); /* 217 */
3664 int (*tcl_ScanElement) (CONST char *src, int *flagPtr); /* 218 */
3665 int (*tcl_ScanCountedElement) (CONST char *src, int length, int *flagPtr); /* 219 */
3666 int (*tcl_SeekOld) (Tcl_Channel chan, int offset, int mode); /* 220 */
3667 int (*tcl_ServiceAll) (void); /* 221 */
3668 int (*tcl_ServiceEvent) (int flags); /* 222 */
3669 void (*tcl_SetAssocData) (Tcl_Interp *interp, CONST char *name, Tcl_InterpDeleteProc *proc, ClientData clientData); /* 223 */
3670 void (*tcl_SetChannelBufferSize) (Tcl_Channel chan, int sz); /* 224 */
3671 int (*tcl_SetChannelOption) (Tcl_Interp *interp, Tcl_Channel chan, CONST char *optionName, CONST char *newValue); /* 225 */
3672 int (*tcl_SetCommandInfo) (Tcl_Interp *interp, CONST char *cmdName, CONST Tcl_CmdInfo *infoPtr); /* 226 */
3673 void (*tcl_SetErrno) (int err); /* 227 */
3674 void (*tcl_SetErrorCode) (Tcl_Interp *interp, ...); /* 228 */
3675 void (*tcl_SetMaxBlockTime) (Tcl_Time *timePtr); /* 229 */
3676 void (*tcl_SetPanicProc) (Tcl_PanicProc *panicProc); /* 230 */
3677 int (*tcl_SetRecursionLimit) (Tcl_Interp *interp, int depth); /* 231 */
3678 void (*tcl_SetResult) (Tcl_Interp *interp, char *result, Tcl_FreeProc *freeProc); /* 232 */
3679 int (*tcl_SetServiceMode) (int mode); /* 233 */
3680 void (*tcl_SetObjErrorCode) (Tcl_Interp *interp, Tcl_Obj *errorObjPtr); /* 234 */
3681 void (*tcl_SetObjResult) (Tcl_Interp *interp, Tcl_Obj *resultObjPtr); /* 235 */
3682 void (*tcl_SetStdChannel) (Tcl_Channel channel, int type); /* 236 */
3683 CONST84_RETURN char * (*tcl_SetVar) (Tcl_Interp *interp, CONST char *varName, CONST char *newValue, int flags); /* 237 */
3684 CONST84_RETURN char * (*tcl_SetVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, CONST char *newValue, int flags); /* 238 */
3685 CONST84_RETURN char * (*tcl_SignalId) (int sig); /* 239 */
3686 CONST84_RETURN char * (*tcl_SignalMsg) (int sig); /* 240 */
3687 void (*tcl_SourceRCFile) (Tcl_Interp *interp); /* 241 */
3688 int (*tcl_SplitList) (Tcl_Interp *interp, CONST char *listStr, int *argcPtr, CONST84 char ***argvPtr); /* 242 */
3689 void (*tcl_SplitPath) (CONST char *path, int *argcPtr, CONST84 char ***argvPtr); /* 243 */
3690 void (*tcl_StaticPackage) (Tcl_Interp *interp, CONST char *pkgName, Tcl_PackageInitProc *initProc, Tcl_PackageInitProc *safeInitProc); /* 244 */
3691 int (*tcl_StringMatch) (CONST char *str, CONST char *pattern); /* 245 */
3692 int (*tcl_TellOld) (Tcl_Channel chan); /* 246 */
3693 int (*tcl_TraceVar) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 247 */
3694 int (*tcl_TraceVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 248 */
3695 char * (*tcl_TranslateFileName) (Tcl_Interp *interp, CONST char *name, Tcl_DString *bufferPtr); /* 249 */
3696 int (*tcl_Ungets) (Tcl_Channel chan, CONST char *str, int len, int atHead); /* 250 */
3697 void (*tcl_UnlinkVar) (Tcl_Interp *interp, CONST char *varName); /* 251 */
3698 int (*tcl_UnregisterChannel) (Tcl_Interp *interp, Tcl_Channel chan); /* 252 */
3699 int (*tcl_UnsetVar) (Tcl_Interp *interp, CONST char *varName, int flags); /* 253 */
3700 int (*tcl_UnsetVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags); /* 254 */
3701 void (*tcl_UntraceVar) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 255 */
3702 void (*tcl_UntraceVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 256 */
3703 void (*tcl_UpdateLinkedVar) (Tcl_Interp *interp, CONST char *varName); /* 257 */
3704 int (*tcl_UpVar) (Tcl_Interp *interp, CONST char *frameName, CONST char *varName, CONST char *localName, int flags); /* 258 */
3705 int (*tcl_UpVar2) (Tcl_Interp *interp, CONST char *frameName, CONST char *part1, CONST char *part2, CONST char *localName, int flags); /* 259 */
3706 int (*tcl_VarEval) (Tcl_Interp *interp, ...); /* 260 */
3707 ClientData (*tcl_VarTraceInfo) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_VarTraceProc *procPtr, ClientData prevClientData); /* 261 */
3708 ClientData (*tcl_VarTraceInfo2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags, Tcl_VarTraceProc *procPtr, ClientData prevClientData); /* 262 */
3709 int (*tcl_Write) (Tcl_Channel chan, CONST char *s, int slen); /* 263 */
3710 void (*tcl_WrongNumArgs) (Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[], CONST char *message); /* 264 */
3711 int (*tcl_DumpActiveMemory) (CONST char *fileName); /* 265 */
3712 void (*tcl_ValidateAllMemory) (CONST char *file, int line); /* 266 */
3713 void (*tcl_AppendResultVA) (Tcl_Interp *interp, va_list argList); /* 267 */
3714 void (*tcl_AppendStringsToObjVA) (Tcl_Obj *objPtr, va_list argList); /* 268 */
3715 char * (*tcl_HashStats) (Tcl_HashTable *tablePtr); /* 269 */
3716 CONST84_RETURN char * (*tcl_ParseVar) (Tcl_Interp *interp, CONST char *start, CONST84 char **termPtr); /* 270 */
3717 CONST84_RETURN char * (*tcl_PkgPresent) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact); /* 271 */
3718 CONST84_RETURN char * (*tcl_PkgPresentEx) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact, ClientData *clientDataPtr); /* 272 */
3719 int (*tcl_PkgProvide) (Tcl_Interp *interp, CONST char *name, CONST char *version); /* 273 */
3720 CONST84_RETURN char * (*tcl_PkgRequire) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact); /* 274 */
3721 void (*tcl_SetErrorCodeVA) (Tcl_Interp *interp, va_list argList); /* 275 */
3722 int (*tcl_VarEvalVA) (Tcl_Interp *interp, va_list argList); /* 276 */
3723 Tcl_Pid (*tcl_WaitPid) (Tcl_Pid pid, int *statPtr, int options); /* 277 */
3724 void (*tcl_PanicVA) (CONST char *format, va_list argList); /* 278 */
3725 void (*tcl_GetVersion) (int *major, int *minor, int *patchLevel, int *type); /* 279 */
3726 void (*tcl_InitMemory) (Tcl_Interp *interp); /* 280 */
3727 Tcl_Channel (*tcl_StackChannel) (Tcl_Interp *interp, Tcl_ChannelType *typePtr, ClientData instanceData, int mask, Tcl_Channel prevChan); /* 281 */
3728 int (*tcl_UnstackChannel) (Tcl_Interp *interp, Tcl_Channel chan); /* 282 */
3729 Tcl_Channel (*tcl_GetStackedChannel) (Tcl_Channel chan); /* 283 */
3730 void (*tcl_SetMainLoop) (Tcl_MainLoopProc *proc); /* 284 */
3731 VOID *reserved285;
3732 void (*tcl_AppendObjToObj) (Tcl_Obj *objPtr, Tcl_Obj *appendObjPtr); /* 286 */
3733 Tcl_Encoding (*tcl_CreateEncoding) (CONST Tcl_EncodingType *typePtr); /* 287 */
3734 void (*tcl_CreateThreadExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 288 */
3735 void (*tcl_DeleteThreadExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 289 */
3736 void (*tcl_DiscardResult) (Tcl_SavedResult *statePtr); /* 290 */
3737 int (*tcl_EvalEx) (Tcl_Interp *interp, CONST char *script, int numBytes, int flags); /* 291 */
3738 int (*tcl_EvalObjv) (Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[], int flags); /* 292 */
3739 int (*tcl_EvalObjEx) (Tcl_Interp *interp, Tcl_Obj *objPtr, int flags); /* 293 */
3740 void (*tcl_ExitThread) (int status); /* 294 */
3741 int (*tcl_ExternalToUtf) (Tcl_Interp *interp, Tcl_Encoding encoding, CONST char *src, int srcLen, int flags, Tcl_EncodingState *statePtr, char *dst, int dstLen, int *srcReadPtr, int *dstWrotePtr, int *dstCharsPtr); /* 295 */
3742 char * (*tcl_ExternalToUtfDString) (Tcl_Encoding encoding, CONST char *src, int srcLen, Tcl_DString *dsPtr); /* 296 */
3743 void (*tcl_FinalizeThread) (void); /* 297 */
3744 void (*tcl_FinalizeNotifier) (ClientData clientData); /* 298 */
3745 void (*tcl_FreeEncoding) (Tcl_Encoding encoding); /* 299 */
3746 Tcl_ThreadId (*tcl_GetCurrentThread) (void); /* 300 */
3747 Tcl_Encoding (*tcl_GetEncoding) (Tcl_Interp *interp, CONST char *name); /* 301 */
3748 CONST84_RETURN char * (*tcl_GetEncodingName) (Tcl_Encoding encoding); /* 302 */
3749 void (*tcl_GetEncodingNames) (Tcl_Interp *interp); /* 303 */
3750 int (*tcl_GetIndexFromObjStruct) (Tcl_Interp *interp, Tcl_Obj *objPtr, CONST VOID *tablePtr, int offset, CONST char *msg, int flags, int *indexPtr); /* 304 */
3751 VOID * (*tcl_GetThreadData) (Tcl_ThreadDataKey *keyPtr, int size); /* 305 */
3752 Tcl_Obj * (*tcl_GetVar2Ex) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags); /* 306 */
3753 ClientData (*tcl_InitNotifier) (void); /* 307 */
3754 void (*tcl_MutexLock) (Tcl_Mutex *mutexPtr); /* 308 */
3755 void (*tcl_MutexUnlock) (Tcl_Mutex *mutexPtr); /* 309 */
3756 void (*tcl_ConditionNotify) (Tcl_Condition *condPtr); /* 310 */
3757 void (*tcl_ConditionWait) (Tcl_Condition *condPtr, Tcl_Mutex *mutexPtr, Tcl_Time *timePtr); /* 311 */
3758 int (*tcl_NumUtfChars) (CONST char *src, int length); /* 312 */
3759 int (*tcl_ReadChars) (Tcl_Channel channel, Tcl_Obj *objPtr, int charsToRead, int appendFlag); /* 313 */
3760 void (*tcl_RestoreResult) (Tcl_Interp *interp, Tcl_SavedResult *statePtr); /* 314 */
3761 void (*tcl_SaveResult) (Tcl_Interp *interp, Tcl_SavedResult *statePtr); /* 315 */
3762 int (*tcl_SetSystemEncoding) (Tcl_Interp *interp, CONST char *name); /* 316 */
3763 Tcl_Obj * (*tcl_SetVar2Ex) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, Tcl_Obj *newValuePtr, int flags); /* 317 */
3764 void (*tcl_ThreadAlert) (Tcl_ThreadId threadId); /* 318 */
3765 void (*tcl_ThreadQueueEvent) (Tcl_ThreadId threadId, Tcl_Event *evPtr, Tcl_QueuePosition position); /* 319 */
3766 Tcl_UniChar (*tcl_UniCharAtIndex) (CONST char *src, int index); /* 320 */
3767 Tcl_UniChar (*tcl_UniCharToLower) (int ch); /* 321 */
3768 Tcl_UniChar (*tcl_UniCharToTitle) (int ch); /* 322 */
3769 Tcl_UniChar (*tcl_UniCharToUpper) (int ch); /* 323 */
3770 int (*tcl_UniCharToUtf) (int ch, char *buf); /* 324 */
3771 CONST84_RETURN char * (*tcl_UtfAtIndex) (CONST char *src, int index); /* 325 */
3772 int (*tcl_UtfCharComplete) (CONST char *src, int length); /* 326 */
3773 int (*tcl_UtfBackslash) (CONST char *src, int *readPtr, char *dst); /* 327 */
3774 CONST84_RETURN char * (*tcl_UtfFindFirst) (CONST char *src, int ch); /* 328 */
3775 CONST84_RETURN char * (*tcl_UtfFindLast) (CONST char *src, int ch); /* 329 */
3776 CONST84_RETURN char * (*tcl_UtfNext) (CONST char *src); /* 330 */
3777 CONST84_RETURN char * (*tcl_UtfPrev) (CONST char *src, CONST char *start); /* 331 */
3778 int (*tcl_UtfToExternal) (Tcl_Interp *interp, Tcl_Encoding encoding, CONST char *src, int srcLen, int flags, Tcl_EncodingState *statePtr, char *dst, int dstLen, int *srcReadPtr, int *dstWrotePtr, int *dstCharsPtr); /* 332 */
3779 char * (*tcl_UtfToExternalDString) (Tcl_Encoding encoding, CONST char *src, int srcLen, Tcl_DString *dsPtr); /* 333 */
3780 int (*tcl_UtfToLower) (char *src); /* 334 */
3781 int (*tcl_UtfToTitle) (char *src); /* 335 */
3782 int (*tcl_UtfToUniChar) (CONST char *src, Tcl_UniChar *chPtr); /* 336 */
3783 int (*tcl_UtfToUpper) (char *src); /* 337 */
3784 int (*tcl_WriteChars) (Tcl_Channel chan, CONST char *src, int srcLen); /* 338 */
3785 int (*tcl_WriteObj) (Tcl_Channel chan, Tcl_Obj *objPtr); /* 339 */
3786 char * (*tcl_GetString) (Tcl_Obj *objPtr); /* 340 */
3787 CONST84_RETURN char * (*tcl_GetDefaultEncodingDir) (void); /* 341 */
3788 void (*tcl_SetDefaultEncodingDir) (CONST char *path); /* 342 */
3789 void (*tcl_AlertNotifier) (ClientData clientData); /* 343 */
3790 void (*tcl_ServiceModeHook) (int mode); /* 344 */
3791 int (*tcl_UniCharIsAlnum) (int ch); /* 345 */
3792 int (*tcl_UniCharIsAlpha) (int ch); /* 346 */
3793 int (*tcl_UniCharIsDigit) (int ch); /* 347 */
3794 int (*tcl_UniCharIsLower) (int ch); /* 348 */
3795 int (*tcl_UniCharIsSpace) (int ch); /* 349 */
3796 int (*tcl_UniCharIsUpper) (int ch); /* 350 */
3797 int (*tcl_UniCharIsWordChar) (int ch); /* 351 */
3798 int (*tcl_UniCharLen) (CONST Tcl_UniChar *uniStr); /* 352 */
3799 int (*tcl_UniCharNcmp) (CONST Tcl_UniChar *ucs, CONST Tcl_UniChar *uct, unsigned long numChars); /* 353 */
3800 char * (*tcl_UniCharToUtfDString) (CONST Tcl_UniChar *uniStr, int uniLength, Tcl_DString *dsPtr); /* 354 */
3801 Tcl_UniChar * (*tcl_UtfToUniCharDString) (CONST char *src, int length, Tcl_DString *dsPtr); /* 355 */
3802 Tcl_RegExp (*tcl_GetRegExpFromObj) (Tcl_Interp *interp, Tcl_Obj *patObj, int flags); /* 356 */
3803 Tcl_Obj * (*tcl_EvalTokens) (Tcl_Interp *interp, Tcl_Token *tokenPtr, int count); /* 357 */
3804 void (*tcl_FreeParse) (Tcl_Parse *parsePtr); /* 358 */
3805 void (*tcl_LogCommandInfo) (Tcl_Interp *interp, CONST char *script, CONST char *command, int length); /* 359 */
3806 int (*tcl_ParseBraces) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr, int append, CONST84 char **termPtr); /* 360 */
3807 int (*tcl_ParseCommand) (Tcl_Interp *interp, CONST char *start, int numBytes, int nested, Tcl_Parse *parsePtr); /* 361 */
3808 int (*tcl_ParseExpr) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr); /* 362 */
3809 int (*tcl_ParseQuotedString) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr, int append, CONST84 char **termPtr); /* 363 */
3810 int (*tcl_ParseVarName) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr, int append); /* 364 */
3811 char * (*tcl_GetCwd) (Tcl_Interp *interp, Tcl_DString *cwdPtr); /* 365 */
3812 int (*tcl_Chdir) (CONST char *dirName); /* 366 */
3813 int (*tcl_Access) (CONST char *path, int mode); /* 367 */
3814 int (*tcl_Stat) (CONST char *path, struct stat *bufPtr); /* 368 */
3815 int (*tcl_UtfNcmp) (CONST char *s1, CONST char *s2, unsigned long n); /* 369 */
3816 int (*tcl_UtfNcasecmp) (CONST char *s1, CONST char *s2, unsigned long n); /* 370 */
3817 int (*tcl_StringCaseMatch) (CONST char *str, CONST char *pattern, int nocase); /* 371 */
3818 int (*tcl_UniCharIsControl) (int ch); /* 372 */
3819 int (*tcl_UniCharIsGraph) (int ch); /* 373 */
3820 int (*tcl_UniCharIsPrint) (int ch); /* 374 */
3821 int (*tcl_UniCharIsPunct) (int ch); /* 375 */
3822 int (*tcl_RegExpExecObj) (Tcl_Interp *interp, Tcl_RegExp regexp, Tcl_Obj *textObj, int offset, int nmatches, int flags); /* 376 */
3823 void (*tcl_RegExpGetInfo) (Tcl_RegExp regexp, Tcl_RegExpInfo *infoPtr); /* 377 */
3824 Tcl_Obj * (*tcl_NewUnicodeObj) (CONST Tcl_UniChar *unicode, int numChars); /* 378 */
3825 void (*tcl_SetUnicodeObj) (Tcl_Obj *objPtr, CONST Tcl_UniChar *unicode, int numChars); /* 379 */
3826 int (*tcl_GetCharLength) (Tcl_Obj *objPtr); /* 380 */
3827 Tcl_UniChar (*tcl_GetUniChar) (Tcl_Obj *objPtr, int index); /* 381 */
3828 Tcl_UniChar * (*tcl_GetUnicode) (Tcl_Obj *objPtr); /* 382 */
3829 Tcl_Obj * (*tcl_GetRange) (Tcl_Obj *objPtr, int first, int last); /* 383 */
3830 void (*tcl_AppendUnicodeToObj) (Tcl_Obj *objPtr, CONST Tcl_UniChar *unicode, int length); /* 384 */
3831 int (*tcl_RegExpMatchObj) (Tcl_Interp *interp, Tcl_Obj *textObj, Tcl_Obj *patternObj); /* 385 */
3832 void (*tcl_SetNotifier) (Tcl_NotifierProcs *notifierProcPtr); /* 386 */
3833 Tcl_Mutex * (*tcl_GetAllocMutex) (void); /* 387 */
3834 int (*tcl_GetChannelNames) (Tcl_Interp *interp); /* 388 */
3835 int (*tcl_GetChannelNamesEx) (Tcl_Interp *interp, CONST char *pattern); /* 389 */
3836 int (*tcl_ProcObjCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]); /* 390 */
3837 void (*tcl_ConditionFinalize) (Tcl_Condition *condPtr); /* 391 */
3838 void (*tcl_MutexFinalize) (Tcl_Mutex *mutex); /* 392 */
3839 int (*tcl_CreateThread) (Tcl_ThreadId *idPtr, Tcl_ThreadCreateProc proc, ClientData clientData, int stackSize, int flags); /* 393 */
3840 int (*tcl_ReadRaw) (Tcl_Channel chan, char *dst, int bytesToRead); /* 394 */
3841 int (*tcl_WriteRaw) (Tcl_Channel chan, CONST char *src, int srcLen); /* 395 */
3842 Tcl_Channel (*tcl_GetTopChannel) (Tcl_Channel chan); /* 396 */
3843 int (*tcl_ChannelBuffered) (Tcl_Channel chan); /* 397 */
3844 CONST84_RETURN char * (*tcl_ChannelName) (CONST Tcl_ChannelType *chanTypePtr); /* 398 */
3845 Tcl_ChannelTypeVersion (*tcl_ChannelVersion) (CONST Tcl_ChannelType *chanTypePtr); /* 399 */
3846 Tcl_DriverBlockModeProc * (*tcl_ChannelBlockModeProc) (CONST Tcl_ChannelType *chanTypePtr); /* 400 */
3847 Tcl_DriverCloseProc * (*tcl_ChannelCloseProc) (CONST Tcl_ChannelType *chanTypePtr); /* 401 */
3848 Tcl_DriverClose2Proc * (*tcl_ChannelClose2Proc) (CONST Tcl_ChannelType *chanTypePtr); /* 402 */
3849 Tcl_DriverInputProc * (*tcl_ChannelInputProc) (CONST Tcl_ChannelType *chanTypePtr); /* 403 */
3850 Tcl_DriverOutputProc * (*tcl_ChannelOutputProc) (CONST Tcl_ChannelType *chanTypePtr); /* 404 */
3851 Tcl_DriverSeekProc * (*tcl_ChannelSeekProc) (CONST Tcl_ChannelType *chanTypePtr); /* 405 */
3852 Tcl_DriverSetOptionProc * (*tcl_ChannelSetOptionProc) (CONST Tcl_ChannelType *chanTypePtr); /* 406 */
3853 Tcl_DriverGetOptionProc * (*tcl_ChannelGetOptionProc) (CONST Tcl_ChannelType *chanTypePtr); /* 407 */
3854 Tcl_DriverWatchProc * (*tcl_ChannelWatchProc) (CONST Tcl_ChannelType *chanTypePtr); /* 408 */
3855 Tcl_DriverGetHandleProc * (*tcl_ChannelGetHandleProc) (CONST Tcl_ChannelType *chanTypePtr); /* 409 */
3856 Tcl_DriverFlushProc * (*tcl_ChannelFlushProc) (CONST Tcl_ChannelType *chanTypePtr); /* 410 */
3857 Tcl_DriverHandlerProc * (*tcl_ChannelHandlerProc) (CONST Tcl_ChannelType *chanTypePtr); /* 411 */
3858 int (*tcl_JoinThread) (Tcl_ThreadId threadId, int *result); /* 412 */
3859 int (*tcl_IsChannelShared) (Tcl_Channel channel); /* 413 */
3860 int (*tcl_IsChannelRegistered) (Tcl_Interp *interp, Tcl_Channel channel); /* 414 */
3861 void (*tcl_CutChannel) (Tcl_Channel channel); /* 415 */
3862 void (*tcl_SpliceChannel) (Tcl_Channel channel); /* 416 */
3863 void (*tcl_ClearChannelHandlers) (Tcl_Channel channel); /* 417 */
3864 int (*tcl_IsChannelExisting) (CONST char *channelName); /* 418 */
3865 int (*tcl_UniCharNcasecmp) (CONST Tcl_UniChar *ucs, CONST Tcl_UniChar *uct, unsigned long numChars); /* 419 */
3866 int (*tcl_UniCharCaseMatch) (CONST Tcl_UniChar *uniStr, CONST Tcl_UniChar *uniPattern, int nocase); /* 420 */
3867 Tcl_HashEntry * (*tcl_FindHashEntry) (Tcl_HashTable *tablePtr, CONST char *key); /* 421 */
3868 Tcl_HashEntry * (*tcl_CreateHashEntry) (Tcl_HashTable *tablePtr, CONST char *key, int *newPtr); /* 422 */
3869 void (*tcl_InitCustomHashTable) (Tcl_HashTable *tablePtr, int keyType, Tcl_HashKeyType *typePtr); /* 423 */
3870 void (*tcl_InitObjHashTable) (Tcl_HashTable *tablePtr); /* 424 */
3871 ClientData (*tcl_CommandTraceInfo) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_CommandTraceProc *procPtr, ClientData prevClientData); /* 425 */
3872 int (*tcl_TraceCommand) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_CommandTraceProc *proc, ClientData clientData); /* 426 */
3873 void (*tcl_UntraceCommand) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_CommandTraceProc *proc, ClientData clientData); /* 427 */
3874 char * (*tcl_AttemptAlloc) (unsigned int size); /* 428 */
3875 char * (*tcl_AttemptDbCkalloc) (unsigned int size, CONST char *file, int line); /* 429 */
3876 char * (*tcl_AttemptRealloc) (char *ptr, unsigned int size); /* 430 */
3877 char * (*tcl_AttemptDbCkrealloc) (char *ptr, unsigned int size, CONST char *file, int line); /* 431 */
3878 int (*tcl_AttemptSetObjLength) (Tcl_Obj *objPtr, int length); /* 432 */
3879 Tcl_ThreadId (*tcl_GetChannelThread) (Tcl_Channel channel); /* 433 */
3880 Tcl_UniChar * (*tcl_GetUnicodeFromObj) (Tcl_Obj *objPtr, int *lengthPtr); /* 434 */
3881 int (*tcl_GetMathFuncInfo) (Tcl_Interp *interp, CONST char *name, int *numArgsPtr, Tcl_ValueType **argTypesPtr, Tcl_MathProc **procPtr, ClientData *clientDataPtr); /* 435 */
3882 Tcl_Obj * (*tcl_ListMathFuncs) (Tcl_Interp *interp, CONST char *pattern); /* 436 */
3883 Tcl_Obj * (*tcl_SubstObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int flags); /* 437 */
3884 int (*tcl_DetachChannel) (Tcl_Interp *interp, Tcl_Channel channel); /* 438 */
3885 int (*tcl_IsStandardChannel) (Tcl_Channel channel); /* 439 */
3886 int (*tcl_FSCopyFile) (Tcl_Obj *srcPathPtr, Tcl_Obj *destPathPtr); /* 440 */
3887 int (*tcl_FSCopyDirectory) (Tcl_Obj *srcPathPtr, Tcl_Obj *destPathPtr, Tcl_Obj **errorPtr); /* 441 */
3888 int (*tcl_FSCreateDirectory) (Tcl_Obj *pathPtr); /* 442 */
3889 int (*tcl_FSDeleteFile) (Tcl_Obj *pathPtr); /* 443 */
3890 int (*tcl_FSLoadFile) (Tcl_Interp *interp, Tcl_Obj *pathPtr, CONST char *sym1, CONST char *sym2, Tcl_PackageInitProc **proc1Ptr, Tcl_PackageInitProc **proc2Ptr, Tcl_LoadHandle *handlePtr, Tcl_FSUnloadFileProc **unloadProcPtr); /* 444 */
3891 int (*tcl_FSMatchInDirectory) (Tcl_Interp *interp, Tcl_Obj *result, Tcl_Obj *pathPtr, CONST char *pattern, Tcl_GlobTypeData *types); /* 445 */
3892 Tcl_Obj * (*tcl_FSLink) (Tcl_Obj *pathPtr, Tcl_Obj *toPtr, int linkAction); /* 446 */
3893 int (*tcl_FSRemoveDirectory) (Tcl_Obj *pathPtr, int recursive, Tcl_Obj **errorPtr); /* 447 */
3894 int (*tcl_FSRenameFile) (Tcl_Obj *srcPathPtr, Tcl_Obj *destPathPtr); /* 448 */
3895 int (*tcl_FSLstat) (Tcl_Obj *pathPtr, Tcl_StatBuf *buf); /* 449 */
3896 int (*tcl_FSUtime) (Tcl_Obj *pathPtr, struct utimbuf *tval); /* 450 */
3897 int (*tcl_FSFileAttrsGet) (Tcl_Interp *interp, int index, Tcl_Obj *pathPtr, Tcl_Obj **objPtrRef); /* 451 */
3898 int (*tcl_FSFileAttrsSet) (Tcl_Interp *interp, int index, Tcl_Obj *pathPtr, Tcl_Obj *objPtr); /* 452 */
3899 CONST char ** (*tcl_FSFileAttrStrings) (Tcl_Obj *pathPtr, Tcl_Obj **objPtrRef); /* 453 */
3900 int (*tcl_FSStat) (Tcl_Obj *pathPtr, Tcl_StatBuf *buf); /* 454 */
3901 int (*tcl_FSAccess) (Tcl_Obj *pathPtr, int mode); /* 455 */
3902 Tcl_Channel (*tcl_FSOpenFileChannel) (Tcl_Interp *interp, Tcl_Obj *pathPtr, CONST char *modeString, int permissions); /* 456 */
3903 Tcl_Obj * (*tcl_FSGetCwd) (Tcl_Interp *interp); /* 457 */
3904 int (*tcl_FSChdir) (Tcl_Obj *pathPtr); /* 458 */
3905 int (*tcl_FSConvertToPathType) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 459 */
3906 Tcl_Obj * (*tcl_FSJoinPath) (Tcl_Obj *listObj, int elements); /* 460 */
3907 Tcl_Obj * (*tcl_FSSplitPath) (Tcl_Obj *pathPtr, int *lenPtr); /* 461 */
3908 int (*tcl_FSEqualPaths) (Tcl_Obj *firstPtr, Tcl_Obj *secondPtr); /* 462 */
3909 Tcl_Obj * (*tcl_FSGetNormalizedPath) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 463 */
3910 Tcl_Obj * (*tcl_FSJoinToPath) (Tcl_Obj *pathPtr, int objc, Tcl_Obj *CONST objv[]); /* 464 */
3911 ClientData (*tcl_FSGetInternalRep) (Tcl_Obj *pathPtr, Tcl_Filesystem *fsPtr); /* 465 */
3912 Tcl_Obj * (*tcl_FSGetTranslatedPath) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 466 */
3913 int (*tcl_FSEvalFile) (Tcl_Interp *interp, Tcl_Obj *fileName); /* 467 */
3914 Tcl_Obj * (*tcl_FSNewNativePath) (Tcl_Filesystem *fromFilesystem, ClientData clientData); /* 468 */
3915 CONST char * (*tcl_FSGetNativePath) (Tcl_Obj *pathPtr); /* 469 */
3916 Tcl_Obj * (*tcl_FSFileSystemInfo) (Tcl_Obj *pathPtr); /* 470 */
3917 Tcl_Obj * (*tcl_FSPathSeparator) (Tcl_Obj *pathPtr); /* 471 */
3918 Tcl_Obj * (*tcl_FSListVolumes) (void); /* 472 */
3919 int (*tcl_FSRegister) (ClientData clientData, Tcl_Filesystem *fsPtr); /* 473 */
3920 int (*tcl_FSUnregister) (Tcl_Filesystem *fsPtr); /* 474 */
3921 ClientData (*tcl_FSData) (Tcl_Filesystem *fsPtr); /* 475 */
3922 CONST char * (*tcl_FSGetTranslatedStringPath) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 476 */
3923 Tcl_Filesystem * (*tcl_FSGetFileSystemForPath) (Tcl_Obj *pathPtr); /* 477 */
3924 Tcl_PathType (*tcl_FSGetPathType) (Tcl_Obj *pathPtr); /* 478 */
3925 int (*tcl_OutputBuffered) (Tcl_Channel chan); /* 479 */
3926 void (*tcl_FSMountsChanged) (Tcl_Filesystem *fsPtr); /* 480 */
3927 int (*tcl_EvalTokensStandard) (Tcl_Interp *interp, Tcl_Token *tokenPtr, int count); /* 481 */
3928 void (*tcl_GetTime) (Tcl_Time *timeBuf); /* 482 */
3929 Tcl_Trace (*tcl_CreateObjTrace) (Tcl_Interp *interp, int level, int flags, Tcl_CmdObjTraceProc *objProc, ClientData clientData, Tcl_CmdObjTraceDeleteProc *delProc); /* 483 */
3930 int (*tcl_GetCommandInfoFromToken) (Tcl_Command token, Tcl_CmdInfo *infoPtr); /* 484 */
3931 int (*tcl_SetCommandInfoFromToken) (Tcl_Command token, CONST Tcl_CmdInfo *infoPtr); /* 485 */
3932 Tcl_Obj * (*tcl_DbNewWideIntObj) (Tcl_WideInt wideValue, CONST char *file, int line); /* 486 */
3933 int (*tcl_GetWideIntFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_WideInt *widePtr); /* 487 */
3934 Tcl_Obj * (*tcl_NewWideIntObj) (Tcl_WideInt wideValue); /* 488 */
3935 void (*tcl_SetWideIntObj) (Tcl_Obj *objPtr, Tcl_WideInt wideValue); /* 489 */
3936 Tcl_StatBuf * (*tcl_AllocStatBuf) (void); /* 490 */
3937 Tcl_WideInt (*tcl_Seek) (Tcl_Channel chan, Tcl_WideInt offset, int mode); /* 491 */
3938 Tcl_WideInt (*tcl_Tell) (Tcl_Channel chan); /* 492 */
3939 Tcl_DriverWideSeekProc * (*tcl_ChannelWideSeekProc) (CONST Tcl_ChannelType *chanTypePtr); /* 493 */
3940 int (*tcl_DictObjPut) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_Obj *keyPtr, Tcl_Obj *valuePtr); /* 494 */
3941 int (*tcl_DictObjGet) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_Obj *keyPtr, Tcl_Obj **valuePtrPtr); /* 495 */
3942 int (*tcl_DictObjRemove) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_Obj *keyPtr); /* 496 */
3943 int (*tcl_DictObjSize) (Tcl_Interp *interp, Tcl_Obj *dictPtr, int *sizePtr); /* 497 */
3944 int (*tcl_DictObjFirst) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_DictSearch *searchPtr, Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr, int *donePtr); /* 498 */
3945 void (*tcl_DictObjNext) (Tcl_DictSearch *searchPtr, Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr, int *donePtr); /* 499 */
3946 void (*tcl_DictObjDone) (Tcl_DictSearch *searchPtr); /* 500 */
3947 int (*tcl_DictObjPutKeyList) (Tcl_Interp *interp, Tcl_Obj *dictPtr, int keyc, Tcl_Obj *CONST *keyv, Tcl_Obj *valuePtr); /* 501 */
3948 int (*tcl_DictObjRemoveKeyList) (Tcl_Interp *interp, Tcl_Obj *dictPtr, int keyc, Tcl_Obj *CONST *keyv); /* 502 */
3949 Tcl_Obj * (*tcl_NewDictObj) (void); /* 503 */
3950 Tcl_Obj * (*tcl_DbNewDictObj) (CONST char *file, int line); /* 504 */
3951 void (*tcl_RegisterConfig) (Tcl_Interp *interp, CONST char *pkgName, Tcl_Config *configuration, CONST char *valEncoding); /* 505 */
3952 Tcl_Namespace * (*tcl_CreateNamespace) (Tcl_Interp *interp, CONST char *name, ClientData clientData, Tcl_NamespaceDeleteProc *deleteProc); /* 506 */
3953 void (*tcl_DeleteNamespace) (Tcl_Namespace *nsPtr); /* 507 */
3954 int (*tcl_AppendExportList) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, Tcl_Obj *objPtr); /* 508 */
3955 int (*tcl_Export) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, CONST char *pattern, int resetListFirst); /* 509 */
3956 int (*tcl_Import) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, CONST char *pattern, int allowOverwrite); /* 510 */
3957 int (*tcl_ForgetImport) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, CONST char *pattern); /* 511 */
3958 Tcl_Namespace * (*tcl_GetCurrentNamespace) (Tcl_Interp *interp); /* 512 */
3959 Tcl_Namespace * (*tcl_GetGlobalNamespace) (Tcl_Interp *interp); /* 513 */
3960 Tcl_Namespace * (*tcl_FindNamespace) (Tcl_Interp *interp, CONST char *name, Tcl_Namespace *contextNsPtr, int flags); /* 514 */
3961 Tcl_Command (*tcl_FindCommand) (Tcl_Interp *interp, CONST char *name, Tcl_Namespace *contextNsPtr, int flags); /* 515 */
3962 Tcl_Command (*tcl_GetCommandFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 516 */
3963 void (*tcl_GetCommandFullName) (Tcl_Interp *interp, Tcl_Command command, Tcl_Obj *objPtr); /* 517 */
3964 int (*tcl_FSEvalFileEx) (Tcl_Interp *interp, Tcl_Obj *fileName, CONST char *encodingName); /* 518 */
3965 Tcl_ExitProc * (*tcl_SetExitProc) (Tcl_ExitProc *proc); /* 519 */
3966 void (*tcl_LimitAddHandler) (Tcl_Interp *interp, int type, Tcl_LimitHandlerProc *handlerProc, ClientData clientData, Tcl_LimitHandlerDeleteProc *deleteProc); /* 520 */
3967 void (*tcl_LimitRemoveHandler) (Tcl_Interp *interp, int type, Tcl_LimitHandlerProc *handlerProc, ClientData clientData); /* 521 */
3968 int (*tcl_LimitReady) (Tcl_Interp *interp); /* 522 */
3969 int (*tcl_LimitCheck) (Tcl_Interp *interp); /* 523 */
3970 int (*tcl_LimitExceeded) (Tcl_Interp *interp); /* 524 */
3971 void (*tcl_LimitSetCommands) (Tcl_Interp *interp, int commandLimit); /* 525 */
3972 void (*tcl_LimitSetTime) (Tcl_Interp *interp, Tcl_Time *timeLimitPtr); /* 526 */
3973 void (*tcl_LimitSetGranularity) (Tcl_Interp *interp, int type, int granularity); /* 527 */
3974 int (*tcl_LimitTypeEnabled) (Tcl_Interp *interp, int type); /* 528 */
3975 int (*tcl_LimitTypeExceeded) (Tcl_Interp *interp, int type); /* 529 */
3976 void (*tcl_LimitTypeSet) (Tcl_Interp *interp, int type); /* 530 */
3977 void (*tcl_LimitTypeReset) (Tcl_Interp *interp, int type); /* 531 */
3978 int (*tcl_LimitGetCommands) (Tcl_Interp *interp); /* 532 */
3979 void (*tcl_LimitGetTime) (Tcl_Interp *interp, Tcl_Time *timeLimitPtr); /* 533 */
3980 int (*tcl_LimitGetGranularity) (Tcl_Interp *interp, int type); /* 534 */
3981 Tcl_InterpState (*tcl_SaveInterpState) (Tcl_Interp *interp, int status); /* 535 */
3982 int (*tcl_RestoreInterpState) (Tcl_Interp *interp, Tcl_InterpState state); /* 536 */
3983 void (*tcl_DiscardInterpState) (Tcl_InterpState state); /* 537 */
3984 int (*tcl_SetReturnOptions) (Tcl_Interp *interp, Tcl_Obj *options); /* 538 */
3985 Tcl_Obj * (*tcl_GetReturnOptions) (Tcl_Interp *interp, int result); /* 539 */
3986 int (*tcl_IsEnsemble) (Tcl_Command token); /* 540 */
3987 Tcl_Command (*tcl_CreateEnsemble) (Tcl_Interp *interp, CONST char *name, Tcl_Namespace *namespacePtr, int flags); /* 541 */
3988 Tcl_Command (*tcl_FindEnsemble) (Tcl_Interp *interp, Tcl_Obj *cmdNameObj, int flags); /* 542 */
3989 int (*tcl_SetEnsembleSubcommandList) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj *subcmdList); /* 543 */
3990 int (*tcl_SetEnsembleMappingDict) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj *mapDict); /* 544 */
3991 int (*tcl_SetEnsembleUnknownHandler) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj *unknownList); /* 545 */
3992 int (*tcl_SetEnsembleFlags) (Tcl_Interp *interp, Tcl_Command token, int flags); /* 546 */
3993 int (*tcl_GetEnsembleSubcommandList) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj **subcmdListPtr); /* 547 */
3994 int (*tcl_GetEnsembleMappingDict) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj **mapDictPtr); /* 548 */
3995 int (*tcl_GetEnsembleUnknownHandler) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj **unknownListPtr); /* 549 */
3996 int (*tcl_GetEnsembleFlags) (Tcl_Interp *interp, Tcl_Command token, int *flagsPtr); /* 550 */
3997 int (*tcl_GetEnsembleNamespace) (Tcl_Interp *interp, Tcl_Command token, Tcl_Namespace **namespacePtrPtr); /* 551 */
3998 void (*tcl_SetTimeProc) (Tcl_GetTimeProc *getProc, Tcl_ScaleTimeProc *scaleProc, ClientData clientData); /* 552 */
3999 void (*tcl_QueryTimeProc) (Tcl_GetTimeProc **getProc, Tcl_ScaleTimeProc **scaleProc, ClientData *clientData); /* 553 */
4000 Tcl_DriverThreadActionProc * (*tcl_ChannelThreadActionProc) (CONST Tcl_ChannelType *chanTypePtr); /* 554 */
4001 Tcl_Obj * (*tcl_NewBignumObj) (mp_int *value); /* 555 */
4002 Tcl_Obj * (*tcl_DbNewBignumObj) (mp_int *value, CONST char *file, int line); /* 556 */
4003 void (*tcl_SetBignumObj) (Tcl_Obj *obj, mp_int *value); /* 557 */
4004 int (*tcl_GetBignumFromObj) (Tcl_Interp *interp, Tcl_Obj *obj, mp_int *value); /* 558 */
4005 int (*tcl_TakeBignumFromObj) (Tcl_Interp *interp, Tcl_Obj *obj, mp_int *value); /* 559 */
4006 int (*tcl_TruncateChannel) (Tcl_Channel chan, Tcl_WideInt length); /* 560 */
4007 Tcl_DriverTruncateProc * (*tcl_ChannelTruncateProc) (CONST Tcl_ChannelType *chanTypePtr); /* 561 */
4008 void (*tcl_SetChannelErrorInterp) (Tcl_Interp *interp, Tcl_Obj *msg); /* 562 */
4009 void (*tcl_GetChannelErrorInterp) (Tcl_Interp *interp, Tcl_Obj **msg); /* 563 */
4010 void (*tcl_SetChannelError) (Tcl_Channel chan, Tcl_Obj *msg); /* 564 */
4011 void (*tcl_GetChannelError) (Tcl_Channel chan, Tcl_Obj **msg); /* 565 */
4012 int (*tcl_InitBignumFromDouble) (Tcl_Interp *interp, double initval, mp_int *toInit); /* 566 */
4013 Tcl_Obj * (*tcl_GetNamespaceUnknownHandler) (Tcl_Interp *interp, Tcl_Namespace *nsPtr); /* 567 */
4014 int (*tcl_SetNamespaceUnknownHandler) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, Tcl_Obj *handlerPtr); /* 568 */
4015 int (*tcl_GetEncodingFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_Encoding *encodingPtr); /* 569 */
4016 Tcl_Obj * (*tcl_GetEncodingSearchPath) (void); /* 570 */
4017 int (*tcl_SetEncodingSearchPath) (Tcl_Obj *searchPath); /* 571 */
4018 CONST char * (*tcl_GetEncodingNameFromEnvironment) (Tcl_DString *bufPtr); /* 572 */
4019 int (*tcl_PkgRequireProc) (Tcl_Interp *interp, CONST char *name, int objc, Tcl_Obj *CONST objv[], ClientData *clientDataPtr); /* 573 */
4020 void (*tcl_AppendObjToErrorInfo) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 574 */
4021 void (*tcl_AppendLimitedToObj) (Tcl_Obj *objPtr, CONST char *bytes, int length, int limit, CONST char *ellipsis); /* 575 */
4022 Tcl_Obj * (*tcl_Format) (Tcl_Interp *interp, CONST char *format, int objc, Tcl_Obj *CONST objv[]); /* 576 */
4023 int (*tcl_AppendFormatToObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, CONST char *format, int objc, Tcl_Obj *CONST objv[]); /* 577 */
4024 Tcl_Obj * (*tcl_ObjPrintf) (CONST char *format, ...); /* 578 */
4025 void (*tcl_AppendPrintfToObj) (Tcl_Obj *objPtr, CONST char *format, ...); /* 579 */
4026 } TclStubs;
4028 #ifdef __cplusplus
4029 extern "C" {
4030 #endif
4031 extern TclStubs *tclStubsPtr;
4032 #ifdef __cplusplus
4034 #endif
4036 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
4039 * Inline function declarations:
4042 #ifndef Tcl_PkgProvideEx
4043 #define Tcl_PkgProvideEx \
4044 (tclStubsPtr->tcl_PkgProvideEx) /* 0 */
4045 #endif
4046 #ifndef Tcl_PkgRequireEx
4047 #define Tcl_PkgRequireEx \
4048 (tclStubsPtr->tcl_PkgRequireEx) /* 1 */
4049 #endif
4050 #ifndef Tcl_Panic
4051 #define Tcl_Panic \
4052 (tclStubsPtr->tcl_Panic) /* 2 */
4053 #endif
4054 #ifndef Tcl_Alloc
4055 #define Tcl_Alloc \
4056 (tclStubsPtr->tcl_Alloc) /* 3 */
4057 #endif
4058 #ifndef Tcl_Free
4059 #define Tcl_Free \
4060 (tclStubsPtr->tcl_Free) /* 4 */
4061 #endif
4062 #ifndef Tcl_Realloc
4063 #define Tcl_Realloc \
4064 (tclStubsPtr->tcl_Realloc) /* 5 */
4065 #endif
4066 #ifndef Tcl_DbCkalloc
4067 #define Tcl_DbCkalloc \
4068 (tclStubsPtr->tcl_DbCkalloc) /* 6 */
4069 #endif
4070 #ifndef Tcl_DbCkfree
4071 #define Tcl_DbCkfree \
4072 (tclStubsPtr->tcl_DbCkfree) /* 7 */
4073 #endif
4074 #ifndef Tcl_DbCkrealloc
4075 #define Tcl_DbCkrealloc \
4076 (tclStubsPtr->tcl_DbCkrealloc) /* 8 */
4077 #endif
4078 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
4079 #ifndef Tcl_CreateFileHandler
4080 #define Tcl_CreateFileHandler \
4081 (tclStubsPtr->tcl_CreateFileHandler) /* 9 */
4082 #endif
4083 #endif /* UNIX */
4084 #ifdef MAC_OSX_TCL /* MACOSX */
4085 #ifndef Tcl_CreateFileHandler
4086 #define Tcl_CreateFileHandler \
4087 (tclStubsPtr->tcl_CreateFileHandler) /* 9 */
4088 #endif
4089 #endif /* MACOSX */
4090 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
4091 #ifndef Tcl_DeleteFileHandler
4092 #define Tcl_DeleteFileHandler \
4093 (tclStubsPtr->tcl_DeleteFileHandler) /* 10 */
4094 #endif
4095 #endif /* UNIX */
4096 #ifdef MAC_OSX_TCL /* MACOSX */
4097 #ifndef Tcl_DeleteFileHandler
4098 #define Tcl_DeleteFileHandler \
4099 (tclStubsPtr->tcl_DeleteFileHandler) /* 10 */
4100 #endif
4101 #endif /* MACOSX */
4102 #ifndef Tcl_SetTimer
4103 #define Tcl_SetTimer \
4104 (tclStubsPtr->tcl_SetTimer) /* 11 */
4105 #endif
4106 #ifndef Tcl_Sleep
4107 #define Tcl_Sleep \
4108 (tclStubsPtr->tcl_Sleep) /* 12 */
4109 #endif
4110 #ifndef Tcl_WaitForEvent
4111 #define Tcl_WaitForEvent \
4112 (tclStubsPtr->tcl_WaitForEvent) /* 13 */
4113 #endif
4114 #ifndef Tcl_AppendAllObjTypes
4115 #define Tcl_AppendAllObjTypes \
4116 (tclStubsPtr->tcl_AppendAllObjTypes) /* 14 */
4117 #endif
4118 #ifndef Tcl_AppendStringsToObj
4119 #define Tcl_AppendStringsToObj \
4120 (tclStubsPtr->tcl_AppendStringsToObj) /* 15 */
4121 #endif
4122 #ifndef Tcl_AppendToObj
4123 #define Tcl_AppendToObj \
4124 (tclStubsPtr->tcl_AppendToObj) /* 16 */
4125 #endif
4126 #ifndef Tcl_ConcatObj
4127 #define Tcl_ConcatObj \
4128 (tclStubsPtr->tcl_ConcatObj) /* 17 */
4129 #endif
4130 #ifndef Tcl_ConvertToType
4131 #define Tcl_ConvertToType \
4132 (tclStubsPtr->tcl_ConvertToType) /* 18 */
4133 #endif
4134 #ifndef Tcl_DbDecrRefCount
4135 #define Tcl_DbDecrRefCount \
4136 (tclStubsPtr->tcl_DbDecrRefCount) /* 19 */
4137 #endif
4138 #ifndef Tcl_DbIncrRefCount
4139 #define Tcl_DbIncrRefCount \
4140 (tclStubsPtr->tcl_DbIncrRefCount) /* 20 */
4141 #endif
4142 #ifndef Tcl_DbIsShared
4143 #define Tcl_DbIsShared \
4144 (tclStubsPtr->tcl_DbIsShared) /* 21 */
4145 #endif
4146 #ifndef Tcl_DbNewBooleanObj
4147 #define Tcl_DbNewBooleanObj \
4148 (tclStubsPtr->tcl_DbNewBooleanObj) /* 22 */
4149 #endif
4150 #ifndef Tcl_DbNewByteArrayObj
4151 #define Tcl_DbNewByteArrayObj \
4152 (tclStubsPtr->tcl_DbNewByteArrayObj) /* 23 */
4153 #endif
4154 #ifndef Tcl_DbNewDoubleObj
4155 #define Tcl_DbNewDoubleObj \
4156 (tclStubsPtr->tcl_DbNewDoubleObj) /* 24 */
4157 #endif
4158 #ifndef Tcl_DbNewListObj
4159 #define Tcl_DbNewListObj \
4160 (tclStubsPtr->tcl_DbNewListObj) /* 25 */
4161 #endif
4162 #ifndef Tcl_DbNewLongObj
4163 #define Tcl_DbNewLongObj \
4164 (tclStubsPtr->tcl_DbNewLongObj) /* 26 */
4165 #endif
4166 #ifndef Tcl_DbNewObj
4167 #define Tcl_DbNewObj \
4168 (tclStubsPtr->tcl_DbNewObj) /* 27 */
4169 #endif
4170 #ifndef Tcl_DbNewStringObj
4171 #define Tcl_DbNewStringObj \
4172 (tclStubsPtr->tcl_DbNewStringObj) /* 28 */
4173 #endif
4174 #ifndef Tcl_DuplicateObj
4175 #define Tcl_DuplicateObj \
4176 (tclStubsPtr->tcl_DuplicateObj) /* 29 */
4177 #endif
4178 #ifndef TclFreeObj
4179 #define TclFreeObj \
4180 (tclStubsPtr->tclFreeObj) /* 30 */
4181 #endif
4182 #ifndef Tcl_GetBoolean
4183 #define Tcl_GetBoolean \
4184 (tclStubsPtr->tcl_GetBoolean) /* 31 */
4185 #endif
4186 #ifndef Tcl_GetBooleanFromObj
4187 #define Tcl_GetBooleanFromObj \
4188 (tclStubsPtr->tcl_GetBooleanFromObj) /* 32 */
4189 #endif
4190 #ifndef Tcl_GetByteArrayFromObj
4191 #define Tcl_GetByteArrayFromObj \
4192 (tclStubsPtr->tcl_GetByteArrayFromObj) /* 33 */
4193 #endif
4194 #ifndef Tcl_GetDouble
4195 #define Tcl_GetDouble \
4196 (tclStubsPtr->tcl_GetDouble) /* 34 */
4197 #endif
4198 #ifndef Tcl_GetDoubleFromObj
4199 #define Tcl_GetDoubleFromObj \
4200 (tclStubsPtr->tcl_GetDoubleFromObj) /* 35 */
4201 #endif
4202 #ifndef Tcl_GetIndexFromObj
4203 #define Tcl_GetIndexFromObj \
4204 (tclStubsPtr->tcl_GetIndexFromObj) /* 36 */
4205 #endif
4206 #ifndef Tcl_GetInt
4207 #define Tcl_GetInt \
4208 (tclStubsPtr->tcl_GetInt) /* 37 */
4209 #endif
4210 #ifndef Tcl_GetIntFromObj
4211 #define Tcl_GetIntFromObj \
4212 (tclStubsPtr->tcl_GetIntFromObj) /* 38 */
4213 #endif
4214 #ifndef Tcl_GetLongFromObj
4215 #define Tcl_GetLongFromObj \
4216 (tclStubsPtr->tcl_GetLongFromObj) /* 39 */
4217 #endif
4218 #ifndef Tcl_GetObjType
4219 #define Tcl_GetObjType \
4220 (tclStubsPtr->tcl_GetObjType) /* 40 */
4221 #endif
4222 #ifndef Tcl_GetStringFromObj
4223 #define Tcl_GetStringFromObj \
4224 (tclStubsPtr->tcl_GetStringFromObj) /* 41 */
4225 #endif
4226 #ifndef Tcl_InvalidateStringRep
4227 #define Tcl_InvalidateStringRep \
4228 (tclStubsPtr->tcl_InvalidateStringRep) /* 42 */
4229 #endif
4230 #ifndef Tcl_ListObjAppendList
4231 #define Tcl_ListObjAppendList \
4232 (tclStubsPtr->tcl_ListObjAppendList) /* 43 */
4233 #endif
4234 #ifndef Tcl_ListObjAppendElement
4235 #define Tcl_ListObjAppendElement \
4236 (tclStubsPtr->tcl_ListObjAppendElement) /* 44 */
4237 #endif
4238 #ifndef Tcl_ListObjGetElements
4239 #define Tcl_ListObjGetElements \
4240 (tclStubsPtr->tcl_ListObjGetElements) /* 45 */
4241 #endif
4242 #ifndef Tcl_ListObjIndex
4243 #define Tcl_ListObjIndex \
4244 (tclStubsPtr->tcl_ListObjIndex) /* 46 */
4245 #endif
4246 #ifndef Tcl_ListObjLength
4247 #define Tcl_ListObjLength \
4248 (tclStubsPtr->tcl_ListObjLength) /* 47 */
4249 #endif
4250 #ifndef Tcl_ListObjReplace
4251 #define Tcl_ListObjReplace \
4252 (tclStubsPtr->tcl_ListObjReplace) /* 48 */
4253 #endif
4254 #ifndef Tcl_NewBooleanObj
4255 #define Tcl_NewBooleanObj \
4256 (tclStubsPtr->tcl_NewBooleanObj) /* 49 */
4257 #endif
4258 #ifndef Tcl_NewByteArrayObj
4259 #define Tcl_NewByteArrayObj \
4260 (tclStubsPtr->tcl_NewByteArrayObj) /* 50 */
4261 #endif
4262 #ifndef Tcl_NewDoubleObj
4263 #define Tcl_NewDoubleObj \
4264 (tclStubsPtr->tcl_NewDoubleObj) /* 51 */
4265 #endif
4266 #ifndef Tcl_NewIntObj
4267 #define Tcl_NewIntObj \
4268 (tclStubsPtr->tcl_NewIntObj) /* 52 */
4269 #endif
4270 #ifndef Tcl_NewListObj
4271 #define Tcl_NewListObj \
4272 (tclStubsPtr->tcl_NewListObj) /* 53 */
4273 #endif
4274 #ifndef Tcl_NewLongObj
4275 #define Tcl_NewLongObj \
4276 (tclStubsPtr->tcl_NewLongObj) /* 54 */
4277 #endif
4278 #ifndef Tcl_NewObj
4279 #define Tcl_NewObj \
4280 (tclStubsPtr->tcl_NewObj) /* 55 */
4281 #endif
4282 #ifndef Tcl_NewStringObj
4283 #define Tcl_NewStringObj \
4284 (tclStubsPtr->tcl_NewStringObj) /* 56 */
4285 #endif
4286 #ifndef Tcl_SetBooleanObj
4287 #define Tcl_SetBooleanObj \
4288 (tclStubsPtr->tcl_SetBooleanObj) /* 57 */
4289 #endif
4290 #ifndef Tcl_SetByteArrayLength
4291 #define Tcl_SetByteArrayLength \
4292 (tclStubsPtr->tcl_SetByteArrayLength) /* 58 */
4293 #endif
4294 #ifndef Tcl_SetByteArrayObj
4295 #define Tcl_SetByteArrayObj \
4296 (tclStubsPtr->tcl_SetByteArrayObj) /* 59 */
4297 #endif
4298 #ifndef Tcl_SetDoubleObj
4299 #define Tcl_SetDoubleObj \
4300 (tclStubsPtr->tcl_SetDoubleObj) /* 60 */
4301 #endif
4302 #ifndef Tcl_SetIntObj
4303 #define Tcl_SetIntObj \
4304 (tclStubsPtr->tcl_SetIntObj) /* 61 */
4305 #endif
4306 #ifndef Tcl_SetListObj
4307 #define Tcl_SetListObj \
4308 (tclStubsPtr->tcl_SetListObj) /* 62 */
4309 #endif
4310 #ifndef Tcl_SetLongObj
4311 #define Tcl_SetLongObj \
4312 (tclStubsPtr->tcl_SetLongObj) /* 63 */
4313 #endif
4314 #ifndef Tcl_SetObjLength
4315 #define Tcl_SetObjLength \
4316 (tclStubsPtr->tcl_SetObjLength) /* 64 */
4317 #endif
4318 #ifndef Tcl_SetStringObj
4319 #define Tcl_SetStringObj \
4320 (tclStubsPtr->tcl_SetStringObj) /* 65 */
4321 #endif
4322 #ifndef Tcl_AddErrorInfo
4323 #define Tcl_AddErrorInfo \
4324 (tclStubsPtr->tcl_AddErrorInfo) /* 66 */
4325 #endif
4326 #ifndef Tcl_AddObjErrorInfo
4327 #define Tcl_AddObjErrorInfo \
4328 (tclStubsPtr->tcl_AddObjErrorInfo) /* 67 */
4329 #endif
4330 #ifndef Tcl_AllowExceptions
4331 #define Tcl_AllowExceptions \
4332 (tclStubsPtr->tcl_AllowExceptions) /* 68 */
4333 #endif
4334 #ifndef Tcl_AppendElement
4335 #define Tcl_AppendElement \
4336 (tclStubsPtr->tcl_AppendElement) /* 69 */
4337 #endif
4338 #ifndef Tcl_AppendResult
4339 #define Tcl_AppendResult \
4340 (tclStubsPtr->tcl_AppendResult) /* 70 */
4341 #endif
4342 #ifndef Tcl_AsyncCreate
4343 #define Tcl_AsyncCreate \
4344 (tclStubsPtr->tcl_AsyncCreate) /* 71 */
4345 #endif
4346 #ifndef Tcl_AsyncDelete
4347 #define Tcl_AsyncDelete \
4348 (tclStubsPtr->tcl_AsyncDelete) /* 72 */
4349 #endif
4350 #ifndef Tcl_AsyncInvoke
4351 #define Tcl_AsyncInvoke \
4352 (tclStubsPtr->tcl_AsyncInvoke) /* 73 */
4353 #endif
4354 #ifndef Tcl_AsyncMark
4355 #define Tcl_AsyncMark \
4356 (tclStubsPtr->tcl_AsyncMark) /* 74 */
4357 #endif
4358 #ifndef Tcl_AsyncReady
4359 #define Tcl_AsyncReady \
4360 (tclStubsPtr->tcl_AsyncReady) /* 75 */
4361 #endif
4362 #ifndef Tcl_BackgroundError
4363 #define Tcl_BackgroundError \
4364 (tclStubsPtr->tcl_BackgroundError) /* 76 */
4365 #endif
4366 #ifndef Tcl_Backslash
4367 #define Tcl_Backslash \
4368 (tclStubsPtr->tcl_Backslash) /* 77 */
4369 #endif
4370 #ifndef Tcl_BadChannelOption
4371 #define Tcl_BadChannelOption \
4372 (tclStubsPtr->tcl_BadChannelOption) /* 78 */
4373 #endif
4374 #ifndef Tcl_CallWhenDeleted
4375 #define Tcl_CallWhenDeleted \
4376 (tclStubsPtr->tcl_CallWhenDeleted) /* 79 */
4377 #endif
4378 #ifndef Tcl_CancelIdleCall
4379 #define Tcl_CancelIdleCall \
4380 (tclStubsPtr->tcl_CancelIdleCall) /* 80 */
4381 #endif
4382 #ifndef Tcl_Close
4383 #define Tcl_Close \
4384 (tclStubsPtr->tcl_Close) /* 81 */
4385 #endif
4386 #ifndef Tcl_CommandComplete
4387 #define Tcl_CommandComplete \
4388 (tclStubsPtr->tcl_CommandComplete) /* 82 */
4389 #endif
4390 #ifndef Tcl_Concat
4391 #define Tcl_Concat \
4392 (tclStubsPtr->tcl_Concat) /* 83 */
4393 #endif
4394 #ifndef Tcl_ConvertElement
4395 #define Tcl_ConvertElement \
4396 (tclStubsPtr->tcl_ConvertElement) /* 84 */
4397 #endif
4398 #ifndef Tcl_ConvertCountedElement
4399 #define Tcl_ConvertCountedElement \
4400 (tclStubsPtr->tcl_ConvertCountedElement) /* 85 */
4401 #endif
4402 #ifndef Tcl_CreateAlias
4403 #define Tcl_CreateAlias \
4404 (tclStubsPtr->tcl_CreateAlias) /* 86 */
4405 #endif
4406 #ifndef Tcl_CreateAliasObj
4407 #define Tcl_CreateAliasObj \
4408 (tclStubsPtr->tcl_CreateAliasObj) /* 87 */
4409 #endif
4410 #ifndef Tcl_CreateChannel
4411 #define Tcl_CreateChannel \
4412 (tclStubsPtr->tcl_CreateChannel) /* 88 */
4413 #endif
4414 #ifndef Tcl_CreateChannelHandler
4415 #define Tcl_CreateChannelHandler \
4416 (tclStubsPtr->tcl_CreateChannelHandler) /* 89 */
4417 #endif
4418 #ifndef Tcl_CreateCloseHandler
4419 #define Tcl_CreateCloseHandler \
4420 (tclStubsPtr->tcl_CreateCloseHandler) /* 90 */
4421 #endif
4422 #ifndef Tcl_CreateCommand
4423 #define Tcl_CreateCommand \
4424 (tclStubsPtr->tcl_CreateCommand) /* 91 */
4425 #endif
4426 #ifndef Tcl_CreateEventSource
4427 #define Tcl_CreateEventSource \
4428 (tclStubsPtr->tcl_CreateEventSource) /* 92 */
4429 #endif
4430 #ifndef Tcl_CreateExitHandler
4431 #define Tcl_CreateExitHandler \
4432 (tclStubsPtr->tcl_CreateExitHandler) /* 93 */
4433 #endif
4434 #ifndef Tcl_CreateInterp
4435 #define Tcl_CreateInterp \
4436 (tclStubsPtr->tcl_CreateInterp) /* 94 */
4437 #endif
4438 #ifndef Tcl_CreateMathFunc
4439 #define Tcl_CreateMathFunc \
4440 (tclStubsPtr->tcl_CreateMathFunc) /* 95 */
4441 #endif
4442 #ifndef Tcl_CreateObjCommand
4443 #define Tcl_CreateObjCommand \
4444 (tclStubsPtr->tcl_CreateObjCommand) /* 96 */
4445 #endif
4446 #ifndef Tcl_CreateSlave
4447 #define Tcl_CreateSlave \
4448 (tclStubsPtr->tcl_CreateSlave) /* 97 */
4449 #endif
4450 #ifndef Tcl_CreateTimerHandler
4451 #define Tcl_CreateTimerHandler \
4452 (tclStubsPtr->tcl_CreateTimerHandler) /* 98 */
4453 #endif
4454 #ifndef Tcl_CreateTrace
4455 #define Tcl_CreateTrace \
4456 (tclStubsPtr->tcl_CreateTrace) /* 99 */
4457 #endif
4458 #ifndef Tcl_DeleteAssocData
4459 #define Tcl_DeleteAssocData \
4460 (tclStubsPtr->tcl_DeleteAssocData) /* 100 */
4461 #endif
4462 #ifndef Tcl_DeleteChannelHandler
4463 #define Tcl_DeleteChannelHandler \
4464 (tclStubsPtr->tcl_DeleteChannelHandler) /* 101 */
4465 #endif
4466 #ifndef Tcl_DeleteCloseHandler
4467 #define Tcl_DeleteCloseHandler \
4468 (tclStubsPtr->tcl_DeleteCloseHandler) /* 102 */
4469 #endif
4470 #ifndef Tcl_DeleteCommand
4471 #define Tcl_DeleteCommand \
4472 (tclStubsPtr->tcl_DeleteCommand) /* 103 */
4473 #endif
4474 #ifndef Tcl_DeleteCommandFromToken
4475 #define Tcl_DeleteCommandFromToken \
4476 (tclStubsPtr->tcl_DeleteCommandFromToken) /* 104 */
4477 #endif
4478 #ifndef Tcl_DeleteEvents
4479 #define Tcl_DeleteEvents \
4480 (tclStubsPtr->tcl_DeleteEvents) /* 105 */
4481 #endif
4482 #ifndef Tcl_DeleteEventSource
4483 #define Tcl_DeleteEventSource \
4484 (tclStubsPtr->tcl_DeleteEventSource) /* 106 */
4485 #endif
4486 #ifndef Tcl_DeleteExitHandler
4487 #define Tcl_DeleteExitHandler \
4488 (tclStubsPtr->tcl_DeleteExitHandler) /* 107 */
4489 #endif
4490 #ifndef Tcl_DeleteHashEntry
4491 #define Tcl_DeleteHashEntry \
4492 (tclStubsPtr->tcl_DeleteHashEntry) /* 108 */
4493 #endif
4494 #ifndef Tcl_DeleteHashTable
4495 #define Tcl_DeleteHashTable \
4496 (tclStubsPtr->tcl_DeleteHashTable) /* 109 */
4497 #endif
4498 #ifndef Tcl_DeleteInterp
4499 #define Tcl_DeleteInterp \
4500 (tclStubsPtr->tcl_DeleteInterp) /* 110 */
4501 #endif
4502 #ifndef Tcl_DetachPids
4503 #define Tcl_DetachPids \
4504 (tclStubsPtr->tcl_DetachPids) /* 111 */
4505 #endif
4506 #ifndef Tcl_DeleteTimerHandler
4507 #define Tcl_DeleteTimerHandler \
4508 (tclStubsPtr->tcl_DeleteTimerHandler) /* 112 */
4509 #endif
4510 #ifndef Tcl_DeleteTrace
4511 #define Tcl_DeleteTrace \
4512 (tclStubsPtr->tcl_DeleteTrace) /* 113 */
4513 #endif
4514 #ifndef Tcl_DontCallWhenDeleted
4515 #define Tcl_DontCallWhenDeleted \
4516 (tclStubsPtr->tcl_DontCallWhenDeleted) /* 114 */
4517 #endif
4518 #ifndef Tcl_DoOneEvent
4519 #define Tcl_DoOneEvent \
4520 (tclStubsPtr->tcl_DoOneEvent) /* 115 */
4521 #endif
4522 #ifndef Tcl_DoWhenIdle
4523 #define Tcl_DoWhenIdle \
4524 (tclStubsPtr->tcl_DoWhenIdle) /* 116 */
4525 #endif
4526 #ifndef Tcl_DStringAppend
4527 #define Tcl_DStringAppend \
4528 (tclStubsPtr->tcl_DStringAppend) /* 117 */
4529 #endif
4530 #ifndef Tcl_DStringAppendElement
4531 #define Tcl_DStringAppendElement \
4532 (tclStubsPtr->tcl_DStringAppendElement) /* 118 */
4533 #endif
4534 #ifndef Tcl_DStringEndSublist
4535 #define Tcl_DStringEndSublist \
4536 (tclStubsPtr->tcl_DStringEndSublist) /* 119 */
4537 #endif
4538 #ifndef Tcl_DStringFree
4539 #define Tcl_DStringFree \
4540 (tclStubsPtr->tcl_DStringFree) /* 120 */
4541 #endif
4542 #ifndef Tcl_DStringGetResult
4543 #define Tcl_DStringGetResult \
4544 (tclStubsPtr->tcl_DStringGetResult) /* 121 */
4545 #endif
4546 #ifndef Tcl_DStringInit
4547 #define Tcl_DStringInit \
4548 (tclStubsPtr->tcl_DStringInit) /* 122 */
4549 #endif
4550 #ifndef Tcl_DStringResult
4551 #define Tcl_DStringResult \
4552 (tclStubsPtr->tcl_DStringResult) /* 123 */
4553 #endif
4554 #ifndef Tcl_DStringSetLength
4555 #define Tcl_DStringSetLength \
4556 (tclStubsPtr->tcl_DStringSetLength) /* 124 */
4557 #endif
4558 #ifndef Tcl_DStringStartSublist
4559 #define Tcl_DStringStartSublist \
4560 (tclStubsPtr->tcl_DStringStartSublist) /* 125 */
4561 #endif
4562 #ifndef Tcl_Eof
4563 #define Tcl_Eof \
4564 (tclStubsPtr->tcl_Eof) /* 126 */
4565 #endif
4566 #ifndef Tcl_ErrnoId
4567 #define Tcl_ErrnoId \
4568 (tclStubsPtr->tcl_ErrnoId) /* 127 */
4569 #endif
4570 #ifndef Tcl_ErrnoMsg
4571 #define Tcl_ErrnoMsg \
4572 (tclStubsPtr->tcl_ErrnoMsg) /* 128 */
4573 #endif
4574 #ifndef Tcl_Eval
4575 #define Tcl_Eval \
4576 (tclStubsPtr->tcl_Eval) /* 129 */
4577 #endif
4578 #ifndef Tcl_EvalFile
4579 #define Tcl_EvalFile \
4580 (tclStubsPtr->tcl_EvalFile) /* 130 */
4581 #endif
4582 #ifndef Tcl_EvalObj
4583 #define Tcl_EvalObj \
4584 (tclStubsPtr->tcl_EvalObj) /* 131 */
4585 #endif
4586 #ifndef Tcl_EventuallyFree
4587 #define Tcl_EventuallyFree \
4588 (tclStubsPtr->tcl_EventuallyFree) /* 132 */
4589 #endif
4590 #ifndef Tcl_Exit
4591 #define Tcl_Exit \
4592 (tclStubsPtr->tcl_Exit) /* 133 */
4593 #endif
4594 #ifndef Tcl_ExposeCommand
4595 #define Tcl_ExposeCommand \
4596 (tclStubsPtr->tcl_ExposeCommand) /* 134 */
4597 #endif
4598 #ifndef Tcl_ExprBoolean
4599 #define Tcl_ExprBoolean \
4600 (tclStubsPtr->tcl_ExprBoolean) /* 135 */
4601 #endif
4602 #ifndef Tcl_ExprBooleanObj
4603 #define Tcl_ExprBooleanObj \
4604 (tclStubsPtr->tcl_ExprBooleanObj) /* 136 */
4605 #endif
4606 #ifndef Tcl_ExprDouble
4607 #define Tcl_ExprDouble \
4608 (tclStubsPtr->tcl_ExprDouble) /* 137 */
4609 #endif
4610 #ifndef Tcl_ExprDoubleObj
4611 #define Tcl_ExprDoubleObj \
4612 (tclStubsPtr->tcl_ExprDoubleObj) /* 138 */
4613 #endif
4614 #ifndef Tcl_ExprLong
4615 #define Tcl_ExprLong \
4616 (tclStubsPtr->tcl_ExprLong) /* 139 */
4617 #endif
4618 #ifndef Tcl_ExprLongObj
4619 #define Tcl_ExprLongObj \
4620 (tclStubsPtr->tcl_ExprLongObj) /* 140 */
4621 #endif
4622 #ifndef Tcl_ExprObj
4623 #define Tcl_ExprObj \
4624 (tclStubsPtr->tcl_ExprObj) /* 141 */
4625 #endif
4626 #ifndef Tcl_ExprString
4627 #define Tcl_ExprString \
4628 (tclStubsPtr->tcl_ExprString) /* 142 */
4629 #endif
4630 #ifndef Tcl_Finalize
4631 #define Tcl_Finalize \
4632 (tclStubsPtr->tcl_Finalize) /* 143 */
4633 #endif
4634 #ifndef Tcl_FindExecutable
4635 #define Tcl_FindExecutable \
4636 (tclStubsPtr->tcl_FindExecutable) /* 144 */
4637 #endif
4638 #ifndef Tcl_FirstHashEntry
4639 #define Tcl_FirstHashEntry \
4640 (tclStubsPtr->tcl_FirstHashEntry) /* 145 */
4641 #endif
4642 #ifndef Tcl_Flush
4643 #define Tcl_Flush \
4644 (tclStubsPtr->tcl_Flush) /* 146 */
4645 #endif
4646 #ifndef Tcl_FreeResult
4647 #define Tcl_FreeResult \
4648 (tclStubsPtr->tcl_FreeResult) /* 147 */
4649 #endif
4650 #ifndef Tcl_GetAlias
4651 #define Tcl_GetAlias \
4652 (tclStubsPtr->tcl_GetAlias) /* 148 */
4653 #endif
4654 #ifndef Tcl_GetAliasObj
4655 #define Tcl_GetAliasObj \
4656 (tclStubsPtr->tcl_GetAliasObj) /* 149 */
4657 #endif
4658 #ifndef Tcl_GetAssocData
4659 #define Tcl_GetAssocData \
4660 (tclStubsPtr->tcl_GetAssocData) /* 150 */
4661 #endif
4662 #ifndef Tcl_GetChannel
4663 #define Tcl_GetChannel \
4664 (tclStubsPtr->tcl_GetChannel) /* 151 */
4665 #endif
4666 #ifndef Tcl_GetChannelBufferSize
4667 #define Tcl_GetChannelBufferSize \
4668 (tclStubsPtr->tcl_GetChannelBufferSize) /* 152 */
4669 #endif
4670 #ifndef Tcl_GetChannelHandle
4671 #define Tcl_GetChannelHandle \
4672 (tclStubsPtr->tcl_GetChannelHandle) /* 153 */
4673 #endif
4674 #ifndef Tcl_GetChannelInstanceData
4675 #define Tcl_GetChannelInstanceData \
4676 (tclStubsPtr->tcl_GetChannelInstanceData) /* 154 */
4677 #endif
4678 #ifndef Tcl_GetChannelMode
4679 #define Tcl_GetChannelMode \
4680 (tclStubsPtr->tcl_GetChannelMode) /* 155 */
4681 #endif
4682 #ifndef Tcl_GetChannelName
4683 #define Tcl_GetChannelName \
4684 (tclStubsPtr->tcl_GetChannelName) /* 156 */
4685 #endif
4686 #ifndef Tcl_GetChannelOption
4687 #define Tcl_GetChannelOption \
4688 (tclStubsPtr->tcl_GetChannelOption) /* 157 */
4689 #endif
4690 #ifndef Tcl_GetChannelType
4691 #define Tcl_GetChannelType \
4692 (tclStubsPtr->tcl_GetChannelType) /* 158 */
4693 #endif
4694 #ifndef Tcl_GetCommandInfo
4695 #define Tcl_GetCommandInfo \
4696 (tclStubsPtr->tcl_GetCommandInfo) /* 159 */
4697 #endif
4698 #ifndef Tcl_GetCommandName
4699 #define Tcl_GetCommandName \
4700 (tclStubsPtr->tcl_GetCommandName) /* 160 */
4701 #endif
4702 #ifndef Tcl_GetErrno
4703 #define Tcl_GetErrno \
4704 (tclStubsPtr->tcl_GetErrno) /* 161 */
4705 #endif
4706 #ifndef Tcl_GetHostName
4707 #define Tcl_GetHostName \
4708 (tclStubsPtr->tcl_GetHostName) /* 162 */
4709 #endif
4710 #ifndef Tcl_GetInterpPath
4711 #define Tcl_GetInterpPath \
4712 (tclStubsPtr->tcl_GetInterpPath) /* 163 */
4713 #endif
4714 #ifndef Tcl_GetMaster
4715 #define Tcl_GetMaster \
4716 (tclStubsPtr->tcl_GetMaster) /* 164 */
4717 #endif
4718 #ifndef Tcl_GetNameOfExecutable
4719 #define Tcl_GetNameOfExecutable \
4720 (tclStubsPtr->tcl_GetNameOfExecutable) /* 165 */
4721 #endif
4722 #ifndef Tcl_GetObjResult
4723 #define Tcl_GetObjResult \
4724 (tclStubsPtr->tcl_GetObjResult) /* 166 */
4725 #endif
4726 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
4727 #ifndef Tcl_GetOpenFile
4728 #define Tcl_GetOpenFile \
4729 (tclStubsPtr->tcl_GetOpenFile) /* 167 */
4730 #endif
4731 #endif /* UNIX */
4732 #ifdef MAC_OSX_TCL /* MACOSX */
4733 #ifndef Tcl_GetOpenFile
4734 #define Tcl_GetOpenFile \
4735 (tclStubsPtr->tcl_GetOpenFile) /* 167 */
4736 #endif
4737 #endif /* MACOSX */
4738 #ifndef Tcl_GetPathType
4739 #define Tcl_GetPathType \
4740 (tclStubsPtr->tcl_GetPathType) /* 168 */
4741 #endif
4742 #ifndef Tcl_Gets
4743 #define Tcl_Gets \
4744 (tclStubsPtr->tcl_Gets) /* 169 */
4745 #endif
4746 #ifndef Tcl_GetsObj
4747 #define Tcl_GetsObj \
4748 (tclStubsPtr->tcl_GetsObj) /* 170 */
4749 #endif
4750 #ifndef Tcl_GetServiceMode
4751 #define Tcl_GetServiceMode \
4752 (tclStubsPtr->tcl_GetServiceMode) /* 171 */
4753 #endif
4754 #ifndef Tcl_GetSlave
4755 #define Tcl_GetSlave \
4756 (tclStubsPtr->tcl_GetSlave) /* 172 */
4757 #endif
4758 #ifndef Tcl_GetStdChannel
4759 #define Tcl_GetStdChannel \
4760 (tclStubsPtr->tcl_GetStdChannel) /* 173 */
4761 #endif
4762 #ifndef Tcl_GetStringResult
4763 #define Tcl_GetStringResult \
4764 (tclStubsPtr->tcl_GetStringResult) /* 174 */
4765 #endif
4766 #ifndef Tcl_GetVar
4767 #define Tcl_GetVar \
4768 (tclStubsPtr->tcl_GetVar) /* 175 */
4769 #endif
4770 #ifndef Tcl_GetVar2
4771 #define Tcl_GetVar2 \
4772 (tclStubsPtr->tcl_GetVar2) /* 176 */
4773 #endif
4774 #ifndef Tcl_GlobalEval
4775 #define Tcl_GlobalEval \
4776 (tclStubsPtr->tcl_GlobalEval) /* 177 */
4777 #endif
4778 #ifndef Tcl_GlobalEvalObj
4779 #define Tcl_GlobalEvalObj \
4780 (tclStubsPtr->tcl_GlobalEvalObj) /* 178 */
4781 #endif
4782 #ifndef Tcl_HideCommand
4783 #define Tcl_HideCommand \
4784 (tclStubsPtr->tcl_HideCommand) /* 179 */
4785 #endif
4786 #ifndef Tcl_Init
4787 #define Tcl_Init \
4788 (tclStubsPtr->tcl_Init) /* 180 */
4789 #endif
4790 #ifndef Tcl_InitHashTable
4791 #define Tcl_InitHashTable \
4792 (tclStubsPtr->tcl_InitHashTable) /* 181 */
4793 #endif
4794 #ifndef Tcl_InputBlocked
4795 #define Tcl_InputBlocked \
4796 (tclStubsPtr->tcl_InputBlocked) /* 182 */
4797 #endif
4798 #ifndef Tcl_InputBuffered
4799 #define Tcl_InputBuffered \
4800 (tclStubsPtr->tcl_InputBuffered) /* 183 */
4801 #endif
4802 #ifndef Tcl_InterpDeleted
4803 #define Tcl_InterpDeleted \
4804 (tclStubsPtr->tcl_InterpDeleted) /* 184 */
4805 #endif
4806 #ifndef Tcl_IsSafe
4807 #define Tcl_IsSafe \
4808 (tclStubsPtr->tcl_IsSafe) /* 185 */
4809 #endif
4810 #ifndef Tcl_JoinPath
4811 #define Tcl_JoinPath \
4812 (tclStubsPtr->tcl_JoinPath) /* 186 */
4813 #endif
4814 #ifndef Tcl_LinkVar
4815 #define Tcl_LinkVar \
4816 (tclStubsPtr->tcl_LinkVar) /* 187 */
4817 #endif
4818 /* Slot 188 is reserved */
4819 #ifndef Tcl_MakeFileChannel
4820 #define Tcl_MakeFileChannel \
4821 (tclStubsPtr->tcl_MakeFileChannel) /* 189 */
4822 #endif
4823 #ifndef Tcl_MakeSafe
4824 #define Tcl_MakeSafe \
4825 (tclStubsPtr->tcl_MakeSafe) /* 190 */
4826 #endif
4827 #ifndef Tcl_MakeTcpClientChannel
4828 #define Tcl_MakeTcpClientChannel \
4829 (tclStubsPtr->tcl_MakeTcpClientChannel) /* 191 */
4830 #endif
4831 #ifndef Tcl_Merge
4832 #define Tcl_Merge \
4833 (tclStubsPtr->tcl_Merge) /* 192 */
4834 #endif
4835 #ifndef Tcl_NextHashEntry
4836 #define Tcl_NextHashEntry \
4837 (tclStubsPtr->tcl_NextHashEntry) /* 193 */
4838 #endif
4839 #ifndef Tcl_NotifyChannel
4840 #define Tcl_NotifyChannel \
4841 (tclStubsPtr->tcl_NotifyChannel) /* 194 */
4842 #endif
4843 #ifndef Tcl_ObjGetVar2
4844 #define Tcl_ObjGetVar2 \
4845 (tclStubsPtr->tcl_ObjGetVar2) /* 195 */
4846 #endif
4847 #ifndef Tcl_ObjSetVar2
4848 #define Tcl_ObjSetVar2 \
4849 (tclStubsPtr->tcl_ObjSetVar2) /* 196 */
4850 #endif
4851 #ifndef Tcl_OpenCommandChannel
4852 #define Tcl_OpenCommandChannel \
4853 (tclStubsPtr->tcl_OpenCommandChannel) /* 197 */
4854 #endif
4855 #ifndef Tcl_OpenFileChannel
4856 #define Tcl_OpenFileChannel \
4857 (tclStubsPtr->tcl_OpenFileChannel) /* 198 */
4858 #endif
4859 #ifndef Tcl_OpenTcpClient
4860 #define Tcl_OpenTcpClient \
4861 (tclStubsPtr->tcl_OpenTcpClient) /* 199 */
4862 #endif
4863 #ifndef Tcl_OpenTcpServer
4864 #define Tcl_OpenTcpServer \
4865 (tclStubsPtr->tcl_OpenTcpServer) /* 200 */
4866 #endif
4867 #ifndef Tcl_Preserve
4868 #define Tcl_Preserve \
4869 (tclStubsPtr->tcl_Preserve) /* 201 */
4870 #endif
4871 #ifndef Tcl_PrintDouble
4872 #define Tcl_PrintDouble \
4873 (tclStubsPtr->tcl_PrintDouble) /* 202 */
4874 #endif
4875 #ifndef Tcl_PutEnv
4876 #define Tcl_PutEnv \
4877 (tclStubsPtr->tcl_PutEnv) /* 203 */
4878 #endif
4879 #ifndef Tcl_PosixError
4880 #define Tcl_PosixError \
4881 (tclStubsPtr->tcl_PosixError) /* 204 */
4882 #endif
4883 #ifndef Tcl_QueueEvent
4884 #define Tcl_QueueEvent \
4885 (tclStubsPtr->tcl_QueueEvent) /* 205 */
4886 #endif
4887 #ifndef Tcl_Read
4888 #define Tcl_Read \
4889 (tclStubsPtr->tcl_Read) /* 206 */
4890 #endif
4891 #ifndef Tcl_ReapDetachedProcs
4892 #define Tcl_ReapDetachedProcs \
4893 (tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */
4894 #endif
4895 #ifndef Tcl_RecordAndEval
4896 #define Tcl_RecordAndEval \
4897 (tclStubsPtr->tcl_RecordAndEval) /* 208 */
4898 #endif
4899 #ifndef Tcl_RecordAndEvalObj
4900 #define Tcl_RecordAndEvalObj \
4901 (tclStubsPtr->tcl_RecordAndEvalObj) /* 209 */
4902 #endif
4903 #ifndef Tcl_RegisterChannel
4904 #define Tcl_RegisterChannel \
4905 (tclStubsPtr->tcl_RegisterChannel) /* 210 */
4906 #endif
4907 #ifndef Tcl_RegisterObjType
4908 #define Tcl_RegisterObjType \
4909 (tclStubsPtr->tcl_RegisterObjType) /* 211 */
4910 #endif
4911 #ifndef Tcl_RegExpCompile
4912 #define Tcl_RegExpCompile \
4913 (tclStubsPtr->tcl_RegExpCompile) /* 212 */
4914 #endif
4915 #ifndef Tcl_RegExpExec
4916 #define Tcl_RegExpExec \
4917 (tclStubsPtr->tcl_RegExpExec) /* 213 */
4918 #endif
4919 #ifndef Tcl_RegExpMatch
4920 #define Tcl_RegExpMatch \
4921 (tclStubsPtr->tcl_RegExpMatch) /* 214 */
4922 #endif
4923 #ifndef Tcl_RegExpRange
4924 #define Tcl_RegExpRange \
4925 (tclStubsPtr->tcl_RegExpRange) /* 215 */
4926 #endif
4927 #ifndef Tcl_Release
4928 #define Tcl_Release \
4929 (tclStubsPtr->tcl_Release) /* 216 */
4930 #endif
4931 #ifndef Tcl_ResetResult
4932 #define Tcl_ResetResult \
4933 (tclStubsPtr->tcl_ResetResult) /* 217 */
4934 #endif
4935 #ifndef Tcl_ScanElement
4936 #define Tcl_ScanElement \
4937 (tclStubsPtr->tcl_ScanElement) /* 218 */
4938 #endif
4939 #ifndef Tcl_ScanCountedElement
4940 #define Tcl_ScanCountedElement \
4941 (tclStubsPtr->tcl_ScanCountedElement) /* 219 */
4942 #endif
4943 #ifndef Tcl_SeekOld
4944 #define Tcl_SeekOld \
4945 (tclStubsPtr->tcl_SeekOld) /* 220 */
4946 #endif
4947 #ifndef Tcl_ServiceAll
4948 #define Tcl_ServiceAll \
4949 (tclStubsPtr->tcl_ServiceAll) /* 221 */
4950 #endif
4951 #ifndef Tcl_ServiceEvent
4952 #define Tcl_ServiceEvent \
4953 (tclStubsPtr->tcl_ServiceEvent) /* 222 */
4954 #endif
4955 #ifndef Tcl_SetAssocData
4956 #define Tcl_SetAssocData \
4957 (tclStubsPtr->tcl_SetAssocData) /* 223 */
4958 #endif
4959 #ifndef Tcl_SetChannelBufferSize
4960 #define Tcl_SetChannelBufferSize \
4961 (tclStubsPtr->tcl_SetChannelBufferSize) /* 224 */
4962 #endif
4963 #ifndef Tcl_SetChannelOption
4964 #define Tcl_SetChannelOption \
4965 (tclStubsPtr->tcl_SetChannelOption) /* 225 */
4966 #endif
4967 #ifndef Tcl_SetCommandInfo
4968 #define Tcl_SetCommandInfo \
4969 (tclStubsPtr->tcl_SetCommandInfo) /* 226 */
4970 #endif
4971 #ifndef Tcl_SetErrno
4972 #define Tcl_SetErrno \
4973 (tclStubsPtr->tcl_SetErrno) /* 227 */
4974 #endif
4975 #ifndef Tcl_SetErrorCode
4976 #define Tcl_SetErrorCode \
4977 (tclStubsPtr->tcl_SetErrorCode) /* 228 */
4978 #endif
4979 #ifndef Tcl_SetMaxBlockTime
4980 #define Tcl_SetMaxBlockTime \
4981 (tclStubsPtr->tcl_SetMaxBlockTime) /* 229 */
4982 #endif
4983 #ifndef Tcl_SetPanicProc
4984 #define Tcl_SetPanicProc \
4985 (tclStubsPtr->tcl_SetPanicProc) /* 230 */
4986 #endif
4987 #ifndef Tcl_SetRecursionLimit
4988 #define Tcl_SetRecursionLimit \
4989 (tclStubsPtr->tcl_SetRecursionLimit) /* 231 */
4990 #endif
4991 #ifndef Tcl_SetResult
4992 #define Tcl_SetResult \
4993 (tclStubsPtr->tcl_SetResult) /* 232 */
4994 #endif
4995 #ifndef Tcl_SetServiceMode
4996 #define Tcl_SetServiceMode \
4997 (tclStubsPtr->tcl_SetServiceMode) /* 233 */
4998 #endif
4999 #ifndef Tcl_SetObjErrorCode
5000 #define Tcl_SetObjErrorCode \
5001 (tclStubsPtr->tcl_SetObjErrorCode) /* 234 */
5002 #endif
5003 #ifndef Tcl_SetObjResult
5004 #define Tcl_SetObjResult \
5005 (tclStubsPtr->tcl_SetObjResult) /* 235 */
5006 #endif
5007 #ifndef Tcl_SetStdChannel
5008 #define Tcl_SetStdChannel \
5009 (tclStubsPtr->tcl_SetStdChannel) /* 236 */
5010 #endif
5011 #ifndef Tcl_SetVar
5012 #define Tcl_SetVar \
5013 (tclStubsPtr->tcl_SetVar) /* 237 */
5014 #endif
5015 #ifndef Tcl_SetVar2
5016 #define Tcl_SetVar2 \
5017 (tclStubsPtr->tcl_SetVar2) /* 238 */
5018 #endif
5019 #ifndef Tcl_SignalId
5020 #define Tcl_SignalId \
5021 (tclStubsPtr->tcl_SignalId) /* 239 */
5022 #endif
5023 #ifndef Tcl_SignalMsg
5024 #define Tcl_SignalMsg \
5025 (tclStubsPtr->tcl_SignalMsg) /* 240 */
5026 #endif
5027 #ifndef Tcl_SourceRCFile
5028 #define Tcl_SourceRCFile \
5029 (tclStubsPtr->tcl_SourceRCFile) /* 241 */
5030 #endif
5031 #ifndef Tcl_SplitList
5032 #define Tcl_SplitList \
5033 (tclStubsPtr->tcl_SplitList) /* 242 */
5034 #endif
5035 #ifndef Tcl_SplitPath
5036 #define Tcl_SplitPath \
5037 (tclStubsPtr->tcl_SplitPath) /* 243 */
5038 #endif
5039 #ifndef Tcl_StaticPackage
5040 #define Tcl_StaticPackage \
5041 (tclStubsPtr->tcl_StaticPackage) /* 244 */
5042 #endif
5043 #ifndef Tcl_StringMatch
5044 #define Tcl_StringMatch \
5045 (tclStubsPtr->tcl_StringMatch) /* 245 */
5046 #endif
5047 #ifndef Tcl_TellOld
5048 #define Tcl_TellOld \
5049 (tclStubsPtr->tcl_TellOld) /* 246 */
5050 #endif
5051 #ifndef Tcl_TraceVar
5052 #define Tcl_TraceVar \
5053 (tclStubsPtr->tcl_TraceVar) /* 247 */
5054 #endif
5055 #ifndef Tcl_TraceVar2
5056 #define Tcl_TraceVar2 \
5057 (tclStubsPtr->tcl_TraceVar2) /* 248 */
5058 #endif
5059 #ifndef Tcl_TranslateFileName
5060 #define Tcl_TranslateFileName \
5061 (tclStubsPtr->tcl_TranslateFileName) /* 249 */
5062 #endif
5063 #ifndef Tcl_Ungets
5064 #define Tcl_Ungets \
5065 (tclStubsPtr->tcl_Ungets) /* 250 */
5066 #endif
5067 #ifndef Tcl_UnlinkVar
5068 #define Tcl_UnlinkVar \
5069 (tclStubsPtr->tcl_UnlinkVar) /* 251 */
5070 #endif
5071 #ifndef Tcl_UnregisterChannel
5072 #define Tcl_UnregisterChannel \
5073 (tclStubsPtr->tcl_UnregisterChannel) /* 252 */
5074 #endif
5075 #ifndef Tcl_UnsetVar
5076 #define Tcl_UnsetVar \
5077 (tclStubsPtr->tcl_UnsetVar) /* 253 */
5078 #endif
5079 #ifndef Tcl_UnsetVar2
5080 #define Tcl_UnsetVar2 \
5081 (tclStubsPtr->tcl_UnsetVar2) /* 254 */
5082 #endif
5083 #ifndef Tcl_UntraceVar
5084 #define Tcl_UntraceVar \
5085 (tclStubsPtr->tcl_UntraceVar) /* 255 */
5086 #endif
5087 #ifndef Tcl_UntraceVar2
5088 #define Tcl_UntraceVar2 \
5089 (tclStubsPtr->tcl_UntraceVar2) /* 256 */
5090 #endif
5091 #ifndef Tcl_UpdateLinkedVar
5092 #define Tcl_UpdateLinkedVar \
5093 (tclStubsPtr->tcl_UpdateLinkedVar) /* 257 */
5094 #endif
5095 #ifndef Tcl_UpVar
5096 #define Tcl_UpVar \
5097 (tclStubsPtr->tcl_UpVar) /* 258 */
5098 #endif
5099 #ifndef Tcl_UpVar2
5100 #define Tcl_UpVar2 \
5101 (tclStubsPtr->tcl_UpVar2) /* 259 */
5102 #endif
5103 #ifndef Tcl_VarEval
5104 #define Tcl_VarEval \
5105 (tclStubsPtr->tcl_VarEval) /* 260 */
5106 #endif
5107 #ifndef Tcl_VarTraceInfo
5108 #define Tcl_VarTraceInfo \
5109 (tclStubsPtr->tcl_VarTraceInfo) /* 261 */
5110 #endif
5111 #ifndef Tcl_VarTraceInfo2
5112 #define Tcl_VarTraceInfo2 \
5113 (tclStubsPtr->tcl_VarTraceInfo2) /* 262 */
5114 #endif
5115 #ifndef Tcl_Write
5116 #define Tcl_Write \
5117 (tclStubsPtr->tcl_Write) /* 263 */
5118 #endif
5119 #ifndef Tcl_WrongNumArgs
5120 #define Tcl_WrongNumArgs \
5121 (tclStubsPtr->tcl_WrongNumArgs) /* 264 */
5122 #endif
5123 #ifndef Tcl_DumpActiveMemory
5124 #define Tcl_DumpActiveMemory \
5125 (tclStubsPtr->tcl_DumpActiveMemory) /* 265 */
5126 #endif
5127 #ifndef Tcl_ValidateAllMemory
5128 #define Tcl_ValidateAllMemory \
5129 (tclStubsPtr->tcl_ValidateAllMemory) /* 266 */
5130 #endif
5131 #ifndef Tcl_AppendResultVA
5132 #define Tcl_AppendResultVA \
5133 (tclStubsPtr->tcl_AppendResultVA) /* 267 */
5134 #endif
5135 #ifndef Tcl_AppendStringsToObjVA
5136 #define Tcl_AppendStringsToObjVA \
5137 (tclStubsPtr->tcl_AppendStringsToObjVA) /* 268 */
5138 #endif
5139 #ifndef Tcl_HashStats
5140 #define Tcl_HashStats \
5141 (tclStubsPtr->tcl_HashStats) /* 269 */
5142 #endif
5143 #ifndef Tcl_ParseVar
5144 #define Tcl_ParseVar \
5145 (tclStubsPtr->tcl_ParseVar) /* 270 */
5146 #endif
5147 #ifndef Tcl_PkgPresent
5148 #define Tcl_PkgPresent \
5149 (tclStubsPtr->tcl_PkgPresent) /* 271 */
5150 #endif
5151 #ifndef Tcl_PkgPresentEx
5152 #define Tcl_PkgPresentEx \
5153 (tclStubsPtr->tcl_PkgPresentEx) /* 272 */
5154 #endif
5155 #ifndef Tcl_PkgProvide
5156 #define Tcl_PkgProvide \
5157 (tclStubsPtr->tcl_PkgProvide) /* 273 */
5158 #endif
5159 #ifndef Tcl_PkgRequire
5160 #define Tcl_PkgRequire \
5161 (tclStubsPtr->tcl_PkgRequire) /* 274 */
5162 #endif
5163 #ifndef Tcl_SetErrorCodeVA
5164 #define Tcl_SetErrorCodeVA \
5165 (tclStubsPtr->tcl_SetErrorCodeVA) /* 275 */
5166 #endif
5167 #ifndef Tcl_VarEvalVA
5168 #define Tcl_VarEvalVA \
5169 (tclStubsPtr->tcl_VarEvalVA) /* 276 */
5170 #endif
5171 #ifndef Tcl_WaitPid
5172 #define Tcl_WaitPid \
5173 (tclStubsPtr->tcl_WaitPid) /* 277 */
5174 #endif
5175 #ifndef Tcl_PanicVA
5176 #define Tcl_PanicVA \
5177 (tclStubsPtr->tcl_PanicVA) /* 278 */
5178 #endif
5179 #ifndef Tcl_GetVersion
5180 #define Tcl_GetVersion \
5181 (tclStubsPtr->tcl_GetVersion) /* 279 */
5182 #endif
5183 #ifndef Tcl_InitMemory
5184 #define Tcl_InitMemory \
5185 (tclStubsPtr->tcl_InitMemory) /* 280 */
5186 #endif
5187 #ifndef Tcl_StackChannel
5188 #define Tcl_StackChannel \
5189 (tclStubsPtr->tcl_StackChannel) /* 281 */
5190 #endif
5191 #ifndef Tcl_UnstackChannel
5192 #define Tcl_UnstackChannel \
5193 (tclStubsPtr->tcl_UnstackChannel) /* 282 */
5194 #endif
5195 #ifndef Tcl_GetStackedChannel
5196 #define Tcl_GetStackedChannel \
5197 (tclStubsPtr->tcl_GetStackedChannel) /* 283 */
5198 #endif
5199 #ifndef Tcl_SetMainLoop
5200 #define Tcl_SetMainLoop \
5201 (tclStubsPtr->tcl_SetMainLoop) /* 284 */
5202 #endif
5203 /* Slot 285 is reserved */
5204 #ifndef Tcl_AppendObjToObj
5205 #define Tcl_AppendObjToObj \
5206 (tclStubsPtr->tcl_AppendObjToObj) /* 286 */
5207 #endif
5208 #ifndef Tcl_CreateEncoding
5209 #define Tcl_CreateEncoding \
5210 (tclStubsPtr->tcl_CreateEncoding) /* 287 */
5211 #endif
5212 #ifndef Tcl_CreateThreadExitHandler
5213 #define Tcl_CreateThreadExitHandler \
5214 (tclStubsPtr->tcl_CreateThreadExitHandler) /* 288 */
5215 #endif
5216 #ifndef Tcl_DeleteThreadExitHandler
5217 #define Tcl_DeleteThreadExitHandler \
5218 (tclStubsPtr->tcl_DeleteThreadExitHandler) /* 289 */
5219 #endif
5220 #ifndef Tcl_DiscardResult
5221 #define Tcl_DiscardResult \
5222 (tclStubsPtr->tcl_DiscardResult) /* 290 */
5223 #endif
5224 #ifndef Tcl_EvalEx
5225 #define Tcl_EvalEx \
5226 (tclStubsPtr->tcl_EvalEx) /* 291 */
5227 #endif
5228 #ifndef Tcl_EvalObjv
5229 #define Tcl_EvalObjv \
5230 (tclStubsPtr->tcl_EvalObjv) /* 292 */
5231 #endif
5232 #ifndef Tcl_EvalObjEx
5233 #define Tcl_EvalObjEx \
5234 (tclStubsPtr->tcl_EvalObjEx) /* 293 */
5235 #endif
5236 #ifndef Tcl_ExitThread
5237 #define Tcl_ExitThread \
5238 (tclStubsPtr->tcl_ExitThread) /* 294 */
5239 #endif
5240 #ifndef Tcl_ExternalToUtf
5241 #define Tcl_ExternalToUtf \
5242 (tclStubsPtr->tcl_ExternalToUtf) /* 295 */
5243 #endif
5244 #ifndef Tcl_ExternalToUtfDString
5245 #define Tcl_ExternalToUtfDString \
5246 (tclStubsPtr->tcl_ExternalToUtfDString) /* 296 */
5247 #endif
5248 #ifndef Tcl_FinalizeThread
5249 #define Tcl_FinalizeThread \
5250 (tclStubsPtr->tcl_FinalizeThread) /* 297 */
5251 #endif
5252 #ifndef Tcl_FinalizeNotifier
5253 #define Tcl_FinalizeNotifier \
5254 (tclStubsPtr->tcl_FinalizeNotifier) /* 298 */
5255 #endif
5256 #ifndef Tcl_FreeEncoding
5257 #define Tcl_FreeEncoding \
5258 (tclStubsPtr->tcl_FreeEncoding) /* 299 */
5259 #endif
5260 #ifndef Tcl_GetCurrentThread
5261 #define Tcl_GetCurrentThread \
5262 (tclStubsPtr->tcl_GetCurrentThread) /* 300 */
5263 #endif
5264 #ifndef Tcl_GetEncoding
5265 #define Tcl_GetEncoding \
5266 (tclStubsPtr->tcl_GetEncoding) /* 301 */
5267 #endif
5268 #ifndef Tcl_GetEncodingName
5269 #define Tcl_GetEncodingName \
5270 (tclStubsPtr->tcl_GetEncodingName) /* 302 */
5271 #endif
5272 #ifndef Tcl_GetEncodingNames
5273 #define Tcl_GetEncodingNames \
5274 (tclStubsPtr->tcl_GetEncodingNames) /* 303 */
5275 #endif
5276 #ifndef Tcl_GetIndexFromObjStruct
5277 #define Tcl_GetIndexFromObjStruct \
5278 (tclStubsPtr->tcl_GetIndexFromObjStruct) /* 304 */
5279 #endif
5280 #ifndef Tcl_GetThreadData
5281 #define Tcl_GetThreadData \
5282 (tclStubsPtr->tcl_GetThreadData) /* 305 */
5283 #endif
5284 #ifndef Tcl_GetVar2Ex
5285 #define Tcl_GetVar2Ex \
5286 (tclStubsPtr->tcl_GetVar2Ex) /* 306 */
5287 #endif
5288 #ifndef Tcl_InitNotifier
5289 #define Tcl_InitNotifier \
5290 (tclStubsPtr->tcl_InitNotifier) /* 307 */
5291 #endif
5292 #ifndef Tcl_MutexLock
5293 #define Tcl_MutexLock \
5294 (tclStubsPtr->tcl_MutexLock) /* 308 */
5295 #endif
5296 #ifndef Tcl_MutexUnlock
5297 #define Tcl_MutexUnlock \
5298 (tclStubsPtr->tcl_MutexUnlock) /* 309 */
5299 #endif
5300 #ifndef Tcl_ConditionNotify
5301 #define Tcl_ConditionNotify \
5302 (tclStubsPtr->tcl_ConditionNotify) /* 310 */
5303 #endif
5304 #ifndef Tcl_ConditionWait
5305 #define Tcl_ConditionWait \
5306 (tclStubsPtr->tcl_ConditionWait) /* 311 */
5307 #endif
5308 #ifndef Tcl_NumUtfChars
5309 #define Tcl_NumUtfChars \
5310 (tclStubsPtr->tcl_NumUtfChars) /* 312 */
5311 #endif
5312 #ifndef Tcl_ReadChars
5313 #define Tcl_ReadChars \
5314 (tclStubsPtr->tcl_ReadChars) /* 313 */
5315 #endif
5316 #ifndef Tcl_RestoreResult
5317 #define Tcl_RestoreResult \
5318 (tclStubsPtr->tcl_RestoreResult) /* 314 */
5319 #endif
5320 #ifndef Tcl_SaveResult
5321 #define Tcl_SaveResult \
5322 (tclStubsPtr->tcl_SaveResult) /* 315 */
5323 #endif
5324 #ifndef Tcl_SetSystemEncoding
5325 #define Tcl_SetSystemEncoding \
5326 (tclStubsPtr->tcl_SetSystemEncoding) /* 316 */
5327 #endif
5328 #ifndef Tcl_SetVar2Ex
5329 #define Tcl_SetVar2Ex \
5330 (tclStubsPtr->tcl_SetVar2Ex) /* 317 */
5331 #endif
5332 #ifndef Tcl_ThreadAlert
5333 #define Tcl_ThreadAlert \
5334 (tclStubsPtr->tcl_ThreadAlert) /* 318 */
5335 #endif
5336 #ifndef Tcl_ThreadQueueEvent
5337 #define Tcl_ThreadQueueEvent \
5338 (tclStubsPtr->tcl_ThreadQueueEvent) /* 319 */
5339 #endif
5340 #ifndef Tcl_UniCharAtIndex
5341 #define Tcl_UniCharAtIndex \
5342 (tclStubsPtr->tcl_UniCharAtIndex) /* 320 */
5343 #endif
5344 #ifndef Tcl_UniCharToLower
5345 #define Tcl_UniCharToLower \
5346 (tclStubsPtr->tcl_UniCharToLower) /* 321 */
5347 #endif
5348 #ifndef Tcl_UniCharToTitle
5349 #define Tcl_UniCharToTitle \
5350 (tclStubsPtr->tcl_UniCharToTitle) /* 322 */
5351 #endif
5352 #ifndef Tcl_UniCharToUpper
5353 #define Tcl_UniCharToUpper \
5354 (tclStubsPtr->tcl_UniCharToUpper) /* 323 */
5355 #endif
5356 #ifndef Tcl_UniCharToUtf
5357 #define Tcl_UniCharToUtf \
5358 (tclStubsPtr->tcl_UniCharToUtf) /* 324 */
5359 #endif
5360 #ifndef Tcl_UtfAtIndex
5361 #define Tcl_UtfAtIndex \
5362 (tclStubsPtr->tcl_UtfAtIndex) /* 325 */
5363 #endif
5364 #ifndef Tcl_UtfCharComplete
5365 #define Tcl_UtfCharComplete \
5366 (tclStubsPtr->tcl_UtfCharComplete) /* 326 */
5367 #endif
5368 #ifndef Tcl_UtfBackslash
5369 #define Tcl_UtfBackslash \
5370 (tclStubsPtr->tcl_UtfBackslash) /* 327 */
5371 #endif
5372 #ifndef Tcl_UtfFindFirst
5373 #define Tcl_UtfFindFirst \
5374 (tclStubsPtr->tcl_UtfFindFirst) /* 328 */
5375 #endif
5376 #ifndef Tcl_UtfFindLast
5377 #define Tcl_UtfFindLast \
5378 (tclStubsPtr->tcl_UtfFindLast) /* 329 */
5379 #endif
5380 #ifndef Tcl_UtfNext
5381 #define Tcl_UtfNext \
5382 (tclStubsPtr->tcl_UtfNext) /* 330 */
5383 #endif
5384 #ifndef Tcl_UtfPrev
5385 #define Tcl_UtfPrev \
5386 (tclStubsPtr->tcl_UtfPrev) /* 331 */
5387 #endif
5388 #ifndef Tcl_UtfToExternal
5389 #define Tcl_UtfToExternal \
5390 (tclStubsPtr->tcl_UtfToExternal) /* 332 */
5391 #endif
5392 #ifndef Tcl_UtfToExternalDString
5393 #define Tcl_UtfToExternalDString \
5394 (tclStubsPtr->tcl_UtfToExternalDString) /* 333 */
5395 #endif
5396 #ifndef Tcl_UtfToLower
5397 #define Tcl_UtfToLower \
5398 (tclStubsPtr->tcl_UtfToLower) /* 334 */
5399 #endif
5400 #ifndef Tcl_UtfToTitle
5401 #define Tcl_UtfToTitle \
5402 (tclStubsPtr->tcl_UtfToTitle) /* 335 */
5403 #endif
5404 #ifndef Tcl_UtfToUniChar
5405 #define Tcl_UtfToUniChar \
5406 (tclStubsPtr->tcl_UtfToUniChar) /* 336 */
5407 #endif
5408 #ifndef Tcl_UtfToUpper
5409 #define Tcl_UtfToUpper \
5410 (tclStubsPtr->tcl_UtfToUpper) /* 337 */
5411 #endif
5412 #ifndef Tcl_WriteChars
5413 #define Tcl_WriteChars \
5414 (tclStubsPtr->tcl_WriteChars) /* 338 */
5415 #endif
5416 #ifndef Tcl_WriteObj
5417 #define Tcl_WriteObj \
5418 (tclStubsPtr->tcl_WriteObj) /* 339 */
5419 #endif
5420 #ifndef Tcl_GetString
5421 #define Tcl_GetString \
5422 (tclStubsPtr->tcl_GetString) /* 340 */
5423 #endif
5424 #ifndef Tcl_GetDefaultEncodingDir
5425 #define Tcl_GetDefaultEncodingDir \
5426 (tclStubsPtr->tcl_GetDefaultEncodingDir) /* 341 */
5427 #endif
5428 #ifndef Tcl_SetDefaultEncodingDir
5429 #define Tcl_SetDefaultEncodingDir \
5430 (tclStubsPtr->tcl_SetDefaultEncodingDir) /* 342 */
5431 #endif
5432 #ifndef Tcl_AlertNotifier
5433 #define Tcl_AlertNotifier \
5434 (tclStubsPtr->tcl_AlertNotifier) /* 343 */
5435 #endif
5436 #ifndef Tcl_ServiceModeHook
5437 #define Tcl_ServiceModeHook \
5438 (tclStubsPtr->tcl_ServiceModeHook) /* 344 */
5439 #endif
5440 #ifndef Tcl_UniCharIsAlnum
5441 #define Tcl_UniCharIsAlnum \
5442 (tclStubsPtr->tcl_UniCharIsAlnum) /* 345 */
5443 #endif
5444 #ifndef Tcl_UniCharIsAlpha
5445 #define Tcl_UniCharIsAlpha \
5446 (tclStubsPtr->tcl_UniCharIsAlpha) /* 346 */
5447 #endif
5448 #ifndef Tcl_UniCharIsDigit
5449 #define Tcl_UniCharIsDigit \
5450 (tclStubsPtr->tcl_UniCharIsDigit) /* 347 */
5451 #endif
5452 #ifndef Tcl_UniCharIsLower
5453 #define Tcl_UniCharIsLower \
5454 (tclStubsPtr->tcl_UniCharIsLower) /* 348 */
5455 #endif
5456 #ifndef Tcl_UniCharIsSpace
5457 #define Tcl_UniCharIsSpace \
5458 (tclStubsPtr->tcl_UniCharIsSpace) /* 349 */
5459 #endif
5460 #ifndef Tcl_UniCharIsUpper
5461 #define Tcl_UniCharIsUpper \
5462 (tclStubsPtr->tcl_UniCharIsUpper) /* 350 */
5463 #endif
5464 #ifndef Tcl_UniCharIsWordChar
5465 #define Tcl_UniCharIsWordChar \
5466 (tclStubsPtr->tcl_UniCharIsWordChar) /* 351 */
5467 #endif
5468 #ifndef Tcl_UniCharLen
5469 #define Tcl_UniCharLen \
5470 (tclStubsPtr->tcl_UniCharLen) /* 352 */
5471 #endif
5472 #ifndef Tcl_UniCharNcmp
5473 #define Tcl_UniCharNcmp \
5474 (tclStubsPtr->tcl_UniCharNcmp) /* 353 */
5475 #endif
5476 #ifndef Tcl_UniCharToUtfDString
5477 #define Tcl_UniCharToUtfDString \
5478 (tclStubsPtr->tcl_UniCharToUtfDString) /* 354 */
5479 #endif
5480 #ifndef Tcl_UtfToUniCharDString
5481 #define Tcl_UtfToUniCharDString \
5482 (tclStubsPtr->tcl_UtfToUniCharDString) /* 355 */
5483 #endif
5484 #ifndef Tcl_GetRegExpFromObj
5485 #define Tcl_GetRegExpFromObj \
5486 (tclStubsPtr->tcl_GetRegExpFromObj) /* 356 */
5487 #endif
5488 #ifndef Tcl_EvalTokens
5489 #define Tcl_EvalTokens \
5490 (tclStubsPtr->tcl_EvalTokens) /* 357 */
5491 #endif
5492 #ifndef Tcl_FreeParse
5493 #define Tcl_FreeParse \
5494 (tclStubsPtr->tcl_FreeParse) /* 358 */
5495 #endif
5496 #ifndef Tcl_LogCommandInfo
5497 #define Tcl_LogCommandInfo \
5498 (tclStubsPtr->tcl_LogCommandInfo) /* 359 */
5499 #endif
5500 #ifndef Tcl_ParseBraces
5501 #define Tcl_ParseBraces \
5502 (tclStubsPtr->tcl_ParseBraces) /* 360 */
5503 #endif
5504 #ifndef Tcl_ParseCommand
5505 #define Tcl_ParseCommand \
5506 (tclStubsPtr->tcl_ParseCommand) /* 361 */
5507 #endif
5508 #ifndef Tcl_ParseExpr
5509 #define Tcl_ParseExpr \
5510 (tclStubsPtr->tcl_ParseExpr) /* 362 */
5511 #endif
5512 #ifndef Tcl_ParseQuotedString
5513 #define Tcl_ParseQuotedString \
5514 (tclStubsPtr->tcl_ParseQuotedString) /* 363 */
5515 #endif
5516 #ifndef Tcl_ParseVarName
5517 #define Tcl_ParseVarName \
5518 (tclStubsPtr->tcl_ParseVarName) /* 364 */
5519 #endif
5520 #ifndef Tcl_GetCwd
5521 #define Tcl_GetCwd \
5522 (tclStubsPtr->tcl_GetCwd) /* 365 */
5523 #endif
5524 #ifndef Tcl_Chdir
5525 #define Tcl_Chdir \
5526 (tclStubsPtr->tcl_Chdir) /* 366 */
5527 #endif
5528 #ifndef Tcl_Access
5529 #define Tcl_Access \
5530 (tclStubsPtr->tcl_Access) /* 367 */
5531 #endif
5532 #ifndef Tcl_Stat
5533 #define Tcl_Stat \
5534 (tclStubsPtr->tcl_Stat) /* 368 */
5535 #endif
5536 #ifndef Tcl_UtfNcmp
5537 #define Tcl_UtfNcmp \
5538 (tclStubsPtr->tcl_UtfNcmp) /* 369 */
5539 #endif
5540 #ifndef Tcl_UtfNcasecmp
5541 #define Tcl_UtfNcasecmp \
5542 (tclStubsPtr->tcl_UtfNcasecmp) /* 370 */
5543 #endif
5544 #ifndef Tcl_StringCaseMatch
5545 #define Tcl_StringCaseMatch \
5546 (tclStubsPtr->tcl_StringCaseMatch) /* 371 */
5547 #endif
5548 #ifndef Tcl_UniCharIsControl
5549 #define Tcl_UniCharIsControl \
5550 (tclStubsPtr->tcl_UniCharIsControl) /* 372 */
5551 #endif
5552 #ifndef Tcl_UniCharIsGraph
5553 #define Tcl_UniCharIsGraph \
5554 (tclStubsPtr->tcl_UniCharIsGraph) /* 373 */
5555 #endif
5556 #ifndef Tcl_UniCharIsPrint
5557 #define Tcl_UniCharIsPrint \
5558 (tclStubsPtr->tcl_UniCharIsPrint) /* 374 */
5559 #endif
5560 #ifndef Tcl_UniCharIsPunct
5561 #define Tcl_UniCharIsPunct \
5562 (tclStubsPtr->tcl_UniCharIsPunct) /* 375 */
5563 #endif
5564 #ifndef Tcl_RegExpExecObj
5565 #define Tcl_RegExpExecObj \
5566 (tclStubsPtr->tcl_RegExpExecObj) /* 376 */
5567 #endif
5568 #ifndef Tcl_RegExpGetInfo
5569 #define Tcl_RegExpGetInfo \
5570 (tclStubsPtr->tcl_RegExpGetInfo) /* 377 */
5571 #endif
5572 #ifndef Tcl_NewUnicodeObj
5573 #define Tcl_NewUnicodeObj \
5574 (tclStubsPtr->tcl_NewUnicodeObj) /* 378 */
5575 #endif
5576 #ifndef Tcl_SetUnicodeObj
5577 #define Tcl_SetUnicodeObj \
5578 (tclStubsPtr->tcl_SetUnicodeObj) /* 379 */
5579 #endif
5580 #ifndef Tcl_GetCharLength
5581 #define Tcl_GetCharLength \
5582 (tclStubsPtr->tcl_GetCharLength) /* 380 */
5583 #endif
5584 #ifndef Tcl_GetUniChar
5585 #define Tcl_GetUniChar \
5586 (tclStubsPtr->tcl_GetUniChar) /* 381 */
5587 #endif
5588 #ifndef Tcl_GetUnicode
5589 #define Tcl_GetUnicode \
5590 (tclStubsPtr->tcl_GetUnicode) /* 382 */
5591 #endif
5592 #ifndef Tcl_GetRange
5593 #define Tcl_GetRange \
5594 (tclStubsPtr->tcl_GetRange) /* 383 */
5595 #endif
5596 #ifndef Tcl_AppendUnicodeToObj
5597 #define Tcl_AppendUnicodeToObj \
5598 (tclStubsPtr->tcl_AppendUnicodeToObj) /* 384 */
5599 #endif
5600 #ifndef Tcl_RegExpMatchObj
5601 #define Tcl_RegExpMatchObj \
5602 (tclStubsPtr->tcl_RegExpMatchObj) /* 385 */
5603 #endif
5604 #ifndef Tcl_SetNotifier
5605 #define Tcl_SetNotifier \
5606 (tclStubsPtr->tcl_SetNotifier) /* 386 */
5607 #endif
5608 #ifndef Tcl_GetAllocMutex
5609 #define Tcl_GetAllocMutex \
5610 (tclStubsPtr->tcl_GetAllocMutex) /* 387 */
5611 #endif
5612 #ifndef Tcl_GetChannelNames
5613 #define Tcl_GetChannelNames \
5614 (tclStubsPtr->tcl_GetChannelNames) /* 388 */
5615 #endif
5616 #ifndef Tcl_GetChannelNamesEx
5617 #define Tcl_GetChannelNamesEx \
5618 (tclStubsPtr->tcl_GetChannelNamesEx) /* 389 */
5619 #endif
5620 #ifndef Tcl_ProcObjCmd
5621 #define Tcl_ProcObjCmd \
5622 (tclStubsPtr->tcl_ProcObjCmd) /* 390 */
5623 #endif
5624 #ifndef Tcl_ConditionFinalize
5625 #define Tcl_ConditionFinalize \
5626 (tclStubsPtr->tcl_ConditionFinalize) /* 391 */
5627 #endif
5628 #ifndef Tcl_MutexFinalize
5629 #define Tcl_MutexFinalize \
5630 (tclStubsPtr->tcl_MutexFinalize) /* 392 */
5631 #endif
5632 #ifndef Tcl_CreateThread
5633 #define Tcl_CreateThread \
5634 (tclStubsPtr->tcl_CreateThread) /* 393 */
5635 #endif
5636 #ifndef Tcl_ReadRaw
5637 #define Tcl_ReadRaw \
5638 (tclStubsPtr->tcl_ReadRaw) /* 394 */
5639 #endif
5640 #ifndef Tcl_WriteRaw
5641 #define Tcl_WriteRaw \
5642 (tclStubsPtr->tcl_WriteRaw) /* 395 */
5643 #endif
5644 #ifndef Tcl_GetTopChannel
5645 #define Tcl_GetTopChannel \
5646 (tclStubsPtr->tcl_GetTopChannel) /* 396 */
5647 #endif
5648 #ifndef Tcl_ChannelBuffered
5649 #define Tcl_ChannelBuffered \
5650 (tclStubsPtr->tcl_ChannelBuffered) /* 397 */
5651 #endif
5652 #ifndef Tcl_ChannelName
5653 #define Tcl_ChannelName \
5654 (tclStubsPtr->tcl_ChannelName) /* 398 */
5655 #endif
5656 #ifndef Tcl_ChannelVersion
5657 #define Tcl_ChannelVersion \
5658 (tclStubsPtr->tcl_ChannelVersion) /* 399 */
5659 #endif
5660 #ifndef Tcl_ChannelBlockModeProc
5661 #define Tcl_ChannelBlockModeProc \
5662 (tclStubsPtr->tcl_ChannelBlockModeProc) /* 400 */
5663 #endif
5664 #ifndef Tcl_ChannelCloseProc
5665 #define Tcl_ChannelCloseProc \
5666 (tclStubsPtr->tcl_ChannelCloseProc) /* 401 */
5667 #endif
5668 #ifndef Tcl_ChannelClose2Proc
5669 #define Tcl_ChannelClose2Proc \
5670 (tclStubsPtr->tcl_ChannelClose2Proc) /* 402 */
5671 #endif
5672 #ifndef Tcl_ChannelInputProc
5673 #define Tcl_ChannelInputProc \
5674 (tclStubsPtr->tcl_ChannelInputProc) /* 403 */
5675 #endif
5676 #ifndef Tcl_ChannelOutputProc
5677 #define Tcl_ChannelOutputProc \
5678 (tclStubsPtr->tcl_ChannelOutputProc) /* 404 */
5679 #endif
5680 #ifndef Tcl_ChannelSeekProc
5681 #define Tcl_ChannelSeekProc \
5682 (tclStubsPtr->tcl_ChannelSeekProc) /* 405 */
5683 #endif
5684 #ifndef Tcl_ChannelSetOptionProc
5685 #define Tcl_ChannelSetOptionProc \
5686 (tclStubsPtr->tcl_ChannelSetOptionProc) /* 406 */
5687 #endif
5688 #ifndef Tcl_ChannelGetOptionProc
5689 #define Tcl_ChannelGetOptionProc \
5690 (tclStubsPtr->tcl_ChannelGetOptionProc) /* 407 */
5691 #endif
5692 #ifndef Tcl_ChannelWatchProc
5693 #define Tcl_ChannelWatchProc \
5694 (tclStubsPtr->tcl_ChannelWatchProc) /* 408 */
5695 #endif
5696 #ifndef Tcl_ChannelGetHandleProc
5697 #define Tcl_ChannelGetHandleProc \
5698 (tclStubsPtr->tcl_ChannelGetHandleProc) /* 409 */
5699 #endif
5700 #ifndef Tcl_ChannelFlushProc
5701 #define Tcl_ChannelFlushProc \
5702 (tclStubsPtr->tcl_ChannelFlushProc) /* 410 */
5703 #endif
5704 #ifndef Tcl_ChannelHandlerProc
5705 #define Tcl_ChannelHandlerProc \
5706 (tclStubsPtr->tcl_ChannelHandlerProc) /* 411 */
5707 #endif
5708 #ifndef Tcl_JoinThread
5709 #define Tcl_JoinThread \
5710 (tclStubsPtr->tcl_JoinThread) /* 412 */
5711 #endif
5712 #ifndef Tcl_IsChannelShared
5713 #define Tcl_IsChannelShared \
5714 (tclStubsPtr->tcl_IsChannelShared) /* 413 */
5715 #endif
5716 #ifndef Tcl_IsChannelRegistered
5717 #define Tcl_IsChannelRegistered \
5718 (tclStubsPtr->tcl_IsChannelRegistered) /* 414 */
5719 #endif
5720 #ifndef Tcl_CutChannel
5721 #define Tcl_CutChannel \
5722 (tclStubsPtr->tcl_CutChannel) /* 415 */
5723 #endif
5724 #ifndef Tcl_SpliceChannel
5725 #define Tcl_SpliceChannel \
5726 (tclStubsPtr->tcl_SpliceChannel) /* 416 */
5727 #endif
5728 #ifndef Tcl_ClearChannelHandlers
5729 #define Tcl_ClearChannelHandlers \
5730 (tclStubsPtr->tcl_ClearChannelHandlers) /* 417 */
5731 #endif
5732 #ifndef Tcl_IsChannelExisting
5733 #define Tcl_IsChannelExisting \
5734 (tclStubsPtr->tcl_IsChannelExisting) /* 418 */
5735 #endif
5736 #ifndef Tcl_UniCharNcasecmp
5737 #define Tcl_UniCharNcasecmp \
5738 (tclStubsPtr->tcl_UniCharNcasecmp) /* 419 */
5739 #endif
5740 #ifndef Tcl_UniCharCaseMatch
5741 #define Tcl_UniCharCaseMatch \
5742 (tclStubsPtr->tcl_UniCharCaseMatch) /* 420 */
5743 #endif
5744 #ifndef Tcl_FindHashEntry
5745 #define Tcl_FindHashEntry \
5746 (tclStubsPtr->tcl_FindHashEntry) /* 421 */
5747 #endif
5748 #ifndef Tcl_CreateHashEntry
5749 #define Tcl_CreateHashEntry \
5750 (tclStubsPtr->tcl_CreateHashEntry) /* 422 */
5751 #endif
5752 #ifndef Tcl_InitCustomHashTable
5753 #define Tcl_InitCustomHashTable \
5754 (tclStubsPtr->tcl_InitCustomHashTable) /* 423 */
5755 #endif
5756 #ifndef Tcl_InitObjHashTable
5757 #define Tcl_InitObjHashTable \
5758 (tclStubsPtr->tcl_InitObjHashTable) /* 424 */
5759 #endif
5760 #ifndef Tcl_CommandTraceInfo
5761 #define Tcl_CommandTraceInfo \
5762 (tclStubsPtr->tcl_CommandTraceInfo) /* 425 */
5763 #endif
5764 #ifndef Tcl_TraceCommand
5765 #define Tcl_TraceCommand \
5766 (tclStubsPtr->tcl_TraceCommand) /* 426 */
5767 #endif
5768 #ifndef Tcl_UntraceCommand
5769 #define Tcl_UntraceCommand \
5770 (tclStubsPtr->tcl_UntraceCommand) /* 427 */
5771 #endif
5772 #ifndef Tcl_AttemptAlloc
5773 #define Tcl_AttemptAlloc \
5774 (tclStubsPtr->tcl_AttemptAlloc) /* 428 */
5775 #endif
5776 #ifndef Tcl_AttemptDbCkalloc
5777 #define Tcl_AttemptDbCkalloc \
5778 (tclStubsPtr->tcl_AttemptDbCkalloc) /* 429 */
5779 #endif
5780 #ifndef Tcl_AttemptRealloc
5781 #define Tcl_AttemptRealloc \
5782 (tclStubsPtr->tcl_AttemptRealloc) /* 430 */
5783 #endif
5784 #ifndef Tcl_AttemptDbCkrealloc
5785 #define Tcl_AttemptDbCkrealloc \
5786 (tclStubsPtr->tcl_AttemptDbCkrealloc) /* 431 */
5787 #endif
5788 #ifndef Tcl_AttemptSetObjLength
5789 #define Tcl_AttemptSetObjLength \
5790 (tclStubsPtr->tcl_AttemptSetObjLength) /* 432 */
5791 #endif
5792 #ifndef Tcl_GetChannelThread
5793 #define Tcl_GetChannelThread \
5794 (tclStubsPtr->tcl_GetChannelThread) /* 433 */
5795 #endif
5796 #ifndef Tcl_GetUnicodeFromObj
5797 #define Tcl_GetUnicodeFromObj \
5798 (tclStubsPtr->tcl_GetUnicodeFromObj) /* 434 */
5799 #endif
5800 #ifndef Tcl_GetMathFuncInfo
5801 #define Tcl_GetMathFuncInfo \
5802 (tclStubsPtr->tcl_GetMathFuncInfo) /* 435 */
5803 #endif
5804 #ifndef Tcl_ListMathFuncs
5805 #define Tcl_ListMathFuncs \
5806 (tclStubsPtr->tcl_ListMathFuncs) /* 436 */
5807 #endif
5808 #ifndef Tcl_SubstObj
5809 #define Tcl_SubstObj \
5810 (tclStubsPtr->tcl_SubstObj) /* 437 */
5811 #endif
5812 #ifndef Tcl_DetachChannel
5813 #define Tcl_DetachChannel \
5814 (tclStubsPtr->tcl_DetachChannel) /* 438 */
5815 #endif
5816 #ifndef Tcl_IsStandardChannel
5817 #define Tcl_IsStandardChannel \
5818 (tclStubsPtr->tcl_IsStandardChannel) /* 439 */
5819 #endif
5820 #ifndef Tcl_FSCopyFile
5821 #define Tcl_FSCopyFile \
5822 (tclStubsPtr->tcl_FSCopyFile) /* 440 */
5823 #endif
5824 #ifndef Tcl_FSCopyDirectory
5825 #define Tcl_FSCopyDirectory \
5826 (tclStubsPtr->tcl_FSCopyDirectory) /* 441 */
5827 #endif
5828 #ifndef Tcl_FSCreateDirectory
5829 #define Tcl_FSCreateDirectory \
5830 (tclStubsPtr->tcl_FSCreateDirectory) /* 442 */
5831 #endif
5832 #ifndef Tcl_FSDeleteFile
5833 #define Tcl_FSDeleteFile \
5834 (tclStubsPtr->tcl_FSDeleteFile) /* 443 */
5835 #endif
5836 #ifndef Tcl_FSLoadFile
5837 #define Tcl_FSLoadFile \
5838 (tclStubsPtr->tcl_FSLoadFile) /* 444 */
5839 #endif
5840 #ifndef Tcl_FSMatchInDirectory
5841 #define Tcl_FSMatchInDirectory \
5842 (tclStubsPtr->tcl_FSMatchInDirectory) /* 445 */
5843 #endif
5844 #ifndef Tcl_FSLink
5845 #define Tcl_FSLink \
5846 (tclStubsPtr->tcl_FSLink) /* 446 */
5847 #endif
5848 #ifndef Tcl_FSRemoveDirectory
5849 #define Tcl_FSRemoveDirectory \
5850 (tclStubsPtr->tcl_FSRemoveDirectory) /* 447 */
5851 #endif
5852 #ifndef Tcl_FSRenameFile
5853 #define Tcl_FSRenameFile \
5854 (tclStubsPtr->tcl_FSRenameFile) /* 448 */
5855 #endif
5856 #ifndef Tcl_FSLstat
5857 #define Tcl_FSLstat \
5858 (tclStubsPtr->tcl_FSLstat) /* 449 */
5859 #endif
5860 #ifndef Tcl_FSUtime
5861 #define Tcl_FSUtime \
5862 (tclStubsPtr->tcl_FSUtime) /* 450 */
5863 #endif
5864 #ifndef Tcl_FSFileAttrsGet
5865 #define Tcl_FSFileAttrsGet \
5866 (tclStubsPtr->tcl_FSFileAttrsGet) /* 451 */
5867 #endif
5868 #ifndef Tcl_FSFileAttrsSet
5869 #define Tcl_FSFileAttrsSet \
5870 (tclStubsPtr->tcl_FSFileAttrsSet) /* 452 */
5871 #endif
5872 #ifndef Tcl_FSFileAttrStrings
5873 #define Tcl_FSFileAttrStrings \
5874 (tclStubsPtr->tcl_FSFileAttrStrings) /* 453 */
5875 #endif
5876 #ifndef Tcl_FSStat
5877 #define Tcl_FSStat \
5878 (tclStubsPtr->tcl_FSStat) /* 454 */
5879 #endif
5880 #ifndef Tcl_FSAccess
5881 #define Tcl_FSAccess \
5882 (tclStubsPtr->tcl_FSAccess) /* 455 */
5883 #endif
5884 #ifndef Tcl_FSOpenFileChannel
5885 #define Tcl_FSOpenFileChannel \
5886 (tclStubsPtr->tcl_FSOpenFileChannel) /* 456 */
5887 #endif
5888 #ifndef Tcl_FSGetCwd
5889 #define Tcl_FSGetCwd \
5890 (tclStubsPtr->tcl_FSGetCwd) /* 457 */
5891 #endif
5892 #ifndef Tcl_FSChdir
5893 #define Tcl_FSChdir \
5894 (tclStubsPtr->tcl_FSChdir) /* 458 */
5895 #endif
5896 #ifndef Tcl_FSConvertToPathType
5897 #define Tcl_FSConvertToPathType \
5898 (tclStubsPtr->tcl_FSConvertToPathType) /* 459 */
5899 #endif
5900 #ifndef Tcl_FSJoinPath
5901 #define Tcl_FSJoinPath \
5902 (tclStubsPtr->tcl_FSJoinPath) /* 460 */
5903 #endif
5904 #ifndef Tcl_FSSplitPath
5905 #define Tcl_FSSplitPath \
5906 (tclStubsPtr->tcl_FSSplitPath) /* 461 */
5907 #endif
5908 #ifndef Tcl_FSEqualPaths
5909 #define Tcl_FSEqualPaths \
5910 (tclStubsPtr->tcl_FSEqualPaths) /* 462 */
5911 #endif
5912 #ifndef Tcl_FSGetNormalizedPath
5913 #define Tcl_FSGetNormalizedPath \
5914 (tclStubsPtr->tcl_FSGetNormalizedPath) /* 463 */
5915 #endif
5916 #ifndef Tcl_FSJoinToPath
5917 #define Tcl_FSJoinToPath \
5918 (tclStubsPtr->tcl_FSJoinToPath) /* 464 */
5919 #endif
5920 #ifndef Tcl_FSGetInternalRep
5921 #define Tcl_FSGetInternalRep \
5922 (tclStubsPtr->tcl_FSGetInternalRep) /* 465 */
5923 #endif
5924 #ifndef Tcl_FSGetTranslatedPath
5925 #define Tcl_FSGetTranslatedPath \
5926 (tclStubsPtr->tcl_FSGetTranslatedPath) /* 466 */
5927 #endif
5928 #ifndef Tcl_FSEvalFile
5929 #define Tcl_FSEvalFile \
5930 (tclStubsPtr->tcl_FSEvalFile) /* 467 */
5931 #endif
5932 #ifndef Tcl_FSNewNativePath
5933 #define Tcl_FSNewNativePath \
5934 (tclStubsPtr->tcl_FSNewNativePath) /* 468 */
5935 #endif
5936 #ifndef Tcl_FSGetNativePath
5937 #define Tcl_FSGetNativePath \
5938 (tclStubsPtr->tcl_FSGetNativePath) /* 469 */
5939 #endif
5940 #ifndef Tcl_FSFileSystemInfo
5941 #define Tcl_FSFileSystemInfo \
5942 (tclStubsPtr->tcl_FSFileSystemInfo) /* 470 */
5943 #endif
5944 #ifndef Tcl_FSPathSeparator
5945 #define Tcl_FSPathSeparator \
5946 (tclStubsPtr->tcl_FSPathSeparator) /* 471 */
5947 #endif
5948 #ifndef Tcl_FSListVolumes
5949 #define Tcl_FSListVolumes \
5950 (tclStubsPtr->tcl_FSListVolumes) /* 472 */
5951 #endif
5952 #ifndef Tcl_FSRegister
5953 #define Tcl_FSRegister \
5954 (tclStubsPtr->tcl_FSRegister) /* 473 */
5955 #endif
5956 #ifndef Tcl_FSUnregister
5957 #define Tcl_FSUnregister \
5958 (tclStubsPtr->tcl_FSUnregister) /* 474 */
5959 #endif
5960 #ifndef Tcl_FSData
5961 #define Tcl_FSData \
5962 (tclStubsPtr->tcl_FSData) /* 475 */
5963 #endif
5964 #ifndef Tcl_FSGetTranslatedStringPath
5965 #define Tcl_FSGetTranslatedStringPath \
5966 (tclStubsPtr->tcl_FSGetTranslatedStringPath) /* 476 */
5967 #endif
5968 #ifndef Tcl_FSGetFileSystemForPath
5969 #define Tcl_FSGetFileSystemForPath \
5970 (tclStubsPtr->tcl_FSGetFileSystemForPath) /* 477 */
5971 #endif
5972 #ifndef Tcl_FSGetPathType
5973 #define Tcl_FSGetPathType \
5974 (tclStubsPtr->tcl_FSGetPathType) /* 478 */
5975 #endif
5976 #ifndef Tcl_OutputBuffered
5977 #define Tcl_OutputBuffered \
5978 (tclStubsPtr->tcl_OutputBuffered) /* 479 */
5979 #endif
5980 #ifndef Tcl_FSMountsChanged
5981 #define Tcl_FSMountsChanged \
5982 (tclStubsPtr->tcl_FSMountsChanged) /* 480 */
5983 #endif
5984 #ifndef Tcl_EvalTokensStandard
5985 #define Tcl_EvalTokensStandard \
5986 (tclStubsPtr->tcl_EvalTokensStandard) /* 481 */
5987 #endif
5988 #ifndef Tcl_GetTime
5989 #define Tcl_GetTime \
5990 (tclStubsPtr->tcl_GetTime) /* 482 */
5991 #endif
5992 #ifndef Tcl_CreateObjTrace
5993 #define Tcl_CreateObjTrace \
5994 (tclStubsPtr->tcl_CreateObjTrace) /* 483 */
5995 #endif
5996 #ifndef Tcl_GetCommandInfoFromToken
5997 #define Tcl_GetCommandInfoFromToken \
5998 (tclStubsPtr->tcl_GetCommandInfoFromToken) /* 484 */
5999 #endif
6000 #ifndef Tcl_SetCommandInfoFromToken
6001 #define Tcl_SetCommandInfoFromToken \
6002 (tclStubsPtr->tcl_SetCommandInfoFromToken) /* 485 */
6003 #endif
6004 #ifndef Tcl_DbNewWideIntObj
6005 #define Tcl_DbNewWideIntObj \
6006 (tclStubsPtr->tcl_DbNewWideIntObj) /* 486 */
6007 #endif
6008 #ifndef Tcl_GetWideIntFromObj
6009 #define Tcl_GetWideIntFromObj \
6010 (tclStubsPtr->tcl_GetWideIntFromObj) /* 487 */
6011 #endif
6012 #ifndef Tcl_NewWideIntObj
6013 #define Tcl_NewWideIntObj \
6014 (tclStubsPtr->tcl_NewWideIntObj) /* 488 */
6015 #endif
6016 #ifndef Tcl_SetWideIntObj
6017 #define Tcl_SetWideIntObj \
6018 (tclStubsPtr->tcl_SetWideIntObj) /* 489 */
6019 #endif
6020 #ifndef Tcl_AllocStatBuf
6021 #define Tcl_AllocStatBuf \
6022 (tclStubsPtr->tcl_AllocStatBuf) /* 490 */
6023 #endif
6024 #ifndef Tcl_Seek
6025 #define Tcl_Seek \
6026 (tclStubsPtr->tcl_Seek) /* 491 */
6027 #endif
6028 #ifndef Tcl_Tell
6029 #define Tcl_Tell \
6030 (tclStubsPtr->tcl_Tell) /* 492 */
6031 #endif
6032 #ifndef Tcl_ChannelWideSeekProc
6033 #define Tcl_ChannelWideSeekProc \
6034 (tclStubsPtr->tcl_ChannelWideSeekProc) /* 493 */
6035 #endif
6036 #ifndef Tcl_DictObjPut
6037 #define Tcl_DictObjPut \
6038 (tclStubsPtr->tcl_DictObjPut) /* 494 */
6039 #endif
6040 #ifndef Tcl_DictObjGet
6041 #define Tcl_DictObjGet \
6042 (tclStubsPtr->tcl_DictObjGet) /* 495 */
6043 #endif
6044 #ifndef Tcl_DictObjRemove
6045 #define Tcl_DictObjRemove \
6046 (tclStubsPtr->tcl_DictObjRemove) /* 496 */
6047 #endif
6048 #ifndef Tcl_DictObjSize
6049 #define Tcl_DictObjSize \
6050 (tclStubsPtr->tcl_DictObjSize) /* 497 */
6051 #endif
6052 #ifndef Tcl_DictObjFirst
6053 #define Tcl_DictObjFirst \
6054 (tclStubsPtr->tcl_DictObjFirst) /* 498 */
6055 #endif
6056 #ifndef Tcl_DictObjNext
6057 #define Tcl_DictObjNext \
6058 (tclStubsPtr->tcl_DictObjNext) /* 499 */
6059 #endif
6060 #ifndef Tcl_DictObjDone
6061 #define Tcl_DictObjDone \
6062 (tclStubsPtr->tcl_DictObjDone) /* 500 */
6063 #endif
6064 #ifndef Tcl_DictObjPutKeyList
6065 #define Tcl_DictObjPutKeyList \
6066 (tclStubsPtr->tcl_DictObjPutKeyList) /* 501 */
6067 #endif
6068 #ifndef Tcl_DictObjRemoveKeyList
6069 #define Tcl_DictObjRemoveKeyList \
6070 (tclStubsPtr->tcl_DictObjRemoveKeyList) /* 502 */
6071 #endif
6072 #ifndef Tcl_NewDictObj
6073 #define Tcl_NewDictObj \
6074 (tclStubsPtr->tcl_NewDictObj) /* 503 */
6075 #endif
6076 #ifndef Tcl_DbNewDictObj
6077 #define Tcl_DbNewDictObj \
6078 (tclStubsPtr->tcl_DbNewDictObj) /* 504 */
6079 #endif
6080 #ifndef Tcl_RegisterConfig
6081 #define Tcl_RegisterConfig \
6082 (tclStubsPtr->tcl_RegisterConfig) /* 505 */
6083 #endif
6084 #ifndef Tcl_CreateNamespace
6085 #define Tcl_CreateNamespace \
6086 (tclStubsPtr->tcl_CreateNamespace) /* 506 */
6087 #endif
6088 #ifndef Tcl_DeleteNamespace
6089 #define Tcl_DeleteNamespace \
6090 (tclStubsPtr->tcl_DeleteNamespace) /* 507 */
6091 #endif
6092 #ifndef Tcl_AppendExportList
6093 #define Tcl_AppendExportList \
6094 (tclStubsPtr->tcl_AppendExportList) /* 508 */
6095 #endif
6096 #ifndef Tcl_Export
6097 #define Tcl_Export \
6098 (tclStubsPtr->tcl_Export) /* 509 */
6099 #endif
6100 #ifndef Tcl_Import
6101 #define Tcl_Import \
6102 (tclStubsPtr->tcl_Import) /* 510 */
6103 #endif
6104 #ifndef Tcl_ForgetImport
6105 #define Tcl_ForgetImport \
6106 (tclStubsPtr->tcl_ForgetImport) /* 511 */
6107 #endif
6108 #ifndef Tcl_GetCurrentNamespace
6109 #define Tcl_GetCurrentNamespace \
6110 (tclStubsPtr->tcl_GetCurrentNamespace) /* 512 */
6111 #endif
6112 #ifndef Tcl_GetGlobalNamespace
6113 #define Tcl_GetGlobalNamespace \
6114 (tclStubsPtr->tcl_GetGlobalNamespace) /* 513 */
6115 #endif
6116 #ifndef Tcl_FindNamespace
6117 #define Tcl_FindNamespace \
6118 (tclStubsPtr->tcl_FindNamespace) /* 514 */
6119 #endif
6120 #ifndef Tcl_FindCommand
6121 #define Tcl_FindCommand \
6122 (tclStubsPtr->tcl_FindCommand) /* 515 */
6123 #endif
6124 #ifndef Tcl_GetCommandFromObj
6125 #define Tcl_GetCommandFromObj \
6126 (tclStubsPtr->tcl_GetCommandFromObj) /* 516 */
6127 #endif
6128 #ifndef Tcl_GetCommandFullName
6129 #define Tcl_GetCommandFullName \
6130 (tclStubsPtr->tcl_GetCommandFullName) /* 517 */
6131 #endif
6132 #ifndef Tcl_FSEvalFileEx
6133 #define Tcl_FSEvalFileEx \
6134 (tclStubsPtr->tcl_FSEvalFileEx) /* 518 */
6135 #endif
6136 #ifndef Tcl_SetExitProc
6137 #define Tcl_SetExitProc \
6138 (tclStubsPtr->tcl_SetExitProc) /* 519 */
6139 #endif
6140 #ifndef Tcl_LimitAddHandler
6141 #define Tcl_LimitAddHandler \
6142 (tclStubsPtr->tcl_LimitAddHandler) /* 520 */
6143 #endif
6144 #ifndef Tcl_LimitRemoveHandler
6145 #define Tcl_LimitRemoveHandler \
6146 (tclStubsPtr->tcl_LimitRemoveHandler) /* 521 */
6147 #endif
6148 #ifndef Tcl_LimitReady
6149 #define Tcl_LimitReady \
6150 (tclStubsPtr->tcl_LimitReady) /* 522 */
6151 #endif
6152 #ifndef Tcl_LimitCheck
6153 #define Tcl_LimitCheck \
6154 (tclStubsPtr->tcl_LimitCheck) /* 523 */
6155 #endif
6156 #ifndef Tcl_LimitExceeded
6157 #define Tcl_LimitExceeded \
6158 (tclStubsPtr->tcl_LimitExceeded) /* 524 */
6159 #endif
6160 #ifndef Tcl_LimitSetCommands
6161 #define Tcl_LimitSetCommands \
6162 (tclStubsPtr->tcl_LimitSetCommands) /* 525 */
6163 #endif
6164 #ifndef Tcl_LimitSetTime
6165 #define Tcl_LimitSetTime \
6166 (tclStubsPtr->tcl_LimitSetTime) /* 526 */
6167 #endif
6168 #ifndef Tcl_LimitSetGranularity
6169 #define Tcl_LimitSetGranularity \
6170 (tclStubsPtr->tcl_LimitSetGranularity) /* 527 */
6171 #endif
6172 #ifndef Tcl_LimitTypeEnabled
6173 #define Tcl_LimitTypeEnabled \
6174 (tclStubsPtr->tcl_LimitTypeEnabled) /* 528 */
6175 #endif
6176 #ifndef Tcl_LimitTypeExceeded
6177 #define Tcl_LimitTypeExceeded \
6178 (tclStubsPtr->tcl_LimitTypeExceeded) /* 529 */
6179 #endif
6180 #ifndef Tcl_LimitTypeSet
6181 #define Tcl_LimitTypeSet \
6182 (tclStubsPtr->tcl_LimitTypeSet) /* 530 */
6183 #endif
6184 #ifndef Tcl_LimitTypeReset
6185 #define Tcl_LimitTypeReset \
6186 (tclStubsPtr->tcl_LimitTypeReset) /* 531 */
6187 #endif
6188 #ifndef Tcl_LimitGetCommands
6189 #define Tcl_LimitGetCommands \
6190 (tclStubsPtr->tcl_LimitGetCommands) /* 532 */
6191 #endif
6192 #ifndef Tcl_LimitGetTime
6193 #define Tcl_LimitGetTime \
6194 (tclStubsPtr->tcl_LimitGetTime) /* 533 */
6195 #endif
6196 #ifndef Tcl_LimitGetGranularity
6197 #define Tcl_LimitGetGranularity \
6198 (tclStubsPtr->tcl_LimitGetGranularity) /* 534 */
6199 #endif
6200 #ifndef Tcl_SaveInterpState
6201 #define Tcl_SaveInterpState \
6202 (tclStubsPtr->tcl_SaveInterpState) /* 535 */
6203 #endif
6204 #ifndef Tcl_RestoreInterpState
6205 #define Tcl_RestoreInterpState \
6206 (tclStubsPtr->tcl_RestoreInterpState) /* 536 */
6207 #endif
6208 #ifndef Tcl_DiscardInterpState
6209 #define Tcl_DiscardInterpState \
6210 (tclStubsPtr->tcl_DiscardInterpState) /* 537 */
6211 #endif
6212 #ifndef Tcl_SetReturnOptions
6213 #define Tcl_SetReturnOptions \
6214 (tclStubsPtr->tcl_SetReturnOptions) /* 538 */
6215 #endif
6216 #ifndef Tcl_GetReturnOptions
6217 #define Tcl_GetReturnOptions \
6218 (tclStubsPtr->tcl_GetReturnOptions) /* 539 */
6219 #endif
6220 #ifndef Tcl_IsEnsemble
6221 #define Tcl_IsEnsemble \
6222 (tclStubsPtr->tcl_IsEnsemble) /* 540 */
6223 #endif
6224 #ifndef Tcl_CreateEnsemble
6225 #define Tcl_CreateEnsemble \
6226 (tclStubsPtr->tcl_CreateEnsemble) /* 541 */
6227 #endif
6228 #ifndef Tcl_FindEnsemble
6229 #define Tcl_FindEnsemble \
6230 (tclStubsPtr->tcl_FindEnsemble) /* 542 */
6231 #endif
6232 #ifndef Tcl_SetEnsembleSubcommandList
6233 #define Tcl_SetEnsembleSubcommandList \
6234 (tclStubsPtr->tcl_SetEnsembleSubcommandList) /* 543 */
6235 #endif
6236 #ifndef Tcl_SetEnsembleMappingDict
6237 #define Tcl_SetEnsembleMappingDict \
6238 (tclStubsPtr->tcl_SetEnsembleMappingDict) /* 544 */
6239 #endif
6240 #ifndef Tcl_SetEnsembleUnknownHandler
6241 #define Tcl_SetEnsembleUnknownHandler \
6242 (tclStubsPtr->tcl_SetEnsembleUnknownHandler) /* 545 */
6243 #endif
6244 #ifndef Tcl_SetEnsembleFlags
6245 #define Tcl_SetEnsembleFlags \
6246 (tclStubsPtr->tcl_SetEnsembleFlags) /* 546 */
6247 #endif
6248 #ifndef Tcl_GetEnsembleSubcommandList
6249 #define Tcl_GetEnsembleSubcommandList \
6250 (tclStubsPtr->tcl_GetEnsembleSubcommandList) /* 547 */
6251 #endif
6252 #ifndef Tcl_GetEnsembleMappingDict
6253 #define Tcl_GetEnsembleMappingDict \
6254 (tclStubsPtr->tcl_GetEnsembleMappingDict) /* 548 */
6255 #endif
6256 #ifndef Tcl_GetEnsembleUnknownHandler
6257 #define Tcl_GetEnsembleUnknownHandler \
6258 (tclStubsPtr->tcl_GetEnsembleUnknownHandler) /* 549 */
6259 #endif
6260 #ifndef Tcl_GetEnsembleFlags
6261 #define Tcl_GetEnsembleFlags \
6262 (tclStubsPtr->tcl_GetEnsembleFlags) /* 550 */
6263 #endif
6264 #ifndef Tcl_GetEnsembleNamespace
6265 #define Tcl_GetEnsembleNamespace \
6266 (tclStubsPtr->tcl_GetEnsembleNamespace) /* 551 */
6267 #endif
6268 #ifndef Tcl_SetTimeProc
6269 #define Tcl_SetTimeProc \
6270 (tclStubsPtr->tcl_SetTimeProc) /* 552 */
6271 #endif
6272 #ifndef Tcl_QueryTimeProc
6273 #define Tcl_QueryTimeProc \
6274 (tclStubsPtr->tcl_QueryTimeProc) /* 553 */
6275 #endif
6276 #ifndef Tcl_ChannelThreadActionProc
6277 #define Tcl_ChannelThreadActionProc \
6278 (tclStubsPtr->tcl_ChannelThreadActionProc) /* 554 */
6279 #endif
6280 #ifndef Tcl_NewBignumObj
6281 #define Tcl_NewBignumObj \
6282 (tclStubsPtr->tcl_NewBignumObj) /* 555 */
6283 #endif
6284 #ifndef Tcl_DbNewBignumObj
6285 #define Tcl_DbNewBignumObj \
6286 (tclStubsPtr->tcl_DbNewBignumObj) /* 556 */
6287 #endif
6288 #ifndef Tcl_SetBignumObj
6289 #define Tcl_SetBignumObj \
6290 (tclStubsPtr->tcl_SetBignumObj) /* 557 */
6291 #endif
6292 #ifndef Tcl_GetBignumFromObj
6293 #define Tcl_GetBignumFromObj \
6294 (tclStubsPtr->tcl_GetBignumFromObj) /* 558 */
6295 #endif
6296 #ifndef Tcl_TakeBignumFromObj
6297 #define Tcl_TakeBignumFromObj \
6298 (tclStubsPtr->tcl_TakeBignumFromObj) /* 559 */
6299 #endif
6300 #ifndef Tcl_TruncateChannel
6301 #define Tcl_TruncateChannel \
6302 (tclStubsPtr->tcl_TruncateChannel) /* 560 */
6303 #endif
6304 #ifndef Tcl_ChannelTruncateProc
6305 #define Tcl_ChannelTruncateProc \
6306 (tclStubsPtr->tcl_ChannelTruncateProc) /* 561 */
6307 #endif
6308 #ifndef Tcl_SetChannelErrorInterp
6309 #define Tcl_SetChannelErrorInterp \
6310 (tclStubsPtr->tcl_SetChannelErrorInterp) /* 562 */
6311 #endif
6312 #ifndef Tcl_GetChannelErrorInterp
6313 #define Tcl_GetChannelErrorInterp \
6314 (tclStubsPtr->tcl_GetChannelErrorInterp) /* 563 */
6315 #endif
6316 #ifndef Tcl_SetChannelError
6317 #define Tcl_SetChannelError \
6318 (tclStubsPtr->tcl_SetChannelError) /* 564 */
6319 #endif
6320 #ifndef Tcl_GetChannelError
6321 #define Tcl_GetChannelError \
6322 (tclStubsPtr->tcl_GetChannelError) /* 565 */
6323 #endif
6324 #ifndef Tcl_InitBignumFromDouble
6325 #define Tcl_InitBignumFromDouble \
6326 (tclStubsPtr->tcl_InitBignumFromDouble) /* 566 */
6327 #endif
6328 #ifndef Tcl_GetNamespaceUnknownHandler
6329 #define Tcl_GetNamespaceUnknownHandler \
6330 (tclStubsPtr->tcl_GetNamespaceUnknownHandler) /* 567 */
6331 #endif
6332 #ifndef Tcl_SetNamespaceUnknownHandler
6333 #define Tcl_SetNamespaceUnknownHandler \
6334 (tclStubsPtr->tcl_SetNamespaceUnknownHandler) /* 568 */
6335 #endif
6336 #ifndef Tcl_GetEncodingFromObj
6337 #define Tcl_GetEncodingFromObj \
6338 (tclStubsPtr->tcl_GetEncodingFromObj) /* 569 */
6339 #endif
6340 #ifndef Tcl_GetEncodingSearchPath
6341 #define Tcl_GetEncodingSearchPath \
6342 (tclStubsPtr->tcl_GetEncodingSearchPath) /* 570 */
6343 #endif
6344 #ifndef Tcl_SetEncodingSearchPath
6345 #define Tcl_SetEncodingSearchPath \
6346 (tclStubsPtr->tcl_SetEncodingSearchPath) /* 571 */
6347 #endif
6348 #ifndef Tcl_GetEncodingNameFromEnvironment
6349 #define Tcl_GetEncodingNameFromEnvironment \
6350 (tclStubsPtr->tcl_GetEncodingNameFromEnvironment) /* 572 */
6351 #endif
6352 #ifndef Tcl_PkgRequireProc
6353 #define Tcl_PkgRequireProc \
6354 (tclStubsPtr->tcl_PkgRequireProc) /* 573 */
6355 #endif
6356 #ifndef Tcl_AppendObjToErrorInfo
6357 #define Tcl_AppendObjToErrorInfo \
6358 (tclStubsPtr->tcl_AppendObjToErrorInfo) /* 574 */
6359 #endif
6360 #ifndef Tcl_AppendLimitedToObj
6361 #define Tcl_AppendLimitedToObj \
6362 (tclStubsPtr->tcl_AppendLimitedToObj) /* 575 */
6363 #endif
6364 #ifndef Tcl_Format
6365 #define Tcl_Format \
6366 (tclStubsPtr->tcl_Format) /* 576 */
6367 #endif
6368 #ifndef Tcl_AppendFormatToObj
6369 #define Tcl_AppendFormatToObj \
6370 (tclStubsPtr->tcl_AppendFormatToObj) /* 577 */
6371 #endif
6372 #ifndef Tcl_ObjPrintf
6373 #define Tcl_ObjPrintf \
6374 (tclStubsPtr->tcl_ObjPrintf) /* 578 */
6375 #endif
6376 #ifndef Tcl_AppendPrintfToObj
6377 #define Tcl_AppendPrintfToObj \
6378 (tclStubsPtr->tcl_AppendPrintfToObj) /* 579 */
6379 #endif
6381 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
6383 /* !END!: Do not edit above this line. */
6385 #undef TCL_STORAGE_CLASS
6386 #define TCL_STORAGE_CLASS DLLIMPORT
6388 #endif /* _TCLDECLS */