/[dtapublic]/projs/trunk/shared_source/tcl_base/tcldecls.h
ViewVC logotype

Contents of /projs/trunk/shared_source/tcl_base/tcldecls.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 42 - (show annotations) (download)
Fri Oct 14 01:50:00 2016 UTC (8 years, 2 months ago) by dashley
File MIME type: text/plain
File size: 127638 byte(s)
Move shared source code to commonize.
1 /* $Header: /cvsroot/esrg/sfesrg/esrgpcpj/shared/tcl_base/tcldecls.h,v 1.1.1.1 2001/06/13 04:37:26 dtashley Exp $ */
2
3 /*
4 * tclDecls.h --
5 *
6 * Declarations of functions in the platform independent public Tcl API.
7 *
8 * Copyright (c) 1998-1999 by Scriptics Corporation.
9 *
10 * See the file "license.terms" for information on usage and redistribution
11 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
12 *
13 * RCS: @(#) $Id: tcldecls.h,v 1.1.1.1 2001/06/13 04:37:26 dtashley Exp $
14 */
15
16 #ifndef _TCLDECLS
17 #define _TCLDECLS
18
19 /*
20 * WARNING: This file is automatically generated by the tools/genStubs.tcl
21 * script. Any modifications to the function declarations below should be made
22 * in the generic/tcl.decls script.
23 */
24
25 /* !BEGIN!: Do not edit below this line. */
26
27 /*
28 * Exported function declarations:
29 */
30
31 /* 0 */
32 EXTERN int Tcl_PkgProvideEx _ANSI_ARGS_((Tcl_Interp * interp,
33 char * name, char * version,
34 ClientData clientData));
35 /* 1 */
36 EXTERN char * Tcl_PkgRequireEx _ANSI_ARGS_((Tcl_Interp * interp,
37 char * name, char * version, int exact,
38 ClientData * clientDataPtr));
39 /* 2 */
40 EXTERN void Tcl_Panic _ANSI_ARGS_(TCL_VARARGS(char *,format));
41 /* 3 */
42 EXTERN char * Tcl_Alloc _ANSI_ARGS_((unsigned int size));
43 /* 4 */
44 EXTERN void Tcl_Free _ANSI_ARGS_((char * ptr));
45 /* 5 */
46 EXTERN char * Tcl_Realloc _ANSI_ARGS_((char * ptr,
47 unsigned int size));
48 /* 6 */
49 EXTERN char * Tcl_DbCkalloc _ANSI_ARGS_((unsigned int size,
50 char * file, int line));
51 /* 7 */
52 EXTERN int Tcl_DbCkfree _ANSI_ARGS_((char * ptr, char * file,
53 int line));
54 /* 8 */
55 EXTERN char * Tcl_DbCkrealloc _ANSI_ARGS_((char * ptr,
56 unsigned int size, char * file, int line));
57 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
58 /* 9 */
59 EXTERN void Tcl_CreateFileHandler _ANSI_ARGS_((int fd, int mask,
60 Tcl_FileProc * proc, ClientData clientData));
61 #endif /* UNIX */
62 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
63 /* 10 */
64 EXTERN void Tcl_DeleteFileHandler _ANSI_ARGS_((int fd));
65 #endif /* UNIX */
66 /* 11 */
67 EXTERN void Tcl_SetTimer _ANSI_ARGS_((Tcl_Time * timePtr));
68 /* 12 */
69 EXTERN void Tcl_Sleep _ANSI_ARGS_((int ms));
70 /* 13 */
71 EXTERN int Tcl_WaitForEvent _ANSI_ARGS_((Tcl_Time * timePtr));
72 /* 14 */
73 EXTERN int Tcl_AppendAllObjTypes _ANSI_ARGS_((
74 Tcl_Interp * interp, Tcl_Obj * objPtr));
75 /* 15 */
76 EXTERN void Tcl_AppendStringsToObj _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr));
77 /* 16 */
78 EXTERN void Tcl_AppendToObj _ANSI_ARGS_((Tcl_Obj * objPtr,
79 char * bytes, int length));
80 /* 17 */
81 EXTERN Tcl_Obj * Tcl_ConcatObj _ANSI_ARGS_((int objc,
82 Tcl_Obj *CONST objv[]));
83 /* 18 */
84 EXTERN int Tcl_ConvertToType _ANSI_ARGS_((Tcl_Interp * interp,
85 Tcl_Obj * objPtr, Tcl_ObjType * typePtr));
86 /* 19 */
87 EXTERN void Tcl_DbDecrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr,
88 char * file, int line));
89 /* 20 */
90 EXTERN void Tcl_DbIncrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr,
91 char * file, int line));
92 /* 21 */
93 EXTERN int Tcl_DbIsShared _ANSI_ARGS_((Tcl_Obj * objPtr,
94 char * file, int line));
95 /* 22 */
96 EXTERN Tcl_Obj * Tcl_DbNewBooleanObj _ANSI_ARGS_((int boolValue,
97 char * file, int line));
98 /* 23 */
99 EXTERN Tcl_Obj * Tcl_DbNewByteArrayObj _ANSI_ARGS_((
100 unsigned char * bytes, int length,
101 char * file, int line));
102 /* 24 */
103 EXTERN Tcl_Obj * Tcl_DbNewDoubleObj _ANSI_ARGS_((double doubleValue,
104 char * file, int line));
105 /* 25 */
106 EXTERN Tcl_Obj * Tcl_DbNewListObj _ANSI_ARGS_((int objc,
107 Tcl_Obj *CONST objv[], char * file, int line));
108 /* 26 */
109 EXTERN Tcl_Obj * Tcl_DbNewLongObj _ANSI_ARGS_((long longValue,
110 char * file, int line));
111 /* 27 */
112 EXTERN Tcl_Obj * Tcl_DbNewObj _ANSI_ARGS_((char * file, int line));
113 /* 28 */
114 EXTERN Tcl_Obj * Tcl_DbNewStringObj _ANSI_ARGS_((CONST char * bytes,
115 int length, char * file, int line));
116 /* 29 */
117 EXTERN Tcl_Obj * Tcl_DuplicateObj _ANSI_ARGS_((Tcl_Obj * objPtr));
118 /* 30 */
119 EXTERN void TclFreeObj _ANSI_ARGS_((Tcl_Obj * objPtr));
120 /* 31 */
121 EXTERN int Tcl_GetBoolean _ANSI_ARGS_((Tcl_Interp * interp,
122 char * str, int * boolPtr));
123 /* 32 */
124 EXTERN int Tcl_GetBooleanFromObj _ANSI_ARGS_((
125 Tcl_Interp * interp, Tcl_Obj * objPtr,
126 int * boolPtr));
127 /* 33 */
128 EXTERN unsigned char * Tcl_GetByteArrayFromObj _ANSI_ARGS_((
129 Tcl_Obj * objPtr, int * lengthPtr));
130 /* 34 */
131 EXTERN int Tcl_GetDouble _ANSI_ARGS_((Tcl_Interp * interp,
132 char * str, double * doublePtr));
133 /* 35 */
134 EXTERN int Tcl_GetDoubleFromObj _ANSI_ARGS_((
135 Tcl_Interp * interp, Tcl_Obj * objPtr,
136 double * doublePtr));
137 /* 36 */
138 EXTERN int Tcl_GetIndexFromObj _ANSI_ARGS_((Tcl_Interp * interp,
139 Tcl_Obj * objPtr, char ** tablePtr,
140 char * msg, int flags, int * indexPtr));
141 /* 37 */
142 EXTERN int Tcl_GetInt _ANSI_ARGS_((Tcl_Interp * interp,
143 char * str, int * intPtr));
144 /* 38 */
145 EXTERN int Tcl_GetIntFromObj _ANSI_ARGS_((Tcl_Interp * interp,
146 Tcl_Obj * objPtr, int * intPtr));
147 /* 39 */
148 EXTERN int Tcl_GetLongFromObj _ANSI_ARGS_((Tcl_Interp * interp,
149 Tcl_Obj * objPtr, long * longPtr));
150 /* 40 */
151 EXTERN Tcl_ObjType * Tcl_GetObjType _ANSI_ARGS_((char * typeName));
152 /* 41 */
153 EXTERN char * Tcl_GetStringFromObj _ANSI_ARGS_((Tcl_Obj * objPtr,
154 int * lengthPtr));
155 /* 42 */
156 EXTERN void Tcl_InvalidateStringRep _ANSI_ARGS_((
157 Tcl_Obj * objPtr));
158 /* 43 */
159 EXTERN int Tcl_ListObjAppendList _ANSI_ARGS_((
160 Tcl_Interp * interp, Tcl_Obj * listPtr,
161 Tcl_Obj * elemListPtr));
162 /* 44 */
163 EXTERN int Tcl_ListObjAppendElement _ANSI_ARGS_((
164 Tcl_Interp * interp, Tcl_Obj * listPtr,
165 Tcl_Obj * objPtr));
166 /* 45 */
167 EXTERN int Tcl_ListObjGetElements _ANSI_ARGS_((
168 Tcl_Interp * interp, Tcl_Obj * listPtr,
169 int * objcPtr, Tcl_Obj *** objvPtr));
170 /* 46 */
171 EXTERN int Tcl_ListObjIndex _ANSI_ARGS_((Tcl_Interp * interp,
172 Tcl_Obj * listPtr, int index,
173 Tcl_Obj ** objPtrPtr));
174 /* 47 */
175 EXTERN int Tcl_ListObjLength _ANSI_ARGS_((Tcl_Interp * interp,
176 Tcl_Obj * listPtr, int * intPtr));
177 /* 48 */
178 EXTERN int Tcl_ListObjReplace _ANSI_ARGS_((Tcl_Interp * interp,
179 Tcl_Obj * listPtr, int first, int count,
180 int objc, Tcl_Obj *CONST objv[]));
181 /* 49 */
182 EXTERN Tcl_Obj * Tcl_NewBooleanObj _ANSI_ARGS_((int boolValue));
183 /* 50 */
184 EXTERN Tcl_Obj * Tcl_NewByteArrayObj _ANSI_ARGS_((
185 unsigned char * bytes, int length));
186 /* 51 */
187 EXTERN Tcl_Obj * Tcl_NewDoubleObj _ANSI_ARGS_((double doubleValue));
188 /* 52 */
189 EXTERN Tcl_Obj * Tcl_NewIntObj _ANSI_ARGS_((int intValue));
190 /* 53 */
191 EXTERN Tcl_Obj * Tcl_NewListObj _ANSI_ARGS_((int objc,
192 Tcl_Obj *CONST objv[]));
193 /* 54 */
194 EXTERN Tcl_Obj * Tcl_NewLongObj _ANSI_ARGS_((long longValue));
195 /* 55 */
196 EXTERN Tcl_Obj * Tcl_NewObj _ANSI_ARGS_((void));
197 /* 56 */
198 EXTERN Tcl_Obj * Tcl_NewStringObj _ANSI_ARGS_((CONST char * bytes,
199 int length));
200 /* 57 */
201 EXTERN void Tcl_SetBooleanObj _ANSI_ARGS_((Tcl_Obj * objPtr,
202 int boolValue));
203 /* 58 */
204 EXTERN unsigned char * Tcl_SetByteArrayLength _ANSI_ARGS_((Tcl_Obj * objPtr,
205 int length));
206 /* 59 */
207 EXTERN void Tcl_SetByteArrayObj _ANSI_ARGS_((Tcl_Obj * objPtr,
208 unsigned char * bytes, int length));
209 /* 60 */
210 EXTERN void Tcl_SetDoubleObj _ANSI_ARGS_((Tcl_Obj * objPtr,
211 double doubleValue));
212 /* 61 */
213 EXTERN void Tcl_SetIntObj _ANSI_ARGS_((Tcl_Obj * objPtr,
214 int intValue));
215 /* 62 */
216 EXTERN void Tcl_SetListObj _ANSI_ARGS_((Tcl_Obj * objPtr,
217 int objc, Tcl_Obj *CONST objv[]));
218 /* 63 */
219 EXTERN void Tcl_SetLongObj _ANSI_ARGS_((Tcl_Obj * objPtr,
220 long longValue));
221 /* 64 */
222 EXTERN void Tcl_SetObjLength _ANSI_ARGS_((Tcl_Obj * objPtr,
223 int length));
224 /* 65 */
225 EXTERN void Tcl_SetStringObj _ANSI_ARGS_((Tcl_Obj * objPtr,
226 char * bytes, int length));
227 /* 66 */
228 EXTERN void Tcl_AddErrorInfo _ANSI_ARGS_((Tcl_Interp * interp,
229 CONST char * message));
230 /* 67 */
231 EXTERN void Tcl_AddObjErrorInfo _ANSI_ARGS_((Tcl_Interp * interp,
232 CONST char * message, int length));
233 /* 68 */
234 EXTERN void Tcl_AllowExceptions _ANSI_ARGS_((Tcl_Interp * interp));
235 /* 69 */
236 EXTERN void Tcl_AppendElement _ANSI_ARGS_((Tcl_Interp * interp,
237 CONST char * string));
238 /* 70 */
239 EXTERN void Tcl_AppendResult _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
240 /* 71 */
241 EXTERN Tcl_AsyncHandler Tcl_AsyncCreate _ANSI_ARGS_((Tcl_AsyncProc * proc,
242 ClientData clientData));
243 /* 72 */
244 EXTERN void Tcl_AsyncDelete _ANSI_ARGS_((Tcl_AsyncHandler async));
245 /* 73 */
246 EXTERN int Tcl_AsyncInvoke _ANSI_ARGS_((Tcl_Interp * interp,
247 int code));
248 /* 74 */
249 EXTERN void Tcl_AsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async));
250 /* 75 */
251 EXTERN int Tcl_AsyncReady _ANSI_ARGS_((void));
252 /* 76 */
253 EXTERN void Tcl_BackgroundError _ANSI_ARGS_((Tcl_Interp * interp));
254 /* 77 */
255 EXTERN char Tcl_Backslash _ANSI_ARGS_((CONST char * src,
256 int * readPtr));
257 /* 78 */
258 EXTERN int Tcl_BadChannelOption _ANSI_ARGS_((
259 Tcl_Interp * interp, char * optionName,
260 char * optionList));
261 /* 79 */
262 EXTERN void Tcl_CallWhenDeleted _ANSI_ARGS_((Tcl_Interp * interp,
263 Tcl_InterpDeleteProc * proc,
264 ClientData clientData));
265 /* 80 */
266 EXTERN void Tcl_CancelIdleCall _ANSI_ARGS_((
267 Tcl_IdleProc * idleProc,
268 ClientData clientData));
269 /* 81 */
270 EXTERN int Tcl_Close _ANSI_ARGS_((Tcl_Interp * interp,
271 Tcl_Channel chan));
272 /* 82 */
273 EXTERN int Tcl_CommandComplete _ANSI_ARGS_((char * cmd));
274 /* 83 */
275 EXTERN char * Tcl_Concat _ANSI_ARGS_((int argc, char ** argv));
276 /* 84 */
277 EXTERN int Tcl_ConvertElement _ANSI_ARGS_((CONST char * src,
278 char * dst, int flags));
279 /* 85 */
280 EXTERN int Tcl_ConvertCountedElement _ANSI_ARGS_((
281 CONST char * src, int length, char * dst,
282 int flags));
283 /* 86 */
284 EXTERN int Tcl_CreateAlias _ANSI_ARGS_((Tcl_Interp * slave,
285 char * slaveCmd, Tcl_Interp * target,
286 char * targetCmd, int argc, char ** argv));
287 /* 87 */
288 EXTERN int Tcl_CreateAliasObj _ANSI_ARGS_((Tcl_Interp * slave,
289 char * slaveCmd, Tcl_Interp * target,
290 char * targetCmd, int objc,
291 Tcl_Obj *CONST objv[]));
292 /* 88 */
293 EXTERN Tcl_Channel Tcl_CreateChannel _ANSI_ARGS_((
294 Tcl_ChannelType * typePtr, char * chanName,
295 ClientData instanceData, int mask));
296 /* 89 */
297 EXTERN void Tcl_CreateChannelHandler _ANSI_ARGS_((
298 Tcl_Channel chan, int mask,
299 Tcl_ChannelProc * proc,
300 ClientData clientData));
301 /* 90 */
302 EXTERN void Tcl_CreateCloseHandler _ANSI_ARGS_((Tcl_Channel chan,
303 Tcl_CloseProc * proc, ClientData clientData));
304 /* 91 */
305 EXTERN Tcl_Command Tcl_CreateCommand _ANSI_ARGS_((Tcl_Interp * interp,
306 char * cmdName, Tcl_CmdProc * proc,
307 ClientData clientData,
308 Tcl_CmdDeleteProc * deleteProc));
309 /* 92 */
310 EXTERN void Tcl_CreateEventSource _ANSI_ARGS_((
311 Tcl_EventSetupProc * setupProc,
312 Tcl_EventCheckProc * checkProc,
313 ClientData clientData));
314 /* 93 */
315 EXTERN void Tcl_CreateExitHandler _ANSI_ARGS_((
316 Tcl_ExitProc * proc, ClientData clientData));
317 /* 94 */
318 EXTERN Tcl_Interp * Tcl_CreateInterp _ANSI_ARGS_((void));
319 /* 95 */
320 EXTERN void Tcl_CreateMathFunc _ANSI_ARGS_((Tcl_Interp * interp,
321 char * name, int numArgs,
322 Tcl_ValueType * argTypes,
323 Tcl_MathProc * proc, ClientData clientData));
324 /* 96 */
325 EXTERN Tcl_Command Tcl_CreateObjCommand _ANSI_ARGS_((
326 Tcl_Interp * interp, char * cmdName,
327 Tcl_ObjCmdProc * proc, ClientData clientData,
328 Tcl_CmdDeleteProc * deleteProc));
329 /* 97 */
330 EXTERN Tcl_Interp * Tcl_CreateSlave _ANSI_ARGS_((Tcl_Interp * interp,
331 char * slaveName, int isSafe));
332 /* 98 */
333 EXTERN Tcl_TimerToken Tcl_CreateTimerHandler _ANSI_ARGS_((int milliseconds,
334 Tcl_TimerProc * proc, ClientData clientData));
335 /* 99 */
336 EXTERN Tcl_Trace Tcl_CreateTrace _ANSI_ARGS_((Tcl_Interp * interp,
337 int level, Tcl_CmdTraceProc * proc,
338 ClientData clientData));
339 /* 100 */
340 EXTERN void Tcl_DeleteAssocData _ANSI_ARGS_((Tcl_Interp * interp,
341 char * name));
342 /* 101 */
343 EXTERN void Tcl_DeleteChannelHandler _ANSI_ARGS_((
344 Tcl_Channel chan, Tcl_ChannelProc * proc,
345 ClientData clientData));
346 /* 102 */
347 EXTERN void Tcl_DeleteCloseHandler _ANSI_ARGS_((Tcl_Channel chan,
348 Tcl_CloseProc * proc, ClientData clientData));
349 /* 103 */
350 EXTERN int Tcl_DeleteCommand _ANSI_ARGS_((Tcl_Interp * interp,
351 char * cmdName));
352 /* 104 */
353 EXTERN int Tcl_DeleteCommandFromToken _ANSI_ARGS_((
354 Tcl_Interp * interp, Tcl_Command command));
355 /* 105 */
356 EXTERN void Tcl_DeleteEvents _ANSI_ARGS_((
357 Tcl_EventDeleteProc * proc,
358 ClientData clientData));
359 /* 106 */
360 EXTERN void Tcl_DeleteEventSource _ANSI_ARGS_((
361 Tcl_EventSetupProc * setupProc,
362 Tcl_EventCheckProc * checkProc,
363 ClientData clientData));
364 /* 107 */
365 EXTERN void Tcl_DeleteExitHandler _ANSI_ARGS_((
366 Tcl_ExitProc * proc, ClientData clientData));
367 /* 108 */
368 EXTERN void Tcl_DeleteHashEntry _ANSI_ARGS_((
369 Tcl_HashEntry * entryPtr));
370 /* 109 */
371 EXTERN void Tcl_DeleteHashTable _ANSI_ARGS_((
372 Tcl_HashTable * tablePtr));
373 /* 110 */
374 EXTERN void Tcl_DeleteInterp _ANSI_ARGS_((Tcl_Interp * interp));
375 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
376 /* 111 */
377 EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids,
378 Tcl_Pid * pidPtr));
379 #endif /* UNIX */
380 #ifdef __WIN32__
381 /* 111 */
382 EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids,
383 Tcl_Pid * pidPtr));
384 #endif /* __WIN32__ */
385 /* 112 */
386 EXTERN void Tcl_DeleteTimerHandler _ANSI_ARGS_((
387 Tcl_TimerToken token));
388 /* 113 */
389 EXTERN void Tcl_DeleteTrace _ANSI_ARGS_((Tcl_Interp * interp,
390 Tcl_Trace trace));
391 /* 114 */
392 EXTERN void Tcl_DontCallWhenDeleted _ANSI_ARGS_((
393 Tcl_Interp * interp,
394 Tcl_InterpDeleteProc * proc,
395 ClientData clientData));
396 /* 115 */
397 EXTERN int Tcl_DoOneEvent _ANSI_ARGS_((int flags));
398 /* 116 */
399 EXTERN void Tcl_DoWhenIdle _ANSI_ARGS_((Tcl_IdleProc * proc,
400 ClientData clientData));
401 /* 117 */
402 EXTERN char * Tcl_DStringAppend _ANSI_ARGS_((Tcl_DString * dsPtr,
403 CONST char * str, int length));
404 /* 118 */
405 EXTERN char * Tcl_DStringAppendElement _ANSI_ARGS_((
406 Tcl_DString * dsPtr, CONST char * string));
407 /* 119 */
408 EXTERN void Tcl_DStringEndSublist _ANSI_ARGS_((
409 Tcl_DString * dsPtr));
410 /* 120 */
411 EXTERN void Tcl_DStringFree _ANSI_ARGS_((Tcl_DString * dsPtr));
412 /* 121 */
413 EXTERN void Tcl_DStringGetResult _ANSI_ARGS_((
414 Tcl_Interp * interp, Tcl_DString * dsPtr));
415 /* 122 */
416 EXTERN void Tcl_DStringInit _ANSI_ARGS_((Tcl_DString * dsPtr));
417 /* 123 */
418 EXTERN void Tcl_DStringResult _ANSI_ARGS_((Tcl_Interp * interp,
419 Tcl_DString * dsPtr));
420 /* 124 */
421 EXTERN void Tcl_DStringSetLength _ANSI_ARGS_((
422 Tcl_DString * dsPtr, int length));
423 /* 125 */
424 EXTERN void Tcl_DStringStartSublist _ANSI_ARGS_((
425 Tcl_DString * dsPtr));
426 /* 126 */
427 EXTERN int Tcl_Eof _ANSI_ARGS_((Tcl_Channel chan));
428 /* 127 */
429 EXTERN char * Tcl_ErrnoId _ANSI_ARGS_((void));
430 /* 128 */
431 EXTERN char * Tcl_ErrnoMsg _ANSI_ARGS_((int err));
432 /* 129 */
433 EXTERN int Tcl_Eval _ANSI_ARGS_((Tcl_Interp * interp,
434 char * string));
435 /* 130 */
436 EXTERN int Tcl_EvalFile _ANSI_ARGS_((Tcl_Interp * interp,
437 char * fileName));
438 /* 131 */
439 EXTERN int Tcl_EvalObj _ANSI_ARGS_((Tcl_Interp * interp,
440 Tcl_Obj * objPtr));
441 /* 132 */
442 EXTERN void Tcl_EventuallyFree _ANSI_ARGS_((
443 ClientData clientData,
444 Tcl_FreeProc * freeProc));
445 /* 133 */
446 EXTERN void Tcl_Exit _ANSI_ARGS_((int status));
447 /* 134 */
448 EXTERN int Tcl_ExposeCommand _ANSI_ARGS_((Tcl_Interp * interp,
449 char * hiddenCmdToken, char * cmdName));
450 /* 135 */
451 EXTERN int Tcl_ExprBoolean _ANSI_ARGS_((Tcl_Interp * interp,
452 char * str, int * ptr));
453 /* 136 */
454 EXTERN int Tcl_ExprBooleanObj _ANSI_ARGS_((Tcl_Interp * interp,
455 Tcl_Obj * objPtr, int * ptr));
456 /* 137 */
457 EXTERN int Tcl_ExprDouble _ANSI_ARGS_((Tcl_Interp * interp,
458 char * str, double * ptr));
459 /* 138 */
460 EXTERN int Tcl_ExprDoubleObj _ANSI_ARGS_((Tcl_Interp * interp,
461 Tcl_Obj * objPtr, double * ptr));
462 /* 139 */
463 EXTERN int Tcl_ExprLong _ANSI_ARGS_((Tcl_Interp * interp,
464 char * str, long * ptr));
465 /* 140 */
466 EXTERN int Tcl_ExprLongObj _ANSI_ARGS_((Tcl_Interp * interp,
467 Tcl_Obj * objPtr, long * ptr));
468 /* 141 */
469 EXTERN int Tcl_ExprObj _ANSI_ARGS_((Tcl_Interp * interp,
470 Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr));
471 /* 142 */
472 EXTERN int Tcl_ExprString _ANSI_ARGS_((Tcl_Interp * interp,
473 char * string));
474 /* 143 */
475 EXTERN void Tcl_Finalize _ANSI_ARGS_((void));
476 /* 144 */
477 EXTERN void Tcl_FindExecutable _ANSI_ARGS_((CONST char * argv0));
478 /* 145 */
479 EXTERN Tcl_HashEntry * Tcl_FirstHashEntry _ANSI_ARGS_((
480 Tcl_HashTable * tablePtr,
481 Tcl_HashSearch * searchPtr));
482 /* 146 */
483 EXTERN int Tcl_Flush _ANSI_ARGS_((Tcl_Channel chan));
484 /* 147 */
485 EXTERN void Tcl_FreeResult _ANSI_ARGS_((Tcl_Interp * interp));
486 /* 148 */
487 EXTERN int Tcl_GetAlias _ANSI_ARGS_((Tcl_Interp * interp,
488 char * slaveCmd,
489 Tcl_Interp ** targetInterpPtr,
490 char ** targetCmdPtr, int * argcPtr,
491 char *** argvPtr));
492 /* 149 */
493 EXTERN int Tcl_GetAliasObj _ANSI_ARGS_((Tcl_Interp * interp,
494 char * slaveCmd,
495 Tcl_Interp ** targetInterpPtr,
496 char ** targetCmdPtr, int * objcPtr,
497 Tcl_Obj *** objv));
498 /* 150 */
499 EXTERN ClientData Tcl_GetAssocData _ANSI_ARGS_((Tcl_Interp * interp,
500 char * name, Tcl_InterpDeleteProc ** procPtr));
501 /* 151 */
502 EXTERN Tcl_Channel Tcl_GetChannel _ANSI_ARGS_((Tcl_Interp * interp,
503 char * chanName, int * modePtr));
504 /* 152 */
505 EXTERN int Tcl_GetChannelBufferSize _ANSI_ARGS_((
506 Tcl_Channel chan));
507 /* 153 */
508 EXTERN int Tcl_GetChannelHandle _ANSI_ARGS_((Tcl_Channel chan,
509 int direction, ClientData * handlePtr));
510 /* 154 */
511 EXTERN ClientData Tcl_GetChannelInstanceData _ANSI_ARGS_((
512 Tcl_Channel chan));
513 /* 155 */
514 EXTERN int Tcl_GetChannelMode _ANSI_ARGS_((Tcl_Channel chan));
515 /* 156 */
516 EXTERN char * Tcl_GetChannelName _ANSI_ARGS_((Tcl_Channel chan));
517 /* 157 */
518 EXTERN int Tcl_GetChannelOption _ANSI_ARGS_((
519 Tcl_Interp * interp, Tcl_Channel chan,
520 char * optionName, Tcl_DString * dsPtr));
521 /* 158 */
522 EXTERN Tcl_ChannelType * Tcl_GetChannelType _ANSI_ARGS_((Tcl_Channel chan));
523 /* 159 */
524 EXTERN int Tcl_GetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp,
525 char * cmdName, Tcl_CmdInfo * infoPtr));
526 /* 160 */
527 EXTERN char * Tcl_GetCommandName _ANSI_ARGS_((Tcl_Interp * interp,
528 Tcl_Command command));
529 /* 161 */
530 EXTERN int Tcl_GetErrno _ANSI_ARGS_((void));
531 /* 162 */
532 EXTERN char * Tcl_GetHostName _ANSI_ARGS_((void));
533 /* 163 */
534 EXTERN int Tcl_GetInterpPath _ANSI_ARGS_((
535 Tcl_Interp * askInterp,
536 Tcl_Interp * slaveInterp));
537 /* 164 */
538 EXTERN Tcl_Interp * Tcl_GetMaster _ANSI_ARGS_((Tcl_Interp * interp));
539 /* 165 */
540 EXTERN CONST char * Tcl_GetNameOfExecutable _ANSI_ARGS_((void));
541 /* 166 */
542 EXTERN Tcl_Obj * Tcl_GetObjResult _ANSI_ARGS_((Tcl_Interp * interp));
543 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
544 /* 167 */
545 EXTERN int Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp,
546 char * str, int forWriting, int checkUsage,
547 ClientData * filePtr));
548 #endif /* UNIX */
549 /* 168 */
550 EXTERN Tcl_PathType Tcl_GetPathType _ANSI_ARGS_((char * path));
551 /* 169 */
552 EXTERN int Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan,
553 Tcl_DString * dsPtr));
554 /* 170 */
555 EXTERN int Tcl_GetsObj _ANSI_ARGS_((Tcl_Channel chan,
556 Tcl_Obj * objPtr));
557 /* 171 */
558 EXTERN int Tcl_GetServiceMode _ANSI_ARGS_((void));
559 /* 172 */
560 EXTERN Tcl_Interp * Tcl_GetSlave _ANSI_ARGS_((Tcl_Interp * interp,
561 char * slaveName));
562 /* 173 */
563 EXTERN Tcl_Channel Tcl_GetStdChannel _ANSI_ARGS_((int type));
564 /* 174 */
565 EXTERN char * Tcl_GetStringResult _ANSI_ARGS_((Tcl_Interp * interp));
566 /* 175 */
567 EXTERN char * Tcl_GetVar _ANSI_ARGS_((Tcl_Interp * interp,
568 char * varName, int flags));
569 /* 176 */
570 EXTERN char * Tcl_GetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
571 char * part1, char * part2, int flags));
572 /* 177 */
573 EXTERN int Tcl_GlobalEval _ANSI_ARGS_((Tcl_Interp * interp,
574 char * command));
575 /* 178 */
576 EXTERN int Tcl_GlobalEvalObj _ANSI_ARGS_((Tcl_Interp * interp,
577 Tcl_Obj * objPtr));
578 /* 179 */
579 EXTERN int Tcl_HideCommand _ANSI_ARGS_((Tcl_Interp * interp,
580 char * cmdName, char * hiddenCmdToken));
581 /* 180 */
582 EXTERN int Tcl_Init _ANSI_ARGS_((Tcl_Interp * interp));
583 /* 181 */
584 EXTERN void Tcl_InitHashTable _ANSI_ARGS_((
585 Tcl_HashTable * tablePtr, int keyType));
586 /* 182 */
587 EXTERN int Tcl_InputBlocked _ANSI_ARGS_((Tcl_Channel chan));
588 /* 183 */
589 EXTERN int Tcl_InputBuffered _ANSI_ARGS_((Tcl_Channel chan));
590 /* 184 */
591 EXTERN int Tcl_InterpDeleted _ANSI_ARGS_((Tcl_Interp * interp));
592 /* 185 */
593 EXTERN int Tcl_IsSafe _ANSI_ARGS_((Tcl_Interp * interp));
594 /* 186 */
595 EXTERN char * Tcl_JoinPath _ANSI_ARGS_((int argc, char ** argv,
596 Tcl_DString * resultPtr));
597 /* 187 */
598 EXTERN int Tcl_LinkVar _ANSI_ARGS_((Tcl_Interp * interp,
599 char * varName, char * addr, int type));
600 /* Slot 188 is reserved */
601 /* 189 */
602 EXTERN Tcl_Channel Tcl_MakeFileChannel _ANSI_ARGS_((ClientData handle,
603 int mode));
604 /* 190 */
605 EXTERN int Tcl_MakeSafe _ANSI_ARGS_((Tcl_Interp * interp));
606 /* 191 */
607 EXTERN Tcl_Channel Tcl_MakeTcpClientChannel _ANSI_ARGS_((
608 ClientData tcpSocket));
609 /* 192 */
610 EXTERN char * Tcl_Merge _ANSI_ARGS_((int argc, char ** argv));
611 /* 193 */
612 EXTERN Tcl_HashEntry * Tcl_NextHashEntry _ANSI_ARGS_((
613 Tcl_HashSearch * searchPtr));
614 /* 194 */
615 EXTERN void Tcl_NotifyChannel _ANSI_ARGS_((Tcl_Channel channel,
616 int mask));
617 /* 195 */
618 EXTERN Tcl_Obj * Tcl_ObjGetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
619 Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr,
620 int flags));
621 /* 196 */
622 EXTERN Tcl_Obj * Tcl_ObjSetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
623 Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr,
624 Tcl_Obj * newValuePtr, int flags));
625 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
626 /* 197 */
627 EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_((
628 Tcl_Interp * interp, int argc, char ** argv,
629 int flags));
630 #endif /* UNIX */
631 #ifdef __WIN32__
632 /* 197 */
633 EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_((
634 Tcl_Interp * interp, int argc, char ** argv,
635 int flags));
636 #endif /* __WIN32__ */
637 /* 198 */
638 EXTERN Tcl_Channel Tcl_OpenFileChannel _ANSI_ARGS_((Tcl_Interp * interp,
639 char * fileName, char * modeString,
640 int permissions));
641 /* 199 */
642 EXTERN Tcl_Channel Tcl_OpenTcpClient _ANSI_ARGS_((Tcl_Interp * interp,
643 int port, char * address, char * myaddr,
644 int myport, int async));
645 /* 200 */
646 EXTERN Tcl_Channel Tcl_OpenTcpServer _ANSI_ARGS_((Tcl_Interp * interp,
647 int port, char * host,
648 Tcl_TcpAcceptProc * acceptProc,
649 ClientData callbackData));
650 /* 201 */
651 EXTERN void Tcl_Preserve _ANSI_ARGS_((ClientData data));
652 /* 202 */
653 EXTERN void Tcl_PrintDouble _ANSI_ARGS_((Tcl_Interp * interp,
654 double value, char * dst));
655 /* 203 */
656 EXTERN int Tcl_PutEnv _ANSI_ARGS_((CONST char * string));
657 /* 204 */
658 EXTERN char * Tcl_PosixError _ANSI_ARGS_((Tcl_Interp * interp));
659 /* 205 */
660 EXTERN void Tcl_QueueEvent _ANSI_ARGS_((Tcl_Event * evPtr,
661 Tcl_QueuePosition position));
662 /* 206 */
663 EXTERN int Tcl_Read _ANSI_ARGS_((Tcl_Channel chan,
664 char * bufPtr, int toRead));
665 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
666 /* 207 */
667 EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void));
668 #endif /* UNIX */
669 #ifdef __WIN32__
670 /* 207 */
671 EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void));
672 #endif /* __WIN32__ */
673 /* 208 */
674 EXTERN int Tcl_RecordAndEval _ANSI_ARGS_((Tcl_Interp * interp,
675 char * cmd, int flags));
676 /* 209 */
677 EXTERN int Tcl_RecordAndEvalObj _ANSI_ARGS_((
678 Tcl_Interp * interp, Tcl_Obj * cmdPtr,
679 int flags));
680 /* 210 */
681 EXTERN void Tcl_RegisterChannel _ANSI_ARGS_((Tcl_Interp * interp,
682 Tcl_Channel chan));
683 /* 211 */
684 EXTERN void Tcl_RegisterObjType _ANSI_ARGS_((
685 Tcl_ObjType * typePtr));
686 /* 212 */
687 EXTERN Tcl_RegExp Tcl_RegExpCompile _ANSI_ARGS_((Tcl_Interp * interp,
688 char * string));
689 /* 213 */
690 EXTERN int Tcl_RegExpExec _ANSI_ARGS_((Tcl_Interp * interp,
691 Tcl_RegExp regexp, CONST char * str,
692 CONST char * start));
693 /* 214 */
694 EXTERN int Tcl_RegExpMatch _ANSI_ARGS_((Tcl_Interp * interp,
695 char * str, char * pattern));
696 /* 215 */
697 EXTERN void Tcl_RegExpRange _ANSI_ARGS_((Tcl_RegExp regexp,
698 int index, char ** startPtr, char ** endPtr));
699 /* 216 */
700 EXTERN void Tcl_Release _ANSI_ARGS_((ClientData clientData));
701 /* 217 */
702 EXTERN void Tcl_ResetResult _ANSI_ARGS_((Tcl_Interp * interp));
703 /* 218 */
704 EXTERN int Tcl_ScanElement _ANSI_ARGS_((CONST char * str,
705 int * flagPtr));
706 /* 219 */
707 EXTERN int Tcl_ScanCountedElement _ANSI_ARGS_((CONST char * str,
708 int length, int * flagPtr));
709 /* 220 */
710 EXTERN int Tcl_Seek _ANSI_ARGS_((Tcl_Channel chan, int offset,
711 int mode));
712 /* 221 */
713 EXTERN int Tcl_ServiceAll _ANSI_ARGS_((void));
714 /* 222 */
715 EXTERN int Tcl_ServiceEvent _ANSI_ARGS_((int flags));
716 /* 223 */
717 EXTERN void Tcl_SetAssocData _ANSI_ARGS_((Tcl_Interp * interp,
718 char * name, Tcl_InterpDeleteProc * proc,
719 ClientData clientData));
720 /* 224 */
721 EXTERN void Tcl_SetChannelBufferSize _ANSI_ARGS_((
722 Tcl_Channel chan, int sz));
723 /* 225 */
724 EXTERN int Tcl_SetChannelOption _ANSI_ARGS_((
725 Tcl_Interp * interp, Tcl_Channel chan,
726 char * optionName, char * newValue));
727 /* 226 */
728 EXTERN int Tcl_SetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp,
729 char * cmdName, Tcl_CmdInfo * infoPtr));
730 /* 227 */
731 EXTERN void Tcl_SetErrno _ANSI_ARGS_((int err));
732 /* 228 */
733 EXTERN void Tcl_SetErrorCode _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
734 /* 229 */
735 EXTERN void Tcl_SetMaxBlockTime _ANSI_ARGS_((Tcl_Time * timePtr));
736 /* 230 */
737 EXTERN void Tcl_SetPanicProc _ANSI_ARGS_((
738 Tcl_PanicProc * panicProc));
739 /* 231 */
740 EXTERN int Tcl_SetRecursionLimit _ANSI_ARGS_((
741 Tcl_Interp * interp, int depth));
742 /* 232 */
743 EXTERN void Tcl_SetResult _ANSI_ARGS_((Tcl_Interp * interp,
744 char * str, Tcl_FreeProc * freeProc));
745 /* 233 */
746 EXTERN int Tcl_SetServiceMode _ANSI_ARGS_((int mode));
747 /* 234 */
748 EXTERN void Tcl_SetObjErrorCode _ANSI_ARGS_((Tcl_Interp * interp,
749 Tcl_Obj * errorObjPtr));
750 /* 235 */
751 EXTERN void Tcl_SetObjResult _ANSI_ARGS_((Tcl_Interp * interp,
752 Tcl_Obj * resultObjPtr));
753 /* 236 */
754 EXTERN void Tcl_SetStdChannel _ANSI_ARGS_((Tcl_Channel channel,
755 int type));
756 /* 237 */
757 EXTERN char * Tcl_SetVar _ANSI_ARGS_((Tcl_Interp * interp,
758 char * varName, char * newValue, int flags));
759 /* 238 */
760 EXTERN char * Tcl_SetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
761 char * part1, char * part2, char * newValue,
762 int flags));
763 /* 239 */
764 EXTERN char * Tcl_SignalId _ANSI_ARGS_((int sig));
765 /* 240 */
766 EXTERN char * Tcl_SignalMsg _ANSI_ARGS_((int sig));
767 /* 241 */
768 EXTERN void Tcl_SourceRCFile _ANSI_ARGS_((Tcl_Interp * interp));
769 /* 242 */
770 EXTERN int Tcl_SplitList _ANSI_ARGS_((Tcl_Interp * interp,
771 CONST char * listStr, int * argcPtr,
772 char *** argvPtr));
773 /* 243 */
774 EXTERN void Tcl_SplitPath _ANSI_ARGS_((CONST char * path,
775 int * argcPtr, char *** argvPtr));
776 /* 244 */
777 EXTERN void Tcl_StaticPackage _ANSI_ARGS_((Tcl_Interp * interp,
778 char * pkgName,
779 Tcl_PackageInitProc * initProc,
780 Tcl_PackageInitProc * safeInitProc));
781 /* 245 */
782 EXTERN int Tcl_StringMatch _ANSI_ARGS_((CONST char * str,
783 CONST char * pattern));
784 /* 246 */
785 EXTERN int Tcl_Tell _ANSI_ARGS_((Tcl_Channel chan));
786 /* 247 */
787 EXTERN int Tcl_TraceVar _ANSI_ARGS_((Tcl_Interp * interp,
788 char * varName, int flags,
789 Tcl_VarTraceProc * proc,
790 ClientData clientData));
791 /* 248 */
792 EXTERN int Tcl_TraceVar2 _ANSI_ARGS_((Tcl_Interp * interp,
793 char * part1, char * part2, int flags,
794 Tcl_VarTraceProc * proc,
795 ClientData clientData));
796 /* 249 */
797 EXTERN char * Tcl_TranslateFileName _ANSI_ARGS_((
798 Tcl_Interp * interp, char * name,
799 Tcl_DString * bufferPtr));
800 /* 250 */
801 EXTERN int Tcl_Ungets _ANSI_ARGS_((Tcl_Channel chan, char * str,
802 int len, int atHead));
803 /* 251 */
804 EXTERN void Tcl_UnlinkVar _ANSI_ARGS_((Tcl_Interp * interp,
805 char * varName));
806 /* 252 */
807 EXTERN int Tcl_UnregisterChannel _ANSI_ARGS_((
808 Tcl_Interp * interp, Tcl_Channel chan));
809 /* 253 */
810 EXTERN int Tcl_UnsetVar _ANSI_ARGS_((Tcl_Interp * interp,
811 char * varName, int flags));
812 /* 254 */
813 EXTERN int Tcl_UnsetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
814 char * part1, char * part2, int flags));
815 /* 255 */
816 EXTERN void Tcl_UntraceVar _ANSI_ARGS_((Tcl_Interp * interp,
817 char * varName, int flags,
818 Tcl_VarTraceProc * proc,
819 ClientData clientData));
820 /* 256 */
821 EXTERN void Tcl_UntraceVar2 _ANSI_ARGS_((Tcl_Interp * interp,
822 char * part1, char * part2, int flags,
823 Tcl_VarTraceProc * proc,
824 ClientData clientData));
825 /* 257 */
826 EXTERN void Tcl_UpdateLinkedVar _ANSI_ARGS_((Tcl_Interp * interp,
827 char * varName));
828 /* 258 */
829 EXTERN int Tcl_UpVar _ANSI_ARGS_((Tcl_Interp * interp,
830 char * frameName, char * varName,
831 char * localName, int flags));
832 /* 259 */
833 EXTERN int Tcl_UpVar2 _ANSI_ARGS_((Tcl_Interp * interp,
834 char * frameName, char * part1, char * part2,
835 char * localName, int flags));
836 /* 260 */
837 EXTERN int Tcl_VarEval _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
838 /* 261 */
839 EXTERN ClientData Tcl_VarTraceInfo _ANSI_ARGS_((Tcl_Interp * interp,
840 char * varName, int flags,
841 Tcl_VarTraceProc * procPtr,
842 ClientData prevClientData));
843 /* 262 */
844 EXTERN ClientData Tcl_VarTraceInfo2 _ANSI_ARGS_((Tcl_Interp * interp,
845 char * part1, char * part2, int flags,
846 Tcl_VarTraceProc * procPtr,
847 ClientData prevClientData));
848 /* 263 */
849 EXTERN int Tcl_Write _ANSI_ARGS_((Tcl_Channel chan, char * s,
850 int slen));
851 /* 264 */
852 EXTERN void Tcl_WrongNumArgs _ANSI_ARGS_((Tcl_Interp * interp,
853 int objc, Tcl_Obj *CONST objv[],
854 char * message));
855 /* 265 */
856 EXTERN int Tcl_DumpActiveMemory _ANSI_ARGS_((char * fileName));
857 /* 266 */
858 EXTERN void Tcl_ValidateAllMemory _ANSI_ARGS_((char * file,
859 int line));
860 /* 267 */
861 EXTERN void Tcl_AppendResultVA _ANSI_ARGS_((Tcl_Interp * interp,
862 va_list argList));
863 /* 268 */
864 EXTERN void Tcl_AppendStringsToObjVA _ANSI_ARGS_((
865 Tcl_Obj * objPtr, va_list argList));
866 /* 269 */
867 EXTERN char * Tcl_HashStats _ANSI_ARGS_((Tcl_HashTable * tablePtr));
868 /* 270 */
869 EXTERN char * Tcl_ParseVar _ANSI_ARGS_((Tcl_Interp * interp,
870 char * str, char ** termPtr));
871 /* 271 */
872 EXTERN char * Tcl_PkgPresent _ANSI_ARGS_((Tcl_Interp * interp,
873 char * name, char * version, int exact));
874 /* 272 */
875 EXTERN char * Tcl_PkgPresentEx _ANSI_ARGS_((Tcl_Interp * interp,
876 char * name, char * version, int exact,
877 ClientData * clientDataPtr));
878 /* 273 */
879 EXTERN int Tcl_PkgProvide _ANSI_ARGS_((Tcl_Interp * interp,
880 char * name, char * version));
881 /* 274 */
882 EXTERN char * Tcl_PkgRequire _ANSI_ARGS_((Tcl_Interp * interp,
883 char * name, char * version, int exact));
884 /* 275 */
885 EXTERN void Tcl_SetErrorCodeVA _ANSI_ARGS_((Tcl_Interp * interp,
886 va_list argList));
887 /* 276 */
888 EXTERN int Tcl_VarEvalVA _ANSI_ARGS_((Tcl_Interp * interp,
889 va_list argList));
890 /* 277 */
891 EXTERN Tcl_Pid Tcl_WaitPid _ANSI_ARGS_((Tcl_Pid pid, int * statPtr,
892 int options));
893 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
894 /* 278 */
895 EXTERN void Tcl_PanicVA _ANSI_ARGS_((char * format,
896 va_list argList));
897 #endif /* UNIX */
898 #ifdef __WIN32__
899 /* 278 */
900 EXTERN void Tcl_PanicVA _ANSI_ARGS_((char * format,
901 va_list argList));
902 #endif /* __WIN32__ */
903 /* 279 */
904 EXTERN void Tcl_GetVersion _ANSI_ARGS_((int * major, int * minor,
905 int * patchLevel, int * type));
906 /* 280 */
907 EXTERN void Tcl_InitMemory _ANSI_ARGS_((Tcl_Interp * interp));
908 /* 281 */
909 EXTERN Tcl_Channel Tcl_StackChannel _ANSI_ARGS_((Tcl_Interp * interp,
910 Tcl_ChannelType * typePtr,
911 ClientData instanceData, int mask,
912 Tcl_Channel prevChan));
913 /* 282 */
914 EXTERN void Tcl_UnstackChannel _ANSI_ARGS_((Tcl_Interp * interp,
915 Tcl_Channel chan));
916 /* 283 */
917 EXTERN Tcl_Channel Tcl_GetStackedChannel _ANSI_ARGS_((Tcl_Channel chan));
918 /* Slot 284 is reserved */
919 /* Slot 285 is reserved */
920 /* 286 */
921 EXTERN void Tcl_AppendObjToObj _ANSI_ARGS_((Tcl_Obj * objPtr,
922 Tcl_Obj * appendObjPtr));
923 /* 287 */
924 EXTERN Tcl_Encoding Tcl_CreateEncoding _ANSI_ARGS_((
925 Tcl_EncodingType * typePtr));
926 /* 288 */
927 EXTERN void Tcl_CreateThreadExitHandler _ANSI_ARGS_((
928 Tcl_ExitProc * proc, ClientData clientData));
929 /* 289 */
930 EXTERN void Tcl_DeleteThreadExitHandler _ANSI_ARGS_((
931 Tcl_ExitProc * proc, ClientData clientData));
932 /* 290 */
933 EXTERN void Tcl_DiscardResult _ANSI_ARGS_((
934 Tcl_SavedResult * statePtr));
935 /* 291 */
936 EXTERN int Tcl_EvalEx _ANSI_ARGS_((Tcl_Interp * interp,
937 char * script, int numBytes, int flags));
938 /* 292 */
939 EXTERN int Tcl_EvalObjv _ANSI_ARGS_((Tcl_Interp * interp,
940 int objc, Tcl_Obj *CONST objv[], int flags));
941 /* 293 */
942 EXTERN int Tcl_EvalObjEx _ANSI_ARGS_((Tcl_Interp * interp,
943 Tcl_Obj * objPtr, int flags));
944 /* 294 */
945 EXTERN void Tcl_ExitThread _ANSI_ARGS_((int status));
946 /* 295 */
947 EXTERN int Tcl_ExternalToUtf _ANSI_ARGS_((Tcl_Interp * interp,
948 Tcl_Encoding encoding, CONST char * src,
949 int srcLen, int flags,
950 Tcl_EncodingState * statePtr, char * dst,
951 int dstLen, int * srcReadPtr,
952 int * dstWrotePtr, int * dstCharsPtr));
953 /* 296 */
954 EXTERN char * Tcl_ExternalToUtfDString _ANSI_ARGS_((
955 Tcl_Encoding encoding, CONST char * src,
956 int srcLen, Tcl_DString * dsPtr));
957 /* 297 */
958 EXTERN void Tcl_FinalizeThread _ANSI_ARGS_((void));
959 /* 298 */
960 EXTERN void Tcl_FinalizeNotifier _ANSI_ARGS_((
961 ClientData clientData));
962 /* 299 */
963 EXTERN void Tcl_FreeEncoding _ANSI_ARGS_((Tcl_Encoding encoding));
964 /* 300 */
965 EXTERN Tcl_ThreadId Tcl_GetCurrentThread _ANSI_ARGS_((void));
966 /* 301 */
967 EXTERN Tcl_Encoding Tcl_GetEncoding _ANSI_ARGS_((Tcl_Interp * interp,
968 CONST char * name));
969 /* 302 */
970 EXTERN char * Tcl_GetEncodingName _ANSI_ARGS_((
971 Tcl_Encoding encoding));
972 /* 303 */
973 EXTERN void Tcl_GetEncodingNames _ANSI_ARGS_((
974 Tcl_Interp * interp));
975 /* 304 */
976 EXTERN int Tcl_GetIndexFromObjStruct _ANSI_ARGS_((
977 Tcl_Interp * interp, Tcl_Obj * objPtr,
978 char ** tablePtr, int offset, char * msg,
979 int flags, int * indexPtr));
980 /* 305 */
981 EXTERN VOID * Tcl_GetThreadData _ANSI_ARGS_((
982 Tcl_ThreadDataKey * keyPtr, int size));
983 /* 306 */
984 EXTERN Tcl_Obj * Tcl_GetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp,
985 char * part1, char * part2, int flags));
986 /* 307 */
987 EXTERN ClientData Tcl_InitNotifier _ANSI_ARGS_((void));
988 /* 308 */
989 EXTERN void Tcl_MutexLock _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
990 /* 309 */
991 EXTERN void Tcl_MutexUnlock _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
992 /* 310 */
993 EXTERN void Tcl_ConditionNotify _ANSI_ARGS_((
994 Tcl_Condition * condPtr));
995 /* 311 */
996 EXTERN void Tcl_ConditionWait _ANSI_ARGS_((
997 Tcl_Condition * condPtr,
998 Tcl_Mutex * mutexPtr, Tcl_Time * timePtr));
999 /* 312 */
1000 EXTERN int Tcl_NumUtfChars _ANSI_ARGS_((CONST char * src,
1001 int len));
1002 /* 313 */
1003 EXTERN int Tcl_ReadChars _ANSI_ARGS_((Tcl_Channel channel,
1004 Tcl_Obj * objPtr, int charsToRead,
1005 int appendFlag));
1006 /* 314 */
1007 EXTERN void Tcl_RestoreResult _ANSI_ARGS_((Tcl_Interp * interp,
1008 Tcl_SavedResult * statePtr));
1009 /* 315 */
1010 EXTERN void Tcl_SaveResult _ANSI_ARGS_((Tcl_Interp * interp,
1011 Tcl_SavedResult * statePtr));
1012 /* 316 */
1013 EXTERN int Tcl_SetSystemEncoding _ANSI_ARGS_((
1014 Tcl_Interp * interp, CONST char * name));
1015 /* 317 */
1016 EXTERN Tcl_Obj * Tcl_SetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp,
1017 char * part1, char * part2,
1018 Tcl_Obj * newValuePtr, int flags));
1019 /* 318 */
1020 EXTERN void Tcl_ThreadAlert _ANSI_ARGS_((Tcl_ThreadId threadId));
1021 /* 319 */
1022 EXTERN void Tcl_ThreadQueueEvent _ANSI_ARGS_((
1023 Tcl_ThreadId threadId, Tcl_Event* evPtr,
1024 Tcl_QueuePosition position));
1025 /* 320 */
1026 EXTERN Tcl_UniChar Tcl_UniCharAtIndex _ANSI_ARGS_((CONST char * src,
1027 int index));
1028 /* 321 */
1029 EXTERN Tcl_UniChar Tcl_UniCharToLower _ANSI_ARGS_((int ch));
1030 /* 322 */
1031 EXTERN Tcl_UniChar Tcl_UniCharToTitle _ANSI_ARGS_((int ch));
1032 /* 323 */
1033 EXTERN Tcl_UniChar Tcl_UniCharToUpper _ANSI_ARGS_((int ch));
1034 /* 324 */
1035 EXTERN int Tcl_UniCharToUtf _ANSI_ARGS_((int ch, char * buf));
1036 /* 325 */
1037 EXTERN char * Tcl_UtfAtIndex _ANSI_ARGS_((CONST char * src,
1038 int index));
1039 /* 326 */
1040 EXTERN int Tcl_UtfCharComplete _ANSI_ARGS_((CONST char * src,
1041 int len));
1042 /* 327 */
1043 EXTERN int Tcl_UtfBackslash _ANSI_ARGS_((CONST char * src,
1044 int * readPtr, char * dst));
1045 /* 328 */
1046 EXTERN char * Tcl_UtfFindFirst _ANSI_ARGS_((CONST char * src,
1047 int ch));
1048 /* 329 */
1049 EXTERN char * Tcl_UtfFindLast _ANSI_ARGS_((CONST char * src,
1050 int ch));
1051 /* 330 */
1052 EXTERN char * Tcl_UtfNext _ANSI_ARGS_((CONST char * src));
1053 /* 331 */
1054 EXTERN char * Tcl_UtfPrev _ANSI_ARGS_((CONST char * src,
1055 CONST char * start));
1056 /* 332 */
1057 EXTERN int Tcl_UtfToExternal _ANSI_ARGS_((Tcl_Interp * interp,
1058 Tcl_Encoding encoding, CONST char * src,
1059 int srcLen, int flags,
1060 Tcl_EncodingState * statePtr, char * dst,
1061 int dstLen, int * srcReadPtr,
1062 int * dstWrotePtr, int * dstCharsPtr));
1063 /* 333 */
1064 EXTERN char * Tcl_UtfToExternalDString _ANSI_ARGS_((
1065 Tcl_Encoding encoding, CONST char * src,
1066 int srcLen, Tcl_DString * dsPtr));
1067 /* 334 */
1068 EXTERN int Tcl_UtfToLower _ANSI_ARGS_((char * src));
1069 /* 335 */
1070 EXTERN int Tcl_UtfToTitle _ANSI_ARGS_((char * src));
1071 /* 336 */
1072 EXTERN int Tcl_UtfToUniChar _ANSI_ARGS_((CONST char * src,
1073 Tcl_UniChar * chPtr));
1074 /* 337 */
1075 EXTERN int Tcl_UtfToUpper _ANSI_ARGS_((char * src));
1076 /* 338 */
1077 EXTERN int Tcl_WriteChars _ANSI_ARGS_((Tcl_Channel chan,
1078 CONST char * src, int srcLen));
1079 /* 339 */
1080 EXTERN int Tcl_WriteObj _ANSI_ARGS_((Tcl_Channel chan,
1081 Tcl_Obj * objPtr));
1082 /* 340 */
1083 EXTERN char * Tcl_GetString _ANSI_ARGS_((Tcl_Obj * objPtr));
1084 /* 341 */
1085 EXTERN char * Tcl_GetDefaultEncodingDir _ANSI_ARGS_((void));
1086 /* 342 */
1087 EXTERN void Tcl_SetDefaultEncodingDir _ANSI_ARGS_((char * path));
1088 /* 343 */
1089 EXTERN void Tcl_AlertNotifier _ANSI_ARGS_((ClientData clientData));
1090 /* 344 */
1091 EXTERN void Tcl_ServiceModeHook _ANSI_ARGS_((int mode));
1092 /* 345 */
1093 EXTERN int Tcl_UniCharIsAlnum _ANSI_ARGS_((int ch));
1094 /* 346 */
1095 EXTERN int Tcl_UniCharIsAlpha _ANSI_ARGS_((int ch));
1096 /* 347 */
1097 EXTERN int Tcl_UniCharIsDigit _ANSI_ARGS_((int ch));
1098 /* 348 */
1099 EXTERN int Tcl_UniCharIsLower _ANSI_ARGS_((int ch));
1100 /* 349 */
1101 EXTERN int Tcl_UniCharIsSpace _ANSI_ARGS_((int ch));
1102 /* 350 */
1103 EXTERN int Tcl_UniCharIsUpper _ANSI_ARGS_((int ch));
1104 /* 351 */
1105 EXTERN int Tcl_UniCharIsWordChar _ANSI_ARGS_((int ch));
1106 /* 352 */
1107 EXTERN int Tcl_UniCharLen _ANSI_ARGS_((Tcl_UniChar * str));
1108 /* 353 */
1109 EXTERN int Tcl_UniCharNcmp _ANSI_ARGS_((CONST Tcl_UniChar * cs,
1110 CONST Tcl_UniChar * ct, unsigned long n));
1111 /* 354 */
1112 EXTERN char * Tcl_UniCharToUtfDString _ANSI_ARGS_((
1113 CONST Tcl_UniChar * string, int numChars,
1114 Tcl_DString * dsPtr));
1115 /* 355 */
1116 EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString _ANSI_ARGS_((
1117 CONST char * string, int length,
1118 Tcl_DString * dsPtr));
1119 /* 356 */
1120 EXTERN Tcl_RegExp Tcl_GetRegExpFromObj _ANSI_ARGS_((
1121 Tcl_Interp * interp, Tcl_Obj * patObj,
1122 int flags));
1123 /* 357 */
1124 EXTERN Tcl_Obj * Tcl_EvalTokens _ANSI_ARGS_((Tcl_Interp * interp,
1125 Tcl_Token * tokenPtr, int count));
1126 /* 358 */
1127 EXTERN void Tcl_FreeParse _ANSI_ARGS_((Tcl_Parse * parsePtr));
1128 /* 359 */
1129 EXTERN void Tcl_LogCommandInfo _ANSI_ARGS_((Tcl_Interp * interp,
1130 char * script, char * command, int length));
1131 /* 360 */
1132 EXTERN int Tcl_ParseBraces _ANSI_ARGS_((Tcl_Interp * interp,
1133 char * string, int numBytes,
1134 Tcl_Parse * parsePtr, int append,
1135 char ** termPtr));
1136 /* 361 */
1137 EXTERN int Tcl_ParseCommand _ANSI_ARGS_((Tcl_Interp * interp,
1138 char * string, int numBytes, int nested,
1139 Tcl_Parse * parsePtr));
1140 /* 362 */
1141 EXTERN int Tcl_ParseExpr _ANSI_ARGS_((Tcl_Interp * interp,
1142 char * string, int numBytes,
1143 Tcl_Parse * parsePtr));
1144 /* 363 */
1145 EXTERN int Tcl_ParseQuotedString _ANSI_ARGS_((
1146 Tcl_Interp * interp, char * string,
1147 int numBytes, Tcl_Parse * parsePtr,
1148 int append, char ** termPtr));
1149 /* 364 */
1150 EXTERN int Tcl_ParseVarName _ANSI_ARGS_((Tcl_Interp * interp,
1151 char * string, int numBytes,
1152 Tcl_Parse * parsePtr, int append));
1153 /* 365 */
1154 EXTERN char * Tcl_GetCwd _ANSI_ARGS_((Tcl_Interp * interp,
1155 Tcl_DString * cwdPtr));
1156 /* 366 */
1157 EXTERN int Tcl_Chdir _ANSI_ARGS_((CONST char * dirName));
1158 /* 367 */
1159 EXTERN int Tcl_Access _ANSI_ARGS_((CONST char * path, int mode));
1160 /* 368 */
1161 EXTERN int Tcl_Stat _ANSI_ARGS_((CONST char * path,
1162 struct stat * bufPtr));
1163 /* 369 */
1164 EXTERN int Tcl_UtfNcmp _ANSI_ARGS_((CONST char * s1,
1165 CONST char * s2, unsigned long n));
1166 /* 370 */
1167 EXTERN int Tcl_UtfNcasecmp _ANSI_ARGS_((CONST char * s1,
1168 CONST char * s2, unsigned long n));
1169 /* 371 */
1170 EXTERN int Tcl_StringCaseMatch _ANSI_ARGS_((CONST char * str,
1171 CONST char * pattern, int nocase));
1172 /* 372 */
1173 EXTERN int Tcl_UniCharIsControl _ANSI_ARGS_((int ch));
1174 /* 373 */
1175 EXTERN int Tcl_UniCharIsGraph _ANSI_ARGS_((int ch));
1176 /* 374 */
1177 EXTERN int Tcl_UniCharIsPrint _ANSI_ARGS_((int ch));
1178 /* 375 */
1179 EXTERN int Tcl_UniCharIsPunct _ANSI_ARGS_((int ch));
1180 /* 376 */
1181 EXTERN int Tcl_RegExpExecObj _ANSI_ARGS_((Tcl_Interp * interp,
1182 Tcl_RegExp regexp, Tcl_Obj * objPtr,
1183 int offset, int nmatches, int flags));
1184 /* 377 */
1185 EXTERN void Tcl_RegExpGetInfo _ANSI_ARGS_((Tcl_RegExp regexp,
1186 Tcl_RegExpInfo * infoPtr));
1187 /* 378 */
1188 EXTERN Tcl_Obj * Tcl_NewUnicodeObj _ANSI_ARGS_((Tcl_UniChar * unicode,
1189 int numChars));
1190 /* 379 */
1191 EXTERN void Tcl_SetUnicodeObj _ANSI_ARGS_((Tcl_Obj * objPtr,
1192 Tcl_UniChar * unicode, int numChars));
1193 /* 380 */
1194 EXTERN int Tcl_GetCharLength _ANSI_ARGS_((Tcl_Obj * objPtr));
1195 /* 381 */
1196 EXTERN Tcl_UniChar Tcl_GetUniChar _ANSI_ARGS_((Tcl_Obj * objPtr,
1197 int index));
1198 /* 382 */
1199 EXTERN Tcl_UniChar * Tcl_GetUnicode _ANSI_ARGS_((Tcl_Obj * objPtr));
1200 /* 383 */
1201 EXTERN Tcl_Obj * Tcl_GetRange _ANSI_ARGS_((Tcl_Obj * objPtr,
1202 int first, int last));
1203 /* 384 */
1204 EXTERN void Tcl_AppendUnicodeToObj _ANSI_ARGS_((Tcl_Obj * objPtr,
1205 Tcl_UniChar * unicode, int length));
1206 /* 385 */
1207 EXTERN int Tcl_RegExpMatchObj _ANSI_ARGS_((Tcl_Interp * interp,
1208 Tcl_Obj * stringObj, Tcl_Obj * patternObj));
1209 /* 386 */
1210 EXTERN void Tcl_SetNotifier _ANSI_ARGS_((
1211 Tcl_NotifierProcs * notifierProcPtr));
1212 /* 387 */
1213 EXTERN Tcl_Mutex * Tcl_GetAllocMutex _ANSI_ARGS_((void));
1214 /* 388 */
1215 EXTERN int Tcl_GetChannelNames _ANSI_ARGS_((Tcl_Interp * interp));
1216 /* 389 */
1217 EXTERN int Tcl_GetChannelNamesEx _ANSI_ARGS_((
1218 Tcl_Interp * interp, char * pattern));
1219 /* 390 */
1220 EXTERN int Tcl_ProcObjCmd _ANSI_ARGS_((ClientData clientData,
1221 Tcl_Interp * interp, int objc,
1222 Tcl_Obj *CONST objv[]));
1223 /* 391 */
1224 EXTERN void Tcl_ConditionFinalize _ANSI_ARGS_((
1225 Tcl_Condition * condPtr));
1226 /* 392 */
1227 EXTERN void Tcl_MutexFinalize _ANSI_ARGS_((Tcl_Mutex * mutex));
1228 /* 393 */
1229 EXTERN int Tcl_CreateThread _ANSI_ARGS_((Tcl_ThreadId * idPtr,
1230 Tcl_ThreadCreateProc proc,
1231 ClientData clientData, int stackSize,
1232 int flags));
1233
1234 typedef struct TclStubHooks {
1235 struct TclPlatStubs *tclPlatStubs;
1236 struct TclIntStubs *tclIntStubs;
1237 struct TclIntPlatStubs *tclIntPlatStubs;
1238 } TclStubHooks;
1239
1240 typedef struct TclStubs {
1241 int magic;
1242 struct TclStubHooks *hooks;
1243
1244 int (*tcl_PkgProvideEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, ClientData clientData)); /* 0 */
1245 char * (*tcl_PkgRequireEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 1 */
1246 void (*tcl_Panic) _ANSI_ARGS_(TCL_VARARGS(char *,format)); /* 2 */
1247 char * (*tcl_Alloc) _ANSI_ARGS_((unsigned int size)); /* 3 */
1248 void (*tcl_Free) _ANSI_ARGS_((char * ptr)); /* 4 */
1249 char * (*tcl_Realloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 5 */
1250 char * (*tcl_DbCkalloc) _ANSI_ARGS_((unsigned int size, char * file, int line)); /* 6 */
1251 int (*tcl_DbCkfree) _ANSI_ARGS_((char * ptr, char * file, int line)); /* 7 */
1252 char * (*tcl_DbCkrealloc) _ANSI_ARGS_((char * ptr, unsigned int size, char * file, int line)); /* 8 */
1253 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1254 void (*tcl_CreateFileHandler) _ANSI_ARGS_((int fd, int mask, Tcl_FileProc * proc, ClientData clientData)); /* 9 */
1255 #endif /* UNIX */
1256 #ifdef __WIN32__
1257 void *reserved9;
1258 #endif /* __WIN32__ */
1259 #ifdef MAC_TCL
1260 void *reserved9;
1261 #endif /* MAC_TCL */
1262 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1263 void (*tcl_DeleteFileHandler) _ANSI_ARGS_((int fd)); /* 10 */
1264 #endif /* UNIX */
1265 #ifdef __WIN32__
1266 void *reserved10;
1267 #endif /* __WIN32__ */
1268 #ifdef MAC_TCL
1269 void *reserved10;
1270 #endif /* MAC_TCL */
1271 void (*tcl_SetTimer) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 11 */
1272 void (*tcl_Sleep) _ANSI_ARGS_((int ms)); /* 12 */
1273 int (*tcl_WaitForEvent) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 13 */
1274 int (*tcl_AppendAllObjTypes) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 14 */
1275 void (*tcl_AppendStringsToObj) _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr)); /* 15 */
1276 void (*tcl_AppendToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 16 */
1277 Tcl_Obj * (*tcl_ConcatObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 17 */
1278 int (*tcl_ConvertToType) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_ObjType * typePtr)); /* 18 */
1279 void (*tcl_DbDecrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 19 */
1280 void (*tcl_DbIncrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 20 */
1281 int (*tcl_DbIsShared) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 21 */
1282 Tcl_Obj * (*tcl_DbNewBooleanObj) _ANSI_ARGS_((int boolValue, char * file, int line)); /* 22 */
1283 Tcl_Obj * (*tcl_DbNewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length, char * file, int line)); /* 23 */
1284 Tcl_Obj * (*tcl_DbNewDoubleObj) _ANSI_ARGS_((double doubleValue, char * file, int line)); /* 24 */
1285 Tcl_Obj * (*tcl_DbNewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[], char * file, int line)); /* 25 */
1286 Tcl_Obj * (*tcl_DbNewLongObj) _ANSI_ARGS_((long longValue, char * file, int line)); /* 26 */
1287 Tcl_Obj * (*tcl_DbNewObj) _ANSI_ARGS_((char * file, int line)); /* 27 */
1288 Tcl_Obj * (*tcl_DbNewStringObj) _ANSI_ARGS_((CONST char * bytes, int length, char * file, int line)); /* 28 */
1289 Tcl_Obj * (*tcl_DuplicateObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 29 */
1290 void (*tclFreeObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 30 */
1291 int (*tcl_GetBoolean) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * boolPtr)); /* 31 */
1292 int (*tcl_GetBooleanFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * boolPtr)); /* 32 */
1293 unsigned char * (*tcl_GetByteArrayFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 33 */
1294 int (*tcl_GetDouble) _ANSI_ARGS_((Tcl_Interp * interp, char * str, double * doublePtr)); /* 34 */
1295 int (*tcl_GetDoubleFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * doublePtr)); /* 35 */
1296 int (*tcl_GetIndexFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, char * msg, int flags, int * indexPtr)); /* 36 */
1297 int (*tcl_GetInt) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * intPtr)); /* 37 */
1298 int (*tcl_GetIntFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * intPtr)); /* 38 */
1299 int (*tcl_GetLongFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * longPtr)); /* 39 */
1300 Tcl_ObjType * (*tcl_GetObjType) _ANSI_ARGS_((char * typeName)); /* 40 */
1301 char * (*tcl_GetStringFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 41 */
1302 void (*tcl_InvalidateStringRep) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 42 */
1303 int (*tcl_ListObjAppendList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * elemListPtr)); /* 43 */
1304 int (*tcl_ListObjAppendElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * objPtr)); /* 44 */
1305 int (*tcl_ListObjGetElements) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * objcPtr, Tcl_Obj *** objvPtr)); /* 45 */
1306 int (*tcl_ListObjIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj ** objPtrPtr)); /* 46 */
1307 int (*tcl_ListObjLength) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * intPtr)); /* 47 */
1308 int (*tcl_ListObjReplace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[])); /* 48 */
1309 Tcl_Obj * (*tcl_NewBooleanObj) _ANSI_ARGS_((int boolValue)); /* 49 */
1310 Tcl_Obj * (*tcl_NewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length)); /* 50 */
1311 Tcl_Obj * (*tcl_NewDoubleObj) _ANSI_ARGS_((double doubleValue)); /* 51 */
1312 Tcl_Obj * (*tcl_NewIntObj) _ANSI_ARGS_((int intValue)); /* 52 */
1313 Tcl_Obj * (*tcl_NewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 53 */
1314 Tcl_Obj * (*tcl_NewLongObj) _ANSI_ARGS_((long longValue)); /* 54 */
1315 Tcl_Obj * (*tcl_NewObj) _ANSI_ARGS_((void)); /* 55 */
1316 Tcl_Obj * (*tcl_NewStringObj) _ANSI_ARGS_((CONST char * bytes, int length)); /* 56 */
1317 void (*tcl_SetBooleanObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int boolValue)); /* 57 */
1318 unsigned char * (*tcl_SetByteArrayLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 58 */
1319 void (*tcl_SetByteArrayObj) _ANSI_ARGS_((Tcl_Obj * objPtr, unsigned char * bytes, int length)); /* 59 */
1320 void (*tcl_SetDoubleObj) _ANSI_ARGS_((Tcl_Obj * objPtr, double doubleValue)); /* 60 */
1321 void (*tcl_SetIntObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int intValue)); /* 61 */
1322 void (*tcl_SetListObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int objc, Tcl_Obj *CONST objv[])); /* 62 */
1323 void (*tcl_SetLongObj) _ANSI_ARGS_((Tcl_Obj * objPtr, long longValue)); /* 63 */
1324 void (*tcl_SetObjLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 64 */
1325 void (*tcl_SetStringObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 65 */
1326 void (*tcl_AddErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message)); /* 66 */
1327 void (*tcl_AddObjErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message, int length)); /* 67 */
1328 void (*tcl_AllowExceptions) _ANSI_ARGS_((Tcl_Interp * interp)); /* 68 */
1329 void (*tcl_AppendElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string)); /* 69 */
1330 void (*tcl_AppendResult) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 70 */
1331 Tcl_AsyncHandler (*tcl_AsyncCreate) _ANSI_ARGS_((Tcl_AsyncProc * proc, ClientData clientData)); /* 71 */
1332 void (*tcl_AsyncDelete) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 72 */
1333 int (*tcl_AsyncInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int code)); /* 73 */
1334 void (*tcl_AsyncMark) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 74 */
1335 int (*tcl_AsyncReady) _ANSI_ARGS_((void)); /* 75 */
1336 void (*tcl_BackgroundError) _ANSI_ARGS_((Tcl_Interp * interp)); /* 76 */
1337 char (*tcl_Backslash) _ANSI_ARGS_((CONST char * src, int * readPtr)); /* 77 */
1338 int (*tcl_BadChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, char * optionName, char * optionList)); /* 78 */
1339 void (*tcl_CallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 79 */
1340 void (*tcl_CancelIdleCall) _ANSI_ARGS_((Tcl_IdleProc * idleProc, ClientData clientData)); /* 80 */
1341 int (*tcl_Close) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 81 */
1342 int (*tcl_CommandComplete) _ANSI_ARGS_((char * cmd)); /* 82 */
1343 char * (*tcl_Concat) _ANSI_ARGS_((int argc, char ** argv)); /* 83 */
1344 int (*tcl_ConvertElement) _ANSI_ARGS_((CONST char * src, char * dst, int flags)); /* 84 */
1345 int (*tcl_ConvertCountedElement) _ANSI_ARGS_((CONST char * src, int length, char * dst, int flags)); /* 85 */
1346 int (*tcl_CreateAlias) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int argc, char ** argv)); /* 86 */
1347 int (*tcl_CreateAliasObj) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int objc, Tcl_Obj *CONST objv[])); /* 87 */
1348 Tcl_Channel (*tcl_CreateChannel) _ANSI_ARGS_((Tcl_ChannelType * typePtr, char * chanName, ClientData instanceData, int mask)); /* 88 */
1349 void (*tcl_CreateChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, int mask, Tcl_ChannelProc * proc, ClientData clientData)); /* 89 */
1350 void (*tcl_CreateCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData)); /* 90 */
1351 Tcl_Command (*tcl_CreateCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 91 */
1352 void (*tcl_CreateEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData)); /* 92 */
1353 void (*tcl_CreateExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 93 */
1354 Tcl_Interp * (*tcl_CreateInterp) _ANSI_ARGS_((void)); /* 94 */
1355 void (*tcl_CreateMathFunc) _ANSI_ARGS_((Tcl_Interp * interp, char * name, int numArgs, Tcl_ValueType * argTypes, Tcl_MathProc * proc, ClientData clientData)); /* 95 */
1356 Tcl_Command (*tcl_CreateObjCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_ObjCmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 96 */
1357 Tcl_Interp * (*tcl_CreateSlave) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveName, int isSafe)); /* 97 */
1358 Tcl_TimerToken (*tcl_CreateTimerHandler) _ANSI_ARGS_((int milliseconds, Tcl_TimerProc * proc, ClientData clientData)); /* 98 */
1359 Tcl_Trace (*tcl_CreateTrace) _ANSI_ARGS_((Tcl_Interp * interp, int level, Tcl_CmdTraceProc * proc, ClientData clientData)); /* 99 */
1360 void (*tcl_DeleteAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name)); /* 100 */
1361 void (*tcl_DeleteChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_ChannelProc * proc, ClientData clientData)); /* 101 */
1362 void (*tcl_DeleteCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData)); /* 102 */
1363 int (*tcl_DeleteCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName)); /* 103 */
1364 int (*tcl_DeleteCommandFromToken) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command)); /* 104 */
1365 void (*tcl_DeleteEvents) _ANSI_ARGS_((Tcl_EventDeleteProc * proc, ClientData clientData)); /* 105 */
1366 void (*tcl_DeleteEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData)); /* 106 */
1367 void (*tcl_DeleteExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 107 */
1368 void (*tcl_DeleteHashEntry) _ANSI_ARGS_((Tcl_HashEntry * entryPtr)); /* 108 */
1369 void (*tcl_DeleteHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr)); /* 109 */
1370 void (*tcl_DeleteInterp) _ANSI_ARGS_((Tcl_Interp * interp)); /* 110 */
1371 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1372 void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr)); /* 111 */
1373 #endif /* UNIX */
1374 #ifdef __WIN32__
1375 void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr)); /* 111 */
1376 #endif /* __WIN32__ */
1377 #ifdef MAC_TCL
1378 void *reserved111;
1379 #endif /* MAC_TCL */
1380 void (*tcl_DeleteTimerHandler) _ANSI_ARGS_((Tcl_TimerToken token)); /* 112 */
1381 void (*tcl_DeleteTrace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Trace trace)); /* 113 */
1382 void (*tcl_DontCallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 114 */
1383 int (*tcl_DoOneEvent) _ANSI_ARGS_((int flags)); /* 115 */
1384 void (*tcl_DoWhenIdle) _ANSI_ARGS_((Tcl_IdleProc * proc, ClientData clientData)); /* 116 */
1385 char * (*tcl_DStringAppend) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * str, int length)); /* 117 */
1386 char * (*tcl_DStringAppendElement) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * string)); /* 118 */
1387 void (*tcl_DStringEndSublist) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 119 */
1388 void (*tcl_DStringFree) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 120 */
1389 void (*tcl_DStringGetResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr)); /* 121 */
1390 void (*tcl_DStringInit) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 122 */
1391 void (*tcl_DStringResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr)); /* 123 */
1392 void (*tcl_DStringSetLength) _ANSI_ARGS_((Tcl_DString * dsPtr, int length)); /* 124 */
1393 void (*tcl_DStringStartSublist) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 125 */
1394 int (*tcl_Eof) _ANSI_ARGS_((Tcl_Channel chan)); /* 126 */
1395 char * (*tcl_ErrnoId) _ANSI_ARGS_((void)); /* 127 */
1396 char * (*tcl_ErrnoMsg) _ANSI_ARGS_((int err)); /* 128 */
1397 int (*tcl_Eval) _ANSI_ARGS_((Tcl_Interp * interp, char * string)); /* 129 */
1398 int (*tcl_EvalFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName)); /* 130 */
1399 int (*tcl_EvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 131 */
1400 void (*tcl_EventuallyFree) _ANSI_ARGS_((ClientData clientData, Tcl_FreeProc * freeProc)); /* 132 */
1401 void (*tcl_Exit) _ANSI_ARGS_((int status)); /* 133 */
1402 int (*tcl_ExposeCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * hiddenCmdToken, char * cmdName)); /* 134 */
1403 int (*tcl_ExprBoolean) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * ptr)); /* 135 */
1404 int (*tcl_ExprBooleanObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * ptr)); /* 136 */
1405 int (*tcl_ExprDouble) _ANSI_ARGS_((Tcl_Interp * interp, char * str, double * ptr)); /* 137 */
1406 int (*tcl_ExprDoubleObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * ptr)); /* 138 */
1407 int (*tcl_ExprLong) _ANSI_ARGS_((Tcl_Interp * interp, char * str, long * ptr)); /* 139 */
1408 int (*tcl_ExprLongObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * ptr)); /* 140 */
1409 int (*tcl_ExprObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr)); /* 141 */
1410 int (*tcl_ExprString) _ANSI_ARGS_((Tcl_Interp * interp, char * string)); /* 142 */
1411 void (*tcl_Finalize) _ANSI_ARGS_((void)); /* 143 */
1412 void (*tcl_FindExecutable) _ANSI_ARGS_((CONST char * argv0)); /* 144 */
1413 Tcl_HashEntry * (*tcl_FirstHashEntry) _ANSI_ARGS_((Tcl_HashTable * tablePtr, Tcl_HashSearch * searchPtr)); /* 145 */
1414 int (*tcl_Flush) _ANSI_ARGS_((Tcl_Channel chan)); /* 146 */
1415 void (*tcl_FreeResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 147 */
1416 int (*tcl_GetAlias) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveCmd, Tcl_Interp ** targetInterpPtr, char ** targetCmdPtr, int * argcPtr, char *** argvPtr)); /* 148 */
1417 int (*tcl_GetAliasObj) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveCmd, Tcl_Interp ** targetInterpPtr, char ** targetCmdPtr, int * objcPtr, Tcl_Obj *** objv)); /* 149 */
1418 ClientData (*tcl_GetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_InterpDeleteProc ** procPtr)); /* 150 */
1419 Tcl_Channel (*tcl_GetChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * chanName, int * modePtr)); /* 151 */
1420 int (*tcl_GetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan)); /* 152 */
1421 int (*tcl_GetChannelHandle) _ANSI_ARGS_((Tcl_Channel chan, int direction, ClientData * handlePtr)); /* 153 */
1422 ClientData (*tcl_GetChannelInstanceData) _ANSI_ARGS_((Tcl_Channel chan)); /* 154 */
1423 int (*tcl_GetChannelMode) _ANSI_ARGS_((Tcl_Channel chan)); /* 155 */
1424 char * (*tcl_GetChannelName) _ANSI_ARGS_((Tcl_Channel chan)); /* 156 */
1425 int (*tcl_GetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, char * optionName, Tcl_DString * dsPtr)); /* 157 */
1426 Tcl_ChannelType * (*tcl_GetChannelType) _ANSI_ARGS_((Tcl_Channel chan)); /* 158 */
1427 int (*tcl_GetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdInfo * infoPtr)); /* 159 */
1428 char * (*tcl_GetCommandName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command)); /* 160 */
1429 int (*tcl_GetErrno) _ANSI_ARGS_((void)); /* 161 */
1430 char * (*tcl_GetHostName) _ANSI_ARGS_((void)); /* 162 */
1431 int (*tcl_GetInterpPath) _ANSI_ARGS_((Tcl_Interp * askInterp, Tcl_Interp * slaveInterp)); /* 163 */
1432 Tcl_Interp * (*tcl_GetMaster) _ANSI_ARGS_((Tcl_Interp * interp)); /* 164 */
1433 CONST char * (*tcl_GetNameOfExecutable) _ANSI_ARGS_((void)); /* 165 */
1434 Tcl_Obj * (*tcl_GetObjResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 166 */
1435 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1436 int (*tcl_GetOpenFile) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int forWriting, int checkUsage, ClientData * filePtr)); /* 167 */
1437 #endif /* UNIX */
1438 #ifdef __WIN32__
1439 void *reserved167;
1440 #endif /* __WIN32__ */
1441 #ifdef MAC_TCL
1442 void *reserved167;
1443 #endif /* MAC_TCL */
1444 Tcl_PathType (*tcl_GetPathType) _ANSI_ARGS_((char * path)); /* 168 */
1445 int (*tcl_Gets) _ANSI_ARGS_((Tcl_Channel chan, Tcl_DString * dsPtr)); /* 169 */
1446 int (*tcl_GetsObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); /* 170 */
1447 int (*tcl_GetServiceMode) _ANSI_ARGS_((void)); /* 171 */
1448 Tcl_Interp * (*tcl_GetSlave) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveName)); /* 172 */
1449 Tcl_Channel (*tcl_GetStdChannel) _ANSI_ARGS_((int type)); /* 173 */
1450 char * (*tcl_GetStringResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 174 */
1451 char * (*tcl_GetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags)); /* 175 */
1452 char * (*tcl_GetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 176 */
1453 int (*tcl_GlobalEval) _ANSI_ARGS_((Tcl_Interp * interp, char * command)); /* 177 */
1454 int (*tcl_GlobalEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 178 */
1455 int (*tcl_HideCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, char * hiddenCmdToken)); /* 179 */
1456 int (*tcl_Init) _ANSI_ARGS_((Tcl_Interp * interp)); /* 180 */
1457 void (*tcl_InitHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr, int keyType)); /* 181 */
1458 int (*tcl_InputBlocked) _ANSI_ARGS_((Tcl_Channel chan)); /* 182 */
1459 int (*tcl_InputBuffered) _ANSI_ARGS_((Tcl_Channel chan)); /* 183 */
1460 int (*tcl_InterpDeleted) _ANSI_ARGS_((Tcl_Interp * interp)); /* 184 */
1461 int (*tcl_IsSafe) _ANSI_ARGS_((Tcl_Interp * interp)); /* 185 */
1462 char * (*tcl_JoinPath) _ANSI_ARGS_((int argc, char ** argv, Tcl_DString * resultPtr)); /* 186 */
1463 int (*tcl_LinkVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, char * addr, int type)); /* 187 */
1464 void *reserved188;
1465 Tcl_Channel (*tcl_MakeFileChannel) _ANSI_ARGS_((ClientData handle, int mode)); /* 189 */
1466 int (*tcl_MakeSafe) _ANSI_ARGS_((Tcl_Interp * interp)); /* 190 */
1467 Tcl_Channel (*tcl_MakeTcpClientChannel) _ANSI_ARGS_((ClientData tcpSocket)); /* 191 */
1468 char * (*tcl_Merge) _ANSI_ARGS_((int argc, char ** argv)); /* 192 */
1469 Tcl_HashEntry * (*tcl_NextHashEntry) _ANSI_ARGS_((Tcl_HashSearch * searchPtr)); /* 193 */
1470 void (*tcl_NotifyChannel) _ANSI_ARGS_((Tcl_Channel channel, int mask)); /* 194 */
1471 Tcl_Obj * (*tcl_ObjGetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, int flags)); /* 195 */
1472 Tcl_Obj * (*tcl_ObjSetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, Tcl_Obj * newValuePtr, int flags)); /* 196 */
1473 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1474 Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 197 */
1475 #endif /* UNIX */
1476 #ifdef __WIN32__
1477 Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 197 */
1478 #endif /* __WIN32__ */
1479 #ifdef MAC_TCL
1480 void *reserved197;
1481 #endif /* MAC_TCL */
1482 Tcl_Channel (*tcl_OpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * modeString, int permissions)); /* 198 */
1483 Tcl_Channel (*tcl_OpenTcpClient) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * address, char * myaddr, int myport, int async)); /* 199 */
1484 Tcl_Channel (*tcl_OpenTcpServer) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * host, Tcl_TcpAcceptProc * acceptProc, ClientData callbackData)); /* 200 */
1485 void (*tcl_Preserve) _ANSI_ARGS_((ClientData data)); /* 201 */
1486 void (*tcl_PrintDouble) _ANSI_ARGS_((Tcl_Interp * interp, double value, char * dst)); /* 202 */
1487 int (*tcl_PutEnv) _ANSI_ARGS_((CONST char * string)); /* 203 */
1488 char * (*tcl_PosixError) _ANSI_ARGS_((Tcl_Interp * interp)); /* 204 */
1489 void (*tcl_QueueEvent) _ANSI_ARGS_((Tcl_Event * evPtr, Tcl_QueuePosition position)); /* 205 */
1490 int (*tcl_Read) _ANSI_ARGS_((Tcl_Channel chan, char * bufPtr, int toRead)); /* 206 */
1491 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1492 void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void)); /* 207 */
1493 #endif /* UNIX */
1494 #ifdef __WIN32__
1495 void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void)); /* 207 */
1496 #endif /* __WIN32__ */
1497 #ifdef MAC_TCL
1498 void *reserved207;
1499 #endif /* MAC_TCL */
1500 int (*tcl_RecordAndEval) _ANSI_ARGS_((Tcl_Interp * interp, char * cmd, int flags)); /* 208 */
1501 int (*tcl_RecordAndEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * cmdPtr, int flags)); /* 209 */
1502 void (*tcl_RegisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 210 */
1503 void (*tcl_RegisterObjType) _ANSI_ARGS_((Tcl_ObjType * typePtr)); /* 211 */
1504 Tcl_RegExp (*tcl_RegExpCompile) _ANSI_ARGS_((Tcl_Interp * interp, char * string)); /* 212 */
1505 int (*tcl_RegExpExec) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp regexp, CONST char * str, CONST char * start)); /* 213 */
1506 int (*tcl_RegExpMatch) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char * pattern)); /* 214 */
1507 void (*tcl_RegExpRange) _ANSI_ARGS_((Tcl_RegExp regexp, int index, char ** startPtr, char ** endPtr)); /* 215 */
1508 void (*tcl_Release) _ANSI_ARGS_((ClientData clientData)); /* 216 */
1509 void (*tcl_ResetResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 217 */
1510 int (*tcl_ScanElement) _ANSI_ARGS_((CONST char * str, int * flagPtr)); /* 218 */
1511 int (*tcl_ScanCountedElement) _ANSI_ARGS_((CONST char * str, int length, int * flagPtr)); /* 219 */
1512 int (*tcl_Seek) _ANSI_ARGS_((Tcl_Channel chan, int offset, int mode)); /* 220 */
1513 int (*tcl_ServiceAll) _ANSI_ARGS_((void)); /* 221 */
1514 int (*tcl_ServiceEvent) _ANSI_ARGS_((int flags)); /* 222 */
1515 void (*tcl_SetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 223 */
1516 void (*tcl_SetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan, int sz)); /* 224 */
1517 int (*tcl_SetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, char * optionName, char * newValue)); /* 225 */
1518 int (*tcl_SetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdInfo * infoPtr)); /* 226 */
1519 void (*tcl_SetErrno) _ANSI_ARGS_((int err)); /* 227 */
1520 void (*tcl_SetErrorCode) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 228 */
1521 void (*tcl_SetMaxBlockTime) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 229 */
1522 void (*tcl_SetPanicProc) _ANSI_ARGS_((Tcl_PanicProc * panicProc)); /* 230 */
1523 int (*tcl_SetRecursionLimit) _ANSI_ARGS_((Tcl_Interp * interp, int depth)); /* 231 */
1524 void (*tcl_SetResult) _ANSI_ARGS_((Tcl_Interp * interp, char * str, Tcl_FreeProc * freeProc)); /* 232 */
1525 int (*tcl_SetServiceMode) _ANSI_ARGS_((int mode)); /* 233 */
1526 void (*tcl_SetObjErrorCode) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * errorObjPtr)); /* 234 */
1527 void (*tcl_SetObjResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * resultObjPtr)); /* 235 */
1528 void (*tcl_SetStdChannel) _ANSI_ARGS_((Tcl_Channel channel, int type)); /* 236 */
1529 char * (*tcl_SetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, char * newValue, int flags)); /* 237 */
1530 char * (*tcl_SetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, char * newValue, int flags)); /* 238 */
1531 char * (*tcl_SignalId) _ANSI_ARGS_((int sig)); /* 239 */
1532 char * (*tcl_SignalMsg) _ANSI_ARGS_((int sig)); /* 240 */
1533 void (*tcl_SourceRCFile) _ANSI_ARGS_((Tcl_Interp * interp)); /* 241 */
1534 int (*tcl_SplitList) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int * argcPtr, char *** argvPtr)); /* 242 */
1535 void (*tcl_SplitPath) _ANSI_ARGS_((CONST char * path, int * argcPtr, char *** argvPtr)); /* 243 */
1536 void (*tcl_StaticPackage) _ANSI_ARGS_((Tcl_Interp * interp, char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc)); /* 244 */
1537 int (*tcl_StringMatch) _ANSI_ARGS_((CONST char * str, CONST char * pattern)); /* 245 */
1538 int (*tcl_Tell) _ANSI_ARGS_((Tcl_Channel chan)); /* 246 */
1539 int (*tcl_TraceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 247 */
1540 int (*tcl_TraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 248 */
1541 char * (*tcl_TranslateFileName) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_DString * bufferPtr)); /* 249 */
1542 int (*tcl_Ungets) _ANSI_ARGS_((Tcl_Channel chan, char * str, int len, int atHead)); /* 250 */
1543 void (*tcl_UnlinkVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName)); /* 251 */
1544 int (*tcl_UnregisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 252 */
1545 int (*tcl_UnsetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags)); /* 253 */
1546 int (*tcl_UnsetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 254 */
1547 void (*tcl_UntraceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 255 */
1548 void (*tcl_UntraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 256 */
1549 void (*tcl_UpdateLinkedVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName)); /* 257 */
1550 int (*tcl_UpVar) _ANSI_ARGS_((Tcl_Interp * interp, char * frameName, char * varName, char * localName, int flags)); /* 258 */
1551 int (*tcl_UpVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * frameName, char * part1, char * part2, char * localName, int flags)); /* 259 */
1552 int (*tcl_VarEval) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 260 */
1553 ClientData (*tcl_VarTraceInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData)); /* 261 */
1554 ClientData (*tcl_VarTraceInfo2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData)); /* 262 */
1555 int (*tcl_Write) _ANSI_ARGS_((Tcl_Channel chan, char * s, int slen)); /* 263 */
1556 void (*tcl_WrongNumArgs) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], char * message)); /* 264 */
1557 int (*tcl_DumpActiveMemory) _ANSI_ARGS_((char * fileName)); /* 265 */
1558 void (*tcl_ValidateAllMemory) _ANSI_ARGS_((char * file, int line)); /* 266 */
1559 void (*tcl_AppendResultVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 267 */
1560 void (*tcl_AppendStringsToObjVA) _ANSI_ARGS_((Tcl_Obj * objPtr, va_list argList)); /* 268 */
1561 char * (*tcl_HashStats) _ANSI_ARGS_((Tcl_HashTable * tablePtr)); /* 269 */
1562 char * (*tcl_ParseVar) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char ** termPtr)); /* 270 */
1563 char * (*tcl_PkgPresent) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact)); /* 271 */
1564 char * (*tcl_PkgPresentEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 272 */
1565 int (*tcl_PkgProvide) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version)); /* 273 */
1566 char * (*tcl_PkgRequire) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact)); /* 274 */
1567 void (*tcl_SetErrorCodeVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 275 */
1568 int (*tcl_VarEvalVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 276 */
1569 Tcl_Pid (*tcl_WaitPid) _ANSI_ARGS_((Tcl_Pid pid, int * statPtr, int options)); /* 277 */
1570 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1571 void (*tcl_PanicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 278 */
1572 #endif /* UNIX */
1573 #ifdef __WIN32__
1574 void (*tcl_PanicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 278 */
1575 #endif /* __WIN32__ */
1576 #ifdef MAC_TCL
1577 void *reserved278;
1578 #endif /* MAC_TCL */
1579 void (*tcl_GetVersion) _ANSI_ARGS_((int * major, int * minor, int * patchLevel, int * type)); /* 279 */
1580 void (*tcl_InitMemory) _ANSI_ARGS_((Tcl_Interp * interp)); /* 280 */
1581 Tcl_Channel (*tcl_StackChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_ChannelType * typePtr, ClientData instanceData, int mask, Tcl_Channel prevChan)); /* 281 */
1582 void (*tcl_UnstackChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 282 */
1583 Tcl_Channel (*tcl_GetStackedChannel) _ANSI_ARGS_((Tcl_Channel chan)); /* 283 */
1584 void *reserved284;
1585 void *reserved285;
1586 void (*tcl_AppendObjToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_Obj * appendObjPtr)); /* 286 */
1587 Tcl_Encoding (*tcl_CreateEncoding) _ANSI_ARGS_((Tcl_EncodingType * typePtr)); /* 287 */
1588 void (*tcl_CreateThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 288 */
1589 void (*tcl_DeleteThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 289 */
1590 void (*tcl_DiscardResult) _ANSI_ARGS_((Tcl_SavedResult * statePtr)); /* 290 */
1591 int (*tcl_EvalEx) _ANSI_ARGS_((Tcl_Interp * interp, char * script, int numBytes, int flags)); /* 291 */
1592 int (*tcl_EvalObjv) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 292 */
1593 int (*tcl_EvalObjEx) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int flags)); /* 293 */
1594 void (*tcl_ExitThread) _ANSI_ARGS_((int status)); /* 294 */
1595 int (*tcl_ExternalToUtf) _ANSI_ARGS_((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 */
1596 char * (*tcl_ExternalToUtfDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 296 */
1597 void (*tcl_FinalizeThread) _ANSI_ARGS_((void)); /* 297 */
1598 void (*tcl_FinalizeNotifier) _ANSI_ARGS_((ClientData clientData)); /* 298 */
1599 void (*tcl_FreeEncoding) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 299 */
1600 Tcl_ThreadId (*tcl_GetCurrentThread) _ANSI_ARGS_((void)); /* 300 */
1601 Tcl_Encoding (*tcl_GetEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 301 */
1602 char * (*tcl_GetEncodingName) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 302 */
1603 void (*tcl_GetEncodingNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 303 */
1604 int (*tcl_GetIndexFromObjStruct) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, int offset, char * msg, int flags, int * indexPtr)); /* 304 */
1605 VOID * (*tcl_GetThreadData) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr, int size)); /* 305 */
1606 Tcl_Obj * (*tcl_GetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 306 */
1607 ClientData (*tcl_InitNotifier) _ANSI_ARGS_((void)); /* 307 */
1608 void (*tcl_MutexLock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 308 */
1609 void (*tcl_MutexUnlock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 309 */
1610 void (*tcl_ConditionNotify) _ANSI_ARGS_((Tcl_Condition * condPtr)); /* 310 */
1611 void (*tcl_ConditionWait) _ANSI_ARGS_((Tcl_Condition * condPtr, Tcl_Mutex * mutexPtr, Tcl_Time * timePtr)); /* 311 */
1612 int (*tcl_NumUtfChars) _ANSI_ARGS_((CONST char * src, int len)); /* 312 */
1613 int (*tcl_ReadChars) _ANSI_ARGS_((Tcl_Channel channel, Tcl_Obj * objPtr, int charsToRead, int appendFlag)); /* 313 */
1614 void (*tcl_RestoreResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 314 */
1615 void (*tcl_SaveResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 315 */
1616 int (*tcl_SetSystemEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 316 */
1617 Tcl_Obj * (*tcl_SetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, Tcl_Obj * newValuePtr, int flags)); /* 317 */
1618 void (*tcl_ThreadAlert) _ANSI_ARGS_((Tcl_ThreadId threadId)); /* 318 */
1619 void (*tcl_ThreadQueueEvent) _ANSI_ARGS_((Tcl_ThreadId threadId, Tcl_Event* evPtr, Tcl_QueuePosition position)); /* 319 */
1620 Tcl_UniChar (*tcl_UniCharAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 320 */
1621 Tcl_UniChar (*tcl_UniCharToLower) _ANSI_ARGS_((int ch)); /* 321 */
1622 Tcl_UniChar (*tcl_UniCharToTitle) _ANSI_ARGS_((int ch)); /* 322 */
1623 Tcl_UniChar (*tcl_UniCharToUpper) _ANSI_ARGS_((int ch)); /* 323 */
1624 int (*tcl_UniCharToUtf) _ANSI_ARGS_((int ch, char * buf)); /* 324 */
1625 char * (*tcl_UtfAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 325 */
1626 int (*tcl_UtfCharComplete) _ANSI_ARGS_((CONST char * src, int len)); /* 326 */
1627 int (*tcl_UtfBackslash) _ANSI_ARGS_((CONST char * src, int * readPtr, char * dst)); /* 327 */
1628 char * (*tcl_UtfFindFirst) _ANSI_ARGS_((CONST char * src, int ch)); /* 328 */
1629 char * (*tcl_UtfFindLast) _ANSI_ARGS_((CONST char * src, int ch)); /* 329 */
1630 char * (*tcl_UtfNext) _ANSI_ARGS_((CONST char * src)); /* 330 */
1631 char * (*tcl_UtfPrev) _ANSI_ARGS_((CONST char * src, CONST char * start)); /* 331 */
1632 int (*tcl_UtfToExternal) _ANSI_ARGS_((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 */
1633 char * (*tcl_UtfToExternalDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 333 */
1634 int (*tcl_UtfToLower) _ANSI_ARGS_((char * src)); /* 334 */
1635 int (*tcl_UtfToTitle) _ANSI_ARGS_((char * src)); /* 335 */
1636 int (*tcl_UtfToUniChar) _ANSI_ARGS_((CONST char * src, Tcl_UniChar * chPtr)); /* 336 */
1637 int (*tcl_UtfToUpper) _ANSI_ARGS_((char * src)); /* 337 */
1638 int (*tcl_WriteChars) _ANSI_ARGS_((Tcl_Channel chan, CONST char * src, int srcLen)); /* 338 */
1639 int (*tcl_WriteObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); /* 339 */
1640 char * (*tcl_GetString) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 340 */
1641 char * (*tcl_GetDefaultEncodingDir) _ANSI_ARGS_((void)); /* 341 */
1642 void (*tcl_SetDefaultEncodingDir) _ANSI_ARGS_((char * path)); /* 342 */
1643 void (*tcl_AlertNotifier) _ANSI_ARGS_((ClientData clientData)); /* 343 */
1644 void (*tcl_ServiceModeHook) _ANSI_ARGS_((int mode)); /* 344 */
1645 int (*tcl_UniCharIsAlnum) _ANSI_ARGS_((int ch)); /* 345 */
1646 int (*tcl_UniCharIsAlpha) _ANSI_ARGS_((int ch)); /* 346 */
1647 int (*tcl_UniCharIsDigit) _ANSI_ARGS_((int ch)); /* 347 */
1648 int (*tcl_UniCharIsLower) _ANSI_ARGS_((int ch)); /* 348 */
1649 int (*tcl_UniCharIsSpace) _ANSI_ARGS_((int ch)); /* 349 */
1650 int (*tcl_UniCharIsUpper) _ANSI_ARGS_((int ch)); /* 350 */
1651 int (*tcl_UniCharIsWordChar) _ANSI_ARGS_((int ch)); /* 351 */
1652 int (*tcl_UniCharLen) _ANSI_ARGS_((Tcl_UniChar * str)); /* 352 */
1653 int (*tcl_UniCharNcmp) _ANSI_ARGS_((CONST Tcl_UniChar * cs, CONST Tcl_UniChar * ct, unsigned long n)); /* 353 */
1654 char * (*tcl_UniCharToUtfDString) _ANSI_ARGS_((CONST Tcl_UniChar * string, int numChars, Tcl_DString * dsPtr)); /* 354 */
1655 Tcl_UniChar * (*tcl_UtfToUniCharDString) _ANSI_ARGS_((CONST char * string, int length, Tcl_DString * dsPtr)); /* 355 */
1656 Tcl_RegExp (*tcl_GetRegExpFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * patObj, int flags)); /* 356 */
1657 Tcl_Obj * (*tcl_EvalTokens) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Token * tokenPtr, int count)); /* 357 */
1658 void (*tcl_FreeParse) _ANSI_ARGS_((Tcl_Parse * parsePtr)); /* 358 */
1659 void (*tcl_LogCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * script, char * command, int length)); /* 359 */
1660 int (*tcl_ParseBraces) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr, int append, char ** termPtr)); /* 360 */
1661 int (*tcl_ParseCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, int nested, Tcl_Parse * parsePtr)); /* 361 */
1662 int (*tcl_ParseExpr) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr)); /* 362 */
1663 int (*tcl_ParseQuotedString) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr, int append, char ** termPtr)); /* 363 */
1664 int (*tcl_ParseVarName) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr, int append)); /* 364 */
1665 char * (*tcl_GetCwd) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * cwdPtr)); /* 365 */
1666 int (*tcl_Chdir) _ANSI_ARGS_((CONST char * dirName)); /* 366 */
1667 int (*tcl_Access) _ANSI_ARGS_((CONST char * path, int mode)); /* 367 */
1668 int (*tcl_Stat) _ANSI_ARGS_((CONST char * path, struct stat * bufPtr)); /* 368 */
1669 int (*tcl_UtfNcmp) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n)); /* 369 */
1670 int (*tcl_UtfNcasecmp) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n)); /* 370 */
1671 int (*tcl_StringCaseMatch) _ANSI_ARGS_((CONST char * str, CONST char * pattern, int nocase)); /* 371 */
1672 int (*tcl_UniCharIsControl) _ANSI_ARGS_((int ch)); /* 372 */
1673 int (*tcl_UniCharIsGraph) _ANSI_ARGS_((int ch)); /* 373 */
1674 int (*tcl_UniCharIsPrint) _ANSI_ARGS_((int ch)); /* 374 */
1675 int (*tcl_UniCharIsPunct) _ANSI_ARGS_((int ch)); /* 375 */
1676 int (*tcl_RegExpExecObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp regexp, Tcl_Obj * objPtr, int offset, int nmatches, int flags)); /* 376 */
1677 void (*tcl_RegExpGetInfo) _ANSI_ARGS_((Tcl_RegExp regexp, Tcl_RegExpInfo * infoPtr)); /* 377 */
1678 Tcl_Obj * (*tcl_NewUnicodeObj) _ANSI_ARGS_((Tcl_UniChar * unicode, int numChars)); /* 378 */
1679 void (*tcl_SetUnicodeObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_UniChar * unicode, int numChars)); /* 379 */
1680 int (*tcl_GetCharLength) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 380 */
1681 Tcl_UniChar (*tcl_GetUniChar) _ANSI_ARGS_((Tcl_Obj * objPtr, int index)); /* 381 */
1682 Tcl_UniChar * (*tcl_GetUnicode) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 382 */
1683 Tcl_Obj * (*tcl_GetRange) _ANSI_ARGS_((Tcl_Obj * objPtr, int first, int last)); /* 383 */
1684 void (*tcl_AppendUnicodeToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_UniChar * unicode, int length)); /* 384 */
1685 int (*tcl_RegExpMatchObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * stringObj, Tcl_Obj * patternObj)); /* 385 */
1686 void (*tcl_SetNotifier) _ANSI_ARGS_((Tcl_NotifierProcs * notifierProcPtr)); /* 386 */
1687 Tcl_Mutex * (*tcl_GetAllocMutex) _ANSI_ARGS_((void)); /* 387 */
1688 int (*tcl_GetChannelNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 388 */
1689 int (*tcl_GetChannelNamesEx) _ANSI_ARGS_((Tcl_Interp * interp, char * pattern)); /* 389 */
1690 int (*tcl_ProcObjCmd) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 390 */
1691 void (*tcl_ConditionFinalize) _ANSI_ARGS_((Tcl_Condition * condPtr)); /* 391 */
1692 void (*tcl_MutexFinalize) _ANSI_ARGS_((Tcl_Mutex * mutex)); /* 392 */
1693 int (*tcl_CreateThread) _ANSI_ARGS_((Tcl_ThreadId * idPtr, Tcl_ThreadCreateProc proc, ClientData clientData, int stackSize, int flags)); /* 393 */
1694 } TclStubs;
1695
1696 #ifdef __cplusplus
1697 extern "C" {
1698 #endif
1699 extern TclStubs *tclStubsPtr;
1700 #ifdef __cplusplus
1701 }
1702 #endif
1703
1704 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
1705
1706 /*
1707 * Inline function declarations:
1708 */
1709
1710 #ifndef Tcl_PkgProvideEx
1711 #define Tcl_PkgProvideEx \
1712 (tclStubsPtr->tcl_PkgProvideEx) /* 0 */
1713 #endif
1714 #ifndef Tcl_PkgRequireEx
1715 #define Tcl_PkgRequireEx \
1716 (tclStubsPtr->tcl_PkgRequireEx) /* 1 */
1717 #endif
1718 #ifndef Tcl_Panic
1719 #define Tcl_Panic \
1720 (tclStubsPtr->tcl_Panic) /* 2 */
1721 #endif
1722 #ifndef Tcl_Alloc
1723 #define Tcl_Alloc \
1724 (tclStubsPtr->tcl_Alloc) /* 3 */
1725 #endif
1726 #ifndef Tcl_Free
1727 #define Tcl_Free \
1728 (tclStubsPtr->tcl_Free) /* 4 */
1729 #endif
1730 #ifndef Tcl_Realloc
1731 #define Tcl_Realloc \
1732 (tclStubsPtr->tcl_Realloc) /* 5 */
1733 #endif
1734 #ifndef Tcl_DbCkalloc
1735 #define Tcl_DbCkalloc \
1736 (tclStubsPtr->tcl_DbCkalloc) /* 6 */
1737 #endif
1738 #ifndef Tcl_DbCkfree
1739 #define Tcl_DbCkfree \
1740 (tclStubsPtr->tcl_DbCkfree) /* 7 */
1741 #endif
1742 #ifndef Tcl_DbCkrealloc
1743 #define Tcl_DbCkrealloc \
1744 (tclStubsPtr->tcl_DbCkrealloc) /* 8 */
1745 #endif
1746 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1747 #ifndef Tcl_CreateFileHandler
1748 #define Tcl_CreateFileHandler \
1749 (tclStubsPtr->tcl_CreateFileHandler) /* 9 */
1750 #endif
1751 #endif /* UNIX */
1752 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
1753 #ifndef Tcl_DeleteFileHandler
1754 #define Tcl_DeleteFileHandler \
1755 (tclStubsPtr->tcl_DeleteFileHandler) /* 10 */
1756 #endif
1757 #endif /* UNIX */
1758 #ifndef Tcl_SetTimer
1759 #define Tcl_SetTimer \
1760 (tclStubsPtr->tcl_SetTimer) /* 11 */
1761 #endif
1762 #ifndef Tcl_Sleep
1763 #define Tcl_Sleep \
1764 (tclStubsPtr->tcl_Sleep) /* 12 */
1765 #endif
1766 #ifndef Tcl_WaitForEvent
1767 #define Tcl_WaitForEvent \
1768 (tclStubsPtr->tcl_WaitForEvent) /* 13 */
1769 #endif
1770 #ifndef Tcl_AppendAllObjTypes
1771 #define Tcl_AppendAllObjTypes \
1772 (tclStubsPtr->tcl_AppendAllObjTypes) /* 14 */
1773 #endif
1774 #ifndef Tcl_AppendStringsToObj
1775 #define Tcl_AppendStringsToObj \
1776 (tclStubsPtr->tcl_AppendStringsToObj) /* 15 */
1777 #endif
1778 #ifndef Tcl_AppendToObj
1779 #define Tcl_AppendToObj \
1780 (tclStubsPtr->tcl_AppendToObj) /* 16 */
1781 #endif
1782 #ifndef Tcl_ConcatObj
1783 #define Tcl_ConcatObj \
1784 (tclStubsPtr->tcl_ConcatObj) /* 17 */
1785 #endif
1786 #ifndef Tcl_ConvertToType
1787 #define Tcl_ConvertToType \
1788 (tclStubsPtr->tcl_ConvertToType) /* 18 */
1789 #endif
1790 #ifndef Tcl_DbDecrRefCount
1791 #define Tcl_DbDecrRefCount \
1792 (tclStubsPtr->tcl_DbDecrRefCount) /* 19 */
1793 #endif
1794 #ifndef Tcl_DbIncrRefCount
1795 #define Tcl_DbIncrRefCount \
1796 (tclStubsPtr->tcl_DbIncrRefCount) /* 20 */
1797 #endif
1798 #ifndef Tcl_DbIsShared
1799 #define Tcl_DbIsShared \
1800 (tclStubsPtr->tcl_DbIsShared) /* 21 */
1801 #endif
1802 #ifndef Tcl_DbNewBooleanObj
1803 #define Tcl_DbNewBooleanObj \
1804 (tclStubsPtr->tcl_DbNewBooleanObj) /* 22 */
1805 #endif
1806 #ifndef Tcl_DbNewByteArrayObj
1807 #define Tcl_DbNewByteArrayObj \
1808 (tclStubsPtr->tcl_DbNewByteArrayObj) /* 23 */
1809 #endif
1810 #ifndef Tcl_DbNewDoubleObj
1811 #define Tcl_DbNewDoubleObj \
1812 (tclStubsPtr->tcl_DbNewDoubleObj) /* 24 */
1813 #endif
1814 #ifndef Tcl_DbNewListObj
1815 #define Tcl_DbNewListObj \
1816 (tclStubsPtr->tcl_DbNewListObj) /* 25 */
1817 #endif
1818 #ifndef Tcl_DbNewLongObj
1819 #define Tcl_DbNewLongObj \
1820 (tclStubsPtr->tcl_DbNewLongObj) /* 26 */
1821 #endif
1822 #ifndef Tcl_DbNewObj
1823 #define Tcl_DbNewObj \
1824 (tclStubsPtr->tcl_DbNewObj) /* 27 */
1825 #endif
1826 #ifndef Tcl_DbNewStringObj
1827 #define Tcl_DbNewStringObj \
1828 (tclStubsPtr->tcl_DbNewStringObj) /* 28 */
1829 #endif
1830 #ifndef Tcl_DuplicateObj
1831 #define Tcl_DuplicateObj \
1832 (tclStubsPtr->tcl_DuplicateObj) /* 29 */
1833 #endif
1834 #ifndef TclFreeObj
1835 #define TclFreeObj \
1836 (tclStubsPtr->tclFreeObj) /* 30 */
1837 #endif
1838 #ifndef Tcl_GetBoolean
1839 #define Tcl_GetBoolean \
1840 (tclStubsPtr->tcl_GetBoolean) /* 31 */
1841 #endif
1842 #ifndef Tcl_GetBooleanFromObj
1843 #define Tcl_GetBooleanFromObj \
1844 (tclStubsPtr->tcl_GetBooleanFromObj) /* 32 */
1845 #endif
1846 #ifndef Tcl_GetByteArrayFromObj
1847 #define Tcl_GetByteArrayFromObj \
1848 (tclStubsPtr->tcl_GetByteArrayFromObj) /* 33 */
1849 #endif
1850 #ifndef Tcl_GetDouble
1851 #define Tcl_GetDouble \
1852 (tclStubsPtr->tcl_GetDouble) /* 34 */
1853 #endif
1854 #ifndef Tcl_GetDoubleFromObj
1855 #define Tcl_GetDoubleFromObj \
1856 (tclStubsPtr->tcl_GetDoubleFromObj) /* 35 */
1857 #endif
1858 #ifndef Tcl_GetIndexFromObj
1859 #define Tcl_GetIndexFromObj \
1860 (tclStubsPtr->tcl_GetIndexFromObj) /* 36 */
1861 #endif
1862 #ifndef Tcl_GetInt
1863 #define Tcl_GetInt \
1864 (tclStubsPtr->tcl_GetInt) /* 37 */
1865 #endif
1866 #ifndef Tcl_GetIntFromObj
1867 #define Tcl_GetIntFromObj \
1868 (tclStubsPtr->tcl_GetIntFromObj) /* 38 */
1869 #endif
1870 #ifndef Tcl_GetLongFromObj
1871 #define Tcl_GetLongFromObj \
1872 (tclStubsPtr->tcl_GetLongFromObj) /* 39 */
1873 #endif
1874 #ifndef Tcl_GetObjType
1875 #define Tcl_GetObjType \
1876 (tclStubsPtr->tcl_GetObjType) /* 40 */
1877 #endif
1878 #ifndef Tcl_GetStringFromObj
1879 #define Tcl_GetStringFromObj \
1880 (tclStubsPtr->tcl_GetStringFromObj) /* 41 */
1881 #endif
1882 #ifndef Tcl_InvalidateStringRep
1883 #define Tcl_InvalidateStringRep \
1884 (tclStubsPtr->tcl_InvalidateStringRep) /* 42 */
1885 #endif
1886 #ifndef Tcl_ListObjAppendList
1887 #define Tcl_ListObjAppendList \
1888 (tclStubsPtr->tcl_ListObjAppendList) /* 43 */
1889 #endif
1890 #ifndef Tcl_ListObjAppendElement
1891 #define Tcl_ListObjAppendElement \
1892 (tclStubsPtr->tcl_ListObjAppendElement) /* 44 */
1893 #endif
1894 #ifndef Tcl_ListObjGetElements
1895 #define Tcl_ListObjGetElements \
1896 (tclStubsPtr->tcl_ListObjGetElements) /* 45 */
1897 #endif
1898 #ifndef Tcl_ListObjIndex
1899 #define Tcl_ListObjIndex \
1900 (tclStubsPtr->tcl_ListObjIndex) /* 46 */
1901 #endif
1902 #ifndef Tcl_ListObjLength
1903 #define Tcl_ListObjLength \
1904 (tclStubsPtr->tcl_ListObjLength) /* 47 */
1905 #endif
1906 #ifndef Tcl_ListObjReplace
1907 #define Tcl_ListObjReplace \
1908 (tclStubsPtr->tcl_ListObjReplace) /* 48 */
1909 #endif
1910 #ifndef Tcl_NewBooleanObj
1911 #define Tcl_NewBooleanObj \
1912 (tclStubsPtr->tcl_NewBooleanObj) /* 49 */
1913 #endif
1914 #ifndef Tcl_NewByteArrayObj
1915 #define Tcl_NewByteArrayObj \
1916 (tclStubsPtr->tcl_NewByteArrayObj) /* 50 */
1917 #endif
1918 #ifndef Tcl_NewDoubleObj
1919 #define Tcl_NewDoubleObj \
1920 (tclStubsPtr->tcl_NewDoubleObj) /* 51 */
1921 #endif
1922 #ifndef Tcl_NewIntObj
1923 #define Tcl_NewIntObj \
1924 (tclStubsPtr->tcl_NewIntObj) /* 52 */
1925 #endif
1926 #ifndef Tcl_NewListObj
1927 #define Tcl_NewListObj \
1928 (tclStubsPtr->tcl_NewListObj) /* 53 */
1929 #endif
1930 #ifndef Tcl_NewLongObj
1931 #define Tcl_NewLongObj \
1932 (tclStubsPtr->tcl_NewLongObj) /* 54 */
1933 #endif
1934 #ifndef Tcl_NewObj
1935 #define Tcl_NewObj \
1936 (tclStubsPtr->tcl_NewObj) /* 55 */
1937 #endif
1938 #ifndef Tcl_NewStringObj
1939 #define Tcl_NewStringObj \
1940 (tclStubsPtr->tcl_NewStringObj) /* 56 */
1941 #endif
1942 #ifndef Tcl_SetBooleanObj
1943 #define Tcl_SetBooleanObj \
1944 (tclStubsPtr->tcl_SetBooleanObj) /* 57 */
1945 #endif
1946 #ifndef Tcl_SetByteArrayLength
1947 #define Tcl_SetByteArrayLength \
1948 (tclStubsPtr->tcl_SetByteArrayLength) /* 58 */
1949 #endif
1950 #ifndef Tcl_SetByteArrayObj
1951 #define Tcl_SetByteArrayObj \
1952 (tclStubsPtr->tcl_SetByteArrayObj) /* 59 */
1953 #endif
1954 #ifndef Tcl_SetDoubleObj
1955 #define Tcl_SetDoubleObj \
1956 (tclStubsPtr->tcl_SetDoubleObj) /* 60 */
1957 #endif
1958 #ifndef Tcl_SetIntObj
1959 #define Tcl_SetIntObj \
1960 (tclStubsPtr->tcl_SetIntObj) /* 61 */
1961 #endif
1962 #ifndef Tcl_SetListObj
1963 #define Tcl_SetListObj \
1964 (tclStubsPtr->tcl_SetListObj) /* 62 */
1965 #endif
1966 #ifndef Tcl_SetLongObj
1967 #define Tcl_SetLongObj \
1968 (tclStubsPtr->tcl_SetLongObj) /* 63 */
1969 #endif
1970 #ifndef Tcl_SetObjLength
1971 #define Tcl_SetObjLength \
1972 (tclStubsPtr->tcl_SetObjLength) /* 64 */
1973 #endif
1974 #ifndef Tcl_SetStringObj
1975 #define Tcl_SetStringObj \
1976 (tclStubsPtr->tcl_SetStringObj) /* 65 */
1977 #endif
1978 #ifndef Tcl_AddErrorInfo
1979 #define Tcl_AddErrorInfo \
1980 (tclStubsPtr->tcl_AddErrorInfo) /* 66 */
1981 #endif
1982 #ifndef Tcl_AddObjErrorInfo
1983 #define Tcl_AddObjErrorInfo \
1984 (tclStubsPtr->tcl_AddObjErrorInfo) /* 67 */
1985 #endif
1986 #ifndef Tcl_AllowExceptions
1987 #define Tcl_AllowExceptions \
1988 (tclStubsPtr->tcl_AllowExceptions) /* 68 */
1989 #endif
1990 #ifndef Tcl_AppendElement
1991 #define Tcl_AppendElement \
1992 (tclStubsPtr->tcl_AppendElement) /* 69 */
1993 #endif
1994 #ifndef Tcl_AppendResult
1995 #define Tcl_AppendResult \
1996 (tclStubsPtr->tcl_AppendResult) /* 70 */
1997 #endif
1998 #ifndef Tcl_AsyncCreate
1999 #define Tcl_AsyncCreate \
2000 (tclStubsPtr->tcl_AsyncCreate) /* 71 */
2001 #endif
2002 #ifndef Tcl_AsyncDelete
2003 #define Tcl_AsyncDelete \
2004 (tclStubsPtr->tcl_AsyncDelete) /* 72 */
2005 #endif
2006 #ifndef Tcl_AsyncInvoke
2007 #define Tcl_AsyncInvoke \
2008 (tclStubsPtr->tcl_AsyncInvoke) /* 73 */
2009 #endif
2010 #ifndef Tcl_AsyncMark
2011 #define Tcl_AsyncMark \
2012 (tclStubsPtr->tcl_AsyncMark) /* 74 */
2013 #endif
2014 #ifndef Tcl_AsyncReady
2015 #define Tcl_AsyncReady \
2016 (tclStubsPtr->tcl_AsyncReady) /* 75 */
2017 #endif
2018 #ifndef Tcl_BackgroundError
2019 #define Tcl_BackgroundError \
2020 (tclStubsPtr->tcl_BackgroundError) /* 76 */
2021 #endif
2022 #ifndef Tcl_Backslash
2023 #define Tcl_Backslash \
2024 (tclStubsPtr->tcl_Backslash) /* 77 */
2025 #endif
2026 #ifndef Tcl_BadChannelOption
2027 #define Tcl_BadChannelOption \
2028 (tclStubsPtr->tcl_BadChannelOption) /* 78 */
2029 #endif
2030 #ifndef Tcl_CallWhenDeleted
2031 #define Tcl_CallWhenDeleted \
2032 (tclStubsPtr->tcl_CallWhenDeleted) /* 79 */
2033 #endif
2034 #ifndef Tcl_CancelIdleCall
2035 #define Tcl_CancelIdleCall \
2036 (tclStubsPtr->tcl_CancelIdleCall) /* 80 */
2037 #endif
2038 #ifndef Tcl_Close
2039 #define Tcl_Close \
2040 (tclStubsPtr->tcl_Close) /* 81 */
2041 #endif
2042 #ifndef Tcl_CommandComplete
2043 #define Tcl_CommandComplete \
2044 (tclStubsPtr->tcl_CommandComplete) /* 82 */
2045 #endif
2046 #ifndef Tcl_Concat
2047 #define Tcl_Concat \
2048 (tclStubsPtr->tcl_Concat) /* 83 */
2049 #endif
2050 #ifndef Tcl_ConvertElement
2051 #define Tcl_ConvertElement \
2052 (tclStubsPtr->tcl_ConvertElement) /* 84 */
2053 #endif
2054 #ifndef Tcl_ConvertCountedElement
2055 #define Tcl_ConvertCountedElement \
2056 (tclStubsPtr->tcl_ConvertCountedElement) /* 85 */
2057 #endif
2058 #ifndef Tcl_CreateAlias
2059 #define Tcl_CreateAlias \
2060 (tclStubsPtr->tcl_CreateAlias) /* 86 */
2061 #endif
2062 #ifndef Tcl_CreateAliasObj
2063 #define Tcl_CreateAliasObj \
2064 (tclStubsPtr->tcl_CreateAliasObj) /* 87 */
2065 #endif
2066 #ifndef Tcl_CreateChannel
2067 #define Tcl_CreateChannel \
2068 (tclStubsPtr->tcl_CreateChannel) /* 88 */
2069 #endif
2070 #ifndef Tcl_CreateChannelHandler
2071 #define Tcl_CreateChannelHandler \
2072 (tclStubsPtr->tcl_CreateChannelHandler) /* 89 */
2073 #endif
2074 #ifndef Tcl_CreateCloseHandler
2075 #define Tcl_CreateCloseHandler \
2076 (tclStubsPtr->tcl_CreateCloseHandler) /* 90 */
2077 #endif
2078 #ifndef Tcl_CreateCommand
2079 #define Tcl_CreateCommand \
2080 (tclStubsPtr->tcl_CreateCommand) /* 91 */
2081 #endif
2082 #ifndef Tcl_CreateEventSource
2083 #define Tcl_CreateEventSource \
2084 (tclStubsPtr->tcl_CreateEventSource) /* 92 */
2085 #endif
2086 #ifndef Tcl_CreateExitHandler
2087 #define Tcl_CreateExitHandler \
2088 (tclStubsPtr->tcl_CreateExitHandler) /* 93 */
2089 #endif
2090 #ifndef Tcl_CreateInterp
2091 #define Tcl_CreateInterp \
2092 (tclStubsPtr->tcl_CreateInterp) /* 94 */
2093 #endif
2094 #ifndef Tcl_CreateMathFunc
2095 #define Tcl_CreateMathFunc \
2096 (tclStubsPtr->tcl_CreateMathFunc) /* 95 */
2097 #endif
2098 #ifndef Tcl_CreateObjCommand
2099 #define Tcl_CreateObjCommand \
2100 (tclStubsPtr->tcl_CreateObjCommand) /* 96 */
2101 #endif
2102 #ifndef Tcl_CreateSlave
2103 #define Tcl_CreateSlave \
2104 (tclStubsPtr->tcl_CreateSlave) /* 97 */
2105 #endif
2106 #ifndef Tcl_CreateTimerHandler
2107 #define Tcl_CreateTimerHandler \
2108 (tclStubsPtr->tcl_CreateTimerHandler) /* 98 */
2109 #endif
2110 #ifndef Tcl_CreateTrace
2111 #define Tcl_CreateTrace \
2112 (tclStubsPtr->tcl_CreateTrace) /* 99 */
2113 #endif
2114 #ifndef Tcl_DeleteAssocData
2115 #define Tcl_DeleteAssocData \
2116 (tclStubsPtr->tcl_DeleteAssocData) /* 100 */
2117 #endif
2118 #ifndef Tcl_DeleteChannelHandler
2119 #define Tcl_DeleteChannelHandler \
2120 (tclStubsPtr->tcl_DeleteChannelHandler) /* 101 */
2121 #endif
2122 #ifndef Tcl_DeleteCloseHandler
2123 #define Tcl_DeleteCloseHandler \
2124 (tclStubsPtr->tcl_DeleteCloseHandler) /* 102 */
2125 #endif
2126 #ifndef Tcl_DeleteCommand
2127 #define Tcl_DeleteCommand \
2128 (tclStubsPtr->tcl_DeleteCommand) /* 103 */
2129 #endif
2130 #ifndef Tcl_DeleteCommandFromToken
2131 #define Tcl_DeleteCommandFromToken \
2132 (tclStubsPtr->tcl_DeleteCommandFromToken) /* 104 */
2133 #endif
2134 #ifndef Tcl_DeleteEvents
2135 #define Tcl_DeleteEvents \
2136 (tclStubsPtr->tcl_DeleteEvents) /* 105 */
2137 #endif
2138 #ifndef Tcl_DeleteEventSource
2139 #define Tcl_DeleteEventSource \
2140 (tclStubsPtr->tcl_DeleteEventSource) /* 106 */
2141 #endif
2142 #ifndef Tcl_DeleteExitHandler
2143 #define Tcl_DeleteExitHandler \
2144 (tclStubsPtr->tcl_DeleteExitHandler) /* 107 */
2145 #endif
2146 #ifndef Tcl_DeleteHashEntry
2147 #define Tcl_DeleteHashEntry \
2148 (tclStubsPtr->tcl_DeleteHashEntry) /* 108 */
2149 #endif
2150 #ifndef Tcl_DeleteHashTable
2151 #define Tcl_DeleteHashTable \
2152 (tclStubsPtr->tcl_DeleteHashTable) /* 109 */
2153 #endif
2154 #ifndef Tcl_DeleteInterp
2155 #define Tcl_DeleteInterp \
2156 (tclStubsPtr->tcl_DeleteInterp) /* 110 */
2157 #endif
2158 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
2159 #ifndef Tcl_DetachPids
2160 #define Tcl_DetachPids \
2161 (tclStubsPtr->tcl_DetachPids) /* 111 */
2162 #endif
2163 #endif /* UNIX */
2164 #ifdef __WIN32__
2165 #ifndef Tcl_DetachPids
2166 #define Tcl_DetachPids \
2167 (tclStubsPtr->tcl_DetachPids) /* 111 */
2168 #endif
2169 #endif /* __WIN32__ */
2170 #ifndef Tcl_DeleteTimerHandler
2171 #define Tcl_DeleteTimerHandler \
2172 (tclStubsPtr->tcl_DeleteTimerHandler) /* 112 */
2173 #endif
2174 #ifndef Tcl_DeleteTrace
2175 #define Tcl_DeleteTrace \
2176 (tclStubsPtr->tcl_DeleteTrace) /* 113 */
2177 #endif
2178 #ifndef Tcl_DontCallWhenDeleted
2179 #define Tcl_DontCallWhenDeleted \
2180 (tclStubsPtr->tcl_DontCallWhenDeleted) /* 114 */
2181 #endif
2182 #ifndef Tcl_DoOneEvent
2183 #define Tcl_DoOneEvent \
2184 (tclStubsPtr->tcl_DoOneEvent) /* 115 */
2185 #endif
2186 #ifndef Tcl_DoWhenIdle
2187 #define Tcl_DoWhenIdle \
2188 (tclStubsPtr->tcl_DoWhenIdle) /* 116 */
2189 #endif
2190 #ifndef Tcl_DStringAppend
2191 #define Tcl_DStringAppend \
2192 (tclStubsPtr->tcl_DStringAppend) /* 117 */
2193 #endif
2194 #ifndef Tcl_DStringAppendElement
2195 #define Tcl_DStringAppendElement \
2196 (tclStubsPtr->tcl_DStringAppendElement) /* 118 */
2197 #endif
2198 #ifndef Tcl_DStringEndSublist
2199 #define Tcl_DStringEndSublist \
2200 (tclStubsPtr->tcl_DStringEndSublist) /* 119 */
2201 #endif
2202 #ifndef Tcl_DStringFree
2203 #define Tcl_DStringFree \
2204 (tclStubsPtr->tcl_DStringFree) /* 120 */
2205 #endif
2206 #ifndef Tcl_DStringGetResult
2207 #define Tcl_DStringGetResult \
2208 (tclStubsPtr->tcl_DStringGetResult) /* 121 */
2209 #endif
2210 #ifndef Tcl_DStringInit
2211 #define Tcl_DStringInit \
2212 (tclStubsPtr->tcl_DStringInit) /* 122 */
2213 #endif
2214 #ifndef Tcl_DStringResult
2215 #define Tcl_DStringResult \
2216 (tclStubsPtr->tcl_DStringResult) /* 123 */
2217 #endif
2218 #ifndef Tcl_DStringSetLength
2219 #define Tcl_DStringSetLength \
2220 (tclStubsPtr->tcl_DStringSetLength) /* 124 */
2221 #endif
2222 #ifndef Tcl_DStringStartSublist
2223 #define Tcl_DStringStartSublist \
2224 (tclStubsPtr->tcl_DStringStartSublist) /* 125 */
2225 #endif
2226 #ifndef Tcl_Eof
2227 #define Tcl_Eof \
2228 (tclStubsPtr->tcl_Eof) /* 126 */
2229 #endif
2230 #ifndef Tcl_ErrnoId
2231 #define Tcl_ErrnoId \
2232 (tclStubsPtr->tcl_ErrnoId) /* 127 */
2233 #endif
2234 #ifndef Tcl_ErrnoMsg
2235 #define Tcl_ErrnoMsg \
2236 (tclStubsPtr->tcl_ErrnoMsg) /* 128 */
2237 #endif
2238 #ifndef Tcl_Eval
2239 #define Tcl_Eval \
2240 (tclStubsPtr->tcl_Eval) /* 129 */
2241 #endif
2242 #ifndef Tcl_EvalFile
2243 #define Tcl_EvalFile \
2244 (tclStubsPtr->tcl_EvalFile) /* 130 */
2245 #endif
2246 #ifndef Tcl_EvalObj
2247 #define Tcl_EvalObj \
2248 (tclStubsPtr->tcl_EvalObj) /* 131 */
2249 #endif
2250 #ifndef Tcl_EventuallyFree
2251 #define Tcl_EventuallyFree \
2252 (tclStubsPtr->tcl_EventuallyFree) /* 132 */
2253 #endif
2254 #ifndef Tcl_Exit
2255 #define Tcl_Exit \
2256 (tclStubsPtr->tcl_Exit) /* 133 */
2257 #endif
2258 #ifndef Tcl_ExposeCommand
2259 #define Tcl_ExposeCommand \
2260 (tclStubsPtr->tcl_ExposeCommand) /* 134 */
2261 #endif
2262 #ifndef Tcl_ExprBoolean
2263 #define Tcl_ExprBoolean \
2264 (tclStubsPtr->tcl_ExprBoolean) /* 135 */
2265 #endif
2266 #ifndef Tcl_ExprBooleanObj
2267 #define Tcl_ExprBooleanObj \
2268 (tclStubsPtr->tcl_ExprBooleanObj) /* 136 */
2269 #endif
2270 #ifndef Tcl_ExprDouble
2271 #define Tcl_ExprDouble \
2272 (tclStubsPtr->tcl_ExprDouble) /* 137 */
2273 #endif
2274 #ifndef Tcl_ExprDoubleObj
2275 #define Tcl_ExprDoubleObj \
2276 (tclStubsPtr->tcl_ExprDoubleObj) /* 138 */
2277 #endif
2278 #ifndef Tcl_ExprLong
2279 #define Tcl_ExprLong \
2280 (tclStubsPtr->tcl_ExprLong) /* 139 */
2281 #endif
2282 #ifndef Tcl_ExprLongObj
2283 #define Tcl_ExprLongObj \
2284 (tclStubsPtr->tcl_ExprLongObj) /* 140 */
2285 #endif
2286 #ifndef Tcl_ExprObj
2287 #define Tcl_ExprObj \
2288 (tclStubsPtr->tcl_ExprObj) /* 141 */
2289 #endif
2290 #ifndef Tcl_ExprString
2291 #define Tcl_ExprString \
2292 (tclStubsPtr->tcl_ExprString) /* 142 */
2293 #endif
2294 #ifndef Tcl_Finalize
2295 #define Tcl_Finalize \
2296 (tclStubsPtr->tcl_Finalize) /* 143 */
2297 #endif
2298 #ifndef Tcl_FindExecutable
2299 #define Tcl_FindExecutable \
2300 (tclStubsPtr->tcl_FindExecutable) /* 144 */
2301 #endif
2302 #ifndef Tcl_FirstHashEntry
2303 #define Tcl_FirstHashEntry \
2304 (tclStubsPtr->tcl_FirstHashEntry) /* 145 */
2305 #endif
2306 #ifndef Tcl_Flush
2307 #define Tcl_Flush \
2308 (tclStubsPtr->tcl_Flush) /* 146 */
2309 #endif
2310 #ifndef Tcl_FreeResult
2311 #define Tcl_FreeResult \
2312 (tclStubsPtr->tcl_FreeResult) /* 147 */
2313 #endif
2314 #ifndef Tcl_GetAlias
2315 #define Tcl_GetAlias \
2316 (tclStubsPtr->tcl_GetAlias) /* 148 */
2317 #endif
2318 #ifndef Tcl_GetAliasObj
2319 #define Tcl_GetAliasObj \
2320 (tclStubsPtr->tcl_GetAliasObj) /* 149 */
2321 #endif
2322 #ifndef Tcl_GetAssocData
2323 #define Tcl_GetAssocData \
2324 (tclStubsPtr->tcl_GetAssocData) /* 150 */
2325 #endif
2326 #ifndef Tcl_GetChannel
2327 #define Tcl_GetChannel \
2328 (tclStubsPtr->tcl_GetChannel) /* 151 */
2329 #endif
2330 #ifndef Tcl_GetChannelBufferSize
2331 #define Tcl_GetChannelBufferSize \
2332 (tclStubsPtr->tcl_GetChannelBufferSize) /* 152 */
2333 #endif
2334 #ifndef Tcl_GetChannelHandle
2335 #define Tcl_GetChannelHandle \
2336 (tclStubsPtr->tcl_GetChannelHandle) /* 153 */
2337 #endif
2338 #ifndef Tcl_GetChannelInstanceData
2339 #define Tcl_GetChannelInstanceData \
2340 (tclStubsPtr->tcl_GetChannelInstanceData) /* 154 */
2341 #endif
2342 #ifndef Tcl_GetChannelMode
2343 #define Tcl_GetChannelMode \
2344 (tclStubsPtr->tcl_GetChannelMode) /* 155 */
2345 #endif
2346 #ifndef Tcl_GetChannelName
2347 #define Tcl_GetChannelName \
2348 (tclStubsPtr->tcl_GetChannelName) /* 156 */
2349 #endif
2350 #ifndef Tcl_GetChannelOption
2351 #define Tcl_GetChannelOption \
2352 (tclStubsPtr->tcl_GetChannelOption) /* 157 */
2353 #endif
2354 #ifndef Tcl_GetChannelType
2355 #define Tcl_GetChannelType \
2356 (tclStubsPtr->tcl_GetChannelType) /* 158 */
2357 #endif
2358 #ifndef Tcl_GetCommandInfo
2359 #define Tcl_GetCommandInfo \
2360 (tclStubsPtr->tcl_GetCommandInfo) /* 159 */
2361 #endif
2362 #ifndef Tcl_GetCommandName
2363 #define Tcl_GetCommandName \
2364 (tclStubsPtr->tcl_GetCommandName) /* 160 */
2365 #endif
2366 #ifndef Tcl_GetErrno
2367 #define Tcl_GetErrno \
2368 (tclStubsPtr->tcl_GetErrno) /* 161 */
2369 #endif
2370 #ifndef Tcl_GetHostName
2371 #define Tcl_GetHostName \
2372 (tclStubsPtr->tcl_GetHostName) /* 162 */
2373 #endif
2374 #ifndef Tcl_GetInterpPath
2375 #define Tcl_GetInterpPath \
2376 (tclStubsPtr->tcl_GetInterpPath) /* 163 */
2377 #endif
2378 #ifndef Tcl_GetMaster
2379 #define Tcl_GetMaster \
2380 (tclStubsPtr->tcl_GetMaster) /* 164 */
2381 #endif
2382 #ifndef Tcl_GetNameOfExecutable
2383 #define Tcl_GetNameOfExecutable \
2384 (tclStubsPtr->tcl_GetNameOfExecutable) /* 165 */
2385 #endif
2386 #ifndef Tcl_GetObjResult
2387 #define Tcl_GetObjResult \
2388 (tclStubsPtr->tcl_GetObjResult) /* 166 */
2389 #endif
2390 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
2391 #ifndef Tcl_GetOpenFile
2392 #define Tcl_GetOpenFile \
2393 (tclStubsPtr->tcl_GetOpenFile) /* 167 */
2394 #endif
2395 #endif /* UNIX */
2396 #ifndef Tcl_GetPathType
2397 #define Tcl_GetPathType \
2398 (tclStubsPtr->tcl_GetPathType) /* 168 */
2399 #endif
2400 #ifndef Tcl_Gets
2401 #define Tcl_Gets \
2402 (tclStubsPtr->tcl_Gets) /* 169 */
2403 #endif
2404 #ifndef Tcl_GetsObj
2405 #define Tcl_GetsObj \
2406 (tclStubsPtr->tcl_GetsObj) /* 170 */
2407 #endif
2408 #ifndef Tcl_GetServiceMode
2409 #define Tcl_GetServiceMode \
2410 (tclStubsPtr->tcl_GetServiceMode) /* 171 */
2411 #endif
2412 #ifndef Tcl_GetSlave
2413 #define Tcl_GetSlave \
2414 (tclStubsPtr->tcl_GetSlave) /* 172 */
2415 #endif
2416 #ifndef Tcl_GetStdChannel
2417 #define Tcl_GetStdChannel \
2418 (tclStubsPtr->tcl_GetStdChannel) /* 173 */
2419 #endif
2420 #ifndef Tcl_GetStringResult
2421 #define Tcl_GetStringResult \
2422 (tclStubsPtr->tcl_GetStringResult) /* 174 */
2423 #endif
2424 #ifndef Tcl_GetVar
2425 #define Tcl_GetVar \
2426 (tclStubsPtr->tcl_GetVar) /* 175 */
2427 #endif
2428 #ifndef Tcl_GetVar2
2429 #define Tcl_GetVar2 \
2430 (tclStubsPtr->tcl_GetVar2) /* 176 */
2431 #endif
2432 #ifndef Tcl_GlobalEval
2433 #define Tcl_GlobalEval \
2434 (tclStubsPtr->tcl_GlobalEval) /* 177 */
2435 #endif
2436 #ifndef Tcl_GlobalEvalObj
2437 #define Tcl_GlobalEvalObj \
2438 (tclStubsPtr->tcl_GlobalEvalObj) /* 178 */
2439 #endif
2440 #ifndef Tcl_HideCommand
2441 #define Tcl_HideCommand \
2442 (tclStubsPtr->tcl_HideCommand) /* 179 */
2443 #endif
2444 #ifndef Tcl_Init
2445 #define Tcl_Init \
2446 (tclStubsPtr->tcl_Init) /* 180 */
2447 #endif
2448 #ifndef Tcl_InitHashTable
2449 #define Tcl_InitHashTable \
2450 (tclStubsPtr->tcl_InitHashTable) /* 181 */
2451 #endif
2452 #ifndef Tcl_InputBlocked
2453 #define Tcl_InputBlocked \
2454 (tclStubsPtr->tcl_InputBlocked) /* 182 */
2455 #endif
2456 #ifndef Tcl_InputBuffered
2457 #define Tcl_InputBuffered \
2458 (tclStubsPtr->tcl_InputBuffered) /* 183 */
2459 #endif
2460 #ifndef Tcl_InterpDeleted
2461 #define Tcl_InterpDeleted \
2462 (tclStubsPtr->tcl_InterpDeleted) /* 184 */
2463 #endif
2464 #ifndef Tcl_IsSafe
2465 #define Tcl_IsSafe \
2466 (tclStubsPtr->tcl_IsSafe) /* 185 */
2467 #endif
2468 #ifndef Tcl_JoinPath
2469 #define Tcl_JoinPath \
2470 (tclStubsPtr->tcl_JoinPath) /* 186 */
2471 #endif
2472 #ifndef Tcl_LinkVar
2473 #define Tcl_LinkVar \
2474 (tclStubsPtr->tcl_LinkVar) /* 187 */
2475 #endif
2476 /* Slot 188 is reserved */
2477 #ifndef Tcl_MakeFileChannel
2478 #define Tcl_MakeFileChannel \
2479 (tclStubsPtr->tcl_MakeFileChannel) /* 189 */
2480 #endif
2481 #ifndef Tcl_MakeSafe
2482 #define Tcl_MakeSafe \
2483 (tclStubsPtr->tcl_MakeSafe) /* 190 */
2484 #endif
2485 #ifndef Tcl_MakeTcpClientChannel
2486 #define Tcl_MakeTcpClientChannel \
2487 (tclStubsPtr->tcl_MakeTcpClientChannel) /* 191 */
2488 #endif
2489 #ifndef Tcl_Merge
2490 #define Tcl_Merge \
2491 (tclStubsPtr->tcl_Merge) /* 192 */
2492 #endif
2493 #ifndef Tcl_NextHashEntry
2494 #define Tcl_NextHashEntry \
2495 (tclStubsPtr->tcl_NextHashEntry) /* 193 */
2496 #endif
2497 #ifndef Tcl_NotifyChannel
2498 #define Tcl_NotifyChannel \
2499 (tclStubsPtr->tcl_NotifyChannel) /* 194 */
2500 #endif
2501 #ifndef Tcl_ObjGetVar2
2502 #define Tcl_ObjGetVar2 \
2503 (tclStubsPtr->tcl_ObjGetVar2) /* 195 */
2504 #endif
2505 #ifndef Tcl_ObjSetVar2
2506 #define Tcl_ObjSetVar2 \
2507 (tclStubsPtr->tcl_ObjSetVar2) /* 196 */
2508 #endif
2509 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
2510 #ifndef Tcl_OpenCommandChannel
2511 #define Tcl_OpenCommandChannel \
2512 (tclStubsPtr->tcl_OpenCommandChannel) /* 197 */
2513 #endif
2514 #endif /* UNIX */
2515 #ifdef __WIN32__
2516 #ifndef Tcl_OpenCommandChannel
2517 #define Tcl_OpenCommandChannel \
2518 (tclStubsPtr->tcl_OpenCommandChannel) /* 197 */
2519 #endif
2520 #endif /* __WIN32__ */
2521 #ifndef Tcl_OpenFileChannel
2522 #define Tcl_OpenFileChannel \
2523 (tclStubsPtr->tcl_OpenFileChannel) /* 198 */
2524 #endif
2525 #ifndef Tcl_OpenTcpClient
2526 #define Tcl_OpenTcpClient \
2527 (tclStubsPtr->tcl_OpenTcpClient) /* 199 */
2528 #endif
2529 #ifndef Tcl_OpenTcpServer
2530 #define Tcl_OpenTcpServer \
2531 (tclStubsPtr->tcl_OpenTcpServer) /* 200 */
2532 #endif
2533 #ifndef Tcl_Preserve
2534 #define Tcl_Preserve \
2535 (tclStubsPtr->tcl_Preserve) /* 201 */
2536 #endif
2537 #ifndef Tcl_PrintDouble
2538 #define Tcl_PrintDouble \
2539 (tclStubsPtr->tcl_PrintDouble) /* 202 */
2540 #endif
2541 #ifndef Tcl_PutEnv
2542 #define Tcl_PutEnv \
2543 (tclStubsPtr->tcl_PutEnv) /* 203 */
2544 #endif
2545 #ifndef Tcl_PosixError
2546 #define Tcl_PosixError \
2547 (tclStubsPtr->tcl_PosixError) /* 204 */
2548 #endif
2549 #ifndef Tcl_QueueEvent
2550 #define Tcl_QueueEvent \
2551 (tclStubsPtr->tcl_QueueEvent) /* 205 */
2552 #endif
2553 #ifndef Tcl_Read
2554 #define Tcl_Read \
2555 (tclStubsPtr->tcl_Read) /* 206 */
2556 #endif
2557 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
2558 #ifndef Tcl_ReapDetachedProcs
2559 #define Tcl_ReapDetachedProcs \
2560 (tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */
2561 #endif
2562 #endif /* UNIX */
2563 #ifdef __WIN32__
2564 #ifndef Tcl_ReapDetachedProcs
2565 #define Tcl_ReapDetachedProcs \
2566 (tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */
2567 #endif
2568 #endif /* __WIN32__ */
2569 #ifndef Tcl_RecordAndEval
2570 #define Tcl_RecordAndEval \
2571 (tclStubsPtr->tcl_RecordAndEval) /* 208 */
2572 #endif
2573 #ifndef Tcl_RecordAndEvalObj
2574 #define Tcl_RecordAndEvalObj \
2575 (tclStubsPtr->tcl_RecordAndEvalObj) /* 209 */
2576 #endif
2577 #ifndef Tcl_RegisterChannel
2578 #define Tcl_RegisterChannel \
2579 (tclStubsPtr->tcl_RegisterChannel) /* 210 */
2580 #endif
2581 #ifndef Tcl_RegisterObjType
2582 #define Tcl_RegisterObjType \
2583 (tclStubsPtr->tcl_RegisterObjType) /* 211 */
2584 #endif
2585 #ifndef Tcl_RegExpCompile
2586 #define Tcl_RegExpCompile \
2587 (tclStubsPtr->tcl_RegExpCompile) /* 212 */
2588 #endif
2589 #ifndef Tcl_RegExpExec
2590 #define Tcl_RegExpExec \
2591 (tclStubsPtr->tcl_RegExpExec) /* 213 */
2592 #endif
2593 #ifndef Tcl_RegExpMatch
2594 #define Tcl_RegExpMatch \
2595 (tclStubsPtr->tcl_RegExpMatch) /* 214 */
2596 #endif
2597 #ifndef Tcl_RegExpRange
2598 #define Tcl_RegExpRange \
2599 (tclStubsPtr->tcl_RegExpRange) /* 215 */
2600 #endif
2601 #ifndef Tcl_Release
2602 #define Tcl_Release \
2603 (tclStubsPtr->tcl_Release) /* 216 */
2604 #endif
2605 #ifndef Tcl_ResetResult
2606 #define Tcl_ResetResult \
2607 (tclStubsPtr->tcl_ResetResult) /* 217 */
2608 #endif
2609 #ifndef Tcl_ScanElement
2610 #define Tcl_ScanElement \
2611 (tclStubsPtr->tcl_ScanElement) /* 218 */
2612 #endif
2613 #ifndef Tcl_ScanCountedElement
2614 #define Tcl_ScanCountedElement \
2615 (tclStubsPtr->tcl_ScanCountedElement) /* 219 */
2616 #endif
2617 #ifndef Tcl_Seek
2618 #define Tcl_Seek \
2619 (tclStubsPtr->tcl_Seek) /* 220 */
2620 #endif
2621 #ifndef Tcl_ServiceAll
2622 #define Tcl_ServiceAll \
2623 (tclStubsPtr->tcl_ServiceAll) /* 221 */
2624 #endif
2625 #ifndef Tcl_ServiceEvent
2626 #define Tcl_ServiceEvent \
2627 (tclStubsPtr->tcl_ServiceEvent) /* 222 */
2628 #endif
2629 #ifndef Tcl_SetAssocData
2630 #define Tcl_SetAssocData \
2631 (tclStubsPtr->tcl_SetAssocData) /* 223 */
2632 #endif
2633 #ifndef Tcl_SetChannelBufferSize
2634 #define Tcl_SetChannelBufferSize \
2635 (tclStubsPtr->tcl_SetChannelBufferSize) /* 224 */
2636 #endif
2637 #ifndef Tcl_SetChannelOption
2638 #define Tcl_SetChannelOption \
2639 (tclStubsPtr->tcl_SetChannelOption) /* 225 */
2640 #endif
2641 #ifndef Tcl_SetCommandInfo
2642 #define Tcl_SetCommandInfo \
2643 (tclStubsPtr->tcl_SetCommandInfo) /* 226 */
2644 #endif
2645 #ifndef Tcl_SetErrno
2646 #define Tcl_SetErrno \
2647 (tclStubsPtr->tcl_SetErrno) /* 227 */
2648 #endif
2649 #ifndef Tcl_SetErrorCode
2650 #define Tcl_SetErrorCode \
2651 (tclStubsPtr->tcl_SetErrorCode) /* 228 */
2652 #endif
2653 #ifndef Tcl_SetMaxBlockTime
2654 #define Tcl_SetMaxBlockTime \
2655 (tclStubsPtr->tcl_SetMaxBlockTime) /* 229 */
2656 #endif
2657 #ifndef Tcl_SetPanicProc
2658 #define Tcl_SetPanicProc \
2659 (tclStubsPtr->tcl_SetPanicProc) /* 230 */
2660 #endif
2661 #ifndef Tcl_SetRecursionLimit
2662 #define Tcl_SetRecursionLimit \
2663 (tclStubsPtr->tcl_SetRecursionLimit) /* 231 */
2664 #endif
2665 #ifndef Tcl_SetResult
2666 #define Tcl_SetResult \
2667 (tclStubsPtr->tcl_SetResult) /* 232 */
2668 #endif
2669 #ifndef Tcl_SetServiceMode
2670 #define Tcl_SetServiceMode \
2671 (tclStubsPtr->tcl_SetServiceMode) /* 233 */
2672 #endif
2673 #ifndef Tcl_SetObjErrorCode
2674 #define Tcl_SetObjErrorCode \
2675 (tclStubsPtr->tcl_SetObjErrorCode) /* 234 */
2676 #endif
2677 #ifndef Tcl_SetObjResult
2678 #define Tcl_SetObjResult \
2679 (tclStubsPtr->tcl_SetObjResult) /* 235 */
2680 #endif
2681 #ifndef Tcl_SetStdChannel
2682 #define Tcl_SetStdChannel \
2683 (tclStubsPtr->tcl_SetStdChannel) /* 236 */
2684 #endif
2685 #ifndef Tcl_SetVar
2686 #define Tcl_SetVar \
2687 (tclStubsPtr->tcl_SetVar) /* 237 */
2688 #endif
2689 #ifndef Tcl_SetVar2
2690 #define Tcl_SetVar2 \
2691 (tclStubsPtr->tcl_SetVar2) /* 238 */
2692 #endif
2693 #ifndef Tcl_SignalId
2694 #define Tcl_SignalId \
2695 (tclStubsPtr->tcl_SignalId) /* 239 */
2696 #endif
2697 #ifndef Tcl_SignalMsg
2698 #define Tcl_SignalMsg \
2699 (tclStubsPtr->tcl_SignalMsg) /* 240 */
2700 #endif
2701 #ifndef Tcl_SourceRCFile
2702 #define Tcl_SourceRCFile \
2703 (tclStubsPtr->tcl_SourceRCFile) /* 241 */
2704 #endif
2705 #ifndef Tcl_SplitList
2706 #define Tcl_SplitList \
2707 (tclStubsPtr->tcl_SplitList) /* 242 */
2708 #endif
2709 #ifndef Tcl_SplitPath
2710 #define Tcl_SplitPath \
2711 (tclStubsPtr->tcl_SplitPath) /* 243 */
2712 #endif
2713 #ifndef Tcl_StaticPackage
2714 #define Tcl_StaticPackage \
2715 (tclStubsPtr->tcl_StaticPackage) /* 244 */
2716 #endif
2717 #ifndef Tcl_StringMatch
2718 #define Tcl_StringMatch \
2719 (tclStubsPtr->tcl_StringMatch) /* 245 */
2720 #endif
2721 #ifndef Tcl_Tell
2722 #define Tcl_Tell \
2723 (tclStubsPtr->tcl_Tell) /* 246 */
2724 #endif
2725 #ifndef Tcl_TraceVar
2726 #define Tcl_TraceVar \
2727 (tclStubsPtr->tcl_TraceVar) /* 247 */
2728 #endif
2729 #ifndef Tcl_TraceVar2
2730 #define Tcl_TraceVar2 \
2731 (tclStubsPtr->tcl_TraceVar2) /* 248 */
2732 #endif
2733 #ifndef Tcl_TranslateFileName
2734 #define Tcl_TranslateFileName \
2735 (tclStubsPtr->tcl_TranslateFileName) /* 249 */
2736 #endif
2737 #ifndef Tcl_Ungets
2738 #define Tcl_Ungets \
2739 (tclStubsPtr->tcl_Ungets) /* 250 */
2740 #endif
2741 #ifndef Tcl_UnlinkVar
2742 #define Tcl_UnlinkVar \
2743 (tclStubsPtr->tcl_UnlinkVar) /* 251 */
2744 #endif
2745 #ifndef Tcl_UnregisterChannel
2746 #define Tcl_UnregisterChannel \
2747 (tclStubsPtr->tcl_UnregisterChannel) /* 252 */
2748 #endif
2749 #ifndef Tcl_UnsetVar
2750 #define Tcl_UnsetVar \
2751 (tclStubsPtr->tcl_UnsetVar) /* 253 */
2752 #endif
2753 #ifndef Tcl_UnsetVar2
2754 #define Tcl_UnsetVar2 \
2755 (tclStubsPtr->tcl_UnsetVar2) /* 254 */
2756 #endif
2757 #ifndef Tcl_UntraceVar
2758 #define Tcl_UntraceVar \
2759 (tclStubsPtr->tcl_UntraceVar) /* 255 */
2760 #endif
2761 #ifndef Tcl_UntraceVar2
2762 #define Tcl_UntraceVar2 \
2763 (tclStubsPtr->tcl_UntraceVar2) /* 256 */
2764 #endif
2765 #ifndef Tcl_UpdateLinkedVar
2766 #define Tcl_UpdateLinkedVar \
2767 (tclStubsPtr->tcl_UpdateLinkedVar) /* 257 */
2768 #endif
2769 #ifndef Tcl_UpVar
2770 #define Tcl_UpVar \
2771 (tclStubsPtr->tcl_UpVar) /* 258 */
2772 #endif
2773 #ifndef Tcl_UpVar2
2774 #define Tcl_UpVar2 \
2775 (tclStubsPtr->tcl_UpVar2) /* 259 */
2776 #endif
2777 #ifndef Tcl_VarEval
2778 #define Tcl_VarEval \
2779 (tclStubsPtr->tcl_VarEval) /* 260 */
2780 #endif
2781 #ifndef Tcl_VarTraceInfo
2782 #define Tcl_VarTraceInfo \
2783 (tclStubsPtr->tcl_VarTraceInfo) /* 261 */
2784 #endif
2785 #ifndef Tcl_VarTraceInfo2
2786 #define Tcl_VarTraceInfo2 \
2787 (tclStubsPtr->tcl_VarTraceInfo2) /* 262 */
2788 #endif
2789 #ifndef Tcl_Write
2790 #define Tcl_Write \
2791 (tclStubsPtr->tcl_Write) /* 263 */
2792 #endif
2793 #ifndef Tcl_WrongNumArgs
2794 #define Tcl_WrongNumArgs \
2795 (tclStubsPtr->tcl_WrongNumArgs) /* 264 */
2796 #endif
2797 #ifndef Tcl_DumpActiveMemory
2798 #define Tcl_DumpActiveMemory \
2799 (tclStubsPtr->tcl_DumpActiveMemory) /* 265 */
2800 #endif
2801 #ifndef Tcl_ValidateAllMemory
2802 #define Tcl_ValidateAllMemory \
2803 (tclStubsPtr->tcl_ValidateAllMemory) /* 266 */
2804 #endif
2805 #ifndef Tcl_AppendResultVA
2806 #define Tcl_AppendResultVA \
2807 (tclStubsPtr->tcl_AppendResultVA) /* 267 */
2808 #endif
2809 #ifndef Tcl_AppendStringsToObjVA
2810 #define Tcl_AppendStringsToObjVA \
2811 (tclStubsPtr->tcl_AppendStringsToObjVA) /* 268 */
2812 #endif
2813 #ifndef Tcl_HashStats
2814 #define Tcl_HashStats \
2815 (tclStubsPtr->tcl_HashStats) /* 269 */
2816 #endif
2817 #ifndef Tcl_ParseVar
2818 #define Tcl_ParseVar \
2819 (tclStubsPtr->tcl_ParseVar) /* 270 */
2820 #endif
2821 #ifndef Tcl_PkgPresent
2822 #define Tcl_PkgPresent \
2823 (tclStubsPtr->tcl_PkgPresent) /* 271 */
2824 #endif
2825 #ifndef Tcl_PkgPresentEx
2826 #define Tcl_PkgPresentEx \
2827 (tclStubsPtr->tcl_PkgPresentEx) /* 272 */
2828 #endif
2829 #ifndef Tcl_PkgProvide
2830 #define Tcl_PkgProvide \
2831 (tclStubsPtr->tcl_PkgProvide) /* 273 */
2832 #endif
2833 #ifndef Tcl_PkgRequire
2834 #define Tcl_PkgRequire \
2835 (tclStubsPtr->tcl_PkgRequire) /* 274 */
2836 #endif
2837 #ifndef Tcl_SetErrorCodeVA
2838 #define Tcl_SetErrorCodeVA \
2839 (tclStubsPtr->tcl_SetErrorCodeVA) /* 275 */
2840 #endif
2841 #ifndef Tcl_VarEvalVA
2842 #define Tcl_VarEvalVA \
2843 (tclStubsPtr->tcl_VarEvalVA) /* 276 */
2844 #endif
2845 #ifndef Tcl_WaitPid
2846 #define Tcl_WaitPid \
2847 (tclStubsPtr->tcl_WaitPid) /* 277 */
2848 #endif
2849 #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
2850 #ifndef Tcl_PanicVA
2851 #define Tcl_PanicVA \
2852 (tclStubsPtr->tcl_PanicVA) /* 278 */
2853 #endif
2854 #endif /* UNIX */
2855 #ifdef __WIN32__
2856 #ifndef Tcl_PanicVA
2857 #define Tcl_PanicVA \
2858 (tclStubsPtr->tcl_PanicVA) /* 278 */
2859 #endif
2860 #endif /* __WIN32__ */
2861 #ifndef Tcl_GetVersion
2862 #define Tcl_GetVersion \
2863 (tclStubsPtr->tcl_GetVersion) /* 279 */
2864 #endif
2865 #ifndef Tcl_InitMemory
2866 #define Tcl_InitMemory \
2867 (tclStubsPtr->tcl_InitMemory) /* 280 */
2868 #endif
2869 #ifndef Tcl_StackChannel
2870 #define Tcl_StackChannel \
2871 (tclStubsPtr->tcl_StackChannel) /* 281 */
2872 #endif
2873 #ifndef Tcl_UnstackChannel
2874 #define Tcl_UnstackChannel \
2875 (tclStubsPtr->tcl_UnstackChannel) /* 282 */
2876 #endif
2877 #ifndef Tcl_GetStackedChannel
2878 #define Tcl_GetStackedChannel \
2879 (tclStubsPtr->tcl_GetStackedChannel) /* 283 */
2880 #endif
2881 /* Slot 284 is reserved */
2882 /* Slot 285 is reserved */
2883 #ifndef Tcl_AppendObjToObj
2884 #define Tcl_AppendObjToObj \
2885 (tclStubsPtr->tcl_AppendObjToObj) /* 286 */
2886 #endif
2887 #ifndef Tcl_CreateEncoding
2888 #define Tcl_CreateEncoding \
2889 (tclStubsPtr->tcl_CreateEncoding) /* 287 */
2890 #endif
2891 #ifndef Tcl_CreateThreadExitHandler
2892 #define Tcl_CreateThreadExitHandler \
2893 (tclStubsPtr->tcl_CreateThreadExitHandler) /* 288 */
2894 #endif
2895 #ifndef Tcl_DeleteThreadExitHandler
2896 #define Tcl_DeleteThreadExitHandler \
2897 (tclStubsPtr->tcl_DeleteThreadExitHandler) /* 289 */
2898 #endif
2899 #ifndef Tcl_DiscardResult
2900 #define Tcl_DiscardResult \
2901 (tclStubsPtr->tcl_DiscardResult) /* 290 */
2902 #endif
2903 #ifndef Tcl_EvalEx
2904 #define Tcl_EvalEx \
2905 (tclStubsPtr->tcl_EvalEx) /* 291 */
2906 #endif
2907 #ifndef Tcl_EvalObjv
2908 #define Tcl_EvalObjv \
2909 (tclStubsPtr->tcl_EvalObjv) /* 292 */
2910 #endif
2911 #ifndef Tcl_EvalObjEx
2912 #define Tcl_EvalObjEx \
2913 (tclStubsPtr->tcl_EvalObjEx) /* 293 */
2914 #endif
2915 #ifndef Tcl_ExitThread
2916 #define Tcl_ExitThread \
2917 (tclStubsPtr->tcl_ExitThread) /* 294 */
2918 #endif
2919 #ifndef Tcl_ExternalToUtf
2920 #define Tcl_ExternalToUtf \
2921 (tclStubsPtr->tcl_ExternalToUtf) /* 295 */
2922 #endif
2923 #ifndef Tcl_ExternalToUtfDString
2924 #define Tcl_ExternalToUtfDString \
2925 (tclStubsPtr->tcl_ExternalToUtfDString) /* 296 */
2926 #endif
2927 #ifndef Tcl_FinalizeThread
2928 #define Tcl_FinalizeThread \
2929 (tclStubsPtr->tcl_FinalizeThread) /* 297 */
2930 #endif
2931 #ifndef Tcl_FinalizeNotifier
2932 #define Tcl_FinalizeNotifier \
2933 (tclStubsPtr->tcl_FinalizeNotifier) /* 298 */
2934 #endif
2935 #ifndef Tcl_FreeEncoding
2936 #define Tcl_FreeEncoding \
2937 (tclStubsPtr->tcl_FreeEncoding) /* 299 */
2938 #endif
2939 #ifndef Tcl_GetCurrentThread
2940 #define Tcl_GetCurrentThread \
2941 (tclStubsPtr->tcl_GetCurrentThread) /* 300 */
2942 #endif
2943 #ifndef Tcl_GetEncoding
2944 #define Tcl_GetEncoding \
2945 (tclStubsPtr->tcl_GetEncoding) /* 301 */
2946 #endif
2947 #ifndef Tcl_GetEncodingName
2948 #define Tcl_GetEncodingName \
2949 (tclStubsPtr->tcl_GetEncodingName) /* 302 */
2950 #endif
2951 #ifndef Tcl_GetEncodingNames
2952 #define Tcl_GetEncodingNames \
2953 (tclStubsPtr->tcl_GetEncodingNames) /* 303 */
2954 #endif
2955 #ifndef Tcl_GetIndexFromObjStruct
2956 #define Tcl_GetIndexFromObjStruct \
2957 (tclStubsPtr->tcl_GetIndexFromObjStruct) /* 304 */
2958 #endif
2959 #ifndef Tcl_GetThreadData
2960 #define Tcl_GetThreadData \
2961 (tclStubsPtr->tcl_GetThreadData) /* 305 */
2962 #endif
2963 #ifndef Tcl_GetVar2Ex
2964 #define Tcl_GetVar2Ex \
2965 (tclStubsPtr->tcl_GetVar2Ex) /* 306 */
2966 #endif
2967 #ifndef Tcl_InitNotifier
2968 #define Tcl_InitNotifier \
2969 (tclStubsPtr->tcl_InitNotifier) /* 307 */
2970 #endif
2971 #ifndef Tcl_MutexLock
2972 #define Tcl_MutexLock \
2973 (tclStubsPtr->tcl_MutexLock) /* 308 */
2974 #endif
2975 #ifndef Tcl_MutexUnlock
2976 #define Tcl_MutexUnlock \
2977 (tclStubsPtr->tcl_MutexUnlock) /* 309 */
2978 #endif
2979 #ifndef Tcl_ConditionNotify
2980 #define Tcl_ConditionNotify \
2981 (tclStubsPtr->tcl_ConditionNotify) /* 310 */
2982 #endif
2983 #ifndef Tcl_ConditionWait
2984 #define Tcl_ConditionWait \
2985 (tclStubsPtr->tcl_ConditionWait) /* 311 */
2986 #endif
2987 #ifndef Tcl_NumUtfChars
2988 #define Tcl_NumUtfChars \
2989 (tclStubsPtr->tcl_NumUtfChars) /* 312 */
2990 #endif
2991 #ifndef Tcl_ReadChars
2992 #define Tcl_ReadChars \
2993 (tclStubsPtr->tcl_ReadChars) /* 313 */
2994 #endif
2995 #ifndef Tcl_RestoreResult
2996 #define Tcl_RestoreResult \
2997 (tclStubsPtr->tcl_RestoreResult) /* 314 */
2998 #endif
2999 #ifndef Tcl_SaveResult
3000 #define Tcl_SaveResult \
3001 (tclStubsPtr->tcl_SaveResult) /* 315 */
3002 #endif
3003 #ifndef Tcl_SetSystemEncoding
3004 #define Tcl_SetSystemEncoding \
3005 (tclStubsPtr->tcl_SetSystemEncoding) /* 316 */
3006 #endif
3007 #ifndef Tcl_SetVar2Ex
3008 #define Tcl_SetVar2Ex \
3009 (tclStubsPtr->tcl_SetVar2Ex) /* 317 */
3010 #endif
3011 #ifndef Tcl_ThreadAlert
3012 #define Tcl_ThreadAlert \
3013 (tclStubsPtr->tcl_ThreadAlert) /* 318 */
3014 #endif
3015 #ifndef Tcl_ThreadQueueEvent
3016 #define Tcl_ThreadQueueEvent \
3017 (tclStubsPtr->tcl_ThreadQueueEvent) /* 319 */
3018 #endif
3019 #ifndef Tcl_UniCharAtIndex
3020 #define Tcl_UniCharAtIndex \
3021 (tclStubsPtr->tcl_UniCharAtIndex) /* 320 */
3022 #endif
3023 #ifndef Tcl_UniCharToLower
3024 #define Tcl_UniCharToLower \
3025 (tclStubsPtr->tcl_UniCharToLower) /* 321 */
3026 #endif
3027 #ifndef Tcl_UniCharToTitle
3028 #define Tcl_UniCharToTitle \
3029 (tclStubsPtr->tcl_UniCharToTitle) /* 322 */
3030 #endif
3031 #ifndef Tcl_UniCharToUpper
3032 #define Tcl_UniCharToUpper \
3033 (tclStubsPtr->tcl_UniCharToUpper) /* 323 */
3034 #endif
3035 #ifndef Tcl_UniCharToUtf
3036 #define Tcl_UniCharToUtf \
3037 (tclStubsPtr->tcl_UniCharToUtf) /* 324 */
3038 #endif
3039 #ifndef Tcl_UtfAtIndex
3040 #define Tcl_UtfAtIndex \
3041 (tclStubsPtr->tcl_UtfAtIndex) /* 325 */
3042 #endif
3043 #ifndef Tcl_UtfCharComplete
3044 #define Tcl_UtfCharComplete \
3045 (tclStubsPtr->tcl_UtfCharComplete) /* 326 */
3046 #endif
3047 #ifndef Tcl_UtfBackslash
3048 #define Tcl_UtfBackslash \
3049 (tclStubsPtr->tcl_UtfBackslash) /* 327 */
3050 #endif
3051 #ifndef Tcl_UtfFindFirst
3052 #define Tcl_UtfFindFirst \
3053 (tclStubsPtr->tcl_UtfFindFirst) /* 328 */
3054 #endif
3055 #ifndef Tcl_UtfFindLast
3056 #define Tcl_UtfFindLast \
3057 (tclStubsPtr->tcl_UtfFindLast) /* 329 */
3058 #endif
3059 #ifndef Tcl_UtfNext
3060 #define Tcl_UtfNext \
3061 (tclStubsPtr->tcl_UtfNext) /* 330 */
3062 #endif
3063 #ifndef Tcl_UtfPrev
3064 #define Tcl_UtfPrev \
3065 (tclStubsPtr->tcl_UtfPrev) /* 331 */
3066 #endif
3067 #ifndef Tcl_UtfToExternal
3068 #define Tcl_UtfToExternal \
3069 (tclStubsPtr->tcl_UtfToExternal) /* 332 */
3070 #endif
3071 #ifndef Tcl_UtfToExternalDString
3072 #define Tcl_UtfToExternalDString \
3073 (tclStubsPtr->tcl_UtfToExternalDString) /* 333 */
3074 #endif
3075 #ifndef Tcl_UtfToLower
3076 #define Tcl_UtfToLower \
3077 (tclStubsPtr->tcl_UtfToLower) /* 334 */
3078 #endif
3079 #ifndef Tcl_UtfToTitle
3080 #define Tcl_UtfToTitle \
3081 (tclStubsPtr->tcl_UtfToTitle) /* 335 */
3082 #endif
3083 #ifndef Tcl_UtfToUniChar
3084 #define Tcl_UtfToUniChar \
3085 (tclStubsPtr->tcl_UtfToUniChar) /* 336 */
3086 #endif
3087 #ifndef Tcl_UtfToUpper
3088 #define Tcl_UtfToUpper \
3089 (tclStubsPtr->tcl_UtfToUpper) /* 337 */
3090 #endif
3091 #ifndef Tcl_WriteChars
3092 #define Tcl_WriteChars \
3093 (tclStubsPtr->tcl_WriteChars) /* 338 */
3094 #endif
3095 #ifndef Tcl_WriteObj
3096 #define Tcl_WriteObj \
3097 (tclStubsPtr->tcl_WriteObj) /* 339 */
3098 #endif
3099 #ifndef Tcl_GetString
3100 #define Tcl_GetString \
3101 (tclStubsPtr->tcl_GetString) /* 340 */
3102 #endif
3103 #ifndef Tcl_GetDefaultEncodingDir
3104 #define Tcl_GetDefaultEncodingDir \
3105 (tclStubsPtr->tcl_GetDefaultEncodingDir) /* 341 */
3106 #endif
3107 #ifndef Tcl_SetDefaultEncodingDir
3108 #define Tcl_SetDefaultEncodingDir \
3109 (tclStubsPtr->tcl_SetDefaultEncodingDir) /* 342 */
3110 #endif
3111 #ifndef Tcl_AlertNotifier
3112 #define Tcl_AlertNotifier \
3113 (tclStubsPtr->tcl_AlertNotifier) /* 343 */
3114 #endif
3115 #ifndef Tcl_ServiceModeHook
3116 #define Tcl_ServiceModeHook \
3117 (tclStubsPtr->tcl_ServiceModeHook) /* 344 */
3118 #endif
3119 #ifndef Tcl_UniCharIsAlnum
3120 #define Tcl_UniCharIsAlnum \
3121 (tclStubsPtr->tcl_UniCharIsAlnum) /* 345 */
3122 #endif
3123 #ifndef Tcl_UniCharIsAlpha
3124 #define Tcl_UniCharIsAlpha \
3125 (tclStubsPtr->tcl_UniCharIsAlpha) /* 346 */
3126 #endif
3127 #ifndef Tcl_UniCharIsDigit
3128 #define Tcl_UniCharIsDigit \
3129 (tclStubsPtr->tcl_UniCharIsDigit) /* 347 */
3130 #endif
3131 #ifndef Tcl_UniCharIsLower
3132 #define Tcl_UniCharIsLower \
3133 (tclStubsPtr->tcl_UniCharIsLower) /* 348 */
3134 #endif
3135 #ifndef Tcl_UniCharIsSpace
3136 #define Tcl_UniCharIsSpace \
3137 (tclStubsPtr->tcl_UniCharIsSpace) /* 349 */
3138 #endif
3139 #ifndef Tcl_UniCharIsUpper
3140 #define Tcl_UniCharIsUpper \
3141 (tclStubsPtr->tcl_UniCharIsUpper) /* 350 */
3142 #endif
3143 #ifndef Tcl_UniCharIsWordChar
3144 #define Tcl_UniCharIsWordChar \
3145 (tclStubsPtr->tcl_UniCharIsWordChar) /* 351 */
3146 #endif
3147 #ifndef Tcl_UniCharLen
3148 #define Tcl_UniCharLen \
3149 (tclStubsPtr->tcl_UniCharLen) /* 352 */
3150 #endif
3151 #ifndef Tcl_UniCharNcmp
3152 #define Tcl_UniCharNcmp \
3153 (tclStubsPtr->tcl_UniCharNcmp) /* 353 */
3154 #endif
3155 #ifndef Tcl_UniCharToUtfDString
3156 #define Tcl_UniCharToUtfDString \
3157 (tclStubsPtr->tcl_UniCharToUtfDString) /* 354 */
3158 #endif
3159 #ifndef Tcl_UtfToUniCharDString
3160 #define Tcl_UtfToUniCharDString \
3161 (tclStubsPtr->tcl_UtfToUniCharDString) /* 355 */
3162 #endif
3163 #ifndef Tcl_GetRegExpFromObj
3164 #define Tcl_GetRegExpFromObj \
3165 (tclStubsPtr->tcl_GetRegExpFromObj) /* 356 */
3166 #endif
3167 #ifndef Tcl_EvalTokens
3168 #define Tcl_EvalTokens \
3169 (tclStubsPtr->tcl_EvalTokens) /* 357 */
3170 #endif
3171 #ifndef Tcl_FreeParse
3172 #define Tcl_FreeParse \
3173 (tclStubsPtr->tcl_FreeParse) /* 358 */
3174 #endif
3175 #ifndef Tcl_LogCommandInfo
3176 #define Tcl_LogCommandInfo \
3177 (tclStubsPtr->tcl_LogCommandInfo) /* 359 */
3178 #endif
3179 #ifndef Tcl_ParseBraces
3180 #define Tcl_ParseBraces \
3181 (tclStubsPtr->tcl_ParseBraces) /* 360 */
3182 #endif
3183 #ifndef Tcl_ParseCommand
3184 #define Tcl_ParseCommand \
3185 (tclStubsPtr->tcl_ParseCommand) /* 361 */
3186 #endif
3187 #ifndef Tcl_ParseExpr
3188 #define Tcl_ParseExpr \
3189 (tclStubsPtr->tcl_ParseExpr) /* 362 */
3190 #endif
3191 #ifndef Tcl_ParseQuotedString
3192 #define Tcl_ParseQuotedString \
3193 (tclStubsPtr->tcl_ParseQuotedString) /* 363 */
3194 #endif
3195 #ifndef Tcl_ParseVarName
3196 #define Tcl_ParseVarName \
3197 (tclStubsPtr->tcl_ParseVarName) /* 364 */
3198 #endif
3199 #ifndef Tcl_GetCwd
3200 #define Tcl_GetCwd \
3201 (tclStubsPtr->tcl_GetCwd) /* 365 */
3202 #endif
3203 #ifndef Tcl_Chdir
3204 #define Tcl_Chdir \
3205 (tclStubsPtr->tcl_Chdir) /* 366 */
3206 #endif
3207 #ifndef Tcl_Access
3208 #define Tcl_Access \
3209 (tclStubsPtr->tcl_Access) /* 367 */
3210 #endif
3211 #ifndef Tcl_Stat
3212 #define Tcl_Stat \
3213 (tclStubsPtr->tcl_Stat) /* 368 */
3214 #endif
3215 #ifndef Tcl_UtfNcmp
3216 #define Tcl_UtfNcmp \
3217 (tclStubsPtr->tcl_UtfNcmp) /* 369 */
3218 #endif
3219 #ifndef Tcl_UtfNcasecmp
3220 #define Tcl_UtfNcasecmp \
3221 (tclStubsPtr->tcl_UtfNcasecmp) /* 370 */
3222 #endif
3223 #ifndef Tcl_StringCaseMatch
3224 #define Tcl_StringCaseMatch \
3225 (tclStubsPtr->tcl_StringCaseMatch) /* 371 */
3226 #endif
3227 #ifndef Tcl_UniCharIsControl
3228 #define Tcl_UniCharIsControl \
3229 (tclStubsPtr->tcl_UniCharIsControl) /* 372 */
3230 #endif
3231 #ifndef Tcl_UniCharIsGraph
3232 #define Tcl_UniCharIsGraph \
3233 (tclStubsPtr->tcl_UniCharIsGraph) /* 373 */
3234 #endif
3235 #ifndef Tcl_UniCharIsPrint
3236 #define Tcl_UniCharIsPrint \
3237 (tclStubsPtr->tcl_UniCharIsPrint) /* 374 */
3238 #endif
3239 #ifndef Tcl_UniCharIsPunct
3240 #define Tcl_UniCharIsPunct \
3241 (tclStubsPtr->tcl_UniCharIsPunct) /* 375 */
3242 #endif
3243 #ifndef Tcl_RegExpExecObj
3244 #define Tcl_RegExpExecObj \
3245 (tclStubsPtr->tcl_RegExpExecObj) /* 376 */
3246 #endif
3247 #ifndef Tcl_RegExpGetInfo
3248 #define Tcl_RegExpGetInfo \
3249 (tclStubsPtr->tcl_RegExpGetInfo) /* 377 */
3250 #endif
3251 #ifndef Tcl_NewUnicodeObj
3252 #define Tcl_NewUnicodeObj \
3253 (tclStubsPtr->tcl_NewUnicodeObj) /* 378 */
3254 #endif
3255 #ifndef Tcl_SetUnicodeObj
3256 #define Tcl_SetUnicodeObj \
3257 (tclStubsPtr->tcl_SetUnicodeObj) /* 379 */
3258 #endif
3259 #ifndef Tcl_GetCharLength
3260 #define Tcl_GetCharLength \
3261 (tclStubsPtr->tcl_GetCharLength) /* 380 */
3262 #endif
3263 #ifndef Tcl_GetUniChar
3264 #define Tcl_GetUniChar \
3265 (tclStubsPtr->tcl_GetUniChar) /* 381 */
3266 #endif
3267 #ifndef Tcl_GetUnicode
3268 #define Tcl_GetUnicode \
3269 (tclStubsPtr->tcl_GetUnicode) /* 382 */
3270 #endif
3271 #ifndef Tcl_GetRange
3272 #define Tcl_GetRange \
3273 (tclStubsPtr->tcl_GetRange) /* 383 */
3274 #endif
3275 #ifndef Tcl_AppendUnicodeToObj
3276 #define Tcl_AppendUnicodeToObj \
3277 (tclStubsPtr->tcl_AppendUnicodeToObj) /* 384 */
3278 #endif
3279 #ifndef Tcl_RegExpMatchObj
3280 #define Tcl_RegExpMatchObj \
3281 (tclStubsPtr->tcl_RegExpMatchObj) /* 385 */
3282 #endif
3283 #ifndef Tcl_SetNotifier
3284 #define Tcl_SetNotifier \
3285 (tclStubsPtr->tcl_SetNotifier) /* 386 */
3286 #endif
3287 #ifndef Tcl_GetAllocMutex
3288 #define Tcl_GetAllocMutex \
3289 (tclStubsPtr->tcl_GetAllocMutex) /* 387 */
3290 #endif
3291 #ifndef Tcl_GetChannelNames
3292 #define Tcl_GetChannelNames \
3293 (tclStubsPtr->tcl_GetChannelNames) /* 388 */
3294 #endif
3295 #ifndef Tcl_GetChannelNamesEx
3296 #define Tcl_GetChannelNamesEx \
3297 (tclStubsPtr->tcl_GetChannelNamesEx) /* 389 */
3298 #endif
3299 #ifndef Tcl_ProcObjCmd
3300 #define Tcl_ProcObjCmd \
3301 (tclStubsPtr->tcl_ProcObjCmd) /* 390 */
3302 #endif
3303 #ifndef Tcl_ConditionFinalize
3304 #define Tcl_ConditionFinalize \
3305 (tclStubsPtr->tcl_ConditionFinalize) /* 391 */
3306 #endif
3307 #ifndef Tcl_MutexFinalize
3308 #define Tcl_MutexFinalize \
3309 (tclStubsPtr->tcl_MutexFinalize) /* 392 */
3310 #endif
3311 #ifndef Tcl_CreateThread
3312 #define Tcl_CreateThread \
3313 (tclStubsPtr->tcl_CreateThread) /* 393 */
3314 #endif
3315
3316 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
3317
3318 /* !END!: Do not edit above this line. */
3319
3320 #endif /* _TCLDECLS */
3321
3322
3323 /* $History: tcldecls.h $
3324 *
3325 * ***************** Version 1 *****************
3326 * User: Dtashley Date: 1/02/01 Time: 1:27a
3327 * Created in $/IjuScripter, IjuConsole/Source/Tcl Base
3328 * Initial check-in.
3329 */
3330
3331 /* End of TCLDECLS.H */

dashley@gmail.com
ViewVC Help
Powered by ViewVC 1.1.25