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