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