Merged 8.0 stub changes dev_8_1_stubs_branch

18 files changed, 3867 insertions, 3870 deletions

diff --git a/doc/AddErrInfo.3 b/doc/AddErrInfo.3
index 9a9e21c..b00bfd5 100644
--- a/doc/AddErrInfo.3
+++ b/doc/AddErrInfo.3
@@ -5,13 +5,13 @@
 '\" See the file "license.terms" for information on usage and redistribution
 '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 '\" 
-'\" RCS: @(#) $Id: AddErrInfo.3,v 1.1.2.1.2.1 1999/03/08 20:14:03 stanton Exp $
+'\" RCS: @(#) $Id: AddErrInfo.3,v 1.1.2.1.2.2 1999/03/10 06:41:48 stanton Exp $
 '\" 
 .so man.macros
 .TH Tcl_AddErrorInfo 3 7.5 Tcl "Tcl Library Procedures"
 .BS
 .SH NAME
-Tcl_AddObjErrorInfo, Tcl_AddErrorInfo, Tcl_SetErrorCode, Tcl_PosixError \- record information about errors
+Tcl_AddObjErrorInfo, Tcl_AddErrorInfo, Tcl_SetErrorCode, Tcl_SetErrorCodeVA, Tcl_PosixError \- record information about errors
 .SH SYNOPSIS
 .nf
 \fB#include <tcl.h>\fR
diff --git a/generic/tcl.decls b/generic/tcl.decls
index beea369..600b6b5 100644
--- a/generic/tcl.decls
+++ b/generic/tcl.decls
@@ -10,7 +10,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 # 
-# RCS: @(#) $Id: tcl.decls,v 1.2.4.1 1999/03/08 20:14:04 stanton Exp $
+# RCS: @(#) $Id: tcl.decls,v 1.2.4.2 1999/03/10 06:41:48 stanton Exp $
 
 library tcl
 
@@ -27,1097 +27,1124 @@ hooks {tclPlat tclInt tclIntPlat}
 # to preserve backwards compatibility.
 
 declare 0 generic {
-    void Tcl_AddErrorInfo (Tcl_Interp *interp, CONST char *message)
+    int Tcl_PkgProvideEx(Tcl_Interp *interp, char *name, char *version, \
+	    ClientData clientData)
 }
 declare 1 generic {
-    void Tcl_AddObjErrorInfo(Tcl_Interp *interp, CONST char *message, \
-	    int length)
+    char * Tcl_PkgRequireEx(Tcl_Interp *interp, char *name, char *version, \
+	    int exact, ClientData *clientDataPtr)
 }
 declare 2 generic {
-    char * Tcl_Alloc(unsigned int size)
+    void panic(char *format, ...)
 }
 declare 3 generic {
-    void Tcl_AllowExceptions(Tcl_Interp *interp)
+    char * Tcl_Alloc(unsigned int size)
 }
 declare 4 generic {
-    int Tcl_AppendAllObjTypes(Tcl_Interp *interp, Tcl_Obj *objPtr)
+    void Tcl_Free(char *ptr)
 }
 declare 5 generic {
-    void Tcl_AppendElement(Tcl_Interp *interp, CONST char *str)
+    char * Tcl_Realloc(char *ptr, unsigned int size)
 }
 declare 6 generic {
-    void Tcl_AppendResult(Tcl_Interp *interp, ...)
+    char * Tcl_DbCkalloc(unsigned int size, char *file, int line)
 }
 declare 7 generic {
-    void Tcl_AppendResultVA(Tcl_Interp *interp, va_list argList)
+    int Tcl_DbCkfree(char *ptr, char *file, int line)
 }
 declare 8 generic {
-    void Tcl_AppendToObj(Tcl_Obj *objPtr, char *bytes, int length)
+    char * Tcl_DbCkrealloc(char *ptr, unsigned int size, char *file, int line)
 }
-declare 9 generic {
-    void Tcl_AppendStringsToObj(Tcl_Obj *objPtr, ...)
+
+# Tcl_CreateFileHandler and Tcl_DeleteFileHandler are only available on unix,
+# but they are part of the old generic interface, so we include them here for
+# compatibility reasons.
+
+declare 9 unix {
+    void Tcl_CreateFileHandler(int fd, int mask, Tcl_FileProc *proc, \
+	    ClientData clientData)
 }
-declare 10 generic {
-    void Tcl_AppendStringsToObjVA(Tcl_Obj *objPtr, va_list argList)
+declare 10 unix {
+    void Tcl_DeleteFileHandler(int fd)
 }
+
 declare 11 generic {
-    Tcl_AsyncHandler Tcl_AsyncCreate(Tcl_AsyncProc *proc, \
-	    ClientData clientData)
+    void Tcl_SetTimer(Tcl_Time *timePtr)
 }
 declare 12 generic {
-    void Tcl_AsyncDelete(Tcl_AsyncHandler async)
+    void Tcl_Sleep(int ms)
 }
 declare 13 generic {
-    int Tcl_AsyncInvoke(Tcl_Interp *interp, int code)
+    int Tcl_WaitForEvent(Tcl_Time *timePtr)
 }
 declare 14 generic {
-    void Tcl_AsyncMark(Tcl_AsyncHandler async)
+    int Tcl_AppendAllObjTypes(Tcl_Interp *interp, Tcl_Obj *objPtr)
 }
 declare 15 generic {
-    int Tcl_AsyncReady(void)
+    void Tcl_AppendStringsToObj(Tcl_Obj *objPtr, ...)
 }
 declare 16 generic {
-    void Tcl_BackgroundError(Tcl_Interp *interp)
+    void Tcl_AppendToObj(Tcl_Obj *objPtr, char *bytes, int length)
 }
 declare 17 generic {
-    char Tcl_Backslash(CONST char *src, int *readPtr)
+    Tcl_Obj * Tcl_ConcatObj(int objc, Tcl_Obj *CONST objv[])
 }
 declare 18 generic {
-    int Tcl_BadChannelOption(Tcl_Interp *interp, char *optionName, \
-	    char *optionList)
+    int Tcl_ConvertToType(Tcl_Interp *interp, Tcl_Obj *objPtr, \
+	    Tcl_ObjType *typePtr)
 }
 declare 19 generic {
-    void Tcl_CallWhenDeleted(Tcl_Interp *interp, Tcl_InterpDeleteProc *proc, \
-	    ClientData clientData)
+    void Tcl_DbDecrRefCount(Tcl_Obj *objPtr, char *file, int line)
 }
 declare 20 generic {
-    void Tcl_CancelIdleCall(Tcl_IdleProc *idleProc, ClientData clientData)
+    void Tcl_DbIncrRefCount(Tcl_Obj *objPtr, char *file, int line)
 }
 declare 21 generic {
-    int Tcl_Close(Tcl_Interp *interp, Tcl_Channel chan)
+    int Tcl_DbIsShared(Tcl_Obj *objPtr, char *file, int line)
 }
 declare 22 generic {
-    int Tcl_CommandComplete(char *cmd)
+    Tcl_Obj * Tcl_DbNewBooleanObj(int boolValue, char *file, int line)
 }
 declare 23 generic {
-    char * Tcl_Concat(int argc, char **argv)
+    Tcl_Obj * Tcl_DbNewByteArrayObj(unsigned char *bytes, int length, \
+	    char *file, int line)
 }
 declare 24 generic {
-    Tcl_Obj * Tcl_ConcatObj(int objc, Tcl_Obj *CONST objv[])
+    Tcl_Obj * Tcl_DbNewDoubleObj(double doubleValue, char *file, int line)
 }
 declare 25 generic {
-    int Tcl_ConvertCountedElement(CONST char *src, int length, char *dst, \
-	    int flags)
+    Tcl_Obj * Tcl_DbNewListObj(int objc, Tcl_Obj *CONST objv[], char *file, \
+	    int line)
 }
 declare 26 generic {
-    int Tcl_ConvertElement(CONST char *src, char *dst, int flags)
+    Tcl_Obj * Tcl_DbNewLongObj(long longValue, char *file, int line)
 }
 declare 27 generic {
-    int Tcl_ConvertToType(Tcl_Interp *interp, Tcl_Obj *objPtr, \
-	    Tcl_ObjType *typePtr)
+    Tcl_Obj * Tcl_DbNewObj(char *file, int line)
 }
 declare 28 generic {
-    int Tcl_CreateAlias(Tcl_Interp *slave, char *slaveCmd, \
-	    Tcl_Interp *target, char *targetCmd, int argc, char **argv)
+    Tcl_Obj * Tcl_DbNewStringObj(CONST char *bytes, int length, \
+	    char *file, int line)
 }
 declare 29 generic {
-    int Tcl_CreateAliasObj(Tcl_Interp *slave, char *slaveCmd, \
-	    Tcl_Interp *target, char *targetCmd, int objc, \
-	    Tcl_Obj *CONST objv[])
+    Tcl_Obj * Tcl_DuplicateObj(Tcl_Obj *objPtr)
 }
 declare 30 generic {
-    Tcl_Channel Tcl_CreateChannel(Tcl_ChannelType *typePtr, char *chanName, \
-	    ClientData instanceData, int mask)
+    void TclFreeObj(Tcl_Obj *objPtr)
 }
 declare 31 generic {
-    void Tcl_CreateChannelHandler(Tcl_Channel chan, int mask, \
-	    Tcl_ChannelProc *proc, ClientData clientData)
+    int Tcl_GetBoolean(Tcl_Interp *interp, char *string, int *boolPtr)
 }
 declare 32 generic {
-    void Tcl_CreateCloseHandler(Tcl_Channel chan, Tcl_CloseProc *proc, \
-	    ClientData clientData)
+    int Tcl_GetBooleanFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
+	    int *boolPtr)
 }
 declare 33 generic {
-    Tcl_Command Tcl_CreateCommand(Tcl_Interp *interp, char *cmdName, \
-	    Tcl_CmdProc *proc, ClientData clientData, \
-	    Tcl_CmdDeleteProc *deleteProc)
+    unsigned char * Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr, int *lengthPtr)
 }
 declare 34 generic {
-    void Tcl_CreateEventSource(Tcl_EventSetupProc *setupProc, \
-	    Tcl_EventCheckProc *checkProc, ClientData clientData)
+    int Tcl_GetDouble(Tcl_Interp *interp, char *string, double *doublePtr)
 }
 declare 35 generic {
-    void Tcl_CreateExitHandler(Tcl_ExitProc *proc, ClientData clientData)
+    int Tcl_GetDoubleFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
+	    double *doublePtr)
 }
 declare 36 generic {
-    Tcl_Interp * Tcl_CreateInterp(void)
+    int Tcl_GetIndexFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
+	    char **tablePtr, char *msg, int flags, int *indexPtr)
 }
 declare 37 generic {
-    void Tcl_CreateMathFunc(Tcl_Interp *interp, char *name, int numArgs, \
-	    Tcl_ValueType *argTypes, Tcl_MathProc *proc, ClientData clientData)
+    int Tcl_GetInt(Tcl_Interp *interp, char *string, int *intPtr)
 }
 declare 38 generic {
-    Tcl_Command Tcl_CreateObjCommand(Tcl_Interp *interp, char *cmdName, \
-	    Tcl_ObjCmdProc *proc, ClientData clientData, \
-	    Tcl_CmdDeleteProc *deleteProc)
+    int Tcl_GetIntFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, int *intPtr)
 }
 declare 39 generic {
-    Tcl_Interp * Tcl_CreateSlave(Tcl_Interp *interp, char *slaveName, \
-	    int isSafe)
+    int Tcl_GetLongFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, long *longPtr)
 }
 declare 40 generic {
-    Tcl_TimerToken Tcl_CreateTimerHandler(int milliseconds, \
-	    Tcl_TimerProc *proc, ClientData clientData)
+    Tcl_ObjType * Tcl_GetObjType(char *typeName)
 }
 declare 41 generic {
-    Tcl_Trace Tcl_CreateTrace(Tcl_Interp *interp, int level, \
-	    Tcl_CmdTraceProc *proc, ClientData clientData)
+    char * Tcl_GetStringFromObj(Tcl_Obj *objPtr, int *lengthPtr)
 }
 declare 42 generic {
-    char * Tcl_DbCkalloc(unsigned int size, char *file, int line)
+    void Tcl_InvalidateStringRep(Tcl_Obj *objPtr)
 }
 declare 43 generic {
-    int Tcl_DbCkfree(char *ptr, char *file, int line)
+    int Tcl_ListObjAppendList(Tcl_Interp *interp, Tcl_Obj *listPtr, \
+	    Tcl_Obj *elemListPtr)
 }
 declare 44 generic {
-    char * Tcl_DbCkrealloc(char *ptr, unsigned int size, char *file, int line)
+    int Tcl_ListObjAppendElement(Tcl_Interp *interp, Tcl_Obj *listPtr, \
+	    Tcl_Obj *objPtr)
 }
 declare 45 generic {
-    void Tcl_DbDecrRefCount(Tcl_Obj *objPtr, char *file, int line)
+    int Tcl_ListObjGetElements(Tcl_Interp *interp, Tcl_Obj *listPtr, \
+	    int *objcPtr, Tcl_Obj ***objvPtr)
 }
 declare 46 generic {
-    void Tcl_DbIncrRefCount(Tcl_Obj *objPtr, char *file, int line)
+    int Tcl_ListObjIndex(Tcl_Interp *interp, Tcl_Obj *listPtr, int index, \
+	    Tcl_Obj **objPtrPtr)
 }
 declare 47 generic {
-    int Tcl_DbIsShared(Tcl_Obj *objPtr, char *file, int line)
+    int Tcl_ListObjLength(Tcl_Interp *interp, Tcl_Obj *listPtr, int *intPtr)
 }
 declare 48 generic {
-    Tcl_Obj * Tcl_DbNewBooleanObj(int boolValue, char *file, int line)
+    int Tcl_ListObjReplace(Tcl_Interp *interp, Tcl_Obj *listPtr, int first, \
+	    int count, int objc, Tcl_Obj *CONST objv[])
 }
 declare 49 generic {
-    Tcl_Obj * Tcl_DbNewByteArrayObj(unsigned char *bytes, int length, \
-	    char *file, int line)
+    Tcl_Obj * Tcl_NewBooleanObj(int boolValue)
 }
 declare 50 generic {
-    Tcl_Obj * Tcl_DbNewDoubleObj(double doubleValue, char *file, int line)
+    Tcl_Obj * Tcl_NewByteArrayObj(unsigned char *bytes, int length)
 }
 declare 51 generic {
-    Tcl_Obj * Tcl_DbNewListObj(int objc, Tcl_Obj *CONST objv[], char *file, \
-	    int line)
+    Tcl_Obj * Tcl_NewDoubleObj(double doubleValue)
 }
 declare 52 generic {
-    Tcl_Obj * Tcl_DbNewLongObj(long longValue, char *file, int line)
+    Tcl_Obj * Tcl_NewIntObj(int intValue)
 }
 declare 53 generic {
-    Tcl_Obj * Tcl_DbNewObj(char *file, int line)
+    Tcl_Obj * Tcl_NewListObj(int objc, Tcl_Obj *CONST objv[])
 }
 declare 54 generic {
-    Tcl_Obj * Tcl_DbNewStringObj(CONST char *bytes, int length, \
-	    char *file, int line)
+    Tcl_Obj * Tcl_NewLongObj(long longValue)
 }
 declare 55 generic {
-    void Tcl_DeleteAssocData(Tcl_Interp *interp, char *name)
+    Tcl_Obj * Tcl_NewObj(void)
 }
 declare 56 generic {
-    int Tcl_DeleteCommand(Tcl_Interp *interp, char *cmdName)
+    Tcl_Obj *Tcl_NewStringObj(CONST char *bytes, int length)
 }
 declare 57 generic {
-    int Tcl_DeleteCommandFromToken(Tcl_Interp *interp, Tcl_Command command)
+    void Tcl_SetBooleanObj(Tcl_Obj *objPtr, int boolValue)
 }
 declare 58 generic {
-    void Tcl_DeleteChannelHandler(Tcl_Channel chan, Tcl_ChannelProc *proc, \
-	    ClientData clientData)
+    unsigned char * Tcl_SetByteArrayLength(Tcl_Obj *objPtr, int length)
 }
 declare 59 generic {
-    void Tcl_DeleteCloseHandler(Tcl_Channel chan, Tcl_CloseProc *proc, \
-	    ClientData clientData)
+    void Tcl_SetByteArrayObj(Tcl_Obj *objPtr, unsigned char *bytes, int length)
 }
 declare 60 generic {
-    void Tcl_DeleteEvents(Tcl_EventDeleteProc *proc, ClientData clientData)
+    void Tcl_SetDoubleObj(Tcl_Obj *objPtr, double doubleValue)
 }
 declare 61 generic {
-    void Tcl_DeleteEventSource(Tcl_EventSetupProc *setupProc, \
-	    Tcl_EventCheckProc *checkProc, ClientData clientData)
+    void Tcl_SetIntObj(Tcl_Obj *objPtr, int intValue)
 }
 declare 62 generic {
-    void Tcl_DeleteExitHandler(Tcl_ExitProc *proc, ClientData clientData)
+    void Tcl_SetListObj(Tcl_Obj *objPtr, int objc, Tcl_Obj *CONST objv[])
 }
 declare 63 generic {
-    void Tcl_DeleteHashEntry(Tcl_HashEntry *entryPtr)
+    void Tcl_SetLongObj(Tcl_Obj *objPtr, long longValue)
 }
 declare 64 generic {
-    void Tcl_DeleteHashTable(Tcl_HashTable *tablePtr)
+    void Tcl_SetObjLength(Tcl_Obj *objPtr, int length)
 }
 declare 65 generic {
-    void Tcl_DeleteInterp(Tcl_Interp *interp)
+    void Tcl_SetStringObj(Tcl_Obj *objPtr, char *bytes, int length)
 }
 declare 66 generic {
-    void Tcl_DeleteTimerHandler(Tcl_TimerToken token)
+    void Tcl_AddErrorInfo(Tcl_Interp *interp, CONST char *message)
 }
 declare 67 generic {
-    void Tcl_DeleteTrace(Tcl_Interp *interp, Tcl_Trace trace)
+    void Tcl_AddObjErrorInfo(Tcl_Interp *interp, CONST char *message, \
+	    int length)
 }
 declare 68 generic {
-    void Tcl_DetachPids(int numPids, Tcl_Pid *pidPtr)
+    void Tcl_AllowExceptions(Tcl_Interp *interp)
 }
 declare 69 generic {
-    void Tcl_DontCallWhenDeleted(Tcl_Interp *interp, \
-	    Tcl_InterpDeleteProc *proc, ClientData clientData)
+    void Tcl_AppendElement(Tcl_Interp *interp, CONST char *string)
 }
 declare 70 generic {
-    int Tcl_DoOneEvent(int flags)
+    void Tcl_AppendResult(Tcl_Interp *interp, ...)
 }
 declare 71 generic {
-    void Tcl_DoWhenIdle(Tcl_IdleProc *proc, ClientData clientData)
+    Tcl_AsyncHandler Tcl_AsyncCreate(Tcl_AsyncProc *proc, \
+	    ClientData clientData)
 }
 declare 72 generic {
-    char * Tcl_DStringAppend(Tcl_DString *dsPtr, CONST char *str, int length)
+    void Tcl_AsyncDelete(Tcl_AsyncHandler async)
 }
 declare 73 generic {
-    char * Tcl_DStringAppendElement(Tcl_DString *dsPtr, CONST char *str)
+    int Tcl_AsyncInvoke(Tcl_Interp *interp, int code)
 }
 declare 74 generic {
-    void Tcl_DStringEndSublist(Tcl_DString *dsPtr)
+    void Tcl_AsyncMark(Tcl_AsyncHandler async)
 }
 declare 75 generic {
-    void Tcl_DStringFree(Tcl_DString *dsPtr)
+    int Tcl_AsyncReady(void)
 }
 declare 76 generic {
-    void Tcl_DStringGetResult(Tcl_Interp *interp, Tcl_DString *dsPtr)
+    void Tcl_BackgroundError(Tcl_Interp *interp)
 }
 declare 77 generic {
-    void Tcl_DStringInit(Tcl_DString *dsPtr)
+    char Tcl_Backslash(CONST char *src, int *readPtr)
 }
 declare 78 generic {
-    void Tcl_DStringResult(Tcl_Interp *interp, Tcl_DString *dsPtr)
+    int Tcl_BadChannelOption(Tcl_Interp *interp, char *optionName, \
+	    char *optionList)
 }
 declare 79 generic {
-    void Tcl_DStringSetLength(Tcl_DString *dsPtr, int length)
+    void Tcl_CallWhenDeleted(Tcl_Interp *interp, Tcl_InterpDeleteProc *proc, \
+	    ClientData clientData)
 }
 declare 80 generic {
-    void Tcl_DStringStartSublist(Tcl_DString *dsPtr)
+    void Tcl_CancelIdleCall(Tcl_IdleProc *idleProc, ClientData clientData)
 }
 declare 81 generic {
-    int Tcl_DumpActiveMemory(char *fileName)
+    int Tcl_Close(Tcl_Interp *interp, Tcl_Channel chan)
 }
 declare 82 generic {
-    Tcl_Obj * Tcl_DuplicateObj(Tcl_Obj *objPtr)
+    int Tcl_CommandComplete(char *cmd)
 }
 declare 83 generic {
-    int Tcl_Eof(Tcl_Channel chan)
+    char * Tcl_Concat(int argc, char **argv)
 }
 declare 84 generic {
-    char * Tcl_ErrnoId(void)
+    int Tcl_ConvertElement(CONST char *src, char *dst, int flags)
 }
 declare 85 generic {
-    char * Tcl_ErrnoMsg(int err)
+    int Tcl_ConvertCountedElement(CONST char *src, int length, char *dst, \
+	    int flags)
 }
 declare 86 generic {
-    int Tcl_Eval(Tcl_Interp *interp, char *str)
+    int Tcl_CreateAlias(Tcl_Interp *slave, char *slaveCmd, \
+	    Tcl_Interp *target, char *targetCmd, int argc, char **argv)
 }
 declare 87 generic {
-    int Tcl_EvalFile(Tcl_Interp *interp, char *fileName)
+    int Tcl_CreateAliasObj(Tcl_Interp *slave, char *slaveCmd, \
+	    Tcl_Interp *target, char *targetCmd, int objc, \
+	    Tcl_Obj *CONST objv[])
 }
 declare 88 generic {
-    void Tcl_EventuallyFree(ClientData clientData, Tcl_FreeProc *freeProc)
+    Tcl_Channel Tcl_CreateChannel(Tcl_ChannelType *typePtr, char *chanName, \
+	    ClientData instanceData, int mask)
 }
 declare 89 generic {
-    int Tcl_EvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr)
+    void Tcl_CreateChannelHandler(Tcl_Channel chan, int mask, \
+	    Tcl_ChannelProc *proc, ClientData clientData)
 }
 declare 90 generic {
-    void Tcl_Exit(int status)
+    void Tcl_CreateCloseHandler(Tcl_Channel chan, Tcl_CloseProc *proc, \
+	    ClientData clientData)
 }
 declare 91 generic {
-    int Tcl_ExposeCommand(Tcl_Interp *interp, char *hiddenCmdToken, \
-	    char *cmdName)
+    Tcl_Command Tcl_CreateCommand(Tcl_Interp *interp, char *cmdName, \
+	    Tcl_CmdProc *proc, ClientData clientData, \
+	    Tcl_CmdDeleteProc *deleteProc)
 }
 declare 92 generic {
-    int Tcl_ExprBoolean(Tcl_Interp *interp, char *str, int *ptr)
+    void Tcl_CreateEventSource(Tcl_EventSetupProc *setupProc, \
+	    Tcl_EventCheckProc *checkProc, ClientData clientData)
 }
 declare 93 generic {
-    int Tcl_ExprBooleanObj(Tcl_Interp *interp, Tcl_Obj *objPtr, int *ptr)
+    void Tcl_CreateExitHandler(Tcl_ExitProc *proc, ClientData clientData)
 }
 declare 94 generic {
-    int Tcl_ExprDouble(Tcl_Interp *interp, char *str, double *ptr)
+    Tcl_Interp * Tcl_CreateInterp(void)
 }
 declare 95 generic {
-    int Tcl_ExprDoubleObj(Tcl_Interp *interp, Tcl_Obj *objPtr, double *ptr)
+    void Tcl_CreateMathFunc(Tcl_Interp *interp, char *name, int numArgs, \
+	    Tcl_ValueType *argTypes, Tcl_MathProc *proc, ClientData clientData)
 }
 declare 96 generic {
-    int Tcl_ExprLong(Tcl_Interp *interp, char *str, long *ptr)
+    Tcl_Command Tcl_CreateObjCommand(Tcl_Interp *interp, char *cmdName, \
+	    Tcl_ObjCmdProc *proc, ClientData clientData, \
+	    Tcl_CmdDeleteProc *deleteProc)
 }
 declare 97 generic {
-    int Tcl_ExprLongObj(Tcl_Interp *interp, Tcl_Obj *objPtr, long *ptr)
+    Tcl_Interp * Tcl_CreateSlave(Tcl_Interp *interp, char *slaveName, \
+	    int isSafe)
 }
 declare 98 generic {
-    int Tcl_ExprObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
-	    Tcl_Obj **resultPtrPtr)
+    Tcl_TimerToken Tcl_CreateTimerHandler(int milliseconds, \
+	    Tcl_TimerProc *proc, ClientData clientData)
 }
 declare 99 generic {
-    int Tcl_ExprString(Tcl_Interp *interp, char *str)
+    Tcl_Trace Tcl_CreateTrace(Tcl_Interp *interp, int level, \
+	    Tcl_CmdTraceProc *proc, ClientData clientData)
 }
 declare 100 generic {
-    void Tcl_Finalize(void)
+    void Tcl_DeleteAssocData(Tcl_Interp *interp, char *name)
 }
 declare 101 generic {
-    void Tcl_FindExecutable(CONST char *argv0)
+    void Tcl_DeleteChannelHandler(Tcl_Channel chan, Tcl_ChannelProc *proc, \
+	    ClientData clientData)
 }
 declare 102 generic {
-    Tcl_HashEntry * Tcl_FirstHashEntry(Tcl_HashTable *tablePtr, \
-	    Tcl_HashSearch *searchPtr)
+    void Tcl_DeleteCloseHandler(Tcl_Channel chan, Tcl_CloseProc *proc, \
+	    ClientData clientData)
 }
 declare 103 generic {
-    int Tcl_Flush(Tcl_Channel chan)
+    int Tcl_DeleteCommand(Tcl_Interp *interp, char *cmdName)
 }
 declare 104 generic {
-    void Tcl_Free(char *ptr)
+    int Tcl_DeleteCommandFromToken(Tcl_Interp *interp, Tcl_Command command)
 }
 declare 105 generic {
-    void TclFreeObj(Tcl_Obj *objPtr)
+    void Tcl_DeleteEvents(Tcl_EventDeleteProc *proc, ClientData clientData)
 }
 declare 106 generic {
-    void Tcl_FreeResult(Tcl_Interp *interp)
+    void Tcl_DeleteEventSource(Tcl_EventSetupProc *setupProc, \
+	    Tcl_EventCheckProc *checkProc, ClientData clientData)
 }
 declare 107 generic {
-    int Tcl_GetAlias(Tcl_Interp *interp, char *slaveCmd, \
-	    Tcl_Interp **targetInterpPtr, char **targetCmdPtr, int *argcPtr, char ***argvPtr)
+    void Tcl_DeleteExitHandler(Tcl_ExitProc *proc, ClientData clientData)
 }
 declare 108 generic {
-    int Tcl_GetAliasObj(Tcl_Interp *interp, char *slaveCmd, \
-	    Tcl_Interp **targetInterpPtr, char **targetCmdPtr, int *objcPtr, Tcl_Obj ***objv)
+    void Tcl_DeleteHashEntry(Tcl_HashEntry *entryPtr)
 }
 declare 109 generic {
-    ClientData Tcl_GetAssocData(Tcl_Interp *interp, char *name, \
-	    Tcl_InterpDeleteProc **procPtr)
+    void Tcl_DeleteHashTable(Tcl_HashTable *tablePtr)
 }
 declare 110 generic {
-    int Tcl_GetBoolean(Tcl_Interp *interp, char *str, int *boolPtr)
+    void Tcl_DeleteInterp(Tcl_Interp *interp)
 }
 declare 111 generic {
-    int Tcl_GetBooleanFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
-	    int *boolPtr)
+    void Tcl_DetachPids(int numPids, Tcl_Pid *pidPtr)
 }
 declare 112 generic {
-    unsigned char * Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr, int *lengthPtr)
+    void Tcl_DeleteTimerHandler(Tcl_TimerToken token)
 }
 declare 113 generic {
-    Tcl_Channel Tcl_GetChannel(Tcl_Interp *interp, char *chanName, \
-	    int *modePtr)
+    void Tcl_DeleteTrace(Tcl_Interp *interp, Tcl_Trace trace)
 }
 declare 114 generic {
-    int Tcl_GetChannelBufferSize(Tcl_Channel chan)
+    void Tcl_DontCallWhenDeleted(Tcl_Interp *interp, \
+	    Tcl_InterpDeleteProc *proc, ClientData clientData)
 }
 declare 115 generic {
-    int Tcl_GetChannelHandle(Tcl_Channel chan, int direction, \
-	    ClientData *handlePtr)
+    int Tcl_DoOneEvent(int flags)
 }
 declare 116 generic {
-    ClientData Tcl_GetChannelInstanceData(Tcl_Channel chan)
+    void Tcl_DoWhenIdle(Tcl_IdleProc *proc, ClientData clientData)
 }
 declare 117 generic {
-    int Tcl_GetChannelMode(Tcl_Channel chan)
+    char * Tcl_DStringAppend(Tcl_DString *dsPtr, CONST char *string, \
+	    int length)
 }
 declare 118 generic {
-    char * Tcl_GetChannelName(Tcl_Channel chan)
+    char * Tcl_DStringAppendElement(Tcl_DString *dsPtr, CONST char *string)
 }
 declare 119 generic {
-    int Tcl_GetChannelOption(Tcl_Interp *interp, Tcl_Channel chan, \
-	    char *optionName, Tcl_DString *dsPtr)
+    void Tcl_DStringEndSublist(Tcl_DString *dsPtr)
 }
 declare 120 generic {
-    Tcl_ChannelType * Tcl_GetChannelType(Tcl_Channel chan)
+    void Tcl_DStringFree(Tcl_DString *dsPtr)
 }
 declare 121 generic {
-    int Tcl_GetCommandInfo(Tcl_Interp *interp, char *cmdName, \
-	    Tcl_CmdInfo *infoPtr)
+    void Tcl_DStringGetResult(Tcl_Interp *interp, Tcl_DString *dsPtr)
 }
 declare 122 generic {
-    char * Tcl_GetCommandName(Tcl_Interp *interp, Tcl_Command command)
+    void Tcl_DStringInit(Tcl_DString *dsPtr)
 }
 declare 123 generic {
-    int Tcl_GetDouble(Tcl_Interp *interp, char *str, double *doublePtr)
+    void Tcl_DStringResult(Tcl_Interp *interp, Tcl_DString *dsPtr)
 }
 declare 124 generic {
-    int Tcl_GetDoubleFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
-	    double *doublePtr)
+    void Tcl_DStringSetLength(Tcl_DString *dsPtr, int length)
 }
 declare 125 generic {
-    int Tcl_GetErrno(void)
+    void Tcl_DStringStartSublist(Tcl_DString *dsPtr)
 }
 declare 126 generic {
-    char * Tcl_GetHostName(void)
+    int Tcl_Eof(Tcl_Channel chan)
 }
 declare 127 generic {
-    int Tcl_GetIndexFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
-	    char **tablePtr, char *msg, int flags, int *indexPtr)
+    char * Tcl_ErrnoId(void)
 }
 declare 128 generic {
-    int Tcl_GetInt(Tcl_Interp *interp, char *str, int *intPtr)
+    char * Tcl_ErrnoMsg(int err)
 }
 declare 129 generic {
-    int Tcl_GetInterpPath(Tcl_Interp *askInterp, Tcl_Interp *slaveInterp)
+    int Tcl_Eval(Tcl_Interp *interp, char *string)
 }
 declare 130 generic {
-    int Tcl_GetIntFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, int *intPtr)
+    int Tcl_EvalFile(Tcl_Interp *interp, char *fileName)
 }
 declare 131 generic {
-    int Tcl_GetLongFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, long *longPtr)
+    int Tcl_EvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr)
 }
 declare 132 generic {
-    Tcl_Interp * Tcl_GetMaster(Tcl_Interp *interp)
+    void Tcl_EventuallyFree(ClientData clientData, Tcl_FreeProc *freeProc)
 }
 declare 133 generic {
-    CONST char * Tcl_GetNameOfExecutable(void)
+    void Tcl_Exit(int status)
 }
 declare 134 generic {
-    Tcl_Obj * Tcl_GetObjResult(Tcl_Interp *interp)
+    int Tcl_ExposeCommand(Tcl_Interp *interp, char *hiddenCmdToken, \
+	    char *cmdName)
 }
 declare 135 generic {
-    Tcl_ObjType * Tcl_GetObjType(char *typeName)
+    int Tcl_ExprBoolean(Tcl_Interp *interp, char *string, int *ptr)
 }
 declare 136 generic {
-    Tcl_PathType Tcl_GetPathType(char *path)
+    int Tcl_ExprBooleanObj(Tcl_Interp *interp, Tcl_Obj *objPtr, int *ptr)
 }
 declare 137 generic {
-    int Tcl_Gets(Tcl_Channel chan, Tcl_DString *dsPtr)
+    int Tcl_ExprDouble(Tcl_Interp *interp, char *string, double *ptr)
 }
 declare 138 generic {
-    int Tcl_GetsObj(Tcl_Channel chan, Tcl_Obj *objPtr)
+    int Tcl_ExprDoubleObj(Tcl_Interp *interp, Tcl_Obj *objPtr, double *ptr)
 }
 declare 139 generic {
-    int Tcl_GetServiceMode(void)
+    int Tcl_ExprLong(Tcl_Interp *interp, char *string, long *ptr)
 }
 declare 140 generic {
-    Tcl_Interp * Tcl_GetSlave(Tcl_Interp *interp, char *slaveName)
+    int Tcl_ExprLongObj(Tcl_Interp *interp, Tcl_Obj *objPtr, long *ptr)
 }
 declare 141 generic {
-    Tcl_Channel Tcl_GetStdChannel(int type)
+    int Tcl_ExprObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \
+	    Tcl_Obj **resultPtrPtr)
 }
 declare 142 generic {
-    char * Tcl_GetStringFromObj(Tcl_Obj *objPtr, int *lengthPtr)
+    int Tcl_ExprString(Tcl_Interp *interp, char *string)
 }
 declare 143 generic {
-    char * Tcl_GetStringResult(Tcl_Interp *interp)
+    void Tcl_Finalize(void)
 }
 declare 144 generic {
-    char * Tcl_GetVar(Tcl_Interp *interp, char *varName, int flags)
+    void Tcl_FindExecutable(CONST char *argv0)
 }
 declare 145 generic {
-    char * Tcl_GetVar2(Tcl_Interp *interp, char *part1, char *part2, int flags)
+    Tcl_HashEntry * Tcl_FirstHashEntry(Tcl_HashTable *tablePtr, \
+	    Tcl_HashSearch *searchPtr)
 }
 declare 146 generic {
-    int Tcl_GlobalEval(Tcl_Interp *interp, char *command)
+    int Tcl_Flush(Tcl_Channel chan)
 }
 declare 147 generic {
-    int Tcl_GlobalEvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr)
+    void Tcl_FreeResult(Tcl_Interp *interp)
 }
 declare 148 generic {
-    char * Tcl_HashStats(Tcl_HashTable *tablePtr)
+    int Tcl_GetAlias(Tcl_Interp *interp, char *slaveCmd, \
+	    Tcl_Interp **targetInterpPtr, char **targetCmdPtr, int *argcPtr, \
+	    char ***argvPtr)
 }
 declare 149 generic {
-    int Tcl_HideCommand(Tcl_Interp *interp, char *cmdName, \
-	    char *hiddenCmdToken)
+    int Tcl_GetAliasObj(Tcl_Interp *interp, char *slaveCmd, \
+	    Tcl_Interp **targetInterpPtr, char **targetCmdPtr, int *objcPtr, \
+	    Tcl_Obj ***objv)
 }
 declare 150 generic {
-    int Tcl_Init(Tcl_Interp *interp)
+    ClientData Tcl_GetAssocData(Tcl_Interp *interp, char *name, \
+	    Tcl_InterpDeleteProc **procPtr)
 }
 declare 151 generic {
-    void Tcl_InitHashTable(Tcl_HashTable *tablePtr, int keyType)
+    Tcl_Channel Tcl_GetChannel(Tcl_Interp *interp, char *chanName, \
+	    int *modePtr)
 }
 declare 152 generic {
-    void Tcl_InitMemory(Tcl_Interp *interp)
+    int Tcl_GetChannelBufferSize(Tcl_Channel chan)
 }
 declare 153 generic {
-    int Tcl_InputBlocked(Tcl_Channel chan)
+    int Tcl_GetChannelHandle(Tcl_Channel chan, int direction, \
+	    ClientData *handlePtr)
 }
 declare 154 generic {
-    int Tcl_InputBuffered(Tcl_Channel chan)
+    ClientData Tcl_GetChannelInstanceData(Tcl_Channel chan)
 }
 declare 155 generic {
-    int Tcl_InterpDeleted(Tcl_Interp *interp)
+    int Tcl_GetChannelMode(Tcl_Channel chan)
 }
 declare 156 generic {
-    int Tcl_IsSafe(Tcl_Interp *interp)
+    char * Tcl_GetChannelName(Tcl_Channel chan)
 }
 declare 157 generic {
-    void Tcl_InvalidateStringRep(Tcl_Obj *objPtr)
+    int Tcl_GetChannelOption(Tcl_Interp *interp, Tcl_Channel chan, \
+	    char *optionName, Tcl_DString *dsPtr)
 }
 declare 158 generic {
-    char * Tcl_JoinPath(int argc, char **argv, Tcl_DString *resultPtr)
+    Tcl_ChannelType * Tcl_GetChannelType(Tcl_Channel chan)
 }
 declare 159 generic {
-    int Tcl_LinkVar(Tcl_Interp *interp, char *varName, char *addr, int type)
+    int Tcl_GetCommandInfo(Tcl_Interp *interp, char *cmdName, \
+	    Tcl_CmdInfo *infoPtr)
 }
 declare 160 generic {
-    int Tcl_ListObjAppendList(Tcl_Interp *interp, Tcl_Obj *listPtr, \
-	    Tcl_Obj *elemListPtr)
+    char * Tcl_GetCommandName(Tcl_Interp *interp, Tcl_Command command)
 }
 declare 161 generic {
-    int Tcl_ListObjAppendElement(Tcl_Interp *interp, Tcl_Obj *listPtr, \
-	    Tcl_Obj *objPtr)
+    int Tcl_GetErrno(void)
 }
 declare 162 generic {
-    int Tcl_ListObjGetElements(Tcl_Interp *interp, Tcl_Obj *listPtr, \
-	    int *objcPtr, Tcl_Obj ***objvPtr)
+    char * Tcl_GetHostName(void)
 }
 declare 163 generic {
-    int Tcl_ListObjIndex(Tcl_Interp *interp, Tcl_Obj *listPtr, int index, \
-	    Tcl_Obj **objPtrPtr)
+    int Tcl_GetInterpPath(Tcl_Interp *askInterp, Tcl_Interp *slaveInterp)
 }
 declare 164 generic {
-    int Tcl_ListObjLength(Tcl_Interp *interp, Tcl_Obj *listPtr, int *intPtr)
+    Tcl_Interp * Tcl_GetMaster(Tcl_Interp *interp)
 }
 declare 165 generic {
-    int Tcl_ListObjReplace(Tcl_Interp *interp, Tcl_Obj *listPtr, int first, \
-	    int count, int objc, Tcl_Obj *CONST objv[])
+    CONST char * Tcl_GetNameOfExecutable(void)
 }
 declare 166 generic {
-    Tcl_Channel Tcl_MakeFileChannel(ClientData handle, int mode)
+    Tcl_Obj * Tcl_GetObjResult(Tcl_Interp *interp)
 }
-declare 167 generic {
-    int Tcl_MakeSafe(Tcl_Interp *interp)
+
+# Tcl_GetOpenFile is only available on unix, but it is a part of the old
+# generic interface, so we inlcude it here for compatibility reasons.
+
+declare 167 unix {
+    int Tcl_GetOpenFile(Tcl_Interp *interp, char *string, int write, \
+	    int checkUsage, ClientData *filePtr)
 }
+
 declare 168 generic {
-    Tcl_Channel Tcl_MakeTcpClientChannel(ClientData tcpSocket)
+    Tcl_PathType Tcl_GetPathType(char *path)
 }
 declare 169 generic {
-    char * Tcl_Merge(int argc, char **argv)
+    int Tcl_Gets(Tcl_Channel chan, Tcl_DString *dsPtr)
 }
 declare 170 generic {
-    Tcl_Obj * Tcl_NewBooleanObj(int boolValue)
+    int Tcl_GetsObj(Tcl_Channel chan, Tcl_Obj *objPtr)
 }
 declare 171 generic {
-    Tcl_Obj * Tcl_NewByteArrayObj(unsigned char *bytes, int length)
+    int Tcl_GetServiceMode(void)
 }
 declare 172 generic {
-    Tcl_Obj * Tcl_NewDoubleObj(double doubleValue)
+    Tcl_Interp * Tcl_GetSlave(Tcl_Interp *interp, char *slaveName)
 }
 declare 173 generic {
-    Tcl_Obj * Tcl_NewIntObj(int intValue)
+    Tcl_Channel Tcl_GetStdChannel(int type)
 }
 declare 174 generic {
-    Tcl_Obj * Tcl_NewListObj(int objc, Tcl_Obj *CONST objv[])
+    char * Tcl_GetStringResult(Tcl_Interp *interp)
 }
 declare 175 generic {
-    Tcl_Obj * Tcl_NewLongObj(long longValue)
+    char * Tcl_GetVar(Tcl_Interp *interp, char *varName, int flags)
 }
 declare 176 generic {
-    Tcl_Obj * Tcl_NewObj(void)
+    char * Tcl_GetVar2(Tcl_Interp *interp, char *part1, char *part2, int flags)
 }
 declare 177 generic {
-    Tcl_Obj *Tcl_NewStringObj(CONST char *bytes, int length)
+    int Tcl_GlobalEval(Tcl_Interp *interp, char *command)
 }
 declare 178 generic {
-    Tcl_HashEntry * Tcl_NextHashEntry(Tcl_HashSearch *searchPtr)
+    int Tcl_GlobalEvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr)
 }
 declare 179 generic {
-    void Tcl_NotifyChannel(Tcl_Channel channel, int mask)
+    int Tcl_HideCommand(Tcl_Interp *interp, char *cmdName, \
+	    char *hiddenCmdToken)
 }
 declare 180 generic {
-    Tcl_Obj * Tcl_ObjGetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr, \
-	    Tcl_Obj *part2Ptr, int flags)
+    int Tcl_Init(Tcl_Interp *interp)
 }
 declare 181 generic {
-    Tcl_Obj * Tcl_ObjSetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr, \
-	    Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, int flags)
+    void Tcl_InitHashTable(Tcl_HashTable *tablePtr, int keyType)
 }
 declare 182 generic {
-    Tcl_Channel Tcl_OpenCommandChannel(Tcl_Interp *interp, int argc, \
-	    char **argv, int flags)
+    int Tcl_InputBlocked(Tcl_Channel chan)
 }
 declare 183 generic {
-    Tcl_Channel Tcl_OpenFileChannel(Tcl_Interp *interp, char *fileName, \
-	    char *modeString, int permissions)
+    int Tcl_InputBuffered(Tcl_Channel chan)
 }
 declare 184 generic {
-    Tcl_Channel Tcl_OpenTcpClient(Tcl_Interp *interp, int port, \
-	    char *address, char *myaddr, int myport, int async)
+    int Tcl_InterpDeleted(Tcl_Interp *interp)
 }
 declare 185 generic {
-    Tcl_Channel Tcl_OpenTcpServer(Tcl_Interp *interp, int port, char *host, \
-	    Tcl_TcpAcceptProc *acceptProc, ClientData callbackData)
+    int Tcl_IsSafe(Tcl_Interp *interp)
 }
 declare 186 generic {
-    void panic(char *format, ...)
+    char * Tcl_JoinPath(int argc, char **argv, Tcl_DString *resultPtr)
 }
 declare 187 generic {
-    void panicVA(char *format, va_list argList)
-}
-declare 188 generic {
-    char * Tcl_ParseVar(Tcl_Interp *interp, char *str, char **termPtr)
+    int Tcl_LinkVar(Tcl_Interp *interp, char *varName, char *addr, int type)
 }
+
+# This slot is reserved for use by the plus patch:
+#  declare 188 generic {
+#      Tcl_MainLoop
+#  }
+
 declare 189 generic {
-    char * Tcl_PkgPresent(Tcl_Interp *interp, char *name, char *version, \
-	    int exact)
+    Tcl_Channel Tcl_MakeFileChannel(ClientData handle, int mode)
 }
 declare 190 generic {
-    char * Tcl_PkgPresentEx(Tcl_Interp *interp, char *name, char *version, \
-	    int exact, ClientData *clientDataPtr)
+    int Tcl_MakeSafe(Tcl_Interp *interp)
 }
 declare 191 generic {
-    int Tcl_PkgProvide(Tcl_Interp *interp, char *name, char *version)
+    Tcl_Channel Tcl_MakeTcpClientChannel(ClientData tcpSocket)
 }
 declare 192 generic {
-    int Tcl_PkgProvideEx(Tcl_Interp *interp, char *name, char *version, \
-	    ClientData clientData)
+    char * Tcl_Merge(int argc, char **argv)
 }
 declare 193 generic {
-    char * Tcl_PkgRequire(Tcl_Interp *interp, char *name, char *version, \
-	    int exact)
+    Tcl_HashEntry * Tcl_NextHashEntry(Tcl_HashSearch *searchPtr)
 }
 declare 194 generic {
-    char * Tcl_PkgRequireEx(Tcl_Interp *interp, char *name, char *version, \
-	    int exact, ClientData *clientDataPtr)
+    void Tcl_NotifyChannel(Tcl_Channel channel, int mask)
 }
 declare 195 generic {
-    char * Tcl_PosixError(Tcl_Interp *interp)
+    Tcl_Obj * Tcl_ObjGetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr, \
+	    Tcl_Obj *part2Ptr, int flags)
 }
 declare 196 generic {
-    void Tcl_Preserve(ClientData data)
+    Tcl_Obj * Tcl_ObjSetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr, \
+	    Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, int flags)
 }
 declare 197 generic {
-    void Tcl_PrintDouble(Tcl_Interp *interp, double value, char *dst)
+    Tcl_Channel Tcl_OpenCommandChannel(Tcl_Interp *interp, int argc, \
+	    char **argv, int flags)
 }
 declare 198 generic {
-    int Tcl_PutEnv(CONST char *str)
+    Tcl_Channel Tcl_OpenFileChannel(Tcl_Interp *interp, char *fileName, \
+	    char *modeString, int permissions)
 }
 declare 199 generic {
-    void Tcl_QueueEvent(Tcl_Event *evPtr, Tcl_QueuePosition position)
+    Tcl_Channel Tcl_OpenTcpClient(Tcl_Interp *interp, int port, \
+	    char *address, char *myaddr, int myport, int async)
 }
 declare 200 generic {
-    int Tcl_Read(Tcl_Channel chan, char *bufPtr, int toRead)
+    Tcl_Channel Tcl_OpenTcpServer(Tcl_Interp *interp, int port, char *host, \
+	    Tcl_TcpAcceptProc *acceptProc, ClientData callbackData)
 }
 declare 201 generic {
-    char * Tcl_Realloc(char *ptr, unsigned int size)
+    void Tcl_Preserve(ClientData data)
 }
 declare 202 generic {
-    void Tcl_ReapDetachedProcs(void)
+    void Tcl_PrintDouble(Tcl_Interp *interp, double value, char *dst)
 }
 declare 203 generic {
-    int Tcl_RecordAndEval(Tcl_Interp *interp, char *cmd, int flags)
+    int Tcl_PutEnv(CONST char *string)
 }
 declare 204 generic {
-    int Tcl_RecordAndEvalObj(Tcl_Interp *interp, Tcl_Obj *cmdPtr, int flags)
+    char * Tcl_PosixError(Tcl_Interp *interp)
 }
 declare 205 generic {
-    Tcl_RegExp Tcl_RegExpCompile(Tcl_Interp *interp, char *str)
+    void Tcl_QueueEvent(Tcl_Event *evPtr, Tcl_QueuePosition position)
 }
 declare 206 generic {
-    int Tcl_RegExpExec(Tcl_Interp *interp, Tcl_RegExp regexp, \
-	    CONST char *str, CONST char *start)
+    int Tcl_Read(Tcl_Channel chan, char *bufPtr, int toRead)
 }
 declare 207 generic {
-    int Tcl_RegExpMatch(Tcl_Interp *interp, char *str, char *pattern)
+    void Tcl_ReapDetachedProcs(void)
 }
 declare 208 generic {
-    void Tcl_RegExpRange(Tcl_RegExp regexp, int index, char **startPtr, \
-	    char **endPtr)
+    int Tcl_RecordAndEval(Tcl_Interp *interp, char *cmd, int flags)
 }
 declare 209 generic {
-    void Tcl_RegisterChannel(Tcl_Interp *interp, Tcl_Channel chan)
+    int Tcl_RecordAndEvalObj(Tcl_Interp *interp, Tcl_Obj *cmdPtr, int flags)
 }
 declare 210 generic {
-    void Tcl_RegisterObjType(Tcl_ObjType *typePtr)
+    void Tcl_RegisterChannel(Tcl_Interp *interp, Tcl_Channel chan)
 }
 declare 211 generic {
-    void Tcl_Release(ClientData clientData)
+    void Tcl_RegisterObjType(Tcl_ObjType *typePtr)
 }
 declare 212 generic {
-    void Tcl_ResetResult(Tcl_Interp *interp)
+    Tcl_RegExp Tcl_RegExpCompile(Tcl_Interp *interp, char *string)
 }
 declare 213 generic {
-    int Tcl_ScanCountedElement(CONST char *str, int length, int *flagPtr)
+    int Tcl_RegExpExec(Tcl_Interp *interp, Tcl_RegExp regexp, \
+	    CONST char *string, CONST char *start)
 }
 declare 214 generic {
-    int Tcl_ScanElement(CONST char *str, int *flagPtr)
+    int Tcl_RegExpMatch(Tcl_Interp *interp, char *string, char *pattern)
 }
 declare 215 generic {
-    int Tcl_Seek(Tcl_Channel chan, int offset, int mode)
+    void Tcl_RegExpRange(Tcl_RegExp regexp, int index, char **startPtr, \
+	    char **endPtr)
 }
 declare 216 generic {
-    int Tcl_ServiceAll(void)
+    void Tcl_Release(ClientData clientData)
 }
 declare 217 generic {
-    int Tcl_ServiceEvent(int flags)
+    void Tcl_ResetResult(Tcl_Interp *interp)
 }
 declare 218 generic {
-    void Tcl_SetAssocData(Tcl_Interp *interp, char *name, \
-	    Tcl_InterpDeleteProc *proc, ClientData clientData)
+    int Tcl_ScanElement(CONST char *string, int *flagPtr)
 }
 declare 219 generic {
-    void Tcl_SetBooleanObj(Tcl_Obj *objPtr,  int boolValue)
+    int Tcl_ScanCountedElement(CONST char *string, int length, int *flagPtr)
 }
 declare 220 generic {
-    unsigned char * Tcl_SetByteArrayLength(Tcl_Obj *objPtr, int length)
+    int Tcl_Seek(Tcl_Channel chan, int offset, int mode)
 }
 declare 221 generic {
-    void Tcl_SetByteArrayObj(Tcl_Obj *objPtr, unsigned char *bytes, int length)
+    int Tcl_ServiceAll(void)
 }
 declare 222 generic {
-    void Tcl_SetChannelBufferSize(Tcl_Channel chan, int sz)
+    int Tcl_ServiceEvent(int flags)
 }
 declare 223 generic {
-    int Tcl_SetChannelOption(Tcl_Interp *interp, Tcl_Channel chan, \
-	    char *optionName, char *newValue)
+    void Tcl_SetAssocData(Tcl_Interp *interp, char *name, \
+	    Tcl_InterpDeleteProc *proc, ClientData clientData)
 }
 declare 224 generic {
-    int Tcl_SetCommandInfo(Tcl_Interp *interp, char *cmdName, \
-	    Tcl_CmdInfo *infoPtr)
+    void Tcl_SetChannelBufferSize(Tcl_Channel chan, int sz)
 }
 declare 225 generic {
-    void Tcl_SetDoubleObj(Tcl_Obj *objPtr, double doubleValue)
+    int Tcl_SetChannelOption(Tcl_Interp *interp, Tcl_Channel chan, \
+	    char *optionName, char *newValue)
 }
 declare 226 generic {
-    void Tcl_SetErrno(int err)
+    int Tcl_SetCommandInfo(Tcl_Interp *interp, char *cmdName, \
+	    Tcl_CmdInfo *infoPtr)
 }
 declare 227 generic {
-    void Tcl_SetErrorCode(Tcl_Interp *interp, ...)
+    void Tcl_SetErrno(int err)
 }
 declare 228 generic {
-    void Tcl_SetErrorCodeVA(Tcl_Interp *interp, va_list argList)
+    void Tcl_SetErrorCode(Tcl_Interp *interp, ...)
 }
 declare 229 generic {
-    void Tcl_SetIntObj(Tcl_Obj *objPtr,  int intValue)
+    void Tcl_SetMaxBlockTime(Tcl_Time *timePtr)
 }
 declare 230 generic {
-    void Tcl_SetListObj(Tcl_Obj *objPtr,  int objc, Tcl_Obj *CONST objv[])
+    void Tcl_SetPanicProc(Tcl_PanicProc *panicProc)
 }
 declare 231 generic {
-    void Tcl_SetLongObj(Tcl_Obj *objPtr,  long longValue)
+    int Tcl_SetRecursionLimit(Tcl_Interp *interp, int depth)
 }
 declare 232 generic {
-    void Tcl_SetMaxBlockTime(Tcl_Time *timePtr)
+    void Tcl_SetResult(Tcl_Interp *interp, char *string, \
+	    Tcl_FreeProc *freeProc)
 }
 declare 233 generic {
-    void Tcl_SetObjErrorCode(Tcl_Interp *interp, Tcl_Obj *errorObjPtr)
+    int Tcl_SetServiceMode(int mode)
 }
 declare 234 generic {
-    void Tcl_SetObjLength(Tcl_Obj *objPtr, int length)
+    void Tcl_SetObjErrorCode(Tcl_Interp *interp, Tcl_Obj *errorObjPtr)
 }
 declare 235 generic {
     void Tcl_SetObjResult(Tcl_Interp *interp, Tcl_Obj *resultObjPtr)
 }
 declare 236 generic {
-    void Tcl_SetPanicProc(Tcl_PanicProc *panicProc)
+    void Tcl_SetStdChannel(Tcl_Channel channel, int type)
 }
 declare 237 generic {
-    int Tcl_SetRecursionLimit(Tcl_Interp *interp, int depth)
+    char * Tcl_SetVar(Tcl_Interp *interp, char *varName, char *newValue, \
+	    int flags)
 }
 declare 238 generic {
-    void Tcl_SetResult(Tcl_Interp *interp, char *str, \
-	    Tcl_FreeProc *freeProc)
+    char * Tcl_SetVar2(Tcl_Interp *interp, char *part1, char *part2, \
+	    char *newValue, int flags)
 }
 declare 239 generic {
-    int Tcl_SetServiceMode(int mode)
+    char * Tcl_SignalId(int sig)
 }
 declare 240 generic {
-    void Tcl_SetStdChannel(Tcl_Channel channel, int type)
+    char * Tcl_SignalMsg(int sig)
 }
 declare 241 generic {
-    void Tcl_SetStringObj(Tcl_Obj *objPtr,  char *bytes, int length)
+    void Tcl_SourceRCFile(Tcl_Interp *interp)
 }
 declare 242 generic {
-    void Tcl_SetTimer(Tcl_Time *timePtr)
+    int Tcl_SplitList(Tcl_Interp *interp, CONST char *list, int *argcPtr, \
+	    char ***argvPtr)
 }
 declare 243 generic {
-    char * Tcl_SetVar(Tcl_Interp *interp, char *varName, char *newValue, \
-	    int flags)
+    void Tcl_SplitPath(CONST char *path, int *argcPtr, char ***argvPtr)
 }
 declare 244 generic {
-    char * Tcl_SetVar2(Tcl_Interp *interp, char *part1, char *part2, \
-	    char *newValue, int flags)
+    void Tcl_StaticPackage(Tcl_Interp *interp, char *pkgName, \
+	    Tcl_PackageInitProc *initProc, Tcl_PackageInitProc *safeInitProc)
 }
 declare 245 generic {
-    char * Tcl_SignalId(int sig)
+    int Tcl_StringMatch(CONST char *string, CONST char *pattern)
 }
 declare 246 generic {
-    char * Tcl_SignalMsg(int sig)
+    int Tcl_Tell(Tcl_Channel chan)
 }
 declare 247 generic {
-    void Tcl_Sleep(int ms)
+    int Tcl_TraceVar(Tcl_Interp *interp, char *varName, int flags, \
+	    Tcl_VarTraceProc *proc, ClientData clientData)
 }
 declare 248 generic {
-    void Tcl_SourceRCFile(Tcl_Interp *interp)
+    int Tcl_TraceVar2(Tcl_Interp *interp, char *part1, char *part2, \
+	    int flags, Tcl_VarTraceProc *proc, ClientData clientData)
 }
 declare 249 generic {
-    int Tcl_SplitList(Tcl_Interp *interp, CONST char *listStr, int *argcPtr, \
-	    char ***argvPtr)
+    char * Tcl_TranslateFileName(Tcl_Interp *interp, char *name, \
+	    Tcl_DString *bufferPtr)
 }
 declare 250 generic {
-    void Tcl_SplitPath(CONST char *path, int *argcPtr, char ***argvPtr)
+    int Tcl_Ungets(Tcl_Channel chan, char *str, int len, int atHead)
 }
 declare 251 generic {
-    void Tcl_StaticPackage(Tcl_Interp *interp, char *pkgName, \
-	    Tcl_PackageInitProc *initProc, Tcl_PackageInitProc *safeInitProc)
+    void Tcl_UnlinkVar(Tcl_Interp *interp, char *varName)
 }
 declare 252 generic {
-    int Tcl_StringMatch(CONST char *str, CONST char *pattern)
+    int Tcl_UnregisterChannel(Tcl_Interp *interp, Tcl_Channel chan)
 }
 declare 253 generic {
-    int Tcl_Tell(Tcl_Channel chan)
+    int Tcl_UnsetVar(Tcl_Interp *interp, char *varName, int flags)
 }
 declare 254 generic {
-    int Tcl_TraceVar(Tcl_Interp *interp, char *varName, int flags, \
-	    Tcl_VarTraceProc *proc, ClientData clientData)
+    int Tcl_UnsetVar2(Tcl_Interp *interp, char *part1, char *part2, int flags)
 }
 declare 255 generic {
-    int Tcl_TraceVar2(Tcl_Interp *interp, char *part1, char *part2, \
-	    int flags, Tcl_VarTraceProc *proc, ClientData clientData)
+    void Tcl_UntraceVar(Tcl_Interp *interp, char *varName, int flags, \
+	    Tcl_VarTraceProc *proc, ClientData clientData)
 }
 declare 256 generic {
-    char * Tcl_TranslateFileName(Tcl_Interp *interp, char *name, \
-	    Tcl_DString *bufferPtr)
+    void Tcl_UntraceVar2(Tcl_Interp *interp, char *part1, char *part2, \
+	    int flags, Tcl_VarTraceProc *proc, ClientData clientData)
 }
 declare 257 generic {
-    int Tcl_Ungets(Tcl_Channel chan, char *str, int len, int atHead)
+    void Tcl_UpdateLinkedVar(Tcl_Interp *interp, char *varName)
 }
 declare 258 generic {
-    void Tcl_UnlinkVar(Tcl_Interp *interp, char *varName)
+    int Tcl_UpVar(Tcl_Interp *interp, char *frameName, char *varName, \
+	    char *localName, int flags)
 }
 declare 259 generic {
-    int Tcl_UnregisterChannel(Tcl_Interp *interp, Tcl_Channel chan)
+    int Tcl_UpVar2(Tcl_Interp *interp, char *frameName, char *part1, \
+	    char *part2, char *localName, int flags)
 }
 declare 260 generic {
-    int Tcl_UnsetVar(Tcl_Interp *interp, char *varName, int flags)
+    int Tcl_VarEval(Tcl_Interp *interp, ...)
 }
 declare 261 generic {
-    int Tcl_UnsetVar2(Tcl_Interp *interp, char *part1, char *part2, int flags)
+    ClientData Tcl_VarTraceInfo(Tcl_Interp *interp, char *varName, \
+	    int flags, Tcl_VarTraceProc *procPtr, ClientData prevClientData)
 }
 declare 262 generic {
-    void Tcl_UntraceVar(Tcl_Interp *interp, char *varName, int flags, \
-	    Tcl_VarTraceProc *proc, ClientData clientData)
+    ClientData Tcl_VarTraceInfo2(Tcl_Interp *interp, char *part1, \
+	    char *part2, int flags, Tcl_VarTraceProc *procPtr, \
+	    ClientData prevClientData)
 }
 declare 263 generic {
-    void Tcl_UntraceVar2(Tcl_Interp *interp, char *part1, char *part2, \
-	    int flags, Tcl_VarTraceProc *proc, ClientData clientData)
+    int Tcl_Write(Tcl_Channel chan, char *s, int slen)
 }
 declare 264 generic {
-    void Tcl_UpdateLinkedVar(Tcl_Interp *interp, char *varName)
+    void Tcl_WrongNumArgs(Tcl_Interp *interp, int objc, \
+	    Tcl_Obj *CONST objv[], char *message)
 }
 declare 265 generic {
-    int Tcl_UpVar(Tcl_Interp *interp, char *frameName, char *varName, \
-	    char *localName, int flags)
+    int Tcl_DumpActiveMemory(char *fileName)
 }
 declare 266 generic {
-    int Tcl_UpVar2(Tcl_Interp *interp, char *frameName, char *part1, \
-	    char *part2, char *localName, int flags)
+    void Tcl_ValidateAllMemory(char *file, int line)
 }
 declare 267 generic {
-    void Tcl_ValidateAllMemory(char *file, int line)
+    void Tcl_AppendResultVA(Tcl_Interp *interp, va_list argList)
 }
 declare 268 generic {
-    int Tcl_VarEval(Tcl_Interp *interp, ...)
+    void Tcl_AppendStringsToObjVA(Tcl_Obj *objPtr, va_list argList)
 }
 declare 269 generic {
-    int  Tcl_VarEvalVA(Tcl_Interp *interp, va_list argList)
+    char * Tcl_HashStats(Tcl_HashTable *tablePtr)
 }
 declare 270 generic {
-    ClientData Tcl_VarTraceInfo(Tcl_Interp *interp, char *varName, \
-	    int flags, Tcl_VarTraceProc *procPtr, ClientData prevClientData)
+    char * Tcl_ParseVar(Tcl_Interp *interp, char *string, char **termPtr)
 }
 declare 271 generic {
-    ClientData Tcl_VarTraceInfo2(Tcl_Interp *interp, char *part1, \
-	    char *part2, int flags, Tcl_VarTraceProc *procPtr, \
-	    ClientData prevClientData)
+    char * Tcl_PkgPresent(Tcl_Interp *interp, char *name, char *version, \
+	    int exact)
 }
 declare 272 generic {
-    int Tcl_WaitForEvent(Tcl_Time *timePtr)
+    char * Tcl_PkgPresentEx(Tcl_Interp *interp, char *name, char *version, \
+	    int exact, ClientData *clientDataPtr)
 }
 declare 273 generic {
-    Tcl_Pid Tcl_WaitPid(Tcl_Pid pid, int *statPtr, int options)
+    int Tcl_PkgProvide(Tcl_Interp *interp, char *name, char *version)
 }
 declare 274 generic {
-    int Tcl_Write(Tcl_Channel chan, char *s, int slen)
+    char * Tcl_PkgRequire(Tcl_Interp *interp, char *name, char *version, \
+	    int exact)
 }
 declare 275 generic {
-    void Tcl_WrongNumArgs(Tcl_Interp *interp, int objc, \
-	    Tcl_Obj *CONST objv[], char *message)
+    void Tcl_SetErrorCodeVA(Tcl_Interp *interp, va_list argList)
+}
+declare 276 generic {
+    int  Tcl_VarEvalVA(Tcl_Interp *interp, va_list argList)
+}
+declare 277 generic {
+    Tcl_Pid Tcl_WaitPid(Tcl_Pid pid, int *statPtr, int options)
+}
+declare 278 generic {
+    void panicVA(char *format, va_list argList)
 }
 
 # Added in 8.1:
 
-declare 276 generic {
+declare 279 generic {
     void Tcl_AppendObjToObj(Tcl_Obj *objPtr, Tcl_Obj *appendObjPtr)
 }
-declare 277 generic {
+declare 280 generic {
     void Tcl_AlertNotifier(ClientData clientData)
 }
-declare 278 generic {
+declare 281 generic {
     Tcl_Encoding Tcl_CreateEncoding(Tcl_EncodingType *typePtr)
 }
-declare 279 generic {
+declare 282 generic {
     void Tcl_CreateThreadExitHandler(Tcl_ExitProc *proc, ClientData clientData)
 }
-declare 280 generic {
+declare 283 generic {
     void Tcl_DeleteThreadExitHandler(Tcl_ExitProc *proc, ClientData clientData)
 }
-declare 281 generic {
+declare 284 generic {
     void Tcl_DiscardResult(Tcl_SavedResult *statePtr)
 }
-declare 282 generic {
+declare 285 generic {
     int Tcl_EvalEx(Tcl_Interp *interp, char *script, int numBytes, int flags)
 }
-declare 283 generic {
+declare 286 generic {
     int Tcl_EvalObjv(Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[], \
 	    int flags)
 }
-declare 284 generic {
+declare 287 generic {
     int Tcl_EvalObjEx(Tcl_Interp *interp, Tcl_Obj *objPtr, int flags)
 }
-declare 285 generic {
+declare 288 generic {
     void Tcl_ExitThread(int status)
 }
-declare 286 generic {
+declare 289 generic {
     int Tcl_ExternalToUtf(Tcl_Interp *interp, Tcl_Encoding encoding, \
 	    CONST char *src, int srcLen, int flags, \
 	    Tcl_EncodingState *statePtr, char *dst, int dstLen, \
 	    int *srcReadPtr, int *dstWrotePtr, int *dstCharsPtr)
 }
-declare 287 generic {
+declare 290 generic {
     char * Tcl_ExternalToUtfDString(Tcl_Encoding encoding, CONST char *src, \
 	    int srcLen, Tcl_DString *dsPtr)
 }
-declare 288 generic {
+declare 291 generic {
     void Tcl_FinalizeThread(void)
 }
-declare 289 generic {
+declare 292 generic {
     void Tcl_FinalizeNotifier(ClientData clientData)
 }
-declare 290 generic {
+declare 293 generic {
     void Tcl_FreeEncoding(Tcl_Encoding encoding)
 }
-declare 291 generic {
+declare 294 generic {
     Tcl_ThreadId Tcl_GetCurrentThread(void)
 }
-declare 292 generic {
+declare 295 generic {
     Tcl_Encoding Tcl_GetEncoding(Tcl_Interp *interp, CONST char *name)
 }
-declare 293 generic {
+declare 296 generic {
     char * Tcl_GetEncodingName(Tcl_Encoding encoding)
 }
-declare 294 generic {
+declare 297 generic {
     void Tcl_GetEncodingNames(Tcl_Interp *interp)
 }
-declare 295 generic {
-    int Tcl_GetIndexFromObjStruct(Tcl_Interp *interp, Tcl_Obj *objPtr,  \
+declare 298 generic {
+    int Tcl_GetIndexFromObjStruct(Tcl_Interp *interp, Tcl_Obj *objPtr, \
 	    char **tablePtr, int offset, char *msg, int flags, int *indexPtr)
 }
-declare 296 generic {
+declare 299 generic {
     VOID * Tcl_GetThreadData(Tcl_ThreadDataKey *keyPtr, int size)
 }
-declare 297 generic {
+declare 300 generic {
     Tcl_Obj * Tcl_GetVar2Ex(Tcl_Interp *interp, char *part1, char *part2, \
 	    int flags)
 }
-declare 298 generic {
+declare 301 generic {
     ClientData Tcl_InitNotifier(void)
 }
-declare 299 generic {
+declare 302 generic {
     void Tcl_MutexLock(Tcl_Mutex *mutexPtr)
 }
-declare 300 generic {
+declare 303 generic {
     void Tcl_MutexUnlock(Tcl_Mutex *mutexPtr)
 }
-declare 301 generic {
+declare 304 generic {
     void Tcl_ConditionNotify(Tcl_Condition *condPtr)
 }
-declare 302 generic {
+declare 305 generic {
     void Tcl_ConditionWait(Tcl_Condition *condPtr, Tcl_Mutex *mutexPtr, \
 	    Tcl_Time *timePtr)
 }
-declare 303 generic {
+declare 306 generic {
     int Tcl_NumUtfChars(CONST char *src, int len)
 }
-declare 304 generic {
+declare 307 generic {
     int Tcl_ReadChars(Tcl_Channel channel, Tcl_Obj *objPtr, int charsToRead, \
 	    int appendFlag)
 }
-declare 305 generic {
+declare 308 generic {
     void Tcl_RestoreResult(Tcl_Interp *interp, Tcl_SavedResult *statePtr)
 }
-declare 306 generic {
+declare 309 generic {
     void Tcl_SaveResult(Tcl_Interp *interp, Tcl_SavedResult *statePtr)
 }
-declare 307 generic {
+declare 310 generic {
     int Tcl_SetSystemEncoding(Tcl_Interp *interp, CONST char *name)
 }
-declare 308 generic {
+declare 311 generic {
     Tcl_Obj * Tcl_SetVar2Ex(Tcl_Interp *interp, char *part1, char *part2, \
 	    Tcl_Obj *newValuePtr, int flags)
 }
-declare 309 generic {
+declare 312 generic {
     void Tcl_ThreadAlert(Tcl_ThreadId threadId)
 }
-declare 310 generic {
+declare 313 generic {
     void Tcl_ThreadQueueEvent(Tcl_ThreadId threadId, Tcl_Event* evPtr, \
 	    Tcl_QueuePosition position)
 }
-declare 311 generic {
+declare 314 generic {
     Tcl_UniChar Tcl_UniCharAtIndex(CONST char *src, int index)
 }
-declare 312 generic {
+declare 315 generic {
     Tcl_UniChar Tcl_UniCharToLower(int ch)
 }
-declare 313 generic {
+declare 316 generic {
     Tcl_UniChar Tcl_UniCharToTitle(int ch)
 }
-declare 314 generic {
+declare 317 generic {
     Tcl_UniChar Tcl_UniCharToUpper(int ch)
 }
-declare 315 generic {
+declare 318 generic {
     int Tcl_UniCharToUtf(int ch, char *buf)
 }
-declare 316 generic {
+declare 319 generic {
     char * Tcl_UtfAtIndex(CONST char *src, int index)
 }
-declare 317 generic {
+declare 320 generic {
     int Tcl_UtfCharComplete(CONST char *src, int len)
 }
-declare 318 generic {
+declare 321 generic {
     int Tcl_UtfBackslash(CONST char *src, int *readPtr, char *dst)
 }
-declare 319 generic {
+declare 322 generic {
     char * Tcl_UtfFindFirst(CONST char *src, int ch)
 }
-declare 320 generic {
+declare 323 generic {
     char * Tcl_UtfFindLast(CONST char *src, int ch)
 }
-declare 323 generic {
+declare 324 generic {
     char * Tcl_UtfNext(CONST char *src)
 }
-declare 324 generic {
+declare 325 generic {
     char * Tcl_UtfPrev(CONST char *src, CONST char *start)
 }
-declare 325 generic {
+declare 326 generic {
     int Tcl_UtfToExternal(Tcl_Interp *interp, Tcl_Encoding encoding, \
 	    CONST char *src, int srcLen, int flags, \
 	    Tcl_EncodingState *statePtr, char *dst, int dstLen, \
 	    int *srcReadPtr, int *dstWrotePtr, int *dstCharsPtr)
 }
-declare 326 generic {
+declare 327 generic {
     char * Tcl_UtfToExternalDString(Tcl_Encoding encoding, CONST char *src, \
 	    int srcLen, Tcl_DString *dsPtr)
 }
-declare 327 generic {
+declare 328 generic {
     int Tcl_UtfToLower(char *src)
 }
-declare 328 generic {
+declare 329 generic {
     int Tcl_UtfToTitle(char *src)
 }
-declare 329 generic {
+declare 330 generic {
     int Tcl_UtfToUniChar(CONST char *src, Tcl_UniChar *chPtr)
 }
-declare 330 generic {
+declare 331 generic {
     int Tcl_UtfToUpper(char *src)
 }
-declare 331 generic {
+declare 332 generic {
     int Tcl_WriteChars(Tcl_Channel chan, CONST char *src, int srcLen)
 }
-declare 332 generic {
+declare 333 generic {
     int Tcl_WriteObj(Tcl_Channel chan, Tcl_Obj *objPtr)
 }
 
-
 ##############################################################################
 
 # Define the platform specific public Tcl interface.  These functions are
@@ -1174,19 +1201,3 @@ declare 7 mac {
 declare 8 mac {
     int strcasecmp(CONST char *s1, CONST char *s2)
 }
-
-
-####################
-# Unix declaractions
-
-declare 0 unix {
-    void Tcl_CreateFileHandler(int fd, int mask, Tcl_FileProc *proc, \
-	    ClientData clientData)
-}
-declare 1 unix {
-    void Tcl_DeleteFileHandler(int fd)
-}
-declare 2 unix {
-    int Tcl_GetOpenFile(Tcl_Interp *interp, char *str, int write, \
-	    int checkUsage, ClientData *filePtr)
-}
diff --git a/generic/tcl.h b/generic/tcl.h
index bf3f31c..6ec9451 100644
--- a/generic/tcl.h
+++ b/generic/tcl.h
@@ -12,7 +12,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tcl.h,v 1.1.2.13.2.2 1999/03/09 02:37:13 stanton Exp $
+ * RCS: @(#) $Id: tcl.h,v 1.1.2.13.2.3 1999/03/10 06:41:48 stanton Exp $
  */
 
 #ifndef _TCL
@@ -1297,7 +1297,9 @@ typedef unsigned short Tcl_UniChar;
 /*
  * The following function is required to be defined in all stubs aware
  * extensions.  The function is actually implemented in the stub
- * library, not the main Tcl library.
+ * library, not the main Tcl library, although there is a trivial
+ * implementation in the main library in case an extension is statically
+ * linked into an application.
  */
 
 EXTERN char *		Tcl_InitStubs _ANSI_ARGS_((Tcl_Interp *interp,
@@ -1311,19 +1313,10 @@ EXTERN char *		Tcl_InitStubs _ANSI_ARGS_((Tcl_Interp *interp,
 #include "tclDecls.h"
 
 /*
- * For backwards compatibility reasons, we include the platform specific
- * public function declarations on Unix.  This will bring in the old
- * file handler interfaces.
- */
-
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-#include "tclPlatDecls.h"
-#endif
-
-/*
  * Public functions that are not accessible via the stubs table.
  */
 
+EXTERN void		Tcl_InitMemory _ANSI_ARGS_((Tcl_Interp *interp));
 EXTERN void		Tcl_Main _ANSI_ARGS_((int argc, char **argv,
 			    Tcl_AppInitProc *appInitProc));
 
diff --git a/generic/tclDecls.h b/generic/tclDecls.h
index 2352c79..c1f0dd4 100644
--- a/generic/tclDecls.h
+++ b/generic/tclDecls.h
@@ -8,7 +8,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclDecls.h,v 1.2.4.1 1999/03/08 20:14:07 stanton Exp $
+ * RCS: @(#) $Id: tclDecls.h,v 1.2.4.2 1999/03/10 06:41:49 stanton Exp $
  */
 
 #ifndef _TCLDECLS
@@ -27,998 +27,1011 @@
  */
 
 /* 0 */
-EXTERN void		Tcl_AddErrorInfo _ANSI_ARGS_((Tcl_Interp * interp, 
-				CONST char * message));
+EXTERN int		Tcl_PkgProvideEx _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * name, char * version, 
+				ClientData clientData));
 /* 1 */
-EXTERN void		Tcl_AddObjErrorInfo _ANSI_ARGS_((Tcl_Interp * interp, 
-				CONST char * message, int length));
+EXTERN char *		Tcl_PkgRequireEx _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * name, char * version, int exact, 
+				ClientData * clientDataPtr));
 /* 2 */
-EXTERN char *		Tcl_Alloc _ANSI_ARGS_((unsigned int size));
+EXTERN void		panic _ANSI_ARGS_(TCL_VARARGS(char *,format));
 /* 3 */
-EXTERN void		Tcl_AllowExceptions _ANSI_ARGS_((Tcl_Interp * interp));
+EXTERN char *		Tcl_Alloc _ANSI_ARGS_((unsigned int size));
 /* 4 */
-EXTERN int		Tcl_AppendAllObjTypes _ANSI_ARGS_((
-				Tcl_Interp * interp, Tcl_Obj * objPtr));
+EXTERN void		Tcl_Free _ANSI_ARGS_((char * ptr));
 /* 5 */
-EXTERN void		Tcl_AppendElement _ANSI_ARGS_((Tcl_Interp * interp, 
-				CONST char * str));
+EXTERN char *		Tcl_Realloc _ANSI_ARGS_((char * ptr, 
+				unsigned int size));
 /* 6 */
-EXTERN void		Tcl_AppendResult _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
+EXTERN char *		Tcl_DbCkalloc _ANSI_ARGS_((unsigned int size, 
+				char * file, int line));
 /* 7 */
-EXTERN void		Tcl_AppendResultVA _ANSI_ARGS_((Tcl_Interp * interp, 
-				va_list argList));
+EXTERN int		Tcl_DbCkfree _ANSI_ARGS_((char * ptr, char * file, 
+				int line));
 /* 8 */
-EXTERN void		Tcl_AppendToObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				char * bytes, int length));
+EXTERN char *		Tcl_DbCkrealloc _ANSI_ARGS_((char * ptr, 
+				unsigned int size, char * file, int line));
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
 /* 9 */
-EXTERN void		Tcl_AppendStringsToObj _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr));
+EXTERN void		Tcl_CreateFileHandler _ANSI_ARGS_((int fd, int mask, 
+				Tcl_FileProc * proc, ClientData clientData));
+#endif /* UNIX */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
 /* 10 */
-EXTERN void		Tcl_AppendStringsToObjVA _ANSI_ARGS_((
-				Tcl_Obj * objPtr, va_list argList));
+EXTERN void		Tcl_DeleteFileHandler _ANSI_ARGS_((int fd));
+#endif /* UNIX */
 /* 11 */
+EXTERN void		Tcl_SetTimer _ANSI_ARGS_((Tcl_Time * timePtr));
+/* 12 */
+EXTERN void		Tcl_Sleep _ANSI_ARGS_((int ms));
+/* 13 */
+EXTERN int		Tcl_WaitForEvent _ANSI_ARGS_((Tcl_Time * timePtr));
+/* 14 */
+EXTERN int		Tcl_AppendAllObjTypes _ANSI_ARGS_((
+				Tcl_Interp * interp, Tcl_Obj * objPtr));
+/* 15 */
+EXTERN void		Tcl_AppendStringsToObj _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr));
+/* 16 */
+EXTERN void		Tcl_AppendToObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				char * bytes, int length));
+/* 17 */
+EXTERN Tcl_Obj *	Tcl_ConcatObj _ANSI_ARGS_((int objc, 
+				Tcl_Obj *CONST objv[]));
+/* 18 */
+EXTERN int		Tcl_ConvertToType _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * objPtr, Tcl_ObjType * typePtr));
+/* 19 */
+EXTERN void		Tcl_DbDecrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				char * file, int line));
+/* 20 */
+EXTERN void		Tcl_DbIncrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				char * file, int line));
+/* 21 */
+EXTERN int		Tcl_DbIsShared _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				char * file, int line));
+/* 22 */
+EXTERN Tcl_Obj *	Tcl_DbNewBooleanObj _ANSI_ARGS_((int boolValue, 
+				char * file, int line));
+/* 23 */
+EXTERN Tcl_Obj *	Tcl_DbNewByteArrayObj _ANSI_ARGS_((
+				unsigned char * bytes, int length, 
+				char * file, int line));
+/* 24 */
+EXTERN Tcl_Obj *	Tcl_DbNewDoubleObj _ANSI_ARGS_((double doubleValue, 
+				char * file, int line));
+/* 25 */
+EXTERN Tcl_Obj *	Tcl_DbNewListObj _ANSI_ARGS_((int objc, 
+				Tcl_Obj *CONST objv[], char * file, int line));
+/* 26 */
+EXTERN Tcl_Obj *	Tcl_DbNewLongObj _ANSI_ARGS_((long longValue, 
+				char * file, int line));
+/* 27 */
+EXTERN Tcl_Obj *	Tcl_DbNewObj _ANSI_ARGS_((char * file, int line));
+/* 28 */
+EXTERN Tcl_Obj *	Tcl_DbNewStringObj _ANSI_ARGS_((CONST char * bytes, 
+				int length, char * file, int line));
+/* 29 */
+EXTERN Tcl_Obj *	Tcl_DuplicateObj _ANSI_ARGS_((Tcl_Obj * objPtr));
+/* 30 */
+EXTERN void		TclFreeObj _ANSI_ARGS_((Tcl_Obj * objPtr));
+/* 31 */
+EXTERN int		Tcl_GetBoolean _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * string, int * boolPtr));
+/* 32 */
+EXTERN int		Tcl_GetBooleanFromObj _ANSI_ARGS_((
+				Tcl_Interp * interp, Tcl_Obj * objPtr, 
+				int * boolPtr));
+/* 33 */
+EXTERN unsigned char *	Tcl_GetByteArrayFromObj _ANSI_ARGS_((
+				Tcl_Obj * objPtr, int * lengthPtr));
+/* 34 */
+EXTERN int		Tcl_GetDouble _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * string, double * doublePtr));
+/* 35 */
+EXTERN int		Tcl_GetDoubleFromObj _ANSI_ARGS_((
+				Tcl_Interp * interp, Tcl_Obj * objPtr, 
+				double * doublePtr));
+/* 36 */
+EXTERN int		Tcl_GetIndexFromObj _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * objPtr, char ** tablePtr, 
+				char * msg, int flags, int * indexPtr));
+/* 37 */
+EXTERN int		Tcl_GetInt _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * string, int * intPtr));
+/* 38 */
+EXTERN int		Tcl_GetIntFromObj _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * objPtr, int * intPtr));
+/* 39 */
+EXTERN int		Tcl_GetLongFromObj _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * objPtr, long * longPtr));
+/* 40 */
+EXTERN Tcl_ObjType *	Tcl_GetObjType _ANSI_ARGS_((char * typeName));
+/* 41 */
+EXTERN char *		Tcl_GetStringFromObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				int * lengthPtr));
+/* 42 */
+EXTERN void		Tcl_InvalidateStringRep _ANSI_ARGS_((
+				Tcl_Obj * objPtr));
+/* 43 */
+EXTERN int		Tcl_ListObjAppendList _ANSI_ARGS_((
+				Tcl_Interp * interp, Tcl_Obj * listPtr, 
+				Tcl_Obj * elemListPtr));
+/* 44 */
+EXTERN int		Tcl_ListObjAppendElement _ANSI_ARGS_((
+				Tcl_Interp * interp, Tcl_Obj * listPtr, 
+				Tcl_Obj * objPtr));
+/* 45 */
+EXTERN int		Tcl_ListObjGetElements _ANSI_ARGS_((
+				Tcl_Interp * interp, Tcl_Obj * listPtr, 
+				int * objcPtr, Tcl_Obj *** objvPtr));
+/* 46 */
+EXTERN int		Tcl_ListObjIndex _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * listPtr, int index, 
+				Tcl_Obj ** objPtrPtr));
+/* 47 */
+EXTERN int		Tcl_ListObjLength _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * listPtr, int * intPtr));
+/* 48 */
+EXTERN int		Tcl_ListObjReplace _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * listPtr, int first, int count, 
+				int objc, Tcl_Obj *CONST objv[]));
+/* 49 */
+EXTERN Tcl_Obj *	Tcl_NewBooleanObj _ANSI_ARGS_((int boolValue));
+/* 50 */
+EXTERN Tcl_Obj *	Tcl_NewByteArrayObj _ANSI_ARGS_((
+				unsigned char * bytes, int length));
+/* 51 */
+EXTERN Tcl_Obj *	Tcl_NewDoubleObj _ANSI_ARGS_((double doubleValue));
+/* 52 */
+EXTERN Tcl_Obj *	Tcl_NewIntObj _ANSI_ARGS_((int intValue));
+/* 53 */
+EXTERN Tcl_Obj *	Tcl_NewListObj _ANSI_ARGS_((int objc, 
+				Tcl_Obj *CONST objv[]));
+/* 54 */
+EXTERN Tcl_Obj *	Tcl_NewLongObj _ANSI_ARGS_((long longValue));
+/* 55 */
+EXTERN Tcl_Obj *	Tcl_NewObj _ANSI_ARGS_((void));
+/* 56 */
+EXTERN Tcl_Obj *	Tcl_NewStringObj _ANSI_ARGS_((CONST char * bytes, 
+				int length));
+/* 57 */
+EXTERN void		Tcl_SetBooleanObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				int boolValue));
+/* 58 */
+EXTERN unsigned char *	Tcl_SetByteArrayLength _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				int length));
+/* 59 */
+EXTERN void		Tcl_SetByteArrayObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				unsigned char * bytes, int length));
+/* 60 */
+EXTERN void		Tcl_SetDoubleObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				double doubleValue));
+/* 61 */
+EXTERN void		Tcl_SetIntObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				int intValue));
+/* 62 */
+EXTERN void		Tcl_SetListObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				int objc, Tcl_Obj *CONST objv[]));
+/* 63 */
+EXTERN void		Tcl_SetLongObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				long longValue));
+/* 64 */
+EXTERN void		Tcl_SetObjLength _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				int length));
+/* 65 */
+EXTERN void		Tcl_SetStringObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
+				char * bytes, int length));
+/* 66 */
+EXTERN void		Tcl_AddErrorInfo _ANSI_ARGS_((Tcl_Interp * interp, 
+				CONST char * message));
+/* 67 */
+EXTERN void		Tcl_AddObjErrorInfo _ANSI_ARGS_((Tcl_Interp * interp, 
+				CONST char * message, int length));
+/* 68 */
+EXTERN void		Tcl_AllowExceptions _ANSI_ARGS_((Tcl_Interp * interp));
+/* 69 */
+EXTERN void		Tcl_AppendElement _ANSI_ARGS_((Tcl_Interp * interp, 
+				CONST char * string));
+/* 70 */
+EXTERN void		Tcl_AppendResult _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
+/* 71 */
 EXTERN Tcl_AsyncHandler	 Tcl_AsyncCreate _ANSI_ARGS_((Tcl_AsyncProc * proc, 
 				ClientData clientData));
-/* 12 */
+/* 72 */
 EXTERN void		Tcl_AsyncDelete _ANSI_ARGS_((Tcl_AsyncHandler async));
-/* 13 */
+/* 73 */
 EXTERN int		Tcl_AsyncInvoke _ANSI_ARGS_((Tcl_Interp * interp, 
 				int code));
-/* 14 */
+/* 74 */
 EXTERN void		Tcl_AsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async));
-/* 15 */
+/* 75 */
 EXTERN int		Tcl_AsyncReady _ANSI_ARGS_((void));
-/* 16 */
+/* 76 */
 EXTERN void		Tcl_BackgroundError _ANSI_ARGS_((Tcl_Interp * interp));
-/* 17 */
+/* 77 */
 EXTERN char		Tcl_Backslash _ANSI_ARGS_((CONST char * src, 
 				int * readPtr));
-/* 18 */
+/* 78 */
 EXTERN int		Tcl_BadChannelOption _ANSI_ARGS_((
 				Tcl_Interp * interp, char * optionName, 
 				char * optionList));
-/* 19 */
+/* 79 */
 EXTERN void		Tcl_CallWhenDeleted _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_InterpDeleteProc * proc, 
 				ClientData clientData));
-/* 20 */
+/* 80 */
 EXTERN void		Tcl_CancelIdleCall _ANSI_ARGS_((
 				Tcl_IdleProc * idleProc, 
 				ClientData clientData));
-/* 21 */
+/* 81 */
 EXTERN int		Tcl_Close _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Channel chan));
-/* 22 */
+/* 82 */
 EXTERN int		Tcl_CommandComplete _ANSI_ARGS_((char * cmd));
-/* 23 */
+/* 83 */
 EXTERN char *		Tcl_Concat _ANSI_ARGS_((int argc, char ** argv));
-/* 24 */
-EXTERN Tcl_Obj *	Tcl_ConcatObj _ANSI_ARGS_((int objc, 
-				Tcl_Obj *CONST objv[]));
-/* 25 */
+/* 84 */
+EXTERN int		Tcl_ConvertElement _ANSI_ARGS_((CONST char * src, 
+				char * dst, int flags));
+/* 85 */
 EXTERN int		Tcl_ConvertCountedElement _ANSI_ARGS_((
 				CONST char * src, int length, char * dst, 
 				int flags));
-/* 26 */
-EXTERN int		Tcl_ConvertElement _ANSI_ARGS_((CONST char * src, 
-				char * dst, int flags));
-/* 27 */
-EXTERN int		Tcl_ConvertToType _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * objPtr, Tcl_ObjType * typePtr));
-/* 28 */
+/* 86 */
 EXTERN int		Tcl_CreateAlias _ANSI_ARGS_((Tcl_Interp * slave, 
 				char * slaveCmd, Tcl_Interp * target, 
 				char * targetCmd, int argc, char ** argv));
-/* 29 */
+/* 87 */
 EXTERN int		Tcl_CreateAliasObj _ANSI_ARGS_((Tcl_Interp * slave, 
 				char * slaveCmd, Tcl_Interp * target, 
 				char * targetCmd, int objc, 
 				Tcl_Obj *CONST objv[]));
-/* 30 */
+/* 88 */
 EXTERN Tcl_Channel	Tcl_CreateChannel _ANSI_ARGS_((
 				Tcl_ChannelType * typePtr, char * chanName, 
 				ClientData instanceData, int mask));
-/* 31 */
+/* 89 */
 EXTERN void		Tcl_CreateChannelHandler _ANSI_ARGS_((
 				Tcl_Channel chan, int mask, 
 				Tcl_ChannelProc * proc, 
 				ClientData clientData));
-/* 32 */
+/* 90 */
 EXTERN void		Tcl_CreateCloseHandler _ANSI_ARGS_((Tcl_Channel chan, 
 				Tcl_CloseProc * proc, ClientData clientData));
-/* 33 */
+/* 91 */
 EXTERN Tcl_Command	Tcl_CreateCommand _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * cmdName, Tcl_CmdProc * proc, 
 				ClientData clientData, 
 				Tcl_CmdDeleteProc * deleteProc));
-/* 34 */
+/* 92 */
 EXTERN void		Tcl_CreateEventSource _ANSI_ARGS_((
 				Tcl_EventSetupProc * setupProc, 
 				Tcl_EventCheckProc * checkProc, 
 				ClientData clientData));
-/* 35 */
+/* 93 */
 EXTERN void		Tcl_CreateExitHandler _ANSI_ARGS_((
 				Tcl_ExitProc * proc, ClientData clientData));
-/* 36 */
+/* 94 */
 EXTERN Tcl_Interp *	Tcl_CreateInterp _ANSI_ARGS_((void));
-/* 37 */
+/* 95 */
 EXTERN void		Tcl_CreateMathFunc _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * name, int numArgs, 
 				Tcl_ValueType * argTypes, 
 				Tcl_MathProc * proc, ClientData clientData));
-/* 38 */
+/* 96 */
 EXTERN Tcl_Command	Tcl_CreateObjCommand _ANSI_ARGS_((
 				Tcl_Interp * interp, char * cmdName, 
 				Tcl_ObjCmdProc * proc, ClientData clientData, 
 				Tcl_CmdDeleteProc * deleteProc));
-/* 39 */
+/* 97 */
 EXTERN Tcl_Interp *	Tcl_CreateSlave _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * slaveName, int isSafe));
-/* 40 */
+/* 98 */
 EXTERN Tcl_TimerToken	Tcl_CreateTimerHandler _ANSI_ARGS_((int milliseconds, 
 				Tcl_TimerProc * proc, ClientData clientData));
-/* 41 */
+/* 99 */
 EXTERN Tcl_Trace	Tcl_CreateTrace _ANSI_ARGS_((Tcl_Interp * interp, 
 				int level, Tcl_CmdTraceProc * proc, 
 				ClientData clientData));
-/* 42 */
-EXTERN char *		Tcl_DbCkalloc _ANSI_ARGS_((unsigned int size, 
-				char * file, int line));
-/* 43 */
-EXTERN int		Tcl_DbCkfree _ANSI_ARGS_((char * ptr, char * file, 
-				int line));
-/* 44 */
-EXTERN char *		Tcl_DbCkrealloc _ANSI_ARGS_((char * ptr, 
-				unsigned int size, char * file, int line));
-/* 45 */
-EXTERN void		Tcl_DbDecrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				char * file, int line));
-/* 46 */
-EXTERN void		Tcl_DbIncrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				char * file, int line));
-/* 47 */
-EXTERN int		Tcl_DbIsShared _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				char * file, int line));
-/* 48 */
-EXTERN Tcl_Obj *	Tcl_DbNewBooleanObj _ANSI_ARGS_((int boolValue, 
-				char * file, int line));
-/* 49 */
-EXTERN Tcl_Obj *	Tcl_DbNewByteArrayObj _ANSI_ARGS_((
-				unsigned char * bytes, int length, 
-				char * file, int line));
-/* 50 */
-EXTERN Tcl_Obj *	Tcl_DbNewDoubleObj _ANSI_ARGS_((double doubleValue, 
-				char * file, int line));
-/* 51 */
-EXTERN Tcl_Obj *	Tcl_DbNewListObj _ANSI_ARGS_((int objc, 
-				Tcl_Obj *CONST objv[], char * file, int line));
-/* 52 */
-EXTERN Tcl_Obj *	Tcl_DbNewLongObj _ANSI_ARGS_((long longValue, 
-				char * file, int line));
-/* 53 */
-EXTERN Tcl_Obj *	Tcl_DbNewObj _ANSI_ARGS_((char * file, int line));
-/* 54 */
-EXTERN Tcl_Obj *	Tcl_DbNewStringObj _ANSI_ARGS_((CONST char * bytes, 
-				int length, char * file, int line));
-/* 55 */
+/* 100 */
 EXTERN void		Tcl_DeleteAssocData _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * name));
-/* 56 */
-EXTERN int		Tcl_DeleteCommand _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * cmdName));
-/* 57 */
-EXTERN int		Tcl_DeleteCommandFromToken _ANSI_ARGS_((
-				Tcl_Interp * interp, Tcl_Command command));
-/* 58 */
+/* 101 */
 EXTERN void		Tcl_DeleteChannelHandler _ANSI_ARGS_((
 				Tcl_Channel chan, Tcl_ChannelProc * proc, 
 				ClientData clientData));
-/* 59 */
+/* 102 */
 EXTERN void		Tcl_DeleteCloseHandler _ANSI_ARGS_((Tcl_Channel chan, 
 				Tcl_CloseProc * proc, ClientData clientData));
-/* 60 */
+/* 103 */
+EXTERN int		Tcl_DeleteCommand _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * cmdName));
+/* 104 */
+EXTERN int		Tcl_DeleteCommandFromToken _ANSI_ARGS_((
+				Tcl_Interp * interp, Tcl_Command command));
+/* 105 */
 EXTERN void		Tcl_DeleteEvents _ANSI_ARGS_((
 				Tcl_EventDeleteProc * proc, 
 				ClientData clientData));
-/* 61 */
+/* 106 */
 EXTERN void		Tcl_DeleteEventSource _ANSI_ARGS_((
 				Tcl_EventSetupProc * setupProc, 
 				Tcl_EventCheckProc * checkProc, 
 				ClientData clientData));
-/* 62 */
+/* 107 */
 EXTERN void		Tcl_DeleteExitHandler _ANSI_ARGS_((
 				Tcl_ExitProc * proc, ClientData clientData));
-/* 63 */
+/* 108 */
 EXTERN void		Tcl_DeleteHashEntry _ANSI_ARGS_((
 				Tcl_HashEntry * entryPtr));
-/* 64 */
+/* 109 */
 EXTERN void		Tcl_DeleteHashTable _ANSI_ARGS_((
 				Tcl_HashTable * tablePtr));
-/* 65 */
+/* 110 */
 EXTERN void		Tcl_DeleteInterp _ANSI_ARGS_((Tcl_Interp * interp));
-/* 66 */
+/* 111 */
+EXTERN void		Tcl_DetachPids _ANSI_ARGS_((int numPids, 
+				Tcl_Pid * pidPtr));
+/* 112 */
 EXTERN void		Tcl_DeleteTimerHandler _ANSI_ARGS_((
 				Tcl_TimerToken token));
-/* 67 */
+/* 113 */
 EXTERN void		Tcl_DeleteTrace _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Trace trace));
-/* 68 */
-EXTERN void		Tcl_DetachPids _ANSI_ARGS_((int numPids, 
-				Tcl_Pid * pidPtr));
-/* 69 */
+/* 114 */
 EXTERN void		Tcl_DontCallWhenDeleted _ANSI_ARGS_((
 				Tcl_Interp * interp, 
 				Tcl_InterpDeleteProc * proc, 
 				ClientData clientData));
-/* 70 */
+/* 115 */
 EXTERN int		Tcl_DoOneEvent _ANSI_ARGS_((int flags));
-/* 71 */
+/* 116 */
 EXTERN void		Tcl_DoWhenIdle _ANSI_ARGS_((Tcl_IdleProc * proc, 
 				ClientData clientData));
-/* 72 */
+/* 117 */
 EXTERN char *		Tcl_DStringAppend _ANSI_ARGS_((Tcl_DString * dsPtr, 
-				CONST char * str, int length));
-/* 73 */
+				CONST char * string, int length));
+/* 118 */
 EXTERN char *		Tcl_DStringAppendElement _ANSI_ARGS_((
-				Tcl_DString * dsPtr, CONST char * str));
-/* 74 */
+				Tcl_DString * dsPtr, CONST char * string));
+/* 119 */
 EXTERN void		Tcl_DStringEndSublist _ANSI_ARGS_((
 				Tcl_DString * dsPtr));
-/* 75 */
+/* 120 */
 EXTERN void		Tcl_DStringFree _ANSI_ARGS_((Tcl_DString * dsPtr));
-/* 76 */
+/* 121 */
 EXTERN void		Tcl_DStringGetResult _ANSI_ARGS_((
 				Tcl_Interp * interp, Tcl_DString * dsPtr));
-/* 77 */
+/* 122 */
 EXTERN void		Tcl_DStringInit _ANSI_ARGS_((Tcl_DString * dsPtr));
-/* 78 */
+/* 123 */
 EXTERN void		Tcl_DStringResult _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_DString * dsPtr));
-/* 79 */
+/* 124 */
 EXTERN void		Tcl_DStringSetLength _ANSI_ARGS_((
 				Tcl_DString * dsPtr, int length));
-/* 80 */
+/* 125 */
 EXTERN void		Tcl_DStringStartSublist _ANSI_ARGS_((
 				Tcl_DString * dsPtr));
-/* 81 */
-EXTERN int		Tcl_DumpActiveMemory _ANSI_ARGS_((char * fileName));
-/* 82 */
-EXTERN Tcl_Obj *	Tcl_DuplicateObj _ANSI_ARGS_((Tcl_Obj * objPtr));
-/* 83 */
+/* 126 */
 EXTERN int		Tcl_Eof _ANSI_ARGS_((Tcl_Channel chan));
-/* 84 */
+/* 127 */
 EXTERN char *		Tcl_ErrnoId _ANSI_ARGS_((void));
-/* 85 */
+/* 128 */
 EXTERN char *		Tcl_ErrnoMsg _ANSI_ARGS_((int err));
-/* 86 */
+/* 129 */
 EXTERN int		Tcl_Eval _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str));
-/* 87 */
+				char * string));
+/* 130 */
 EXTERN int		Tcl_EvalFile _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * fileName));
-/* 88 */
+/* 131 */
+EXTERN int		Tcl_EvalObj _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Obj * objPtr));
+/* 132 */
 EXTERN void		Tcl_EventuallyFree _ANSI_ARGS_((
 				ClientData clientData, 
 				Tcl_FreeProc * freeProc));
-/* 89 */
-EXTERN int		Tcl_EvalObj _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * objPtr));
-/* 90 */
+/* 133 */
 EXTERN void		Tcl_Exit _ANSI_ARGS_((int status));
-/* 91 */
+/* 134 */
 EXTERN int		Tcl_ExposeCommand _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * hiddenCmdToken, char * cmdName));
-/* 92 */
+/* 135 */
 EXTERN int		Tcl_ExprBoolean _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, int * ptr));
-/* 93 */
+				char * string, int * ptr));
+/* 136 */
 EXTERN int		Tcl_ExprBooleanObj _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * objPtr, int * ptr));
-/* 94 */
+/* 137 */
 EXTERN int		Tcl_ExprDouble _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, double * ptr));
-/* 95 */
+				char * string, double * ptr));
+/* 138 */
 EXTERN int		Tcl_ExprDoubleObj _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * objPtr, double * ptr));
-/* 96 */
+/* 139 */
 EXTERN int		Tcl_ExprLong _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, long * ptr));
-/* 97 */
+				char * string, long * ptr));
+/* 140 */
 EXTERN int		Tcl_ExprLongObj _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * objPtr, long * ptr));
-/* 98 */
+/* 141 */
 EXTERN int		Tcl_ExprObj _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr));
-/* 99 */
+/* 142 */
 EXTERN int		Tcl_ExprString _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str));
-/* 100 */
+				char * string));
+/* 143 */
 EXTERN void		Tcl_Finalize _ANSI_ARGS_((void));
-/* 101 */
+/* 144 */
 EXTERN void		Tcl_FindExecutable _ANSI_ARGS_((CONST char * argv0));
-/* 102 */
+/* 145 */
 EXTERN Tcl_HashEntry *	Tcl_FirstHashEntry _ANSI_ARGS_((
 				Tcl_HashTable * tablePtr, 
 				Tcl_HashSearch * searchPtr));
-/* 103 */
+/* 146 */
 EXTERN int		Tcl_Flush _ANSI_ARGS_((Tcl_Channel chan));
-/* 104 */
-EXTERN void		Tcl_Free _ANSI_ARGS_((char * ptr));
-/* 105 */
-EXTERN void		TclFreeObj _ANSI_ARGS_((Tcl_Obj * objPtr));
-/* 106 */
+/* 147 */
 EXTERN void		Tcl_FreeResult _ANSI_ARGS_((Tcl_Interp * interp));
-/* 107 */
+/* 148 */
 EXTERN int		Tcl_GetAlias _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * slaveCmd, 
 				Tcl_Interp ** targetInterpPtr, 
 				char ** targetCmdPtr, int * argcPtr, 
 				char *** argvPtr));
-/* 108 */
+/* 149 */
 EXTERN int		Tcl_GetAliasObj _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * slaveCmd, 
 				Tcl_Interp ** targetInterpPtr, 
 				char ** targetCmdPtr, int * objcPtr, 
 				Tcl_Obj *** objv));
-/* 109 */
+/* 150 */
 EXTERN ClientData	Tcl_GetAssocData _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * name, Tcl_InterpDeleteProc ** procPtr));
-/* 110 */
-EXTERN int		Tcl_GetBoolean _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, int * boolPtr));
-/* 111 */
-EXTERN int		Tcl_GetBooleanFromObj _ANSI_ARGS_((
-				Tcl_Interp * interp, Tcl_Obj * objPtr, 
-				int * boolPtr));
-/* 112 */
-EXTERN unsigned char *	Tcl_GetByteArrayFromObj _ANSI_ARGS_((
-				Tcl_Obj * objPtr, int * lengthPtr));
-/* 113 */
+/* 151 */
 EXTERN Tcl_Channel	Tcl_GetChannel _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * chanName, int * modePtr));
-/* 114 */
+/* 152 */
 EXTERN int		Tcl_GetChannelBufferSize _ANSI_ARGS_((
 				Tcl_Channel chan));
-/* 115 */
+/* 153 */
 EXTERN int		Tcl_GetChannelHandle _ANSI_ARGS_((Tcl_Channel chan, 
 				int direction, ClientData * handlePtr));
-/* 116 */
+/* 154 */
 EXTERN ClientData	Tcl_GetChannelInstanceData _ANSI_ARGS_((
 				Tcl_Channel chan));
-/* 117 */
+/* 155 */
 EXTERN int		Tcl_GetChannelMode _ANSI_ARGS_((Tcl_Channel chan));
-/* 118 */
+/* 156 */
 EXTERN char *		Tcl_GetChannelName _ANSI_ARGS_((Tcl_Channel chan));
-/* 119 */
+/* 157 */
 EXTERN int		Tcl_GetChannelOption _ANSI_ARGS_((
 				Tcl_Interp * interp, Tcl_Channel chan, 
 				char * optionName, Tcl_DString * dsPtr));
-/* 120 */
+/* 158 */
 EXTERN Tcl_ChannelType * Tcl_GetChannelType _ANSI_ARGS_((Tcl_Channel chan));
-/* 121 */
+/* 159 */
 EXTERN int		Tcl_GetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * cmdName, Tcl_CmdInfo * infoPtr));
-/* 122 */
+/* 160 */
 EXTERN char *		Tcl_GetCommandName _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Command command));
-/* 123 */
-EXTERN int		Tcl_GetDouble _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, double * doublePtr));
-/* 124 */
-EXTERN int		Tcl_GetDoubleFromObj _ANSI_ARGS_((
-				Tcl_Interp * interp, Tcl_Obj * objPtr, 
-				double * doublePtr));
-/* 125 */
+/* 161 */
 EXTERN int		Tcl_GetErrno _ANSI_ARGS_((void));
-/* 126 */
+/* 162 */
 EXTERN char *		Tcl_GetHostName _ANSI_ARGS_((void));
-/* 127 */
-EXTERN int		Tcl_GetIndexFromObj _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * objPtr, char ** tablePtr, 
-				char * msg, int flags, int * indexPtr));
-/* 128 */
-EXTERN int		Tcl_GetInt _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, int * intPtr));
-/* 129 */
+/* 163 */
 EXTERN int		Tcl_GetInterpPath _ANSI_ARGS_((
 				Tcl_Interp * askInterp, 
 				Tcl_Interp * slaveInterp));
-/* 130 */
-EXTERN int		Tcl_GetIntFromObj _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * objPtr, int * intPtr));
-/* 131 */
-EXTERN int		Tcl_GetLongFromObj _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * objPtr, long * longPtr));
-/* 132 */
+/* 164 */
 EXTERN Tcl_Interp *	Tcl_GetMaster _ANSI_ARGS_((Tcl_Interp * interp));
-/* 133 */
+/* 165 */
 EXTERN CONST char *	Tcl_GetNameOfExecutable _ANSI_ARGS_((void));
-/* 134 */
+/* 166 */
 EXTERN Tcl_Obj *	Tcl_GetObjResult _ANSI_ARGS_((Tcl_Interp * interp));
-/* 135 */
-EXTERN Tcl_ObjType *	Tcl_GetObjType _ANSI_ARGS_((char * typeName));
-/* 136 */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+/* 167 */
+EXTERN int		Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * string, int write, int checkUsage, 
+				ClientData * filePtr));
+#endif /* UNIX */
+/* 168 */
 EXTERN Tcl_PathType	Tcl_GetPathType _ANSI_ARGS_((char * path));
-/* 137 */
+/* 169 */
 EXTERN int		Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan, 
 				Tcl_DString * dsPtr));
-/* 138 */
+/* 170 */
 EXTERN int		Tcl_GetsObj _ANSI_ARGS_((Tcl_Channel chan, 
 				Tcl_Obj * objPtr));
-/* 139 */
+/* 171 */
 EXTERN int		Tcl_GetServiceMode _ANSI_ARGS_((void));
-/* 140 */
+/* 172 */
 EXTERN Tcl_Interp *	Tcl_GetSlave _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * slaveName));
-/* 141 */
+/* 173 */
 EXTERN Tcl_Channel	Tcl_GetStdChannel _ANSI_ARGS_((int type));
-/* 142 */
-EXTERN char *		Tcl_GetStringFromObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				int * lengthPtr));
-/* 143 */
+/* 174 */
 EXTERN char *		Tcl_GetStringResult _ANSI_ARGS_((Tcl_Interp * interp));
-/* 144 */
+/* 175 */
 EXTERN char *		Tcl_GetVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName, int flags));
-/* 145 */
+/* 176 */
 EXTERN char *		Tcl_GetVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, int flags));
-/* 146 */
+/* 177 */
 EXTERN int		Tcl_GlobalEval _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * command));
-/* 147 */
+/* 178 */
 EXTERN int		Tcl_GlobalEvalObj _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * objPtr));
-/* 148 */
-EXTERN char *		Tcl_HashStats _ANSI_ARGS_((Tcl_HashTable * tablePtr));
-/* 149 */
+/* 179 */
 EXTERN int		Tcl_HideCommand _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * cmdName, char * hiddenCmdToken));
-/* 150 */
+/* 180 */
 EXTERN int		Tcl_Init _ANSI_ARGS_((Tcl_Interp * interp));
-/* 151 */
+/* 181 */
 EXTERN void		Tcl_InitHashTable _ANSI_ARGS_((
 				Tcl_HashTable * tablePtr, int keyType));
-/* 152 */
-EXTERN void		Tcl_InitMemory _ANSI_ARGS_((Tcl_Interp * interp));
-/* 153 */
+/* 182 */
 EXTERN int		Tcl_InputBlocked _ANSI_ARGS_((Tcl_Channel chan));
-/* 154 */
+/* 183 */
 EXTERN int		Tcl_InputBuffered _ANSI_ARGS_((Tcl_Channel chan));
-/* 155 */
+/* 184 */
 EXTERN int		Tcl_InterpDeleted _ANSI_ARGS_((Tcl_Interp * interp));
-/* 156 */
+/* 185 */
 EXTERN int		Tcl_IsSafe _ANSI_ARGS_((Tcl_Interp * interp));
-/* 157 */
-EXTERN void		Tcl_InvalidateStringRep _ANSI_ARGS_((
-				Tcl_Obj * objPtr));
-/* 158 */
+/* 186 */
 EXTERN char *		Tcl_JoinPath _ANSI_ARGS_((int argc, char ** argv, 
 				Tcl_DString * resultPtr));
-/* 159 */
+/* 187 */
 EXTERN int		Tcl_LinkVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName, char * addr, int type));
-/* 160 */
-EXTERN int		Tcl_ListObjAppendList _ANSI_ARGS_((
-				Tcl_Interp * interp, Tcl_Obj * listPtr, 
-				Tcl_Obj * elemListPtr));
-/* 161 */
-EXTERN int		Tcl_ListObjAppendElement _ANSI_ARGS_((
-				Tcl_Interp * interp, Tcl_Obj * listPtr, 
-				Tcl_Obj * objPtr));
-/* 162 */
-EXTERN int		Tcl_ListObjGetElements _ANSI_ARGS_((
-				Tcl_Interp * interp, Tcl_Obj * listPtr, 
-				int * objcPtr, Tcl_Obj *** objvPtr));
-/* 163 */
-EXTERN int		Tcl_ListObjIndex _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * listPtr, int index, 
-				Tcl_Obj ** objPtrPtr));
-/* 164 */
-EXTERN int		Tcl_ListObjLength _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * listPtr, int * intPtr));
-/* 165 */
-EXTERN int		Tcl_ListObjReplace _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Obj * listPtr, int first, int count, 
-				int objc, Tcl_Obj *CONST objv[]));
-/* 166 */
+/* Slot 188 is reserved */
+/* 189 */
 EXTERN Tcl_Channel	Tcl_MakeFileChannel _ANSI_ARGS_((ClientData handle, 
 				int mode));
-/* 167 */
+/* 190 */
 EXTERN int		Tcl_MakeSafe _ANSI_ARGS_((Tcl_Interp * interp));
-/* 168 */
+/* 191 */
 EXTERN Tcl_Channel	Tcl_MakeTcpClientChannel _ANSI_ARGS_((
 				ClientData tcpSocket));
-/* 169 */
+/* 192 */
 EXTERN char *		Tcl_Merge _ANSI_ARGS_((int argc, char ** argv));
-/* 170 */
-EXTERN Tcl_Obj *	Tcl_NewBooleanObj _ANSI_ARGS_((int boolValue));
-/* 171 */
-EXTERN Tcl_Obj *	Tcl_NewByteArrayObj _ANSI_ARGS_((
-				unsigned char * bytes, int length));
-/* 172 */
-EXTERN Tcl_Obj *	Tcl_NewDoubleObj _ANSI_ARGS_((double doubleValue));
-/* 173 */
-EXTERN Tcl_Obj *	Tcl_NewIntObj _ANSI_ARGS_((int intValue));
-/* 174 */
-EXTERN Tcl_Obj *	Tcl_NewListObj _ANSI_ARGS_((int objc, 
-				Tcl_Obj *CONST objv[]));
-/* 175 */
-EXTERN Tcl_Obj *	Tcl_NewLongObj _ANSI_ARGS_((long longValue));
-/* 176 */
-EXTERN Tcl_Obj *	Tcl_NewObj _ANSI_ARGS_((void));
-/* 177 */
-EXTERN Tcl_Obj *	Tcl_NewStringObj _ANSI_ARGS_((CONST char * bytes, 
-				int length));
-/* 178 */
+/* 193 */
 EXTERN Tcl_HashEntry *	Tcl_NextHashEntry _ANSI_ARGS_((
 				Tcl_HashSearch * searchPtr));
-/* 179 */
+/* 194 */
 EXTERN void		Tcl_NotifyChannel _ANSI_ARGS_((Tcl_Channel channel, 
 				int mask));
-/* 180 */
+/* 195 */
 EXTERN Tcl_Obj *	Tcl_ObjGetVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, 
 				int flags));
-/* 181 */
+/* 196 */
 EXTERN Tcl_Obj *	Tcl_ObjSetVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, 
 				Tcl_Obj * newValuePtr, int flags));
-/* 182 */
+/* 197 */
 EXTERN Tcl_Channel	Tcl_OpenCommandChannel _ANSI_ARGS_((
 				Tcl_Interp * interp, int argc, char ** argv, 
 				int flags));
-/* 183 */
+/* 198 */
 EXTERN Tcl_Channel	Tcl_OpenFileChannel _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * fileName, char * modeString, 
 				int permissions));
-/* 184 */
+/* 199 */
 EXTERN Tcl_Channel	Tcl_OpenTcpClient _ANSI_ARGS_((Tcl_Interp * interp, 
 				int port, char * address, char * myaddr, 
 				int myport, int async));
-/* 185 */
+/* 200 */
 EXTERN Tcl_Channel	Tcl_OpenTcpServer _ANSI_ARGS_((Tcl_Interp * interp, 
 				int port, char * host, 
 				Tcl_TcpAcceptProc * acceptProc, 
 				ClientData callbackData));
-/* 186 */
-EXTERN void		panic _ANSI_ARGS_(TCL_VARARGS(char *,format));
-/* 187 */
-EXTERN void		panicVA _ANSI_ARGS_((char * format, va_list argList));
-/* 188 */
-EXTERN char *		Tcl_ParseVar _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, char ** termPtr));
-/* 189 */
-EXTERN char *		Tcl_PkgPresent _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * name, char * version, int exact));
-/* 190 */
-EXTERN char *		Tcl_PkgPresentEx _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * name, char * version, int exact, 
-				ClientData * clientDataPtr));
-/* 191 */
-EXTERN int		Tcl_PkgProvide _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * name, char * version));
-/* 192 */
-EXTERN int		Tcl_PkgProvideEx _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * name, char * version, 
-				ClientData clientData));
-/* 193 */
-EXTERN char *		Tcl_PkgRequire _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * name, char * version, int exact));
-/* 194 */
-EXTERN char *		Tcl_PkgRequireEx _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * name, char * version, int exact, 
-				ClientData * clientDataPtr));
-/* 195 */
-EXTERN char *		Tcl_PosixError _ANSI_ARGS_((Tcl_Interp * interp));
-/* 196 */
+/* 201 */
 EXTERN void		Tcl_Preserve _ANSI_ARGS_((ClientData data));
-/* 197 */
+/* 202 */
 EXTERN void		Tcl_PrintDouble _ANSI_ARGS_((Tcl_Interp * interp, 
 				double value, char * dst));
-/* 198 */
-EXTERN int		Tcl_PutEnv _ANSI_ARGS_((CONST char * str));
-/* 199 */
+/* 203 */
+EXTERN int		Tcl_PutEnv _ANSI_ARGS_((CONST char * string));
+/* 204 */
+EXTERN char *		Tcl_PosixError _ANSI_ARGS_((Tcl_Interp * interp));
+/* 205 */
 EXTERN void		Tcl_QueueEvent _ANSI_ARGS_((Tcl_Event * evPtr, 
 				Tcl_QueuePosition position));
-/* 200 */
+/* 206 */
 EXTERN int		Tcl_Read _ANSI_ARGS_((Tcl_Channel chan, 
 				char * bufPtr, int toRead));
-/* 201 */
-EXTERN char *		Tcl_Realloc _ANSI_ARGS_((char * ptr, 
-				unsigned int size));
-/* 202 */
+/* 207 */
 EXTERN void		Tcl_ReapDetachedProcs _ANSI_ARGS_((void));
-/* 203 */
+/* 208 */
 EXTERN int		Tcl_RecordAndEval _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * cmd, int flags));
-/* 204 */
+/* 209 */
 EXTERN int		Tcl_RecordAndEvalObj _ANSI_ARGS_((
 				Tcl_Interp * interp, Tcl_Obj * cmdPtr, 
 				int flags));
-/* 205 */
+/* 210 */
+EXTERN void		Tcl_RegisterChannel _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Channel chan));
+/* 211 */
+EXTERN void		Tcl_RegisterObjType _ANSI_ARGS_((
+				Tcl_ObjType * typePtr));
+/* 212 */
 EXTERN Tcl_RegExp	Tcl_RegExpCompile _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str));
-/* 206 */
+				char * string));
+/* 213 */
 EXTERN int		Tcl_RegExpExec _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_RegExp regexp, CONST char * str, 
+				Tcl_RegExp regexp, CONST char * string, 
 				CONST char * start));
-/* 207 */
+/* 214 */
 EXTERN int		Tcl_RegExpMatch _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, char * pattern));
-/* 208 */
+				char * string, char * pattern));
+/* 215 */
 EXTERN void		Tcl_RegExpRange _ANSI_ARGS_((Tcl_RegExp regexp, 
 				int index, char ** startPtr, char ** endPtr));
-/* 209 */
-EXTERN void		Tcl_RegisterChannel _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Channel chan));
-/* 210 */
-EXTERN void		Tcl_RegisterObjType _ANSI_ARGS_((
-				Tcl_ObjType * typePtr));
-/* 211 */
+/* 216 */
 EXTERN void		Tcl_Release _ANSI_ARGS_((ClientData clientData));
-/* 212 */
+/* 217 */
 EXTERN void		Tcl_ResetResult _ANSI_ARGS_((Tcl_Interp * interp));
-/* 213 */
-EXTERN int		Tcl_ScanCountedElement _ANSI_ARGS_((CONST char * str, 
-				int length, int * flagPtr));
-/* 214 */
-EXTERN int		Tcl_ScanElement _ANSI_ARGS_((CONST char * str, 
+/* 218 */
+EXTERN int		Tcl_ScanElement _ANSI_ARGS_((CONST char * string, 
 				int * flagPtr));
-/* 215 */
+/* 219 */
+EXTERN int		Tcl_ScanCountedElement _ANSI_ARGS_((
+				CONST char * string, int length, 
+				int * flagPtr));
+/* 220 */
 EXTERN int		Tcl_Seek _ANSI_ARGS_((Tcl_Channel chan, int offset, 
 				int mode));
-/* 216 */
+/* 221 */
 EXTERN int		Tcl_ServiceAll _ANSI_ARGS_((void));
-/* 217 */
+/* 222 */
 EXTERN int		Tcl_ServiceEvent _ANSI_ARGS_((int flags));
-/* 218 */
+/* 223 */
 EXTERN void		Tcl_SetAssocData _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * name, Tcl_InterpDeleteProc * proc, 
 				ClientData clientData));
-/* 219 */
-EXTERN void		Tcl_SetBooleanObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				int boolValue));
-/* 220 */
-EXTERN unsigned char *	Tcl_SetByteArrayLength _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				int length));
-/* 221 */
-EXTERN void		Tcl_SetByteArrayObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				unsigned char * bytes, int length));
-/* 222 */
+/* 224 */
 EXTERN void		Tcl_SetChannelBufferSize _ANSI_ARGS_((
 				Tcl_Channel chan, int sz));
-/* 223 */
+/* 225 */
 EXTERN int		Tcl_SetChannelOption _ANSI_ARGS_((
 				Tcl_Interp * interp, Tcl_Channel chan, 
 				char * optionName, char * newValue));
-/* 224 */
+/* 226 */
 EXTERN int		Tcl_SetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * cmdName, Tcl_CmdInfo * infoPtr));
-/* 225 */
-EXTERN void		Tcl_SetDoubleObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				double doubleValue));
-/* 226 */
-EXTERN void		Tcl_SetErrno _ANSI_ARGS_((int err));
 /* 227 */
-EXTERN void		Tcl_SetErrorCode _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
+EXTERN void		Tcl_SetErrno _ANSI_ARGS_((int err));
 /* 228 */
-EXTERN void		Tcl_SetErrorCodeVA _ANSI_ARGS_((Tcl_Interp * interp, 
-				va_list argList));
+EXTERN void		Tcl_SetErrorCode _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
 /* 229 */
-EXTERN void		Tcl_SetIntObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				int intValue));
+EXTERN void		Tcl_SetMaxBlockTime _ANSI_ARGS_((Tcl_Time * timePtr));
 /* 230 */
-EXTERN void		Tcl_SetListObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				int objc, Tcl_Obj *CONST objv[]));
+EXTERN void		Tcl_SetPanicProc _ANSI_ARGS_((
+				Tcl_PanicProc * panicProc));
 /* 231 */
-EXTERN void		Tcl_SetLongObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				long longValue));
+EXTERN int		Tcl_SetRecursionLimit _ANSI_ARGS_((
+				Tcl_Interp * interp, int depth));
 /* 232 */
-EXTERN void		Tcl_SetMaxBlockTime _ANSI_ARGS_((Tcl_Time * timePtr));
+EXTERN void		Tcl_SetResult _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * string, Tcl_FreeProc * freeProc));
 /* 233 */
+EXTERN int		Tcl_SetServiceMode _ANSI_ARGS_((int mode));
+/* 234 */
 EXTERN void		Tcl_SetObjErrorCode _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * errorObjPtr));
-/* 234 */
-EXTERN void		Tcl_SetObjLength _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				int length));
 /* 235 */
 EXTERN void		Tcl_SetObjResult _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * resultObjPtr));
 /* 236 */
-EXTERN void		Tcl_SetPanicProc _ANSI_ARGS_((
-				Tcl_PanicProc * panicProc));
-/* 237 */
-EXTERN int		Tcl_SetRecursionLimit _ANSI_ARGS_((
-				Tcl_Interp * interp, int depth));
-/* 238 */
-EXTERN void		Tcl_SetResult _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, Tcl_FreeProc * freeProc));
-/* 239 */
-EXTERN int		Tcl_SetServiceMode _ANSI_ARGS_((int mode));
-/* 240 */
 EXTERN void		Tcl_SetStdChannel _ANSI_ARGS_((Tcl_Channel channel, 
 				int type));
-/* 241 */
-EXTERN void		Tcl_SetStringObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
-				char * bytes, int length));
-/* 242 */
-EXTERN void		Tcl_SetTimer _ANSI_ARGS_((Tcl_Time * timePtr));
-/* 243 */
+/* 237 */
 EXTERN char *		Tcl_SetVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName, char * newValue, int flags));
-/* 244 */
+/* 238 */
 EXTERN char *		Tcl_SetVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, char * newValue, 
 				int flags));
-/* 245 */
+/* 239 */
 EXTERN char *		Tcl_SignalId _ANSI_ARGS_((int sig));
-/* 246 */
+/* 240 */
 EXTERN char *		Tcl_SignalMsg _ANSI_ARGS_((int sig));
-/* 247 */
-EXTERN void		Tcl_Sleep _ANSI_ARGS_((int ms));
-/* 248 */
+/* 241 */
 EXTERN void		Tcl_SourceRCFile _ANSI_ARGS_((Tcl_Interp * interp));
-/* 249 */
+/* 242 */
 EXTERN int		Tcl_SplitList _ANSI_ARGS_((Tcl_Interp * interp, 
-				CONST char * listStr, int * argcPtr, 
+				CONST char * list, int * argcPtr, 
 				char *** argvPtr));
-/* 250 */
+/* 243 */
 EXTERN void		Tcl_SplitPath _ANSI_ARGS_((CONST char * path, 
 				int * argcPtr, char *** argvPtr));
-/* 251 */
+/* 244 */
 EXTERN void		Tcl_StaticPackage _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * pkgName, 
 				Tcl_PackageInitProc * initProc, 
 				Tcl_PackageInitProc * safeInitProc));
-/* 252 */
-EXTERN int		Tcl_StringMatch _ANSI_ARGS_((CONST char * str, 
+/* 245 */
+EXTERN int		Tcl_StringMatch _ANSI_ARGS_((CONST char * string, 
 				CONST char * pattern));
-/* 253 */
+/* 246 */
 EXTERN int		Tcl_Tell _ANSI_ARGS_((Tcl_Channel chan));
-/* 254 */
+/* 247 */
 EXTERN int		Tcl_TraceVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName, int flags, 
 				Tcl_VarTraceProc * proc, 
 				ClientData clientData));
-/* 255 */
+/* 248 */
 EXTERN int		Tcl_TraceVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, int flags, 
 				Tcl_VarTraceProc * proc, 
 				ClientData clientData));
-/* 256 */
+/* 249 */
 EXTERN char *		Tcl_TranslateFileName _ANSI_ARGS_((
 				Tcl_Interp * interp, char * name, 
 				Tcl_DString * bufferPtr));
-/* 257 */
+/* 250 */
 EXTERN int		Tcl_Ungets _ANSI_ARGS_((Tcl_Channel chan, char * str, 
 				int len, int atHead));
-/* 258 */
+/* 251 */
 EXTERN void		Tcl_UnlinkVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName));
-/* 259 */
+/* 252 */
 EXTERN int		Tcl_UnregisterChannel _ANSI_ARGS_((
 				Tcl_Interp * interp, Tcl_Channel chan));
-/* 260 */
+/* 253 */
 EXTERN int		Tcl_UnsetVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName, int flags));
-/* 261 */
+/* 254 */
 EXTERN int		Tcl_UnsetVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, int flags));
-/* 262 */
+/* 255 */
 EXTERN void		Tcl_UntraceVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName, int flags, 
 				Tcl_VarTraceProc * proc, 
 				ClientData clientData));
-/* 263 */
+/* 256 */
 EXTERN void		Tcl_UntraceVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, int flags, 
 				Tcl_VarTraceProc * proc, 
 				ClientData clientData));
-/* 264 */
+/* 257 */
 EXTERN void		Tcl_UpdateLinkedVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName));
-/* 265 */
+/* 258 */
 EXTERN int		Tcl_UpVar _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * frameName, char * varName, 
 				char * localName, int flags));
-/* 266 */
+/* 259 */
 EXTERN int		Tcl_UpVar2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * frameName, char * part1, char * part2, 
 				char * localName, int flags));
-/* 267 */
-EXTERN void		Tcl_ValidateAllMemory _ANSI_ARGS_((char * file, 
-				int line));
-/* 268 */
+/* 260 */
 EXTERN int		Tcl_VarEval _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
-/* 269 */
-EXTERN int		Tcl_VarEvalVA _ANSI_ARGS_((Tcl_Interp * interp, 
-				va_list argList));
-/* 270 */
+/* 261 */
 EXTERN ClientData	Tcl_VarTraceInfo _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * varName, int flags, 
 				Tcl_VarTraceProc * procPtr, 
 				ClientData prevClientData));
-/* 271 */
+/* 262 */
 EXTERN ClientData	Tcl_VarTraceInfo2 _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, int flags, 
 				Tcl_VarTraceProc * procPtr, 
 				ClientData prevClientData));
-/* 272 */
-EXTERN int		Tcl_WaitForEvent _ANSI_ARGS_((Tcl_Time * timePtr));
-/* 273 */
-EXTERN Tcl_Pid		Tcl_WaitPid _ANSI_ARGS_((Tcl_Pid pid, int * statPtr, 
-				int options));
-/* 274 */
+/* 263 */
 EXTERN int		Tcl_Write _ANSI_ARGS_((Tcl_Channel chan, char * s, 
 				int slen));
-/* 275 */
+/* 264 */
 EXTERN void		Tcl_WrongNumArgs _ANSI_ARGS_((Tcl_Interp * interp, 
 				int objc, Tcl_Obj *CONST objv[], 
 				char * message));
+/* 265 */
+EXTERN int		Tcl_DumpActiveMemory _ANSI_ARGS_((char * fileName));
+/* 266 */
+EXTERN void		Tcl_ValidateAllMemory _ANSI_ARGS_((char * file, 
+				int line));
+/* 267 */
+EXTERN void		Tcl_AppendResultVA _ANSI_ARGS_((Tcl_Interp * interp, 
+				va_list argList));
+/* 268 */
+EXTERN void		Tcl_AppendStringsToObjVA _ANSI_ARGS_((
+				Tcl_Obj * objPtr, va_list argList));
+/* 269 */
+EXTERN char *		Tcl_HashStats _ANSI_ARGS_((Tcl_HashTable * tablePtr));
+/* 270 */
+EXTERN char *		Tcl_ParseVar _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * string, char ** termPtr));
+/* 271 */
+EXTERN char *		Tcl_PkgPresent _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * name, char * version, int exact));
+/* 272 */
+EXTERN char *		Tcl_PkgPresentEx _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * name, char * version, int exact, 
+				ClientData * clientDataPtr));
+/* 273 */
+EXTERN int		Tcl_PkgProvide _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * name, char * version));
+/* 274 */
+EXTERN char *		Tcl_PkgRequire _ANSI_ARGS_((Tcl_Interp * interp, 
+				char * name, char * version, int exact));
+/* 275 */
+EXTERN void		Tcl_SetErrorCodeVA _ANSI_ARGS_((Tcl_Interp * interp, 
+				va_list argList));
 /* 276 */
+EXTERN int		Tcl_VarEvalVA _ANSI_ARGS_((Tcl_Interp * interp, 
+				va_list argList));
+/* 277 */
+EXTERN Tcl_Pid		Tcl_WaitPid _ANSI_ARGS_((Tcl_Pid pid, int * statPtr, 
+				int options));
+/* 278 */
+EXTERN void		panicVA _ANSI_ARGS_((char * format, va_list argList));
+/* 279 */
 EXTERN void		Tcl_AppendObjToObj _ANSI_ARGS_((Tcl_Obj * objPtr, 
 				Tcl_Obj * appendObjPtr));
-/* 277 */
+/* 280 */
 EXTERN void		Tcl_AlertNotifier _ANSI_ARGS_((ClientData clientData));
-/* 278 */
+/* 281 */
 EXTERN Tcl_Encoding	Tcl_CreateEncoding _ANSI_ARGS_((
 				Tcl_EncodingType * typePtr));
-/* 279 */
+/* 282 */
 EXTERN void		Tcl_CreateThreadExitHandler _ANSI_ARGS_((
 				Tcl_ExitProc * proc, ClientData clientData));
-/* 280 */
+/* 283 */
 EXTERN void		Tcl_DeleteThreadExitHandler _ANSI_ARGS_((
 				Tcl_ExitProc * proc, ClientData clientData));
-/* 281 */
+/* 284 */
 EXTERN void		Tcl_DiscardResult _ANSI_ARGS_((
 				Tcl_SavedResult * statePtr));
-/* 282 */
+/* 285 */
 EXTERN int		Tcl_EvalEx _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * script, int numBytes, int flags));
-/* 283 */
+/* 286 */
 EXTERN int		Tcl_EvalObjv _ANSI_ARGS_((Tcl_Interp * interp, 
 				int objc, Tcl_Obj *CONST objv[], int flags));
-/* 284 */
+/* 287 */
 EXTERN int		Tcl_EvalObjEx _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_Obj * objPtr, int flags));
-/* 285 */
+/* 288 */
 EXTERN void		Tcl_ExitThread _ANSI_ARGS_((int status));
-/* 286 */
+/* 289 */
 EXTERN 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));
-/* 287 */
+/* 290 */
 EXTERN char *		Tcl_ExternalToUtfDString _ANSI_ARGS_((
 				Tcl_Encoding encoding, CONST char * src, 
 				int srcLen, Tcl_DString * dsPtr));
-/* 288 */
+/* 291 */
 EXTERN void		Tcl_FinalizeThread _ANSI_ARGS_((void));
-/* 289 */
+/* 292 */
 EXTERN void		Tcl_FinalizeNotifier _ANSI_ARGS_((
 				ClientData clientData));
-/* 290 */
+/* 293 */
 EXTERN void		Tcl_FreeEncoding _ANSI_ARGS_((Tcl_Encoding encoding));
-/* 291 */
+/* 294 */
 EXTERN Tcl_ThreadId	Tcl_GetCurrentThread _ANSI_ARGS_((void));
-/* 292 */
+/* 295 */
 EXTERN Tcl_Encoding	Tcl_GetEncoding _ANSI_ARGS_((Tcl_Interp * interp, 
 				CONST char * name));
-/* 293 */
+/* 296 */
 EXTERN char *		Tcl_GetEncodingName _ANSI_ARGS_((
 				Tcl_Encoding encoding));
-/* 294 */
+/* 297 */
 EXTERN void		Tcl_GetEncodingNames _ANSI_ARGS_((
 				Tcl_Interp * interp));
-/* 295 */
+/* 298 */
 EXTERN int		Tcl_GetIndexFromObjStruct _ANSI_ARGS_((
 				Tcl_Interp * interp, Tcl_Obj * objPtr, 
 				char ** tablePtr, int offset, char * msg, 
 				int flags, int * indexPtr));
-/* 296 */
+/* 299 */
 EXTERN VOID *		Tcl_GetThreadData _ANSI_ARGS_((
 				Tcl_ThreadDataKey * keyPtr, int size));
-/* 297 */
+/* 300 */
 EXTERN Tcl_Obj *	Tcl_GetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, int flags));
-/* 298 */
+/* 301 */
 EXTERN ClientData	Tcl_InitNotifier _ANSI_ARGS_((void));
-/* 299 */
+/* 302 */
 EXTERN void		Tcl_MutexLock _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
-/* 300 */
+/* 303 */
 EXTERN void		Tcl_MutexUnlock _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
-/* 301 */
+/* 304 */
 EXTERN void		Tcl_ConditionNotify _ANSI_ARGS_((
 				Tcl_Condition * condPtr));
-/* 302 */
+/* 305 */
 EXTERN void		Tcl_ConditionWait _ANSI_ARGS_((
 				Tcl_Condition * condPtr, 
 				Tcl_Mutex * mutexPtr, Tcl_Time * timePtr));
-/* 303 */
+/* 306 */
 EXTERN int		Tcl_NumUtfChars _ANSI_ARGS_((CONST char * src, 
 				int len));
-/* 304 */
+/* 307 */
 EXTERN int		Tcl_ReadChars _ANSI_ARGS_((Tcl_Channel channel, 
 				Tcl_Obj * objPtr, int charsToRead, 
 				int appendFlag));
-/* 305 */
+/* 308 */
 EXTERN void		Tcl_RestoreResult _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_SavedResult * statePtr));
-/* 306 */
+/* 309 */
 EXTERN void		Tcl_SaveResult _ANSI_ARGS_((Tcl_Interp * interp, 
 				Tcl_SavedResult * statePtr));
-/* 307 */
+/* 310 */
 EXTERN int		Tcl_SetSystemEncoding _ANSI_ARGS_((
 				Tcl_Interp * interp, CONST char * name));
-/* 308 */
+/* 311 */
 EXTERN Tcl_Obj *	Tcl_SetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * part1, char * part2, 
 				Tcl_Obj * newValuePtr, int flags));
-/* 309 */
+/* 312 */
 EXTERN void		Tcl_ThreadAlert _ANSI_ARGS_((Tcl_ThreadId threadId));
-/* 310 */
+/* 313 */
 EXTERN void		Tcl_ThreadQueueEvent _ANSI_ARGS_((
 				Tcl_ThreadId threadId, Tcl_Event* evPtr, 
 				Tcl_QueuePosition position));
-/* 311 */
+/* 314 */
 EXTERN Tcl_UniChar	Tcl_UniCharAtIndex _ANSI_ARGS_((CONST char * src, 
 				int index));
-/* 312 */
+/* 315 */
 EXTERN Tcl_UniChar	Tcl_UniCharToLower _ANSI_ARGS_((int ch));
-/* 313 */
+/* 316 */
 EXTERN Tcl_UniChar	Tcl_UniCharToTitle _ANSI_ARGS_((int ch));
-/* 314 */
+/* 317 */
 EXTERN Tcl_UniChar	Tcl_UniCharToUpper _ANSI_ARGS_((int ch));
-/* 315 */
+/* 318 */
 EXTERN int		Tcl_UniCharToUtf _ANSI_ARGS_((int ch, char * buf));
-/* 316 */
+/* 319 */
 EXTERN char *		Tcl_UtfAtIndex _ANSI_ARGS_((CONST char * src, 
 				int index));
-/* 317 */
+/* 320 */
 EXTERN int		Tcl_UtfCharComplete _ANSI_ARGS_((CONST char * src, 
 				int len));
-/* 318 */
+/* 321 */
 EXTERN int		Tcl_UtfBackslash _ANSI_ARGS_((CONST char * src, 
 				int * readPtr, char * dst));
-/* 319 */
+/* 322 */
 EXTERN char *		Tcl_UtfFindFirst _ANSI_ARGS_((CONST char * src, 
 				int ch));
-/* 320 */
+/* 323 */
 EXTERN char *		Tcl_UtfFindLast _ANSI_ARGS_((CONST char * src, 
 				int ch));
-/* Slot 321 is reserved */
-/* Slot 322 is reserved */
-/* 323 */
-EXTERN char *		Tcl_UtfNext _ANSI_ARGS_((CONST char * src));
 /* 324 */
+EXTERN char *		Tcl_UtfNext _ANSI_ARGS_((CONST char * src));
+/* 325 */
 EXTERN char *		Tcl_UtfPrev _ANSI_ARGS_((CONST char * src, 
 				CONST char * start));
-/* 325 */
+/* 326 */
 EXTERN 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));
-/* 326 */
+/* 327 */
 EXTERN char *		Tcl_UtfToExternalDString _ANSI_ARGS_((
 				Tcl_Encoding encoding, CONST char * src, 
 				int srcLen, Tcl_DString * dsPtr));
-/* 327 */
-EXTERN int		Tcl_UtfToLower _ANSI_ARGS_((char * src));
 /* 328 */
-EXTERN int		Tcl_UtfToTitle _ANSI_ARGS_((char * src));
+EXTERN int		Tcl_UtfToLower _ANSI_ARGS_((char * src));
 /* 329 */
+EXTERN int		Tcl_UtfToTitle _ANSI_ARGS_((char * src));
+/* 330 */
 EXTERN int		Tcl_UtfToUniChar _ANSI_ARGS_((CONST char * src, 
 				Tcl_UniChar * chPtr));
-/* 330 */
-EXTERN int		Tcl_UtfToUpper _ANSI_ARGS_((char * src));
 /* 331 */
+EXTERN int		Tcl_UtfToUpper _ANSI_ARGS_((char * src));
+/* 332 */
 EXTERN int		Tcl_WriteChars _ANSI_ARGS_((Tcl_Channel chan, 
 				CONST char * src, int srcLen));
-/* 332 */
+/* 333 */
 EXTERN int		Tcl_WriteObj _ANSI_ARGS_((Tcl_Channel chan, 
 				Tcl_Obj * objPtr));
 
@@ -1032,339 +1045,364 @@ typedef struct TclStubs {
     int magic;
     struct TclStubHooks *hooks;
 
-    void (*tcl_AddErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message)); /* 0 */
-    void (*tcl_AddObjErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message, int length)); /* 1 */
-    char * (*tcl_Alloc) _ANSI_ARGS_((unsigned int size)); /* 2 */
-    void (*tcl_AllowExceptions) _ANSI_ARGS_((Tcl_Interp * interp)); /* 3 */
-    int (*tcl_AppendAllObjTypes) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 4 */
-    void (*tcl_AppendElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str)); /* 5 */
-    void (*tcl_AppendResult) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 6 */
-    void (*tcl_AppendResultVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 7 */
-    void (*tcl_AppendToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 8 */
-    void (*tcl_AppendStringsToObj) _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr)); /* 9 */
-    void (*tcl_AppendStringsToObjVA) _ANSI_ARGS_((Tcl_Obj * objPtr, va_list argList)); /* 10 */
-    Tcl_AsyncHandler (*tcl_AsyncCreate) _ANSI_ARGS_((Tcl_AsyncProc * proc, ClientData clientData)); /* 11 */
-    void (*tcl_AsyncDelete) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 12 */
-    int (*tcl_AsyncInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int code)); /* 13 */
-    void (*tcl_AsyncMark) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 14 */
-    int (*tcl_AsyncReady) _ANSI_ARGS_((void)); /* 15 */
-    void (*tcl_BackgroundError) _ANSI_ARGS_((Tcl_Interp * interp)); /* 16 */
-    char (*tcl_Backslash) _ANSI_ARGS_((CONST char * src, int * readPtr)); /* 17 */
-    int (*tcl_BadChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, char * optionName, char * optionList)); /* 18 */
-    void (*tcl_CallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 19 */
-    void (*tcl_CancelIdleCall) _ANSI_ARGS_((Tcl_IdleProc * idleProc, ClientData clientData)); /* 20 */
-    int (*tcl_Close) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 21 */
-    int (*tcl_CommandComplete) _ANSI_ARGS_((char * cmd)); /* 22 */
-    char * (*tcl_Concat) _ANSI_ARGS_((int argc, char ** argv)); /* 23 */
-    Tcl_Obj * (*tcl_ConcatObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 24 */
-    int (*tcl_ConvertCountedElement) _ANSI_ARGS_((CONST char * src, int length, char * dst, int flags)); /* 25 */
-    int (*tcl_ConvertElement) _ANSI_ARGS_((CONST char * src, char * dst, int flags)); /* 26 */
-    int (*tcl_ConvertToType) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_ObjType * typePtr)); /* 27 */
-    int (*tcl_CreateAlias) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int argc, char ** argv)); /* 28 */
-    int (*tcl_CreateAliasObj) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int objc, Tcl_Obj *CONST objv[])); /* 29 */
-    Tcl_Channel (*tcl_CreateChannel) _ANSI_ARGS_((Tcl_ChannelType * typePtr, char * chanName, ClientData instanceData, int mask)); /* 30 */
-    void (*tcl_CreateChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, int mask, Tcl_ChannelProc * proc, ClientData clientData)); /* 31 */
-    void (*tcl_CreateCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData)); /* 32 */
-    Tcl_Command (*tcl_CreateCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 33 */
-    void (*tcl_CreateEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData)); /* 34 */
-    void (*tcl_CreateExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 35 */
-    Tcl_Interp * (*tcl_CreateInterp) _ANSI_ARGS_((void)); /* 36 */
-    void (*tcl_CreateMathFunc) _ANSI_ARGS_((Tcl_Interp * interp, char * name, int numArgs, Tcl_ValueType * argTypes, Tcl_MathProc * proc, ClientData clientData)); /* 37 */
-    Tcl_Command (*tcl_CreateObjCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_ObjCmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 38 */
-    Tcl_Interp * (*tcl_CreateSlave) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveName, int isSafe)); /* 39 */
-    Tcl_TimerToken (*tcl_CreateTimerHandler) _ANSI_ARGS_((int milliseconds, Tcl_TimerProc * proc, ClientData clientData)); /* 40 */
-    Tcl_Trace (*tcl_CreateTrace) _ANSI_ARGS_((Tcl_Interp * interp, int level, Tcl_CmdTraceProc * proc, ClientData clientData)); /* 41 */
-    char * (*tcl_DbCkalloc) _ANSI_ARGS_((unsigned int size, char * file, int line)); /* 42 */
-    int (*tcl_DbCkfree) _ANSI_ARGS_((char * ptr, char * file, int line)); /* 43 */
-    char * (*tcl_DbCkrealloc) _ANSI_ARGS_((char * ptr, unsigned int size, char * file, int line)); /* 44 */
-    void (*tcl_DbDecrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 45 */
-    void (*tcl_DbIncrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 46 */
-    int (*tcl_DbIsShared) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 47 */
-    Tcl_Obj * (*tcl_DbNewBooleanObj) _ANSI_ARGS_((int boolValue, char * file, int line)); /* 48 */
-    Tcl_Obj * (*tcl_DbNewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length, char * file, int line)); /* 49 */
-    Tcl_Obj * (*tcl_DbNewDoubleObj) _ANSI_ARGS_((double doubleValue, char * file, int line)); /* 50 */
-    Tcl_Obj * (*tcl_DbNewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[], char * file, int line)); /* 51 */
-    Tcl_Obj * (*tcl_DbNewLongObj) _ANSI_ARGS_((long longValue, char * file, int line)); /* 52 */
-    Tcl_Obj * (*tcl_DbNewObj) _ANSI_ARGS_((char * file, int line)); /* 53 */
-    Tcl_Obj * (*tcl_DbNewStringObj) _ANSI_ARGS_((CONST char * bytes, int length, char * file, int line)); /* 54 */
-    void (*tcl_DeleteAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name)); /* 55 */
-    int (*tcl_DeleteCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName)); /* 56 */
-    int (*tcl_DeleteCommandFromToken) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command)); /* 57 */
-    void (*tcl_DeleteChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_ChannelProc * proc, ClientData clientData)); /* 58 */
-    void (*tcl_DeleteCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData)); /* 59 */
-    void (*tcl_DeleteEvents) _ANSI_ARGS_((Tcl_EventDeleteProc * proc, ClientData clientData)); /* 60 */
-    void (*tcl_DeleteEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData)); /* 61 */
-    void (*tcl_DeleteExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 62 */
-    void (*tcl_DeleteHashEntry) _ANSI_ARGS_((Tcl_HashEntry * entryPtr)); /* 63 */
-    void (*tcl_DeleteHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr)); /* 64 */
-    void (*tcl_DeleteInterp) _ANSI_ARGS_((Tcl_Interp * interp)); /* 65 */
-    void (*tcl_DeleteTimerHandler) _ANSI_ARGS_((Tcl_TimerToken token)); /* 66 */
-    void (*tcl_DeleteTrace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Trace trace)); /* 67 */
-    void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr)); /* 68 */
-    void (*tcl_DontCallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 69 */
-    int (*tcl_DoOneEvent) _ANSI_ARGS_((int flags)); /* 70 */
-    void (*tcl_DoWhenIdle) _ANSI_ARGS_((Tcl_IdleProc * proc, ClientData clientData)); /* 71 */
-    char * (*tcl_DStringAppend) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * str, int length)); /* 72 */
-    char * (*tcl_DStringAppendElement) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * str)); /* 73 */
-    void (*tcl_DStringEndSublist) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 74 */
-    void (*tcl_DStringFree) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 75 */
-    void (*tcl_DStringGetResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr)); /* 76 */
-    void (*tcl_DStringInit) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 77 */
-    void (*tcl_DStringResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr)); /* 78 */
-    void (*tcl_DStringSetLength) _ANSI_ARGS_((Tcl_DString * dsPtr, int length)); /* 79 */
-    void (*tcl_DStringStartSublist) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 80 */
-    int (*tcl_DumpActiveMemory) _ANSI_ARGS_((char * fileName)); /* 81 */
-    Tcl_Obj * (*tcl_DuplicateObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 82 */
-    int (*tcl_Eof) _ANSI_ARGS_((Tcl_Channel chan)); /* 83 */
-    char * (*tcl_ErrnoId) _ANSI_ARGS_((void)); /* 84 */
-    char * (*tcl_ErrnoMsg) _ANSI_ARGS_((int err)); /* 85 */
-    int (*tcl_Eval) _ANSI_ARGS_((Tcl_Interp * interp, char * str)); /* 86 */
-    int (*tcl_EvalFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName)); /* 87 */
-    void (*tcl_EventuallyFree) _ANSI_ARGS_((ClientData clientData, Tcl_FreeProc * freeProc)); /* 88 */
-    int (*tcl_EvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 89 */
-    void (*tcl_Exit) _ANSI_ARGS_((int status)); /* 90 */
-    int (*tcl_ExposeCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * hiddenCmdToken, char * cmdName)); /* 91 */
-    int (*tcl_ExprBoolean) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * ptr)); /* 92 */
-    int (*tcl_ExprBooleanObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * ptr)); /* 93 */
-    int (*tcl_ExprDouble) _ANSI_ARGS_((Tcl_Interp * interp, char * str, double * ptr)); /* 94 */
-    int (*tcl_ExprDoubleObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * ptr)); /* 95 */
-    int (*tcl_ExprLong) _ANSI_ARGS_((Tcl_Interp * interp, char * str, long * ptr)); /* 96 */
-    int (*tcl_ExprLongObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * ptr)); /* 97 */
-    int (*tcl_ExprObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr)); /* 98 */
-    int (*tcl_ExprString) _ANSI_ARGS_((Tcl_Interp * interp, char * str)); /* 99 */
-    void (*tcl_Finalize) _ANSI_ARGS_((void)); /* 100 */
-    void (*tcl_FindExecutable) _ANSI_ARGS_((CONST char * argv0)); /* 101 */
-    Tcl_HashEntry * (*tcl_FirstHashEntry) _ANSI_ARGS_((Tcl_HashTable * tablePtr, Tcl_HashSearch * searchPtr)); /* 102 */
-    int (*tcl_Flush) _ANSI_ARGS_((Tcl_Channel chan)); /* 103 */
-    void (*tcl_Free) _ANSI_ARGS_((char * ptr)); /* 104 */
-    void (*tclFreeObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 105 */
-    void (*tcl_FreeResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 106 */
-    int (*tcl_GetAlias) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveCmd, Tcl_Interp ** targetInterpPtr, char ** targetCmdPtr, int * argcPtr, char *** argvPtr)); /* 107 */
-    int (*tcl_GetAliasObj) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveCmd, Tcl_Interp ** targetInterpPtr, char ** targetCmdPtr, int * objcPtr, Tcl_Obj *** objv)); /* 108 */
-    ClientData (*tcl_GetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_InterpDeleteProc ** procPtr)); /* 109 */
-    int (*tcl_GetBoolean) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * boolPtr)); /* 110 */
-    int (*tcl_GetBooleanFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * boolPtr)); /* 111 */
-    unsigned char * (*tcl_GetByteArrayFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 112 */
-    Tcl_Channel (*tcl_GetChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * chanName, int * modePtr)); /* 113 */
-    int (*tcl_GetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan)); /* 114 */
-    int (*tcl_GetChannelHandle) _ANSI_ARGS_((Tcl_Channel chan, int direction, ClientData * handlePtr)); /* 115 */
-    ClientData (*tcl_GetChannelInstanceData) _ANSI_ARGS_((Tcl_Channel chan)); /* 116 */
-    int (*tcl_GetChannelMode) _ANSI_ARGS_((Tcl_Channel chan)); /* 117 */
-    char * (*tcl_GetChannelName) _ANSI_ARGS_((Tcl_Channel chan)); /* 118 */
-    int (*tcl_GetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, char * optionName, Tcl_DString * dsPtr)); /* 119 */
-    Tcl_ChannelType * (*tcl_GetChannelType) _ANSI_ARGS_((Tcl_Channel chan)); /* 120 */
-    int (*tcl_GetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdInfo * infoPtr)); /* 121 */
-    char * (*tcl_GetCommandName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command)); /* 122 */
-    int (*tcl_GetDouble) _ANSI_ARGS_((Tcl_Interp * interp, char * str, double * doublePtr)); /* 123 */
-    int (*tcl_GetDoubleFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * doublePtr)); /* 124 */
-    int (*tcl_GetErrno) _ANSI_ARGS_((void)); /* 125 */
-    char * (*tcl_GetHostName) _ANSI_ARGS_((void)); /* 126 */
-    int (*tcl_GetIndexFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, char * msg, int flags, int * indexPtr)); /* 127 */
-    int (*tcl_GetInt) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * intPtr)); /* 128 */
-    int (*tcl_GetInterpPath) _ANSI_ARGS_((Tcl_Interp * askInterp, Tcl_Interp * slaveInterp)); /* 129 */
-    int (*tcl_GetIntFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * intPtr)); /* 130 */
-    int (*tcl_GetLongFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * longPtr)); /* 131 */
-    Tcl_Interp * (*tcl_GetMaster) _ANSI_ARGS_((Tcl_Interp * interp)); /* 132 */
-    CONST char * (*tcl_GetNameOfExecutable) _ANSI_ARGS_((void)); /* 133 */
-    Tcl_Obj * (*tcl_GetObjResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 134 */
-    Tcl_ObjType * (*tcl_GetObjType) _ANSI_ARGS_((char * typeName)); /* 135 */
-    Tcl_PathType (*tcl_GetPathType) _ANSI_ARGS_((char * path)); /* 136 */
-    int (*tcl_Gets) _ANSI_ARGS_((Tcl_Channel chan, Tcl_DString * dsPtr)); /* 137 */
-    int (*tcl_GetsObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); /* 138 */
-    int (*tcl_GetServiceMode) _ANSI_ARGS_((void)); /* 139 */
-    Tcl_Interp * (*tcl_GetSlave) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveName)); /* 140 */
-    Tcl_Channel (*tcl_GetStdChannel) _ANSI_ARGS_((int type)); /* 141 */
-    char * (*tcl_GetStringFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 142 */
-    char * (*tcl_GetStringResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 143 */
-    char * (*tcl_GetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags)); /* 144 */
-    char * (*tcl_GetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 145 */
-    int (*tcl_GlobalEval) _ANSI_ARGS_((Tcl_Interp * interp, char * command)); /* 146 */
-    int (*tcl_GlobalEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 147 */
-    char * (*tcl_HashStats) _ANSI_ARGS_((Tcl_HashTable * tablePtr)); /* 148 */
-    int (*tcl_HideCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, char * hiddenCmdToken)); /* 149 */
-    int (*tcl_Init) _ANSI_ARGS_((Tcl_Interp * interp)); /* 150 */
-    void (*tcl_InitHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr, int keyType)); /* 151 */
-    void (*tcl_InitMemory) _ANSI_ARGS_((Tcl_Interp * interp)); /* 152 */
-    int (*tcl_InputBlocked) _ANSI_ARGS_((Tcl_Channel chan)); /* 153 */
-    int (*tcl_InputBuffered) _ANSI_ARGS_((Tcl_Channel chan)); /* 154 */
-    int (*tcl_InterpDeleted) _ANSI_ARGS_((Tcl_Interp * interp)); /* 155 */
-    int (*tcl_IsSafe) _ANSI_ARGS_((Tcl_Interp * interp)); /* 156 */
-    void (*tcl_InvalidateStringRep) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 157 */
-    char * (*tcl_JoinPath) _ANSI_ARGS_((int argc, char ** argv, Tcl_DString * resultPtr)); /* 158 */
-    int (*tcl_LinkVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, char * addr, int type)); /* 159 */
-    int (*tcl_ListObjAppendList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * elemListPtr)); /* 160 */
-    int (*tcl_ListObjAppendElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * objPtr)); /* 161 */
-    int (*tcl_ListObjGetElements) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * objcPtr, Tcl_Obj *** objvPtr)); /* 162 */
-    int (*tcl_ListObjIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj ** objPtrPtr)); /* 163 */
-    int (*tcl_ListObjLength) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * intPtr)); /* 164 */
-    int (*tcl_ListObjReplace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[])); /* 165 */
-    Tcl_Channel (*tcl_MakeFileChannel) _ANSI_ARGS_((ClientData handle, int mode)); /* 166 */
-    int (*tcl_MakeSafe) _ANSI_ARGS_((Tcl_Interp * interp)); /* 167 */
-    Tcl_Channel (*tcl_MakeTcpClientChannel) _ANSI_ARGS_((ClientData tcpSocket)); /* 168 */
-    char * (*tcl_Merge) _ANSI_ARGS_((int argc, char ** argv)); /* 169 */
-    Tcl_Obj * (*tcl_NewBooleanObj) _ANSI_ARGS_((int boolValue)); /* 170 */
-    Tcl_Obj * (*tcl_NewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length)); /* 171 */
-    Tcl_Obj * (*tcl_NewDoubleObj) _ANSI_ARGS_((double doubleValue)); /* 172 */
-    Tcl_Obj * (*tcl_NewIntObj) _ANSI_ARGS_((int intValue)); /* 173 */
-    Tcl_Obj * (*tcl_NewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 174 */
-    Tcl_Obj * (*tcl_NewLongObj) _ANSI_ARGS_((long longValue)); /* 175 */
-    Tcl_Obj * (*tcl_NewObj) _ANSI_ARGS_((void)); /* 176 */
-    Tcl_Obj * (*tcl_NewStringObj) _ANSI_ARGS_((CONST char * bytes, int length)); /* 177 */
-    Tcl_HashEntry * (*tcl_NextHashEntry) _ANSI_ARGS_((Tcl_HashSearch * searchPtr)); /* 178 */
-    void (*tcl_NotifyChannel) _ANSI_ARGS_((Tcl_Channel channel, int mask)); /* 179 */
-    Tcl_Obj * (*tcl_ObjGetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, int flags)); /* 180 */
-    Tcl_Obj * (*tcl_ObjSetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, Tcl_Obj * newValuePtr, int flags)); /* 181 */
-    Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 182 */
-    Tcl_Channel (*tcl_OpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * modeString, int permissions)); /* 183 */
-    Tcl_Channel (*tcl_OpenTcpClient) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * address, char * myaddr, int myport, int async)); /* 184 */
-    Tcl_Channel (*tcl_OpenTcpServer) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * host, Tcl_TcpAcceptProc * acceptProc, ClientData callbackData)); /* 185 */
-    void (*panic) _ANSI_ARGS_(TCL_VARARGS(char *,format)); /* 186 */
-    void (*panicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 187 */
-    char * (*tcl_ParseVar) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char ** termPtr)); /* 188 */
-    char * (*tcl_PkgPresent) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact)); /* 189 */
-    char * (*tcl_PkgPresentEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 190 */
-    int (*tcl_PkgProvide) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version)); /* 191 */
-    int (*tcl_PkgProvideEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, ClientData clientData)); /* 192 */
-    char * (*tcl_PkgRequire) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact)); /* 193 */
-    char * (*tcl_PkgRequireEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 194 */
-    char * (*tcl_PosixError) _ANSI_ARGS_((Tcl_Interp * interp)); /* 195 */
-    void (*tcl_Preserve) _ANSI_ARGS_((ClientData data)); /* 196 */
-    void (*tcl_PrintDouble) _ANSI_ARGS_((Tcl_Interp * interp, double value, char * dst)); /* 197 */
-    int (*tcl_PutEnv) _ANSI_ARGS_((CONST char * str)); /* 198 */
-    void (*tcl_QueueEvent) _ANSI_ARGS_((Tcl_Event * evPtr, Tcl_QueuePosition position)); /* 199 */
-    int (*tcl_Read) _ANSI_ARGS_((Tcl_Channel chan, char * bufPtr, int toRead)); /* 200 */
-    char * (*tcl_Realloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 201 */
-    void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void)); /* 202 */
-    int (*tcl_RecordAndEval) _ANSI_ARGS_((Tcl_Interp * interp, char * cmd, int flags)); /* 203 */
-    int (*tcl_RecordAndEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * cmdPtr, int flags)); /* 204 */
-    Tcl_RegExp (*tcl_RegExpCompile) _ANSI_ARGS_((Tcl_Interp * interp, char * str)); /* 205 */
-    int (*tcl_RegExpExec) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp regexp, CONST char * str, CONST char * start)); /* 206 */
-    int (*tcl_RegExpMatch) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char * pattern)); /* 207 */
-    void (*tcl_RegExpRange) _ANSI_ARGS_((Tcl_RegExp regexp, int index, char ** startPtr, char ** endPtr)); /* 208 */
-    void (*tcl_RegisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 209 */
-    void (*tcl_RegisterObjType) _ANSI_ARGS_((Tcl_ObjType * typePtr)); /* 210 */
-    void (*tcl_Release) _ANSI_ARGS_((ClientData clientData)); /* 211 */
-    void (*tcl_ResetResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 212 */
-    int (*tcl_ScanCountedElement) _ANSI_ARGS_((CONST char * str, int length, int * flagPtr)); /* 213 */
-    int (*tcl_ScanElement) _ANSI_ARGS_((CONST char * str, int * flagPtr)); /* 214 */
-    int (*tcl_Seek) _ANSI_ARGS_((Tcl_Channel chan, int offset, int mode)); /* 215 */
-    int (*tcl_ServiceAll) _ANSI_ARGS_((void)); /* 216 */
-    int (*tcl_ServiceEvent) _ANSI_ARGS_((int flags)); /* 217 */
-    void (*tcl_SetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 218 */
-    void (*tcl_SetBooleanObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int boolValue)); /* 219 */
-    unsigned char * (*tcl_SetByteArrayLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 220 */
-    void (*tcl_SetByteArrayObj) _ANSI_ARGS_((Tcl_Obj * objPtr, unsigned char * bytes, int length)); /* 221 */
-    void (*tcl_SetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan, int sz)); /* 222 */
-    int (*tcl_SetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, char * optionName, char * newValue)); /* 223 */
-    int (*tcl_SetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdInfo * infoPtr)); /* 224 */
-    void (*tcl_SetDoubleObj) _ANSI_ARGS_((Tcl_Obj * objPtr, double doubleValue)); /* 225 */
-    void (*tcl_SetErrno) _ANSI_ARGS_((int err)); /* 226 */
-    void (*tcl_SetErrorCode) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 227 */
-    void (*tcl_SetErrorCodeVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 228 */
-    void (*tcl_SetIntObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int intValue)); /* 229 */
-    void (*tcl_SetListObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int objc, Tcl_Obj *CONST objv[])); /* 230 */
-    void (*tcl_SetLongObj) _ANSI_ARGS_((Tcl_Obj * objPtr, long longValue)); /* 231 */
-    void (*tcl_SetMaxBlockTime) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 232 */
-    void (*tcl_SetObjErrorCode) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * errorObjPtr)); /* 233 */
-    void (*tcl_SetObjLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 234 */
+    int (*tcl_PkgProvideEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, ClientData clientData)); /* 0 */
+    char * (*tcl_PkgRequireEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 1 */
+    void (*panic) _ANSI_ARGS_(TCL_VARARGS(char *,format)); /* 2 */
+    char * (*tcl_Alloc) _ANSI_ARGS_((unsigned int size)); /* 3 */
+    void (*tcl_Free) _ANSI_ARGS_((char * ptr)); /* 4 */
+    char * (*tcl_Realloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 5 */
+    char * (*tcl_DbCkalloc) _ANSI_ARGS_((unsigned int size, char * file, int line)); /* 6 */
+    int (*tcl_DbCkfree) _ANSI_ARGS_((char * ptr, char * file, int line)); /* 7 */
+    char * (*tcl_DbCkrealloc) _ANSI_ARGS_((char * ptr, unsigned int size, char * file, int line)); /* 8 */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    void (*tcl_CreateFileHandler) _ANSI_ARGS_((int fd, int mask, Tcl_FileProc * proc, ClientData clientData)); /* 9 */
+#endif /* UNIX */
+#ifdef __WIN32__
+    void *reserved9;
+#endif /* __WIN32__ */
+#ifdef MAC_TCL
+    void *reserved9;
+#endif /* MAC_TCL */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    void (*tcl_DeleteFileHandler) _ANSI_ARGS_((int fd)); /* 10 */
+#endif /* UNIX */
+#ifdef __WIN32__
+    void *reserved10;
+#endif /* __WIN32__ */
+#ifdef MAC_TCL
+    void *reserved10;
+#endif /* MAC_TCL */
+    void (*tcl_SetTimer) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 11 */
+    void (*tcl_Sleep) _ANSI_ARGS_((int ms)); /* 12 */
+    int (*tcl_WaitForEvent) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 13 */
+    int (*tcl_AppendAllObjTypes) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 14 */
+    void (*tcl_AppendStringsToObj) _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr)); /* 15 */
+    void (*tcl_AppendToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 16 */
+    Tcl_Obj * (*tcl_ConcatObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 17 */
+    int (*tcl_ConvertToType) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_ObjType * typePtr)); /* 18 */
+    void (*tcl_DbDecrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 19 */
+    void (*tcl_DbIncrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 20 */
+    int (*tcl_DbIsShared) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 21 */
+    Tcl_Obj * (*tcl_DbNewBooleanObj) _ANSI_ARGS_((int boolValue, char * file, int line)); /* 22 */
+    Tcl_Obj * (*tcl_DbNewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length, char * file, int line)); /* 23 */
+    Tcl_Obj * (*tcl_DbNewDoubleObj) _ANSI_ARGS_((double doubleValue, char * file, int line)); /* 24 */
+    Tcl_Obj * (*tcl_DbNewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[], char * file, int line)); /* 25 */
+    Tcl_Obj * (*tcl_DbNewLongObj) _ANSI_ARGS_((long longValue, char * file, int line)); /* 26 */
+    Tcl_Obj * (*tcl_DbNewObj) _ANSI_ARGS_((char * file, int line)); /* 27 */
+    Tcl_Obj * (*tcl_DbNewStringObj) _ANSI_ARGS_((CONST char * bytes, int length, char * file, int line)); /* 28 */
+    Tcl_Obj * (*tcl_DuplicateObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 29 */
+    void (*tclFreeObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 30 */
+    int (*tcl_GetBoolean) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int * boolPtr)); /* 31 */
+    int (*tcl_GetBooleanFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * boolPtr)); /* 32 */
+    unsigned char * (*tcl_GetByteArrayFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 33 */
+    int (*tcl_GetDouble) _ANSI_ARGS_((Tcl_Interp * interp, char * string, double * doublePtr)); /* 34 */
+    int (*tcl_GetDoubleFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * doublePtr)); /* 35 */
+    int (*tcl_GetIndexFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, char * msg, int flags, int * indexPtr)); /* 36 */
+    int (*tcl_GetInt) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int * intPtr)); /* 37 */
+    int (*tcl_GetIntFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * intPtr)); /* 38 */
+    int (*tcl_GetLongFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * longPtr)); /* 39 */
+    Tcl_ObjType * (*tcl_GetObjType) _ANSI_ARGS_((char * typeName)); /* 40 */
+    char * (*tcl_GetStringFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 41 */
+    void (*tcl_InvalidateStringRep) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 42 */
+    int (*tcl_ListObjAppendList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * elemListPtr)); /* 43 */
+    int (*tcl_ListObjAppendElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * objPtr)); /* 44 */
+    int (*tcl_ListObjGetElements) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * objcPtr, Tcl_Obj *** objvPtr)); /* 45 */
+    int (*tcl_ListObjIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj ** objPtrPtr)); /* 46 */
+    int (*tcl_ListObjLength) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * intPtr)); /* 47 */
+    int (*tcl_ListObjReplace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[])); /* 48 */
+    Tcl_Obj * (*tcl_NewBooleanObj) _ANSI_ARGS_((int boolValue)); /* 49 */
+    Tcl_Obj * (*tcl_NewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length)); /* 50 */
+    Tcl_Obj * (*tcl_NewDoubleObj) _ANSI_ARGS_((double doubleValue)); /* 51 */
+    Tcl_Obj * (*tcl_NewIntObj) _ANSI_ARGS_((int intValue)); /* 52 */
+    Tcl_Obj * (*tcl_NewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 53 */
+    Tcl_Obj * (*tcl_NewLongObj) _ANSI_ARGS_((long longValue)); /* 54 */
+    Tcl_Obj * (*tcl_NewObj) _ANSI_ARGS_((void)); /* 55 */
+    Tcl_Obj * (*tcl_NewStringObj) _ANSI_ARGS_((CONST char * bytes, int length)); /* 56 */
+    void (*tcl_SetBooleanObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int boolValue)); /* 57 */
+    unsigned char * (*tcl_SetByteArrayLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 58 */
+    void (*tcl_SetByteArrayObj) _ANSI_ARGS_((Tcl_Obj * objPtr, unsigned char * bytes, int length)); /* 59 */
+    void (*tcl_SetDoubleObj) _ANSI_ARGS_((Tcl_Obj * objPtr, double doubleValue)); /* 60 */
+    void (*tcl_SetIntObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int intValue)); /* 61 */
+    void (*tcl_SetListObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int objc, Tcl_Obj *CONST objv[])); /* 62 */
+    void (*tcl_SetLongObj) _ANSI_ARGS_((Tcl_Obj * objPtr, long longValue)); /* 63 */
+    void (*tcl_SetObjLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 64 */
+    void (*tcl_SetStringObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 65 */
+    void (*tcl_AddErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message)); /* 66 */
+    void (*tcl_AddObjErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message, int length)); /* 67 */
+    void (*tcl_AllowExceptions) _ANSI_ARGS_((Tcl_Interp * interp)); /* 68 */
+    void (*tcl_AppendElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string)); /* 69 */
+    void (*tcl_AppendResult) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 70 */
+    Tcl_AsyncHandler (*tcl_AsyncCreate) _ANSI_ARGS_((Tcl_AsyncProc * proc, ClientData clientData)); /* 71 */
+    void (*tcl_AsyncDelete) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 72 */
+    int (*tcl_AsyncInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int code)); /* 73 */
+    void (*tcl_AsyncMark) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 74 */
+    int (*tcl_AsyncReady) _ANSI_ARGS_((void)); /* 75 */
+    void (*tcl_BackgroundError) _ANSI_ARGS_((Tcl_Interp * interp)); /* 76 */
+    char (*tcl_Backslash) _ANSI_ARGS_((CONST char * src, int * readPtr)); /* 77 */
+    int (*tcl_BadChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, char * optionName, char * optionList)); /* 78 */
+    void (*tcl_CallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 79 */
+    void (*tcl_CancelIdleCall) _ANSI_ARGS_((Tcl_IdleProc * idleProc, ClientData clientData)); /* 80 */
+    int (*tcl_Close) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 81 */
+    int (*tcl_CommandComplete) _ANSI_ARGS_((char * cmd)); /* 82 */
+    char * (*tcl_Concat) _ANSI_ARGS_((int argc, char ** argv)); /* 83 */
+    int (*tcl_ConvertElement) _ANSI_ARGS_((CONST char * src, char * dst, int flags)); /* 84 */
+    int (*tcl_ConvertCountedElement) _ANSI_ARGS_((CONST char * src, int length, char * dst, int flags)); /* 85 */
+    int (*tcl_CreateAlias) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int argc, char ** argv)); /* 86 */
+    int (*tcl_CreateAliasObj) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int objc, Tcl_Obj *CONST objv[])); /* 87 */
+    Tcl_Channel (*tcl_CreateChannel) _ANSI_ARGS_((Tcl_ChannelType * typePtr, char * chanName, ClientData instanceData, int mask)); /* 88 */
+    void (*tcl_CreateChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, int mask, Tcl_ChannelProc * proc, ClientData clientData)); /* 89 */
+    void (*tcl_CreateCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData)); /* 90 */
+    Tcl_Command (*tcl_CreateCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 91 */
+    void (*tcl_CreateEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData)); /* 92 */
+    void (*tcl_CreateExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 93 */
+    Tcl_Interp * (*tcl_CreateInterp) _ANSI_ARGS_((void)); /* 94 */
+    void (*tcl_CreateMathFunc) _ANSI_ARGS_((Tcl_Interp * interp, char * name, int numArgs, Tcl_ValueType * argTypes, Tcl_MathProc * proc, ClientData clientData)); /* 95 */
+    Tcl_Command (*tcl_CreateObjCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_ObjCmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 96 */
+    Tcl_Interp * (*tcl_CreateSlave) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveName, int isSafe)); /* 97 */
+    Tcl_TimerToken (*tcl_CreateTimerHandler) _ANSI_ARGS_((int milliseconds, Tcl_TimerProc * proc, ClientData clientData)); /* 98 */
+    Tcl_Trace (*tcl_CreateTrace) _ANSI_ARGS_((Tcl_Interp * interp, int level, Tcl_CmdTraceProc * proc, ClientData clientData)); /* 99 */
+    void (*tcl_DeleteAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name)); /* 100 */
+    void (*tcl_DeleteChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_ChannelProc * proc, ClientData clientData)); /* 101 */
+    void (*tcl_DeleteCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData)); /* 102 */
+    int (*tcl_DeleteCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName)); /* 103 */
+    int (*tcl_DeleteCommandFromToken) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command)); /* 104 */
+    void (*tcl_DeleteEvents) _ANSI_ARGS_((Tcl_EventDeleteProc * proc, ClientData clientData)); /* 105 */
+    void (*tcl_DeleteEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData)); /* 106 */
+    void (*tcl_DeleteExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 107 */
+    void (*tcl_DeleteHashEntry) _ANSI_ARGS_((Tcl_HashEntry * entryPtr)); /* 108 */
+    void (*tcl_DeleteHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr)); /* 109 */
+    void (*tcl_DeleteInterp) _ANSI_ARGS_((Tcl_Interp * interp)); /* 110 */
+    void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr)); /* 111 */
+    void (*tcl_DeleteTimerHandler) _ANSI_ARGS_((Tcl_TimerToken token)); /* 112 */
+    void (*tcl_DeleteTrace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Trace trace)); /* 113 */
+    void (*tcl_DontCallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 114 */
+    int (*tcl_DoOneEvent) _ANSI_ARGS_((int flags)); /* 115 */
+    void (*tcl_DoWhenIdle) _ANSI_ARGS_((Tcl_IdleProc * proc, ClientData clientData)); /* 116 */
+    char * (*tcl_DStringAppend) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * string, int length)); /* 117 */
+    char * (*tcl_DStringAppendElement) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * string)); /* 118 */
+    void (*tcl_DStringEndSublist) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 119 */
+    void (*tcl_DStringFree) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 120 */
+    void (*tcl_DStringGetResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr)); /* 121 */
+    void (*tcl_DStringInit) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 122 */
+    void (*tcl_DStringResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr)); /* 123 */
+    void (*tcl_DStringSetLength) _ANSI_ARGS_((Tcl_DString * dsPtr, int length)); /* 124 */
+    void (*tcl_DStringStartSublist) _ANSI_ARGS_((Tcl_DString * dsPtr)); /* 125 */
+    int (*tcl_Eof) _ANSI_ARGS_((Tcl_Channel chan)); /* 126 */
+    char * (*tcl_ErrnoId) _ANSI_ARGS_((void)); /* 127 */
+    char * (*tcl_ErrnoMsg) _ANSI_ARGS_((int err)); /* 128 */
+    int (*tcl_Eval) _ANSI_ARGS_((Tcl_Interp * interp, char * string)); /* 129 */
+    int (*tcl_EvalFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName)); /* 130 */
+    int (*tcl_EvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 131 */
+    void (*tcl_EventuallyFree) _ANSI_ARGS_((ClientData clientData, Tcl_FreeProc * freeProc)); /* 132 */
+    void (*tcl_Exit) _ANSI_ARGS_((int status)); /* 133 */
+    int (*tcl_ExposeCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * hiddenCmdToken, char * cmdName)); /* 134 */
+    int (*tcl_ExprBoolean) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int * ptr)); /* 135 */
+    int (*tcl_ExprBooleanObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * ptr)); /* 136 */
+    int (*tcl_ExprDouble) _ANSI_ARGS_((Tcl_Interp * interp, char * string, double * ptr)); /* 137 */
+    int (*tcl_ExprDoubleObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * ptr)); /* 138 */
+    int (*tcl_ExprLong) _ANSI_ARGS_((Tcl_Interp * interp, char * string, long * ptr)); /* 139 */
+    int (*tcl_ExprLongObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * ptr)); /* 140 */
+    int (*tcl_ExprObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr)); /* 141 */
+    int (*tcl_ExprString) _ANSI_ARGS_((Tcl_Interp * interp, char * string)); /* 142 */
+    void (*tcl_Finalize) _ANSI_ARGS_((void)); /* 143 */
+    void (*tcl_FindExecutable) _ANSI_ARGS_((CONST char * argv0)); /* 144 */
+    Tcl_HashEntry * (*tcl_FirstHashEntry) _ANSI_ARGS_((Tcl_HashTable * tablePtr, Tcl_HashSearch * searchPtr)); /* 145 */
+    int (*tcl_Flush) _ANSI_ARGS_((Tcl_Channel chan)); /* 146 */
+    void (*tcl_FreeResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 147 */
+    int (*tcl_GetAlias) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveCmd, Tcl_Interp ** targetInterpPtr, char ** targetCmdPtr, int * argcPtr, char *** argvPtr)); /* 148 */
+    int (*tcl_GetAliasObj) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveCmd, Tcl_Interp ** targetInterpPtr, char ** targetCmdPtr, int * objcPtr, Tcl_Obj *** objv)); /* 149 */
+    ClientData (*tcl_GetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_InterpDeleteProc ** procPtr)); /* 150 */
+    Tcl_Channel (*tcl_GetChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * chanName, int * modePtr)); /* 151 */
+    int (*tcl_GetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan)); /* 152 */
+    int (*tcl_GetChannelHandle) _ANSI_ARGS_((Tcl_Channel chan, int direction, ClientData * handlePtr)); /* 153 */
+    ClientData (*tcl_GetChannelInstanceData) _ANSI_ARGS_((Tcl_Channel chan)); /* 154 */
+    int (*tcl_GetChannelMode) _ANSI_ARGS_((Tcl_Channel chan)); /* 155 */
+    char * (*tcl_GetChannelName) _ANSI_ARGS_((Tcl_Channel chan)); /* 156 */
+    int (*tcl_GetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, char * optionName, Tcl_DString * dsPtr)); /* 157 */
+    Tcl_ChannelType * (*tcl_GetChannelType) _ANSI_ARGS_((Tcl_Channel chan)); /* 158 */
+    int (*tcl_GetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdInfo * infoPtr)); /* 159 */
+    char * (*tcl_GetCommandName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command)); /* 160 */
+    int (*tcl_GetErrno) _ANSI_ARGS_((void)); /* 161 */
+    char * (*tcl_GetHostName) _ANSI_ARGS_((void)); /* 162 */
+    int (*tcl_GetInterpPath) _ANSI_ARGS_((Tcl_Interp * askInterp, Tcl_Interp * slaveInterp)); /* 163 */
+    Tcl_Interp * (*tcl_GetMaster) _ANSI_ARGS_((Tcl_Interp * interp)); /* 164 */
+    CONST char * (*tcl_GetNameOfExecutable) _ANSI_ARGS_((void)); /* 165 */
+    Tcl_Obj * (*tcl_GetObjResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 166 */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    int (*tcl_GetOpenFile) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int write, int checkUsage, ClientData * filePtr)); /* 167 */
+#endif /* UNIX */
+#ifdef __WIN32__
+    void *reserved167;
+#endif /* __WIN32__ */
+#ifdef MAC_TCL
+    void *reserved167;
+#endif /* MAC_TCL */
+    Tcl_PathType (*tcl_GetPathType) _ANSI_ARGS_((char * path)); /* 168 */
+    int (*tcl_Gets) _ANSI_ARGS_((Tcl_Channel chan, Tcl_DString * dsPtr)); /* 169 */
+    int (*tcl_GetsObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); /* 170 */
+    int (*tcl_GetServiceMode) _ANSI_ARGS_((void)); /* 171 */
+    Tcl_Interp * (*tcl_GetSlave) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveName)); /* 172 */
+    Tcl_Channel (*tcl_GetStdChannel) _ANSI_ARGS_((int type)); /* 173 */
+    char * (*tcl_GetStringResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 174 */
+    char * (*tcl_GetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags)); /* 175 */
+    char * (*tcl_GetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 176 */
+    int (*tcl_GlobalEval) _ANSI_ARGS_((Tcl_Interp * interp, char * command)); /* 177 */
+    int (*tcl_GlobalEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 178 */
+    int (*tcl_HideCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, char * hiddenCmdToken)); /* 179 */
+    int (*tcl_Init) _ANSI_ARGS_((Tcl_Interp * interp)); /* 180 */
+    void (*tcl_InitHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr, int keyType)); /* 181 */
+    int (*tcl_InputBlocked) _ANSI_ARGS_((Tcl_Channel chan)); /* 182 */
+    int (*tcl_InputBuffered) _ANSI_ARGS_((Tcl_Channel chan)); /* 183 */
+    int (*tcl_InterpDeleted) _ANSI_ARGS_((Tcl_Interp * interp)); /* 184 */
+    int (*tcl_IsSafe) _ANSI_ARGS_((Tcl_Interp * interp)); /* 185 */
+    char * (*tcl_JoinPath) _ANSI_ARGS_((int argc, char ** argv, Tcl_DString * resultPtr)); /* 186 */
+    int (*tcl_LinkVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, char * addr, int type)); /* 187 */
+    void *reserved188;
+    Tcl_Channel (*tcl_MakeFileChannel) _ANSI_ARGS_((ClientData handle, int mode)); /* 189 */
+    int (*tcl_MakeSafe) _ANSI_ARGS_((Tcl_Interp * interp)); /* 190 */
+    Tcl_Channel (*tcl_MakeTcpClientChannel) _ANSI_ARGS_((ClientData tcpSocket)); /* 191 */
+    char * (*tcl_Merge) _ANSI_ARGS_((int argc, char ** argv)); /* 192 */
+    Tcl_HashEntry * (*tcl_NextHashEntry) _ANSI_ARGS_((Tcl_HashSearch * searchPtr)); /* 193 */
+    void (*tcl_NotifyChannel) _ANSI_ARGS_((Tcl_Channel channel, int mask)); /* 194 */
+    Tcl_Obj * (*tcl_ObjGetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, int flags)); /* 195 */
+    Tcl_Obj * (*tcl_ObjSetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, Tcl_Obj * newValuePtr, int flags)); /* 196 */
+    Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 197 */
+    Tcl_Channel (*tcl_OpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * modeString, int permissions)); /* 198 */
+    Tcl_Channel (*tcl_OpenTcpClient) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * address, char * myaddr, int myport, int async)); /* 199 */
+    Tcl_Channel (*tcl_OpenTcpServer) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * host, Tcl_TcpAcceptProc * acceptProc, ClientData callbackData)); /* 200 */
+    void (*tcl_Preserve) _ANSI_ARGS_((ClientData data)); /* 201 */
+    void (*tcl_PrintDouble) _ANSI_ARGS_((Tcl_Interp * interp, double value, char * dst)); /* 202 */
+    int (*tcl_PutEnv) _ANSI_ARGS_((CONST char * string)); /* 203 */
+    char * (*tcl_PosixError) _ANSI_ARGS_((Tcl_Interp * interp)); /* 204 */
+    void (*tcl_QueueEvent) _ANSI_ARGS_((Tcl_Event * evPtr, Tcl_QueuePosition position)); /* 205 */
+    int (*tcl_Read) _ANSI_ARGS_((Tcl_Channel chan, char * bufPtr, int toRead)); /* 206 */
+    void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void)); /* 207 */
+    int (*tcl_RecordAndEval) _ANSI_ARGS_((Tcl_Interp * interp, char * cmd, int flags)); /* 208 */
+    int (*tcl_RecordAndEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * cmdPtr, int flags)); /* 209 */
+    void (*tcl_RegisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 210 */
+    void (*tcl_RegisterObjType) _ANSI_ARGS_((Tcl_ObjType * typePtr)); /* 211 */
+    Tcl_RegExp (*tcl_RegExpCompile) _ANSI_ARGS_((Tcl_Interp * interp, char * string)); /* 212 */
+    int (*tcl_RegExpExec) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp regexp, CONST char * string, CONST char * start)); /* 213 */
+    int (*tcl_RegExpMatch) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char * pattern)); /* 214 */
+    void (*tcl_RegExpRange) _ANSI_ARGS_((Tcl_RegExp regexp, int index, char ** startPtr, char ** endPtr)); /* 215 */
+    void (*tcl_Release) _ANSI_ARGS_((ClientData clientData)); /* 216 */
+    void (*tcl_ResetResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 217 */
+    int (*tcl_ScanElement) _ANSI_ARGS_((CONST char * string, int * flagPtr)); /* 218 */
+    int (*tcl_ScanCountedElement) _ANSI_ARGS_((CONST char * string, int length, int * flagPtr)); /* 219 */
+    int (*tcl_Seek) _ANSI_ARGS_((Tcl_Channel chan, int offset, int mode)); /* 220 */
+    int (*tcl_ServiceAll) _ANSI_ARGS_((void)); /* 221 */
+    int (*tcl_ServiceEvent) _ANSI_ARGS_((int flags)); /* 222 */
+    void (*tcl_SetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 223 */
+    void (*tcl_SetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan, int sz)); /* 224 */
+    int (*tcl_SetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, char * optionName, char * newValue)); /* 225 */
+    int (*tcl_SetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdInfo * infoPtr)); /* 226 */
+    void (*tcl_SetErrno) _ANSI_ARGS_((int err)); /* 227 */
+    void (*tcl_SetErrorCode) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 228 */
+    void (*tcl_SetMaxBlockTime) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 229 */
+    void (*tcl_SetPanicProc) _ANSI_ARGS_((Tcl_PanicProc * panicProc)); /* 230 */
+    int (*tcl_SetRecursionLimit) _ANSI_ARGS_((Tcl_Interp * interp, int depth)); /* 231 */
+    void (*tcl_SetResult) _ANSI_ARGS_((Tcl_Interp * interp, char * string, Tcl_FreeProc * freeProc)); /* 232 */
+    int (*tcl_SetServiceMode) _ANSI_ARGS_((int mode)); /* 233 */
+    void (*tcl_SetObjErrorCode) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * errorObjPtr)); /* 234 */
     void (*tcl_SetObjResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * resultObjPtr)); /* 235 */
-    void (*tcl_SetPanicProc) _ANSI_ARGS_((Tcl_PanicProc * panicProc)); /* 236 */
-    int (*tcl_SetRecursionLimit) _ANSI_ARGS_((Tcl_Interp * interp, int depth)); /* 237 */
-    void (*tcl_SetResult) _ANSI_ARGS_((Tcl_Interp * interp, char * str, Tcl_FreeProc * freeProc)); /* 238 */
-    int (*tcl_SetServiceMode) _ANSI_ARGS_((int mode)); /* 239 */
-    void (*tcl_SetStdChannel) _ANSI_ARGS_((Tcl_Channel channel, int type)); /* 240 */
-    void (*tcl_SetStringObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 241 */
-    void (*tcl_SetTimer) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 242 */
-    char * (*tcl_SetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, char * newValue, int flags)); /* 243 */
-    char * (*tcl_SetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, char * newValue, int flags)); /* 244 */
-    char * (*tcl_SignalId) _ANSI_ARGS_((int sig)); /* 245 */
-    char * (*tcl_SignalMsg) _ANSI_ARGS_((int sig)); /* 246 */
-    void (*tcl_Sleep) _ANSI_ARGS_((int ms)); /* 247 */
-    void (*tcl_SourceRCFile) _ANSI_ARGS_((Tcl_Interp * interp)); /* 248 */
-    int (*tcl_SplitList) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int * argcPtr, char *** argvPtr)); /* 249 */
-    void (*tcl_SplitPath) _ANSI_ARGS_((CONST char * path, int * argcPtr, char *** argvPtr)); /* 250 */
-    void (*tcl_StaticPackage) _ANSI_ARGS_((Tcl_Interp * interp, char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc)); /* 251 */
-    int (*tcl_StringMatch) _ANSI_ARGS_((CONST char * str, CONST char * pattern)); /* 252 */
-    int (*tcl_Tell) _ANSI_ARGS_((Tcl_Channel chan)); /* 253 */
-    int (*tcl_TraceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 254 */
-    int (*tcl_TraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 255 */
-    char * (*tcl_TranslateFileName) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_DString * bufferPtr)); /* 256 */
-    int (*tcl_Ungets) _ANSI_ARGS_((Tcl_Channel chan, char * str, int len, int atHead)); /* 257 */
-    void (*tcl_UnlinkVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName)); /* 258 */
-    int (*tcl_UnregisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 259 */
-    int (*tcl_UnsetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags)); /* 260 */
-    int (*tcl_UnsetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 261 */
-    void (*tcl_UntraceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 262 */
-    void (*tcl_UntraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 263 */
-    void (*tcl_UpdateLinkedVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName)); /* 264 */
-    int (*tcl_UpVar) _ANSI_ARGS_((Tcl_Interp * interp, char * frameName, char * varName, char * localName, int flags)); /* 265 */
-    int (*tcl_UpVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * frameName, char * part1, char * part2, char * localName, int flags)); /* 266 */
-    void (*tcl_ValidateAllMemory) _ANSI_ARGS_((char * file, int line)); /* 267 */
-    int (*tcl_VarEval) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 268 */
-    int (*tcl_VarEvalVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 269 */
-    ClientData (*tcl_VarTraceInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData)); /* 270 */
-    ClientData (*tcl_VarTraceInfo2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData)); /* 271 */
-    int (*tcl_WaitForEvent) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 272 */
-    Tcl_Pid (*tcl_WaitPid) _ANSI_ARGS_((Tcl_Pid pid, int * statPtr, int options)); /* 273 */
-    int (*tcl_Write) _ANSI_ARGS_((Tcl_Channel chan, char * s, int slen)); /* 274 */
-    void (*tcl_WrongNumArgs) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], char * message)); /* 275 */
-    void (*tcl_AppendObjToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_Obj * appendObjPtr)); /* 276 */
-    void (*tcl_AlertNotifier) _ANSI_ARGS_((ClientData clientData)); /* 277 */
-    Tcl_Encoding (*tcl_CreateEncoding) _ANSI_ARGS_((Tcl_EncodingType * typePtr)); /* 278 */
-    void (*tcl_CreateThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 279 */
-    void (*tcl_DeleteThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 280 */
-    void (*tcl_DiscardResult) _ANSI_ARGS_((Tcl_SavedResult * statePtr)); /* 281 */
-    int (*tcl_EvalEx) _ANSI_ARGS_((Tcl_Interp * interp, char * script, int numBytes, int flags)); /* 282 */
-    int (*tcl_EvalObjv) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 283 */
-    int (*tcl_EvalObjEx) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int flags)); /* 284 */
-    void (*tcl_ExitThread) _ANSI_ARGS_((int status)); /* 285 */
-    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)); /* 286 */
-    char * (*tcl_ExternalToUtfDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 287 */
-    void (*tcl_FinalizeThread) _ANSI_ARGS_((void)); /* 288 */
-    void (*tcl_FinalizeNotifier) _ANSI_ARGS_((ClientData clientData)); /* 289 */
-    void (*tcl_FreeEncoding) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 290 */
-    Tcl_ThreadId (*tcl_GetCurrentThread) _ANSI_ARGS_((void)); /* 291 */
-    Tcl_Encoding (*tcl_GetEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 292 */
-    char * (*tcl_GetEncodingName) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 293 */
-    void (*tcl_GetEncodingNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 294 */
-    int (*tcl_GetIndexFromObjStruct) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, int offset, char * msg, int flags, int * indexPtr)); /* 295 */
-    VOID * (*tcl_GetThreadData) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr, int size)); /* 296 */
-    Tcl_Obj * (*tcl_GetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 297 */
-    ClientData (*tcl_InitNotifier) _ANSI_ARGS_((void)); /* 298 */
-    void (*tcl_MutexLock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 299 */
-    void (*tcl_MutexUnlock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 300 */
-    void (*tcl_ConditionNotify) _ANSI_ARGS_((Tcl_Condition * condPtr)); /* 301 */
-    void (*tcl_ConditionWait) _ANSI_ARGS_((Tcl_Condition * condPtr, Tcl_Mutex * mutexPtr, Tcl_Time * timePtr)); /* 302 */
-    int (*tcl_NumUtfChars) _ANSI_ARGS_((CONST char * src, int len)); /* 303 */
-    int (*tcl_ReadChars) _ANSI_ARGS_((Tcl_Channel channel, Tcl_Obj * objPtr, int charsToRead, int appendFlag)); /* 304 */
-    void (*tcl_RestoreResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 305 */
-    void (*tcl_SaveResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 306 */
-    int (*tcl_SetSystemEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 307 */
-    Tcl_Obj * (*tcl_SetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, Tcl_Obj * newValuePtr, int flags)); /* 308 */
-    void (*tcl_ThreadAlert) _ANSI_ARGS_((Tcl_ThreadId threadId)); /* 309 */
-    void (*tcl_ThreadQueueEvent) _ANSI_ARGS_((Tcl_ThreadId threadId, Tcl_Event* evPtr, Tcl_QueuePosition position)); /* 310 */
-    Tcl_UniChar (*tcl_UniCharAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 311 */
-    Tcl_UniChar (*tcl_UniCharToLower) _ANSI_ARGS_((int ch)); /* 312 */
-    Tcl_UniChar (*tcl_UniCharToTitle) _ANSI_ARGS_((int ch)); /* 313 */
-    Tcl_UniChar (*tcl_UniCharToUpper) _ANSI_ARGS_((int ch)); /* 314 */
-    int (*tcl_UniCharToUtf) _ANSI_ARGS_((int ch, char * buf)); /* 315 */
-    char * (*tcl_UtfAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 316 */
-    int (*tcl_UtfCharComplete) _ANSI_ARGS_((CONST char * src, int len)); /* 317 */
-    int (*tcl_UtfBackslash) _ANSI_ARGS_((CONST char * src, int * readPtr, char * dst)); /* 318 */
-    char * (*tcl_UtfFindFirst) _ANSI_ARGS_((CONST char * src, int ch)); /* 319 */
-    char * (*tcl_UtfFindLast) _ANSI_ARGS_((CONST char * src, int ch)); /* 320 */
-    void *reserved321;
-    void *reserved322;
-    char * (*tcl_UtfNext) _ANSI_ARGS_((CONST char * src)); /* 323 */
-    char * (*tcl_UtfPrev) _ANSI_ARGS_((CONST char * src, CONST char * start)); /* 324 */
-    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)); /* 325 */
-    char * (*tcl_UtfToExternalDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 326 */
-    int (*tcl_UtfToLower) _ANSI_ARGS_((char * src)); /* 327 */
-    int (*tcl_UtfToTitle) _ANSI_ARGS_((char * src)); /* 328 */
-    int (*tcl_UtfToUniChar) _ANSI_ARGS_((CONST char * src, Tcl_UniChar * chPtr)); /* 329 */
-    int (*tcl_UtfToUpper) _ANSI_ARGS_((char * src)); /* 330 */
-    int (*tcl_WriteChars) _ANSI_ARGS_((Tcl_Channel chan, CONST char * src, int srcLen)); /* 331 */
-    int (*tcl_WriteObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); /* 332 */
+    void (*tcl_SetStdChannel) _ANSI_ARGS_((Tcl_Channel channel, int type)); /* 236 */
+    char * (*tcl_SetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, char * newValue, int flags)); /* 237 */
+    char * (*tcl_SetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, char * newValue, int flags)); /* 238 */
+    char * (*tcl_SignalId) _ANSI_ARGS_((int sig)); /* 239 */
+    char * (*tcl_SignalMsg) _ANSI_ARGS_((int sig)); /* 240 */
+    void (*tcl_SourceRCFile) _ANSI_ARGS_((Tcl_Interp * interp)); /* 241 */
+    int (*tcl_SplitList) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * list, int * argcPtr, char *** argvPtr)); /* 242 */
+    void (*tcl_SplitPath) _ANSI_ARGS_((CONST char * path, int * argcPtr, char *** argvPtr)); /* 243 */
+    void (*tcl_StaticPackage) _ANSI_ARGS_((Tcl_Interp * interp, char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc)); /* 244 */
+    int (*tcl_StringMatch) _ANSI_ARGS_((CONST char * string, CONST char * pattern)); /* 245 */
+    int (*tcl_Tell) _ANSI_ARGS_((Tcl_Channel chan)); /* 246 */
+    int (*tcl_TraceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 247 */
+    int (*tcl_TraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 248 */
+    char * (*tcl_TranslateFileName) _ANSI_ARGS_((Tcl_Interp * interp, char * name, Tcl_DString * bufferPtr)); /* 249 */
+    int (*tcl_Ungets) _ANSI_ARGS_((Tcl_Channel chan, char * str, int len, int atHead)); /* 250 */
+    void (*tcl_UnlinkVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName)); /* 251 */
+    int (*tcl_UnregisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 252 */
+    int (*tcl_UnsetVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags)); /* 253 */
+    int (*tcl_UnsetVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 254 */
+    void (*tcl_UntraceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 255 */
+    void (*tcl_UntraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 256 */
+    void (*tcl_UpdateLinkedVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName)); /* 257 */
+    int (*tcl_UpVar) _ANSI_ARGS_((Tcl_Interp * interp, char * frameName, char * varName, char * localName, int flags)); /* 258 */
+    int (*tcl_UpVar2) _ANSI_ARGS_((Tcl_Interp * interp, char * frameName, char * part1, char * part2, char * localName, int flags)); /* 259 */
+    int (*tcl_VarEval) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 260 */
+    ClientData (*tcl_VarTraceInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData)); /* 261 */
+    ClientData (*tcl_VarTraceInfo2) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData)); /* 262 */
+    int (*tcl_Write) _ANSI_ARGS_((Tcl_Channel chan, char * s, int slen)); /* 263 */
+    void (*tcl_WrongNumArgs) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], char * message)); /* 264 */
+    int (*tcl_DumpActiveMemory) _ANSI_ARGS_((char * fileName)); /* 265 */
+    void (*tcl_ValidateAllMemory) _ANSI_ARGS_((char * file, int line)); /* 266 */
+    void (*tcl_AppendResultVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 267 */
+    void (*tcl_AppendStringsToObjVA) _ANSI_ARGS_((Tcl_Obj * objPtr, va_list argList)); /* 268 */
+    char * (*tcl_HashStats) _ANSI_ARGS_((Tcl_HashTable * tablePtr)); /* 269 */
+    char * (*tcl_ParseVar) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char ** termPtr)); /* 270 */
+    char * (*tcl_PkgPresent) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact)); /* 271 */
+    char * (*tcl_PkgPresentEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 272 */
+    int (*tcl_PkgProvide) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version)); /* 273 */
+    char * (*tcl_PkgRequire) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact)); /* 274 */
+    void (*tcl_SetErrorCodeVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 275 */
+    int (*tcl_VarEvalVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList)); /* 276 */
+    Tcl_Pid (*tcl_WaitPid) _ANSI_ARGS_((Tcl_Pid pid, int * statPtr, int options)); /* 277 */
+    void (*panicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 278 */
+    void (*tcl_AppendObjToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_Obj * appendObjPtr)); /* 279 */
+    void (*tcl_AlertNotifier) _ANSI_ARGS_((ClientData clientData)); /* 280 */
+    Tcl_Encoding (*tcl_CreateEncoding) _ANSI_ARGS_((Tcl_EncodingType * typePtr)); /* 281 */
+    void (*tcl_CreateThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 282 */
+    void (*tcl_DeleteThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 283 */
+    void (*tcl_DiscardResult) _ANSI_ARGS_((Tcl_SavedResult * statePtr)); /* 284 */
+    int (*tcl_EvalEx) _ANSI_ARGS_((Tcl_Interp * interp, char * script, int numBytes, int flags)); /* 285 */
+    int (*tcl_EvalObjv) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 286 */
+    int (*tcl_EvalObjEx) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int flags)); /* 287 */
+    void (*tcl_ExitThread) _ANSI_ARGS_((int status)); /* 288 */
+    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)); /* 289 */
+    char * (*tcl_ExternalToUtfDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 290 */
+    void (*tcl_FinalizeThread) _ANSI_ARGS_((void)); /* 291 */
+    void (*tcl_FinalizeNotifier) _ANSI_ARGS_((ClientData clientData)); /* 292 */
+    void (*tcl_FreeEncoding) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 293 */
+    Tcl_ThreadId (*tcl_GetCurrentThread) _ANSI_ARGS_((void)); /* 294 */
+    Tcl_Encoding (*tcl_GetEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 295 */
+    char * (*tcl_GetEncodingName) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 296 */
+    void (*tcl_GetEncodingNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 297 */
+    int (*tcl_GetIndexFromObjStruct) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, int offset, char * msg, int flags, int * indexPtr)); /* 298 */
+    VOID * (*tcl_GetThreadData) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr, int size)); /* 299 */
+    Tcl_Obj * (*tcl_GetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 300 */
+    ClientData (*tcl_InitNotifier) _ANSI_ARGS_((void)); /* 301 */
+    void (*tcl_MutexLock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 302 */
+    void (*tcl_MutexUnlock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 303 */
+    void (*tcl_ConditionNotify) _ANSI_ARGS_((Tcl_Condition * condPtr)); /* 304 */
+    void (*tcl_ConditionWait) _ANSI_ARGS_((Tcl_Condition * condPtr, Tcl_Mutex * mutexPtr, Tcl_Time * timePtr)); /* 305 */
+    int (*tcl_NumUtfChars) _ANSI_ARGS_((CONST char * src, int len)); /* 306 */
+    int (*tcl_ReadChars) _ANSI_ARGS_((Tcl_Channel channel, Tcl_Obj * objPtr, int charsToRead, int appendFlag)); /* 307 */
+    void (*tcl_RestoreResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 308 */
+    void (*tcl_SaveResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 309 */
+    int (*tcl_SetSystemEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 310 */
+    Tcl_Obj * (*tcl_SetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, Tcl_Obj * newValuePtr, int flags)); /* 311 */
+    void (*tcl_ThreadAlert) _ANSI_ARGS_((Tcl_ThreadId threadId)); /* 312 */
+    void (*tcl_ThreadQueueEvent) _ANSI_ARGS_((Tcl_ThreadId threadId, Tcl_Event* evPtr, Tcl_QueuePosition position)); /* 313 */
+    Tcl_UniChar (*tcl_UniCharAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 314 */
+    Tcl_UniChar (*tcl_UniCharToLower) _ANSI_ARGS_((int ch)); /* 315 */
+    Tcl_UniChar (*tcl_UniCharToTitle) _ANSI_ARGS_((int ch)); /* 316 */
+    Tcl_UniChar (*tcl_UniCharToUpper) _ANSI_ARGS_((int ch)); /* 317 */
+    int (*tcl_UniCharToUtf) _ANSI_ARGS_((int ch, char * buf)); /* 318 */
+    char * (*tcl_UtfAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 319 */
+    int (*tcl_UtfCharComplete) _ANSI_ARGS_((CONST char * src, int len)); /* 320 */
+    int (*tcl_UtfBackslash) _ANSI_ARGS_((CONST char * src, int * readPtr, char * dst)); /* 321 */
+    char * (*tcl_UtfFindFirst) _ANSI_ARGS_((CONST char * src, int ch)); /* 322 */
+    char * (*tcl_UtfFindLast) _ANSI_ARGS_((CONST char * src, int ch)); /* 323 */
+    char * (*tcl_UtfNext) _ANSI_ARGS_((CONST char * src)); /* 324 */
+    char * (*tcl_UtfPrev) _ANSI_ARGS_((CONST char * src, CONST char * start)); /* 325 */
+    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)); /* 326 */
+    char * (*tcl_UtfToExternalDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 327 */
+    int (*tcl_UtfToLower) _ANSI_ARGS_((char * src)); /* 328 */
+    int (*tcl_UtfToTitle) _ANSI_ARGS_((char * src)); /* 329 */
+    int (*tcl_UtfToUniChar) _ANSI_ARGS_((CONST char * src, Tcl_UniChar * chPtr)); /* 330 */
+    int (*tcl_UtfToUpper) _ANSI_ARGS_((char * src)); /* 331 */
+    int (*tcl_WriteChars) _ANSI_ARGS_((Tcl_Channel chan, CONST char * src, int srcLen)); /* 332 */
+    int (*tcl_WriteObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); /* 333 */
 } TclStubs;
 
 extern TclStubs *tclStubsPtr;
@@ -1375,1331 +1413,1344 @@ extern TclStubs *tclStubsPtr;
  * Inline function declarations:
  */
 
-#ifndef Tcl_AddErrorInfo
-#define Tcl_AddErrorInfo(interp, message) \
-	(tclStubsPtr->tcl_AddErrorInfo)(interp, message) /* 0 */
+#ifndef Tcl_PkgProvideEx
+#define Tcl_PkgProvideEx(interp, name, version, clientData) \
+	(tclStubsPtr->tcl_PkgProvideEx)(interp, name, version, clientData) /* 0 */
 #endif
-#ifndef Tcl_AddObjErrorInfo
-#define Tcl_AddObjErrorInfo(interp, message, length) \
-	(tclStubsPtr->tcl_AddObjErrorInfo)(interp, message, length) /* 1 */
+#ifndef Tcl_PkgRequireEx
+#define Tcl_PkgRequireEx(interp, name, version, exact, clientDataPtr) \
+	(tclStubsPtr->tcl_PkgRequireEx)(interp, name, version, exact, clientDataPtr) /* 1 */
+#endif
+#ifndef panic
+#define panic \
+	(tclStubsPtr->panic) /* 2 */
 #endif
 #ifndef Tcl_Alloc
 #define Tcl_Alloc(size) \
-	(tclStubsPtr->tcl_Alloc)(size) /* 2 */
+	(tclStubsPtr->tcl_Alloc)(size) /* 3 */
 #endif
-#ifndef Tcl_AllowExceptions
-#define Tcl_AllowExceptions(interp) \
-	(tclStubsPtr->tcl_AllowExceptions)(interp) /* 3 */
+#ifndef Tcl_Free
+#define Tcl_Free(ptr) \
+	(tclStubsPtr->tcl_Free)(ptr) /* 4 */
 #endif
-#ifndef Tcl_AppendAllObjTypes
-#define Tcl_AppendAllObjTypes(interp, objPtr) \
-	(tclStubsPtr->tcl_AppendAllObjTypes)(interp, objPtr) /* 4 */
+#ifndef Tcl_Realloc
+#define Tcl_Realloc(ptr, size) \
+	(tclStubsPtr->tcl_Realloc)(ptr, size) /* 5 */
 #endif
-#ifndef Tcl_AppendElement
-#define Tcl_AppendElement(interp, str) \
-	(tclStubsPtr->tcl_AppendElement)(interp, str) /* 5 */
+#ifndef Tcl_DbCkalloc
+#define Tcl_DbCkalloc(size, file, line) \
+	(tclStubsPtr->tcl_DbCkalloc)(size, file, line) /* 6 */
 #endif
-#ifndef Tcl_AppendResult
-#define Tcl_AppendResult \
-	(tclStubsPtr->tcl_AppendResult) /* 6 */
+#ifndef Tcl_DbCkfree
+#define Tcl_DbCkfree(ptr, file, line) \
+	(tclStubsPtr->tcl_DbCkfree)(ptr, file, line) /* 7 */
 #endif
-#ifndef Tcl_AppendResultVA
-#define Tcl_AppendResultVA(interp, argList) \
-	(tclStubsPtr->tcl_AppendResultVA)(interp, argList) /* 7 */
+#ifndef Tcl_DbCkrealloc
+#define Tcl_DbCkrealloc(ptr, size, file, line) \
+	(tclStubsPtr->tcl_DbCkrealloc)(ptr, size, file, line) /* 8 */
 #endif
-#ifndef Tcl_AppendToObj
-#define Tcl_AppendToObj(objPtr, bytes, length) \
-	(tclStubsPtr->tcl_AppendToObj)(objPtr, bytes, length) /* 8 */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifndef Tcl_CreateFileHandler
+#define Tcl_CreateFileHandler(fd, mask, proc, clientData) \
+	(tclStubsPtr->tcl_CreateFileHandler)(fd, mask, proc, clientData) /* 9 */
+#endif
+#endif /* UNIX */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifndef Tcl_DeleteFileHandler
+#define Tcl_DeleteFileHandler(fd) \
+	(tclStubsPtr->tcl_DeleteFileHandler)(fd) /* 10 */
+#endif
+#endif /* UNIX */
+#ifndef Tcl_SetTimer
+#define Tcl_SetTimer(timePtr) \
+	(tclStubsPtr->tcl_SetTimer)(timePtr) /* 11 */
+#endif
+#ifndef Tcl_Sleep
+#define Tcl_Sleep(ms) \
+	(tclStubsPtr->tcl_Sleep)(ms) /* 12 */
+#endif
+#ifndef Tcl_WaitForEvent
+#define Tcl_WaitForEvent(timePtr) \
+	(tclStubsPtr->tcl_WaitForEvent)(timePtr) /* 13 */
+#endif
+#ifndef Tcl_AppendAllObjTypes
+#define Tcl_AppendAllObjTypes(interp, objPtr) \
+	(tclStubsPtr->tcl_AppendAllObjTypes)(interp, objPtr) /* 14 */
 #endif
 #ifndef Tcl_AppendStringsToObj
 #define Tcl_AppendStringsToObj \
-	(tclStubsPtr->tcl_AppendStringsToObj) /* 9 */
+	(tclStubsPtr->tcl_AppendStringsToObj) /* 15 */
 #endif
-#ifndef Tcl_AppendStringsToObjVA
-#define Tcl_AppendStringsToObjVA(objPtr, argList) \
-	(tclStubsPtr->tcl_AppendStringsToObjVA)(objPtr, argList) /* 10 */
+#ifndef Tcl_AppendToObj
+#define Tcl_AppendToObj(objPtr, bytes, length) \
+	(tclStubsPtr->tcl_AppendToObj)(objPtr, bytes, length) /* 16 */
+#endif
+#ifndef Tcl_ConcatObj
+#define Tcl_ConcatObj(objc, objv) \
+	(tclStubsPtr->tcl_ConcatObj)(objc, objv) /* 17 */
+#endif
+#ifndef Tcl_ConvertToType
+#define Tcl_ConvertToType(interp, objPtr, typePtr) \
+	(tclStubsPtr->tcl_ConvertToType)(interp, objPtr, typePtr) /* 18 */
+#endif
+#ifndef Tcl_DbDecrRefCount
+#define Tcl_DbDecrRefCount(objPtr, file, line) \
+	(tclStubsPtr->tcl_DbDecrRefCount)(objPtr, file, line) /* 19 */
+#endif
+#ifndef Tcl_DbIncrRefCount
+#define Tcl_DbIncrRefCount(objPtr, file, line) \
+	(tclStubsPtr->tcl_DbIncrRefCount)(objPtr, file, line) /* 20 */
+#endif
+#ifndef Tcl_DbIsShared
+#define Tcl_DbIsShared(objPtr, file, line) \
+	(tclStubsPtr->tcl_DbIsShared)(objPtr, file, line) /* 21 */
+#endif
+#ifndef Tcl_DbNewBooleanObj
+#define Tcl_DbNewBooleanObj(boolValue, file, line) \
+	(tclStubsPtr->tcl_DbNewBooleanObj)(boolValue, file, line) /* 22 */
+#endif
+#ifndef Tcl_DbNewByteArrayObj
+#define Tcl_DbNewByteArrayObj(bytes, length, file, line) \
+	(tclStubsPtr->tcl_DbNewByteArrayObj)(bytes, length, file, line) /* 23 */
+#endif
+#ifndef Tcl_DbNewDoubleObj
+#define Tcl_DbNewDoubleObj(doubleValue, file, line) \
+	(tclStubsPtr->tcl_DbNewDoubleObj)(doubleValue, file, line) /* 24 */
+#endif
+#ifndef Tcl_DbNewListObj
+#define Tcl_DbNewListObj(objc, objv, file, line) \
+	(tclStubsPtr->tcl_DbNewListObj)(objc, objv, file, line) /* 25 */
+#endif
+#ifndef Tcl_DbNewLongObj
+#define Tcl_DbNewLongObj(longValue, file, line) \
+	(tclStubsPtr->tcl_DbNewLongObj)(longValue, file, line) /* 26 */
+#endif
+#ifndef Tcl_DbNewObj
+#define Tcl_DbNewObj(file, line) \
+	(tclStubsPtr->tcl_DbNewObj)(file, line) /* 27 */
+#endif
+#ifndef Tcl_DbNewStringObj
+#define Tcl_DbNewStringObj(bytes, length, file, line) \
+	(tclStubsPtr->tcl_DbNewStringObj)(bytes, length, file, line) /* 28 */
+#endif
+#ifndef Tcl_DuplicateObj
+#define Tcl_DuplicateObj(objPtr) \
+	(tclStubsPtr->tcl_DuplicateObj)(objPtr) /* 29 */
+#endif
+#ifndef TclFreeObj
+#define TclFreeObj(objPtr) \
+	(tclStubsPtr->tclFreeObj)(objPtr) /* 30 */
+#endif
+#ifndef Tcl_GetBoolean
+#define Tcl_GetBoolean(interp, string, boolPtr) \
+	(tclStubsPtr->tcl_GetBoolean)(interp, string, boolPtr) /* 31 */
+#endif
+#ifndef Tcl_GetBooleanFromObj
+#define Tcl_GetBooleanFromObj(interp, objPtr, boolPtr) \
+	(tclStubsPtr->tcl_GetBooleanFromObj)(interp, objPtr, boolPtr) /* 32 */
+#endif
+#ifndef Tcl_GetByteArrayFromObj
+#define Tcl_GetByteArrayFromObj(objPtr, lengthPtr) \
+	(tclStubsPtr->tcl_GetByteArrayFromObj)(objPtr, lengthPtr) /* 33 */
+#endif
+#ifndef Tcl_GetDouble
+#define Tcl_GetDouble(interp, string, doublePtr) \
+	(tclStubsPtr->tcl_GetDouble)(interp, string, doublePtr) /* 34 */
+#endif
+#ifndef Tcl_GetDoubleFromObj
+#define Tcl_GetDoubleFromObj(interp, objPtr, doublePtr) \
+	(tclStubsPtr->tcl_GetDoubleFromObj)(interp, objPtr, doublePtr) /* 35 */
+#endif
+#ifndef Tcl_GetIndexFromObj
+#define Tcl_GetIndexFromObj(interp, objPtr, tablePtr, msg, flags, indexPtr) \
+	(tclStubsPtr->tcl_GetIndexFromObj)(interp, objPtr, tablePtr, msg, flags, indexPtr) /* 36 */
+#endif
+#ifndef Tcl_GetInt
+#define Tcl_GetInt(interp, string, intPtr) \
+	(tclStubsPtr->tcl_GetInt)(interp, string, intPtr) /* 37 */
+#endif
+#ifndef Tcl_GetIntFromObj
+#define Tcl_GetIntFromObj(interp, objPtr, intPtr) \
+	(tclStubsPtr->tcl_GetIntFromObj)(interp, objPtr, intPtr) /* 38 */
+#endif
+#ifndef Tcl_GetLongFromObj
+#define Tcl_GetLongFromObj(interp, objPtr, longPtr) \
+	(tclStubsPtr->tcl_GetLongFromObj)(interp, objPtr, longPtr) /* 39 */
+#endif
+#ifndef Tcl_GetObjType
+#define Tcl_GetObjType(typeName) \
+	(tclStubsPtr->tcl_GetObjType)(typeName) /* 40 */
+#endif
+#ifndef Tcl_GetStringFromObj
+#define Tcl_GetStringFromObj(objPtr, lengthPtr) \
+	(tclStubsPtr->tcl_GetStringFromObj)(objPtr, lengthPtr) /* 41 */
+#endif
+#ifndef Tcl_InvalidateStringRep
+#define Tcl_InvalidateStringRep(objPtr) \
+	(tclStubsPtr->tcl_InvalidateStringRep)(objPtr) /* 42 */
+#endif
+#ifndef Tcl_ListObjAppendList
+#define Tcl_ListObjAppendList(interp, listPtr, elemListPtr) \
+	(tclStubsPtr->tcl_ListObjAppendList)(interp, listPtr, elemListPtr) /* 43 */
+#endif
+#ifndef Tcl_ListObjAppendElement
+#define Tcl_ListObjAppendElement(interp, listPtr, objPtr) \
+	(tclStubsPtr->tcl_ListObjAppendElement)(interp, listPtr, objPtr) /* 44 */
+#endif
+#ifndef Tcl_ListObjGetElements
+#define Tcl_ListObjGetElements(interp, listPtr, objcPtr, objvPtr) \
+	(tclStubsPtr->tcl_ListObjGetElements)(interp, listPtr, objcPtr, objvPtr) /* 45 */
+#endif
+#ifndef Tcl_ListObjIndex
+#define Tcl_ListObjIndex(interp, listPtr, index, objPtrPtr) \
+	(tclStubsPtr->tcl_ListObjIndex)(interp, listPtr, index, objPtrPtr) /* 46 */
+#endif
+#ifndef Tcl_ListObjLength
+#define Tcl_ListObjLength(interp, listPtr, intPtr) \
+	(tclStubsPtr->tcl_ListObjLength)(interp, listPtr, intPtr) /* 47 */
+#endif
+#ifndef Tcl_ListObjReplace
+#define Tcl_ListObjReplace(interp, listPtr, first, count, objc, objv) \
+	(tclStubsPtr->tcl_ListObjReplace)(interp, listPtr, first, count, objc, objv) /* 48 */
+#endif
+#ifndef Tcl_NewBooleanObj
+#define Tcl_NewBooleanObj(boolValue) \
+	(tclStubsPtr->tcl_NewBooleanObj)(boolValue) /* 49 */
+#endif
+#ifndef Tcl_NewByteArrayObj
+#define Tcl_NewByteArrayObj(bytes, length) \
+	(tclStubsPtr->tcl_NewByteArrayObj)(bytes, length) /* 50 */
+#endif
+#ifndef Tcl_NewDoubleObj
+#define Tcl_NewDoubleObj(doubleValue) \
+	(tclStubsPtr->tcl_NewDoubleObj)(doubleValue) /* 51 */
+#endif
+#ifndef Tcl_NewIntObj
+#define Tcl_NewIntObj(intValue) \
+	(tclStubsPtr->tcl_NewIntObj)(intValue) /* 52 */
+#endif
+#ifndef Tcl_NewListObj
+#define Tcl_NewListObj(objc, objv) \
+	(tclStubsPtr->tcl_NewListObj)(objc, objv) /* 53 */
+#endif
+#ifndef Tcl_NewLongObj
+#define Tcl_NewLongObj(longValue) \
+	(tclStubsPtr->tcl_NewLongObj)(longValue) /* 54 */
+#endif
+#ifndef Tcl_NewObj
+#define Tcl_NewObj() \
+	(tclStubsPtr->tcl_NewObj)() /* 55 */
+#endif
+#ifndef Tcl_NewStringObj
+#define Tcl_NewStringObj(bytes, length) \
+	(tclStubsPtr->tcl_NewStringObj)(bytes, length) /* 56 */
+#endif
+#ifndef Tcl_SetBooleanObj
+#define Tcl_SetBooleanObj(objPtr, boolValue) \
+	(tclStubsPtr->tcl_SetBooleanObj)(objPtr, boolValue) /* 57 */
+#endif
+#ifndef Tcl_SetByteArrayLength
+#define Tcl_SetByteArrayLength(objPtr, length) \
+	(tclStubsPtr->tcl_SetByteArrayLength)(objPtr, length) /* 58 */
+#endif
+#ifndef Tcl_SetByteArrayObj
+#define Tcl_SetByteArrayObj(objPtr, bytes, length) \
+	(tclStubsPtr->tcl_SetByteArrayObj)(objPtr, bytes, length) /* 59 */
+#endif
+#ifndef Tcl_SetDoubleObj
+#define Tcl_SetDoubleObj(objPtr, doubleValue) \
+	(tclStubsPtr->tcl_SetDoubleObj)(objPtr, doubleValue) /* 60 */
+#endif
+#ifndef Tcl_SetIntObj
+#define Tcl_SetIntObj(objPtr, intValue) \
+	(tclStubsPtr->tcl_SetIntObj)(objPtr, intValue) /* 61 */
+#endif
+#ifndef Tcl_SetListObj
+#define Tcl_SetListObj(objPtr, objc, objv) \
+	(tclStubsPtr->tcl_SetListObj)(objPtr, objc, objv) /* 62 */
+#endif
+#ifndef Tcl_SetLongObj
+#define Tcl_SetLongObj(objPtr, longValue) \
+	(tclStubsPtr->tcl_SetLongObj)(objPtr, longValue) /* 63 */
+#endif
+#ifndef Tcl_SetObjLength
+#define Tcl_SetObjLength(objPtr, length) \
+	(tclStubsPtr->tcl_SetObjLength)(objPtr, length) /* 64 */
+#endif
+#ifndef Tcl_SetStringObj
+#define Tcl_SetStringObj(objPtr, bytes, length) \
+	(tclStubsPtr->tcl_SetStringObj)(objPtr, bytes, length) /* 65 */
+#endif
+#ifndef Tcl_AddErrorInfo
+#define Tcl_AddErrorInfo(interp, message) \
+	(tclStubsPtr->tcl_AddErrorInfo)(interp, message) /* 66 */
+#endif
+#ifndef Tcl_AddObjErrorInfo
+#define Tcl_AddObjErrorInfo(interp, message, length) \
+	(tclStubsPtr->tcl_AddObjErrorInfo)(interp, message, length) /* 67 */
+#endif
+#ifndef Tcl_AllowExceptions
+#define Tcl_AllowExceptions(interp) \
+	(tclStubsPtr->tcl_AllowExceptions)(interp) /* 68 */
+#endif
+#ifndef Tcl_AppendElement
+#define Tcl_AppendElement(interp, string) \
+	(tclStubsPtr->tcl_AppendElement)(interp, string) /* 69 */
+#endif
+#ifndef Tcl_AppendResult
+#define Tcl_AppendResult \
+	(tclStubsPtr->tcl_AppendResult) /* 70 */
 #endif
 #ifndef Tcl_AsyncCreate
 #define Tcl_AsyncCreate(proc, clientData) \
-	(tclStubsPtr->tcl_AsyncCreate)(proc, clientData) /* 11 */
+	(tclStubsPtr->tcl_AsyncCreate)(proc, clientData) /* 71 */
 #endif
 #ifndef Tcl_AsyncDelete
 #define Tcl_AsyncDelete(async) \
-	(tclStubsPtr->tcl_AsyncDelete)(async) /* 12 */
+	(tclStubsPtr->tcl_AsyncDelete)(async) /* 72 */
 #endif
 #ifndef Tcl_AsyncInvoke
 #define Tcl_AsyncInvoke(interp, code) \
-	(tclStubsPtr->tcl_AsyncInvoke)(interp, code) /* 13 */
+	(tclStubsPtr->tcl_AsyncInvoke)(interp, code) /* 73 */
 #endif
 #ifndef Tcl_AsyncMark
 #define Tcl_AsyncMark(async) \
-	(tclStubsPtr->tcl_AsyncMark)(async) /* 14 */
+	(tclStubsPtr->tcl_AsyncMark)(async) /* 74 */
 #endif
 #ifndef Tcl_AsyncReady
 #define Tcl_AsyncReady() \
-	(tclStubsPtr->tcl_AsyncReady)() /* 15 */
+	(tclStubsPtr->tcl_AsyncReady)() /* 75 */
 #endif
 #ifndef Tcl_BackgroundError
 #define Tcl_BackgroundError(interp) \
-	(tclStubsPtr->tcl_BackgroundError)(interp) /* 16 */
+	(tclStubsPtr->tcl_BackgroundError)(interp) /* 76 */
 #endif
 #ifndef Tcl_Backslash
 #define Tcl_Backslash(src, readPtr) \
-	(tclStubsPtr->tcl_Backslash)(src, readPtr) /* 17 */
+	(tclStubsPtr->tcl_Backslash)(src, readPtr) /* 77 */
 #endif
 #ifndef Tcl_BadChannelOption
 #define Tcl_BadChannelOption(interp, optionName, optionList) \
-	(tclStubsPtr->tcl_BadChannelOption)(interp, optionName, optionList) /* 18 */
+	(tclStubsPtr->tcl_BadChannelOption)(interp, optionName, optionList) /* 78 */
 #endif
 #ifndef Tcl_CallWhenDeleted
 #define Tcl_CallWhenDeleted(interp, proc, clientData) \
-	(tclStubsPtr->tcl_CallWhenDeleted)(interp, proc, clientData) /* 19 */
+	(tclStubsPtr->tcl_CallWhenDeleted)(interp, proc, clientData) /* 79 */
 #endif
 #ifndef Tcl_CancelIdleCall
 #define Tcl_CancelIdleCall(idleProc, clientData) \
-	(tclStubsPtr->tcl_CancelIdleCall)(idleProc, clientData) /* 20 */
+	(tclStubsPtr->tcl_CancelIdleCall)(idleProc, clientData) /* 80 */
 #endif
 #ifndef Tcl_Close
 #define Tcl_Close(interp, chan) \
-	(tclStubsPtr->tcl_Close)(interp, chan) /* 21 */
+	(tclStubsPtr->tcl_Close)(interp, chan) /* 81 */
 #endif
 #ifndef Tcl_CommandComplete
 #define Tcl_CommandComplete(cmd) \
-	(tclStubsPtr->tcl_CommandComplete)(cmd) /* 22 */
+	(tclStubsPtr->tcl_CommandComplete)(cmd) /* 82 */
 #endif
 #ifndef Tcl_Concat
 #define Tcl_Concat(argc, argv) \
-	(tclStubsPtr->tcl_Concat)(argc, argv) /* 23 */
-#endif
-#ifndef Tcl_ConcatObj
-#define Tcl_ConcatObj(objc, objv) \
-	(tclStubsPtr->tcl_ConcatObj)(objc, objv) /* 24 */
-#endif
-#ifndef Tcl_ConvertCountedElement
-#define Tcl_ConvertCountedElement(src, length, dst, flags) \
-	(tclStubsPtr->tcl_ConvertCountedElement)(src, length, dst, flags) /* 25 */
+	(tclStubsPtr->tcl_Concat)(argc, argv) /* 83 */
 #endif
 #ifndef Tcl_ConvertElement
 #define Tcl_ConvertElement(src, dst, flags) \
-	(tclStubsPtr->tcl_ConvertElement)(src, dst, flags) /* 26 */
+	(tclStubsPtr->tcl_ConvertElement)(src, dst, flags) /* 84 */
 #endif
-#ifndef Tcl_ConvertToType
-#define Tcl_ConvertToType(interp, objPtr, typePtr) \
-	(tclStubsPtr->tcl_ConvertToType)(interp, objPtr, typePtr) /* 27 */
+#ifndef Tcl_ConvertCountedElement
+#define Tcl_ConvertCountedElement(src, length, dst, flags) \
+	(tclStubsPtr->tcl_ConvertCountedElement)(src, length, dst, flags) /* 85 */
 #endif
 #ifndef Tcl_CreateAlias
 #define Tcl_CreateAlias(slave, slaveCmd, target, targetCmd, argc, argv) \
-	(tclStubsPtr->tcl_CreateAlias)(slave, slaveCmd, target, targetCmd, argc, argv) /* 28 */
+	(tclStubsPtr->tcl_CreateAlias)(slave, slaveCmd, target, targetCmd, argc, argv) /* 86 */
 #endif
 #ifndef Tcl_CreateAliasObj
 #define Tcl_CreateAliasObj(slave, slaveCmd, target, targetCmd, objc, objv) \
-	(tclStubsPtr->tcl_CreateAliasObj)(slave, slaveCmd, target, targetCmd, objc, objv) /* 29 */
+	(tclStubsPtr->tcl_CreateAliasObj)(slave, slaveCmd, target, targetCmd, objc, objv) /* 87 */
 #endif
 #ifndef Tcl_CreateChannel
 #define Tcl_CreateChannel(typePtr, chanName, instanceData, mask) \
-	(tclStubsPtr->tcl_CreateChannel)(typePtr, chanName, instanceData, mask) /* 30 */
+	(tclStubsPtr->tcl_CreateChannel)(typePtr, chanName, instanceData, mask) /* 88 */
 #endif
 #ifndef Tcl_CreateChannelHandler
 #define Tcl_CreateChannelHandler(chan, mask, proc, clientData) \
-	(tclStubsPtr->tcl_CreateChannelHandler)(chan, mask, proc, clientData) /* 31 */
+	(tclStubsPtr->tcl_CreateChannelHandler)(chan, mask, proc, clientData) /* 89 */
 #endif
 #ifndef Tcl_CreateCloseHandler
 #define Tcl_CreateCloseHandler(chan, proc, clientData) \
-	(tclStubsPtr->tcl_CreateCloseHandler)(chan, proc, clientData) /* 32 */
+	(tclStubsPtr->tcl_CreateCloseHandler)(chan, proc, clientData) /* 90 */
 #endif
 #ifndef Tcl_CreateCommand
 #define Tcl_CreateCommand(interp, cmdName, proc, clientData, deleteProc) \
-	(tclStubsPtr->tcl_CreateCommand)(interp, cmdName, proc, clientData, deleteProc) /* 33 */
+	(tclStubsPtr->tcl_CreateCommand)(interp, cmdName, proc, clientData, deleteProc) /* 91 */
 #endif
 #ifndef Tcl_CreateEventSource
 #define Tcl_CreateEventSource(setupProc, checkProc, clientData) \
-	(tclStubsPtr->tcl_CreateEventSource)(setupProc, checkProc, clientData) /* 34 */
+	(tclStubsPtr->tcl_CreateEventSource)(setupProc, checkProc, clientData) /* 92 */
 #endif
 #ifndef Tcl_CreateExitHandler
 #define Tcl_CreateExitHandler(proc, clientData) \
-	(tclStubsPtr->tcl_CreateExitHandler)(proc, clientData) /* 35 */
+	(tclStubsPtr->tcl_CreateExitHandler)(proc, clientData) /* 93 */
 #endif
 #ifndef Tcl_CreateInterp
 #define Tcl_CreateInterp() \
-	(tclStubsPtr->tcl_CreateInterp)() /* 36 */
+	(tclStubsPtr->tcl_CreateInterp)() /* 94 */
 #endif
 #ifndef Tcl_CreateMathFunc
 #define Tcl_CreateMathFunc(interp, name, numArgs, argTypes, proc, clientData) \
-	(tclStubsPtr->tcl_CreateMathFunc)(interp, name, numArgs, argTypes, proc, clientData) /* 37 */
+	(tclStubsPtr->tcl_CreateMathFunc)(interp, name, numArgs, argTypes, proc, clientData) /* 95 */
 #endif
 #ifndef Tcl_CreateObjCommand
 #define Tcl_CreateObjCommand(interp, cmdName, proc, clientData, deleteProc) \
-	(tclStubsPtr->tcl_CreateObjCommand)(interp, cmdName, proc, clientData, deleteProc) /* 38 */
+	(tclStubsPtr->tcl_CreateObjCommand)(interp, cmdName, proc, clientData, deleteProc) /* 96 */
 #endif
 #ifndef Tcl_CreateSlave
 #define Tcl_CreateSlave(interp, slaveName, isSafe) \
-	(tclStubsPtr->tcl_CreateSlave)(interp, slaveName, isSafe) /* 39 */
+	(tclStubsPtr->tcl_CreateSlave)(interp, slaveName, isSafe) /* 97 */
 #endif
 #ifndef Tcl_CreateTimerHandler
 #define Tcl_CreateTimerHandler(milliseconds, proc, clientData) \
-	(tclStubsPtr->tcl_CreateTimerHandler)(milliseconds, proc, clientData) /* 40 */
+	(tclStubsPtr->tcl_CreateTimerHandler)(milliseconds, proc, clientData) /* 98 */
 #endif
 #ifndef Tcl_CreateTrace
 #define Tcl_CreateTrace(interp, level, proc, clientData) \
-	(tclStubsPtr->tcl_CreateTrace)(interp, level, proc, clientData) /* 41 */
-#endif
-#ifndef Tcl_DbCkalloc
-#define Tcl_DbCkalloc(size, file, line) \
-	(tclStubsPtr->tcl_DbCkalloc)(size, file, line) /* 42 */
-#endif
-#ifndef Tcl_DbCkfree
-#define Tcl_DbCkfree(ptr, file, line) \
-	(tclStubsPtr->tcl_DbCkfree)(ptr, file, line) /* 43 */
-#endif
-#ifndef Tcl_DbCkrealloc
-#define Tcl_DbCkrealloc(ptr, size, file, line) \
-	(tclStubsPtr->tcl_DbCkrealloc)(ptr, size, file, line) /* 44 */
-#endif
-#ifndef Tcl_DbDecrRefCount
-#define Tcl_DbDecrRefCount(objPtr, file, line) \
-	(tclStubsPtr->tcl_DbDecrRefCount)(objPtr, file, line) /* 45 */
-#endif
-#ifndef Tcl_DbIncrRefCount
-#define Tcl_DbIncrRefCount(objPtr, file, line) \
-	(tclStubsPtr->tcl_DbIncrRefCount)(objPtr, file, line) /* 46 */
-#endif
-#ifndef Tcl_DbIsShared
-#define Tcl_DbIsShared(objPtr, file, line) \
-	(tclStubsPtr->tcl_DbIsShared)(objPtr, file, line) /* 47 */
-#endif
-#ifndef Tcl_DbNewBooleanObj
-#define Tcl_DbNewBooleanObj(boolValue, file, line) \
-	(tclStubsPtr->tcl_DbNewBooleanObj)(boolValue, file, line) /* 48 */
-#endif
-#ifndef Tcl_DbNewByteArrayObj
-#define Tcl_DbNewByteArrayObj(bytes, length, file, line) \
-	(tclStubsPtr->tcl_DbNewByteArrayObj)(bytes, length, file, line) /* 49 */
-#endif
-#ifndef Tcl_DbNewDoubleObj
-#define Tcl_DbNewDoubleObj(doubleValue, file, line) \
-	(tclStubsPtr->tcl_DbNewDoubleObj)(doubleValue, file, line) /* 50 */
-#endif
-#ifndef Tcl_DbNewListObj
-#define Tcl_DbNewListObj(objc, objv, file, line) \
-	(tclStubsPtr->tcl_DbNewListObj)(objc, objv, file, line) /* 51 */
-#endif
-#ifndef Tcl_DbNewLongObj
-#define Tcl_DbNewLongObj(longValue, file, line) \
-	(tclStubsPtr->tcl_DbNewLongObj)(longValue, file, line) /* 52 */
-#endif
-#ifndef Tcl_DbNewObj
-#define Tcl_DbNewObj(file, line) \
-	(tclStubsPtr->tcl_DbNewObj)(file, line) /* 53 */
-#endif
-#ifndef Tcl_DbNewStringObj
-#define Tcl_DbNewStringObj(bytes, length, file, line) \
-	(tclStubsPtr->tcl_DbNewStringObj)(bytes, length, file, line) /* 54 */
+	(tclStubsPtr->tcl_CreateTrace)(interp, level, proc, clientData) /* 99 */
 #endif
 #ifndef Tcl_DeleteAssocData
 #define Tcl_DeleteAssocData(interp, name) \
-	(tclStubsPtr->tcl_DeleteAssocData)(interp, name) /* 55 */
-#endif
-#ifndef Tcl_DeleteCommand
-#define Tcl_DeleteCommand(interp, cmdName) \
-	(tclStubsPtr->tcl_DeleteCommand)(interp, cmdName) /* 56 */
-#endif
-#ifndef Tcl_DeleteCommandFromToken
-#define Tcl_DeleteCommandFromToken(interp, command) \
-	(tclStubsPtr->tcl_DeleteCommandFromToken)(interp, command) /* 57 */
+	(tclStubsPtr->tcl_DeleteAssocData)(interp, name) /* 100 */
 #endif
 #ifndef Tcl_DeleteChannelHandler
 #define Tcl_DeleteChannelHandler(chan, proc, clientData) \
-	(tclStubsPtr->tcl_DeleteChannelHandler)(chan, proc, clientData) /* 58 */
+	(tclStubsPtr->tcl_DeleteChannelHandler)(chan, proc, clientData) /* 101 */
 #endif
 #ifndef Tcl_DeleteCloseHandler
 #define Tcl_DeleteCloseHandler(chan, proc, clientData) \
-	(tclStubsPtr->tcl_DeleteCloseHandler)(chan, proc, clientData) /* 59 */
+	(tclStubsPtr->tcl_DeleteCloseHandler)(chan, proc, clientData) /* 102 */
+#endif
+#ifndef Tcl_DeleteCommand
+#define Tcl_DeleteCommand(interp, cmdName) \
+	(tclStubsPtr->tcl_DeleteCommand)(interp, cmdName) /* 103 */
+#endif
+#ifndef Tcl_DeleteCommandFromToken
+#define Tcl_DeleteCommandFromToken(interp, command) \
+	(tclStubsPtr->tcl_DeleteCommandFromToken)(interp, command) /* 104 */
 #endif
 #ifndef Tcl_DeleteEvents
 #define Tcl_DeleteEvents(proc, clientData) \
-	(tclStubsPtr->tcl_DeleteEvents)(proc, clientData) /* 60 */
+	(tclStubsPtr->tcl_DeleteEvents)(proc, clientData) /* 105 */
 #endif
 #ifndef Tcl_DeleteEventSource
 #define Tcl_DeleteEventSource(setupProc, checkProc, clientData) \
-	(tclStubsPtr->tcl_DeleteEventSource)(setupProc, checkProc, clientData) /* 61 */
+	(tclStubsPtr->tcl_DeleteEventSource)(setupProc, checkProc, clientData) /* 106 */
 #endif
 #ifndef Tcl_DeleteExitHandler
 #define Tcl_DeleteExitHandler(proc, clientData) \
-	(tclStubsPtr->tcl_DeleteExitHandler)(proc, clientData) /* 62 */
+	(tclStubsPtr->tcl_DeleteExitHandler)(proc, clientData) /* 107 */
 #endif
 #ifndef Tcl_DeleteHashEntry
 #define Tcl_DeleteHashEntry(entryPtr) \
-	(tclStubsPtr->tcl_DeleteHashEntry)(entryPtr) /* 63 */
+	(tclStubsPtr->tcl_DeleteHashEntry)(entryPtr) /* 108 */
 #endif
 #ifndef Tcl_DeleteHashTable
 #define Tcl_DeleteHashTable(tablePtr) \
-	(tclStubsPtr->tcl_DeleteHashTable)(tablePtr) /* 64 */
+	(tclStubsPtr->tcl_DeleteHashTable)(tablePtr) /* 109 */
 #endif
 #ifndef Tcl_DeleteInterp
 #define Tcl_DeleteInterp(interp) \
-	(tclStubsPtr->tcl_DeleteInterp)(interp) /* 65 */
+	(tclStubsPtr->tcl_DeleteInterp)(interp) /* 110 */
+#endif
+#ifndef Tcl_DetachPids
+#define Tcl_DetachPids(numPids, pidPtr) \
+	(tclStubsPtr->tcl_DetachPids)(numPids, pidPtr) /* 111 */
 #endif
 #ifndef Tcl_DeleteTimerHandler
 #define Tcl_DeleteTimerHandler(token) \
-	(tclStubsPtr->tcl_DeleteTimerHandler)(token) /* 66 */
+	(tclStubsPtr->tcl_DeleteTimerHandler)(token) /* 112 */
 #endif
 #ifndef Tcl_DeleteTrace
 #define Tcl_DeleteTrace(interp, trace) \
-	(tclStubsPtr->tcl_DeleteTrace)(interp, trace) /* 67 */
-#endif
-#ifndef Tcl_DetachPids
-#define Tcl_DetachPids(numPids, pidPtr) \
-	(tclStubsPtr->tcl_DetachPids)(numPids, pidPtr) /* 68 */
+	(tclStubsPtr->tcl_DeleteTrace)(interp, trace) /* 113 */
 #endif
 #ifndef Tcl_DontCallWhenDeleted
 #define Tcl_DontCallWhenDeleted(interp, proc, clientData) \
-	(tclStubsPtr->tcl_DontCallWhenDeleted)(interp, proc, clientData) /* 69 */
+	(tclStubsPtr->tcl_DontCallWhenDeleted)(interp, proc, clientData) /* 114 */
 #endif
 #ifndef Tcl_DoOneEvent
 #define Tcl_DoOneEvent(flags) \
-	(tclStubsPtr->tcl_DoOneEvent)(flags) /* 70 */
+	(tclStubsPtr->tcl_DoOneEvent)(flags) /* 115 */
 #endif
 #ifndef Tcl_DoWhenIdle
 #define Tcl_DoWhenIdle(proc, clientData) \
-	(tclStubsPtr->tcl_DoWhenIdle)(proc, clientData) /* 71 */
+	(tclStubsPtr->tcl_DoWhenIdle)(proc, clientData) /* 116 */
 #endif
 #ifndef Tcl_DStringAppend
-#define Tcl_DStringAppend(dsPtr, str, length) \
-	(tclStubsPtr->tcl_DStringAppend)(dsPtr, str, length) /* 72 */
+#define Tcl_DStringAppend(dsPtr, string, length) \
+	(tclStubsPtr->tcl_DStringAppend)(dsPtr, string, length) /* 117 */
 #endif
 #ifndef Tcl_DStringAppendElement
-#define Tcl_DStringAppendElement(dsPtr, str) \
-	(tclStubsPtr->tcl_DStringAppendElement)(dsPtr, str) /* 73 */
+#define Tcl_DStringAppendElement(dsPtr, string) \
+	(tclStubsPtr->tcl_DStringAppendElement)(dsPtr, string) /* 118 */
 #endif
 #ifndef Tcl_DStringEndSublist
 #define Tcl_DStringEndSublist(dsPtr) \
-	(tclStubsPtr->tcl_DStringEndSublist)(dsPtr) /* 74 */
+	(tclStubsPtr->tcl_DStringEndSublist)(dsPtr) /* 119 */
 #endif
 #ifndef Tcl_DStringFree
 #define Tcl_DStringFree(dsPtr) \
-	(tclStubsPtr->tcl_DStringFree)(dsPtr) /* 75 */
+	(tclStubsPtr->tcl_DStringFree)(dsPtr) /* 120 */
 #endif
 #ifndef Tcl_DStringGetResult
 #define Tcl_DStringGetResult(interp, dsPtr) \
-	(tclStubsPtr->tcl_DStringGetResult)(interp, dsPtr) /* 76 */
+	(tclStubsPtr->tcl_DStringGetResult)(interp, dsPtr) /* 121 */
 #endif
 #ifndef Tcl_DStringInit
 #define Tcl_DStringInit(dsPtr) \
-	(tclStubsPtr->tcl_DStringInit)(dsPtr) /* 77 */
+	(tclStubsPtr->tcl_DStringInit)(dsPtr) /* 122 */
 #endif
 #ifndef Tcl_DStringResult
 #define Tcl_DStringResult(interp, dsPtr) \
-	(tclStubsPtr->tcl_DStringResult)(interp, dsPtr) /* 78 */
+	(tclStubsPtr->tcl_DStringResult)(interp, dsPtr) /* 123 */
 #endif
 #ifndef Tcl_DStringSetLength
 #define Tcl_DStringSetLength(dsPtr, length) \
-	(tclStubsPtr->tcl_DStringSetLength)(dsPtr, length) /* 79 */
+	(tclStubsPtr->tcl_DStringSetLength)(dsPtr, length) /* 124 */
 #endif
 #ifndef Tcl_DStringStartSublist
 #define Tcl_DStringStartSublist(dsPtr) \
-	(tclStubsPtr->tcl_DStringStartSublist)(dsPtr) /* 80 */
-#endif
-#ifndef Tcl_DumpActiveMemory
-#define Tcl_DumpActiveMemory(fileName) \
-	(tclStubsPtr->tcl_DumpActiveMemory)(fileName) /* 81 */
-#endif
-#ifndef Tcl_DuplicateObj
-#define Tcl_DuplicateObj(objPtr) \
-	(tclStubsPtr->tcl_DuplicateObj)(objPtr) /* 82 */
+	(tclStubsPtr->tcl_DStringStartSublist)(dsPtr) /* 125 */
 #endif
 #ifndef Tcl_Eof
 #define Tcl_Eof(chan) \
-	(tclStubsPtr->tcl_Eof)(chan) /* 83 */
+	(tclStubsPtr->tcl_Eof)(chan) /* 126 */
 #endif
 #ifndef Tcl_ErrnoId
 #define Tcl_ErrnoId() \
-	(tclStubsPtr->tcl_ErrnoId)() /* 84 */
+	(tclStubsPtr->tcl_ErrnoId)() /* 127 */
 #endif
 #ifndef Tcl_ErrnoMsg
 #define Tcl_ErrnoMsg(err) \
-	(tclStubsPtr->tcl_ErrnoMsg)(err) /* 85 */
+	(tclStubsPtr->tcl_ErrnoMsg)(err) /* 128 */
 #endif
 #ifndef Tcl_Eval
-#define Tcl_Eval(interp, str) \
-	(tclStubsPtr->tcl_Eval)(interp, str) /* 86 */
+#define Tcl_Eval(interp, string) \
+	(tclStubsPtr->tcl_Eval)(interp, string) /* 129 */
 #endif
 #ifndef Tcl_EvalFile
 #define Tcl_EvalFile(interp, fileName) \
-	(tclStubsPtr->tcl_EvalFile)(interp, fileName) /* 87 */
-#endif
-#ifndef Tcl_EventuallyFree
-#define Tcl_EventuallyFree(clientData, freeProc) \
-	(tclStubsPtr->tcl_EventuallyFree)(clientData, freeProc) /* 88 */
+	(tclStubsPtr->tcl_EvalFile)(interp, fileName) /* 130 */
 #endif
 #ifndef Tcl_EvalObj
 #define Tcl_EvalObj(interp, objPtr) \
-	(tclStubsPtr->tcl_EvalObj)(interp, objPtr) /* 89 */
+	(tclStubsPtr->tcl_EvalObj)(interp, objPtr) /* 131 */
+#endif
+#ifndef Tcl_EventuallyFree
+#define Tcl_EventuallyFree(clientData, freeProc) \
+	(tclStubsPtr->tcl_EventuallyFree)(clientData, freeProc) /* 132 */
 #endif
 #ifndef Tcl_Exit
 #define Tcl_Exit(status) \
-	(tclStubsPtr->tcl_Exit)(status) /* 90 */
+	(tclStubsPtr->tcl_Exit)(status) /* 133 */
 #endif
 #ifndef Tcl_ExposeCommand
 #define Tcl_ExposeCommand(interp, hiddenCmdToken, cmdName) \
-	(tclStubsPtr->tcl_ExposeCommand)(interp, hiddenCmdToken, cmdName) /* 91 */
+	(tclStubsPtr->tcl_ExposeCommand)(interp, hiddenCmdToken, cmdName) /* 134 */
 #endif
 #ifndef Tcl_ExprBoolean
-#define Tcl_ExprBoolean(interp, str, ptr) \
-	(tclStubsPtr->tcl_ExprBoolean)(interp, str, ptr) /* 92 */
+#define Tcl_ExprBoolean(interp, string, ptr) \
+	(tclStubsPtr->tcl_ExprBoolean)(interp, string, ptr) /* 135 */
 #endif
 #ifndef Tcl_ExprBooleanObj
 #define Tcl_ExprBooleanObj(interp, objPtr, ptr) \
-	(tclStubsPtr->tcl_ExprBooleanObj)(interp, objPtr, ptr) /* 93 */
+	(tclStubsPtr->tcl_ExprBooleanObj)(interp, objPtr, ptr) /* 136 */
 #endif
 #ifndef Tcl_ExprDouble
-#define Tcl_ExprDouble(interp, str, ptr) \
-	(tclStubsPtr->tcl_ExprDouble)(interp, str, ptr) /* 94 */
+#define Tcl_ExprDouble(interp, string, ptr) \
+	(tclStubsPtr->tcl_ExprDouble)(interp, string, ptr) /* 137 */
 #endif
 #ifndef Tcl_ExprDoubleObj
 #define Tcl_ExprDoubleObj(interp, objPtr, ptr) \
-	(tclStubsPtr->tcl_ExprDoubleObj)(interp, objPtr, ptr) /* 95 */
+	(tclStubsPtr->tcl_ExprDoubleObj)(interp, objPtr, ptr) /* 138 */
 #endif
 #ifndef Tcl_ExprLong
-#define Tcl_ExprLong(interp, str, ptr) \
-	(tclStubsPtr->tcl_ExprLong)(interp, str, ptr) /* 96 */
+#define Tcl_ExprLong(interp, string, ptr) \
+	(tclStubsPtr->tcl_ExprLong)(interp, string, ptr) /* 139 */
 #endif
 #ifndef Tcl_ExprLongObj
 #define Tcl_ExprLongObj(interp, objPtr, ptr) \
-	(tclStubsPtr->tcl_ExprLongObj)(interp, objPtr, ptr) /* 97 */
+	(tclStubsPtr->tcl_ExprLongObj)(interp, objPtr, ptr) /* 140 */
 #endif
 #ifndef Tcl_ExprObj
 #define Tcl_ExprObj(interp, objPtr, resultPtrPtr) \
-	(tclStubsPtr->tcl_ExprObj)(interp, objPtr, resultPtrPtr) /* 98 */
+	(tclStubsPtr->tcl_ExprObj)(interp, objPtr, resultPtrPtr) /* 141 */
 #endif
 #ifndef Tcl_ExprString
-#define Tcl_ExprString(interp, str) \
-	(tclStubsPtr->tcl_ExprString)(interp, str) /* 99 */
+#define Tcl_ExprString(interp, string) \
+	(tclStubsPtr->tcl_ExprString)(interp, string) /* 142 */
 #endif
 #ifndef Tcl_Finalize
 #define Tcl_Finalize() \
-	(tclStubsPtr->tcl_Finalize)() /* 100 */
+	(tclStubsPtr->tcl_Finalize)() /* 143 */
 #endif
 #ifndef Tcl_FindExecutable
 #define Tcl_FindExecutable(argv0) \
-	(tclStubsPtr->tcl_FindExecutable)(argv0) /* 101 */
+	(tclStubsPtr->tcl_FindExecutable)(argv0) /* 144 */
 #endif
 #ifndef Tcl_FirstHashEntry
 #define Tcl_FirstHashEntry(tablePtr, searchPtr) \
-	(tclStubsPtr->tcl_FirstHashEntry)(tablePtr, searchPtr) /* 102 */
+	(tclStubsPtr->tcl_FirstHashEntry)(tablePtr, searchPtr) /* 145 */
 #endif
 #ifndef Tcl_Flush
 #define Tcl_Flush(chan) \
-	(tclStubsPtr->tcl_Flush)(chan) /* 103 */
-#endif
-#ifndef Tcl_Free
-#define Tcl_Free(ptr) \
-	(tclStubsPtr->tcl_Free)(ptr) /* 104 */
-#endif
-#ifndef TclFreeObj
-#define TclFreeObj(objPtr) \
-	(tclStubsPtr->tclFreeObj)(objPtr) /* 105 */
+	(tclStubsPtr->tcl_Flush)(chan) /* 146 */
 #endif
 #ifndef Tcl_FreeResult
 #define Tcl_FreeResult(interp) \
-	(tclStubsPtr->tcl_FreeResult)(interp) /* 106 */
+	(tclStubsPtr->tcl_FreeResult)(interp) /* 147 */
 #endif
 #ifndef Tcl_GetAlias
 #define Tcl_GetAlias(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr) \
-	(tclStubsPtr->tcl_GetAlias)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr) /* 107 */
+	(tclStubsPtr->tcl_GetAlias)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr) /* 148 */
 #endif
 #ifndef Tcl_GetAliasObj
 #define Tcl_GetAliasObj(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv) \
-	(tclStubsPtr->tcl_GetAliasObj)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv) /* 108 */
+	(tclStubsPtr->tcl_GetAliasObj)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv) /* 149 */
 #endif
 #ifndef Tcl_GetAssocData
 #define Tcl_GetAssocData(interp, name, procPtr) \
-	(tclStubsPtr->tcl_GetAssocData)(interp, name, procPtr) /* 109 */
-#endif
-#ifndef Tcl_GetBoolean
-#define Tcl_GetBoolean(interp, str, boolPtr) \
-	(tclStubsPtr->tcl_GetBoolean)(interp, str, boolPtr) /* 110 */
-#endif
-#ifndef Tcl_GetBooleanFromObj
-#define Tcl_GetBooleanFromObj(interp, objPtr, boolPtr) \
-	(tclStubsPtr->tcl_GetBooleanFromObj)(interp, objPtr, boolPtr) /* 111 */
-#endif
-#ifndef Tcl_GetByteArrayFromObj
-#define Tcl_GetByteArrayFromObj(objPtr, lengthPtr) \
-	(tclStubsPtr->tcl_GetByteArrayFromObj)(objPtr, lengthPtr) /* 112 */
+	(tclStubsPtr->tcl_GetAssocData)(interp, name, procPtr) /* 150 */
 #endif
 #ifndef Tcl_GetChannel
 #define Tcl_GetChannel(interp, chanName, modePtr) \
-	(tclStubsPtr->tcl_GetChannel)(interp, chanName, modePtr) /* 113 */
+	(tclStubsPtr->tcl_GetChannel)(interp, chanName, modePtr) /* 151 */
 #endif
 #ifndef Tcl_GetChannelBufferSize
 #define Tcl_GetChannelBufferSize(chan) \
-	(tclStubsPtr->tcl_GetChannelBufferSize)(chan) /* 114 */
+	(tclStubsPtr->tcl_GetChannelBufferSize)(chan) /* 152 */
 #endif
 #ifndef Tcl_GetChannelHandle
 #define Tcl_GetChannelHandle(chan, direction, handlePtr) \
-	(tclStubsPtr->tcl_GetChannelHandle)(chan, direction, handlePtr) /* 115 */
+	(tclStubsPtr->tcl_GetChannelHandle)(chan, direction, handlePtr) /* 153 */
 #endif
 #ifndef Tcl_GetChannelInstanceData
 #define Tcl_GetChannelInstanceData(chan) \
-	(tclStubsPtr->tcl_GetChannelInstanceData)(chan) /* 116 */
+	(tclStubsPtr->tcl_GetChannelInstanceData)(chan) /* 154 */
 #endif
 #ifndef Tcl_GetChannelMode
 #define Tcl_GetChannelMode(chan) \
-	(tclStubsPtr->tcl_GetChannelMode)(chan) /* 117 */
+	(tclStubsPtr->tcl_GetChannelMode)(chan) /* 155 */
 #endif
 #ifndef Tcl_GetChannelName
 #define Tcl_GetChannelName(chan) \
-	(tclStubsPtr->tcl_GetChannelName)(chan) /* 118 */
+	(tclStubsPtr->tcl_GetChannelName)(chan) /* 156 */
 #endif
 #ifndef Tcl_GetChannelOption
 #define Tcl_GetChannelOption(interp, chan, optionName, dsPtr) \
-	(tclStubsPtr->tcl_GetChannelOption)(interp, chan, optionName, dsPtr) /* 119 */
+	(tclStubsPtr->tcl_GetChannelOption)(interp, chan, optionName, dsPtr) /* 157 */
 #endif
 #ifndef Tcl_GetChannelType
 #define Tcl_GetChannelType(chan) \
-	(tclStubsPtr->tcl_GetChannelType)(chan) /* 120 */
+	(tclStubsPtr->tcl_GetChannelType)(chan) /* 158 */
 #endif
 #ifndef Tcl_GetCommandInfo
 #define Tcl_GetCommandInfo(interp, cmdName, infoPtr) \
-	(tclStubsPtr->tcl_GetCommandInfo)(interp, cmdName, infoPtr) /* 121 */
+	(tclStubsPtr->tcl_GetCommandInfo)(interp, cmdName, infoPtr) /* 159 */
 #endif
 #ifndef Tcl_GetCommandName
 #define Tcl_GetCommandName(interp, command) \
-	(tclStubsPtr->tcl_GetCommandName)(interp, command) /* 122 */
-#endif
-#ifndef Tcl_GetDouble
-#define Tcl_GetDouble(interp, str, doublePtr) \
-	(tclStubsPtr->tcl_GetDouble)(interp, str, doublePtr) /* 123 */
-#endif
-#ifndef Tcl_GetDoubleFromObj
-#define Tcl_GetDoubleFromObj(interp, objPtr, doublePtr) \
-	(tclStubsPtr->tcl_GetDoubleFromObj)(interp, objPtr, doublePtr) /* 124 */
+	(tclStubsPtr->tcl_GetCommandName)(interp, command) /* 160 */
 #endif
 #ifndef Tcl_GetErrno
 #define Tcl_GetErrno() \
-	(tclStubsPtr->tcl_GetErrno)() /* 125 */
+	(tclStubsPtr->tcl_GetErrno)() /* 161 */
 #endif
 #ifndef Tcl_GetHostName
 #define Tcl_GetHostName() \
-	(tclStubsPtr->tcl_GetHostName)() /* 126 */
-#endif
-#ifndef Tcl_GetIndexFromObj
-#define Tcl_GetIndexFromObj(interp, objPtr, tablePtr, msg, flags, indexPtr) \
-	(tclStubsPtr->tcl_GetIndexFromObj)(interp, objPtr, tablePtr, msg, flags, indexPtr) /* 127 */
-#endif
-#ifndef Tcl_GetInt
-#define Tcl_GetInt(interp, str, intPtr) \
-	(tclStubsPtr->tcl_GetInt)(interp, str, intPtr) /* 128 */
+	(tclStubsPtr->tcl_GetHostName)() /* 162 */
 #endif
 #ifndef Tcl_GetInterpPath
 #define Tcl_GetInterpPath(askInterp, slaveInterp) \
-	(tclStubsPtr->tcl_GetInterpPath)(askInterp, slaveInterp) /* 129 */
-#endif
-#ifndef Tcl_GetIntFromObj
-#define Tcl_GetIntFromObj(interp, objPtr, intPtr) \
-	(tclStubsPtr->tcl_GetIntFromObj)(interp, objPtr, intPtr) /* 130 */
-#endif
-#ifndef Tcl_GetLongFromObj
-#define Tcl_GetLongFromObj(interp, objPtr, longPtr) \
-	(tclStubsPtr->tcl_GetLongFromObj)(interp, objPtr, longPtr) /* 131 */
+	(tclStubsPtr->tcl_GetInterpPath)(askInterp, slaveInterp) /* 163 */
 #endif
 #ifndef Tcl_GetMaster
 #define Tcl_GetMaster(interp) \
-	(tclStubsPtr->tcl_GetMaster)(interp) /* 132 */
+	(tclStubsPtr->tcl_GetMaster)(interp) /* 164 */
 #endif
 #ifndef Tcl_GetNameOfExecutable
 #define Tcl_GetNameOfExecutable() \
-	(tclStubsPtr->tcl_GetNameOfExecutable)() /* 133 */
+	(tclStubsPtr->tcl_GetNameOfExecutable)() /* 165 */
 #endif
 #ifndef Tcl_GetObjResult
 #define Tcl_GetObjResult(interp) \
-	(tclStubsPtr->tcl_GetObjResult)(interp) /* 134 */
+	(tclStubsPtr->tcl_GetObjResult)(interp) /* 166 */
 #endif
-#ifndef Tcl_GetObjType
-#define Tcl_GetObjType(typeName) \
-	(tclStubsPtr->tcl_GetObjType)(typeName) /* 135 */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifndef Tcl_GetOpenFile
+#define Tcl_GetOpenFile(interp, string, write, checkUsage, filePtr) \
+	(tclStubsPtr->tcl_GetOpenFile)(interp, string, write, checkUsage, filePtr) /* 167 */
 #endif
+#endif /* UNIX */
 #ifndef Tcl_GetPathType
 #define Tcl_GetPathType(path) \
-	(tclStubsPtr->tcl_GetPathType)(path) /* 136 */
+	(tclStubsPtr->tcl_GetPathType)(path) /* 168 */
 #endif
 #ifndef Tcl_Gets
 #define Tcl_Gets(chan, dsPtr) \
-	(tclStubsPtr->tcl_Gets)(chan, dsPtr) /* 137 */
+	(tclStubsPtr->tcl_Gets)(chan, dsPtr) /* 169 */
 #endif
 #ifndef Tcl_GetsObj
 #define Tcl_GetsObj(chan, objPtr) \
-	(tclStubsPtr->tcl_GetsObj)(chan, objPtr) /* 138 */
+	(tclStubsPtr->tcl_GetsObj)(chan, objPtr) /* 170 */
 #endif
 #ifndef Tcl_GetServiceMode
 #define Tcl_GetServiceMode() \
-	(tclStubsPtr->tcl_GetServiceMode)() /* 139 */
+	(tclStubsPtr->tcl_GetServiceMode)() /* 171 */
 #endif
 #ifndef Tcl_GetSlave
 #define Tcl_GetSlave(interp, slaveName) \
-	(tclStubsPtr->tcl_GetSlave)(interp, slaveName) /* 140 */
+	(tclStubsPtr->tcl_GetSlave)(interp, slaveName) /* 172 */
 #endif
 #ifndef Tcl_GetStdChannel
 #define Tcl_GetStdChannel(type) \
-	(tclStubsPtr->tcl_GetStdChannel)(type) /* 141 */
-#endif
-#ifndef Tcl_GetStringFromObj
-#define Tcl_GetStringFromObj(objPtr, lengthPtr) \
-	(tclStubsPtr->tcl_GetStringFromObj)(objPtr, lengthPtr) /* 142 */
+	(tclStubsPtr->tcl_GetStdChannel)(type) /* 173 */
 #endif
 #ifndef Tcl_GetStringResult
 #define Tcl_GetStringResult(interp) \
-	(tclStubsPtr->tcl_GetStringResult)(interp) /* 143 */
+	(tclStubsPtr->tcl_GetStringResult)(interp) /* 174 */
 #endif
 #ifndef Tcl_GetVar
 #define Tcl_GetVar(interp, varName, flags) \
-	(tclStubsPtr->tcl_GetVar)(interp, varName, flags) /* 144 */
+	(tclStubsPtr->tcl_GetVar)(interp, varName, flags) /* 175 */
 #endif
 #ifndef Tcl_GetVar2
 #define Tcl_GetVar2(interp, part1, part2, flags) \
-	(tclStubsPtr->tcl_GetVar2)(interp, part1, part2, flags) /* 145 */
+	(tclStubsPtr->tcl_GetVar2)(interp, part1, part2, flags) /* 176 */
 #endif
 #ifndef Tcl_GlobalEval
 #define Tcl_GlobalEval(interp, command) \
-	(tclStubsPtr->tcl_GlobalEval)(interp, command) /* 146 */
+	(tclStubsPtr->tcl_GlobalEval)(interp, command) /* 177 */
 #endif
 #ifndef Tcl_GlobalEvalObj
 #define Tcl_GlobalEvalObj(interp, objPtr) \
-	(tclStubsPtr->tcl_GlobalEvalObj)(interp, objPtr) /* 147 */
-#endif
-#ifndef Tcl_HashStats
-#define Tcl_HashStats(tablePtr) \
-	(tclStubsPtr->tcl_HashStats)(tablePtr) /* 148 */
+	(tclStubsPtr->tcl_GlobalEvalObj)(interp, objPtr) /* 178 */
 #endif
 #ifndef Tcl_HideCommand
 #define Tcl_HideCommand(interp, cmdName, hiddenCmdToken) \
-	(tclStubsPtr->tcl_HideCommand)(interp, cmdName, hiddenCmdToken) /* 149 */
+	(tclStubsPtr->tcl_HideCommand)(interp, cmdName, hiddenCmdToken) /* 179 */
 #endif
 #ifndef Tcl_Init
 #define Tcl_Init(interp) \
-	(tclStubsPtr->tcl_Init)(interp) /* 150 */
+	(tclStubsPtr->tcl_Init)(interp) /* 180 */
 #endif
 #ifndef Tcl_InitHashTable
 #define Tcl_InitHashTable(tablePtr, keyType) \
-	(tclStubsPtr->tcl_InitHashTable)(tablePtr, keyType) /* 151 */
-#endif
-#ifndef Tcl_InitMemory
-#define Tcl_InitMemory(interp) \
-	(tclStubsPtr->tcl_InitMemory)(interp) /* 152 */
+	(tclStubsPtr->tcl_InitHashTable)(tablePtr, keyType) /* 181 */
 #endif
 #ifndef Tcl_InputBlocked
 #define Tcl_InputBlocked(chan) \
-	(tclStubsPtr->tcl_InputBlocked)(chan) /* 153 */
+	(tclStubsPtr->tcl_InputBlocked)(chan) /* 182 */
 #endif
 #ifndef Tcl_InputBuffered
 #define Tcl_InputBuffered(chan) \
-	(tclStubsPtr->tcl_InputBuffered)(chan) /* 154 */
+	(tclStubsPtr->tcl_InputBuffered)(chan) /* 183 */
 #endif
 #ifndef Tcl_InterpDeleted
 #define Tcl_InterpDeleted(interp) \
-	(tclStubsPtr->tcl_InterpDeleted)(interp) /* 155 */
+	(tclStubsPtr->tcl_InterpDeleted)(interp) /* 184 */
 #endif
 #ifndef Tcl_IsSafe
 #define Tcl_IsSafe(interp) \
-	(tclStubsPtr->tcl_IsSafe)(interp) /* 156 */
-#endif
-#ifndef Tcl_InvalidateStringRep
-#define Tcl_InvalidateStringRep(objPtr) \
-	(tclStubsPtr->tcl_InvalidateStringRep)(objPtr) /* 157 */
+	(tclStubsPtr->tcl_IsSafe)(interp) /* 185 */
 #endif
 #ifndef Tcl_JoinPath
 #define Tcl_JoinPath(argc, argv, resultPtr) \
-	(tclStubsPtr->tcl_JoinPath)(argc, argv, resultPtr) /* 158 */
+	(tclStubsPtr->tcl_JoinPath)(argc, argv, resultPtr) /* 186 */
 #endif
 #ifndef Tcl_LinkVar
 #define Tcl_LinkVar(interp, varName, addr, type) \
-	(tclStubsPtr->tcl_LinkVar)(interp, varName, addr, type) /* 159 */
-#endif
-#ifndef Tcl_ListObjAppendList
-#define Tcl_ListObjAppendList(interp, listPtr, elemListPtr) \
-	(tclStubsPtr->tcl_ListObjAppendList)(interp, listPtr, elemListPtr) /* 160 */
-#endif
-#ifndef Tcl_ListObjAppendElement
-#define Tcl_ListObjAppendElement(interp, listPtr, objPtr) \
-	(tclStubsPtr->tcl_ListObjAppendElement)(interp, listPtr, objPtr) /* 161 */
-#endif
-#ifndef Tcl_ListObjGetElements
-#define Tcl_ListObjGetElements(interp, listPtr, objcPtr, objvPtr) \
-	(tclStubsPtr->tcl_ListObjGetElements)(interp, listPtr, objcPtr, objvPtr) /* 162 */
-#endif
-#ifndef Tcl_ListObjIndex
-#define Tcl_ListObjIndex(interp, listPtr, index, objPtrPtr) \
-	(tclStubsPtr->tcl_ListObjIndex)(interp, listPtr, index, objPtrPtr) /* 163 */
-#endif
-#ifndef Tcl_ListObjLength
-#define Tcl_ListObjLength(interp, listPtr, intPtr) \
-	(tclStubsPtr->tcl_ListObjLength)(interp, listPtr, intPtr) /* 164 */
-#endif
-#ifndef Tcl_ListObjReplace
-#define Tcl_ListObjReplace(interp, listPtr, first, count, objc, objv) \
-	(tclStubsPtr->tcl_ListObjReplace)(interp, listPtr, first, count, objc, objv) /* 165 */
+	(tclStubsPtr->tcl_LinkVar)(interp, varName, addr, type) /* 187 */
 #endif
+/* Slot 188 is reserved */
 #ifndef Tcl_MakeFileChannel
 #define Tcl_MakeFileChannel(handle, mode) \
-	(tclStubsPtr->tcl_MakeFileChannel)(handle, mode) /* 166 */
+	(tclStubsPtr->tcl_MakeFileChannel)(handle, mode) /* 189 */
 #endif
 #ifndef Tcl_MakeSafe
 #define Tcl_MakeSafe(interp) \
-	(tclStubsPtr->tcl_MakeSafe)(interp) /* 167 */
+	(tclStubsPtr->tcl_MakeSafe)(interp) /* 190 */
 #endif
 #ifndef Tcl_MakeTcpClientChannel
 #define Tcl_MakeTcpClientChannel(tcpSocket) \
-	(tclStubsPtr->tcl_MakeTcpClientChannel)(tcpSocket) /* 168 */
+	(tclStubsPtr->tcl_MakeTcpClientChannel)(tcpSocket) /* 191 */
 #endif
 #ifndef Tcl_Merge
 #define Tcl_Merge(argc, argv) \
-	(tclStubsPtr->tcl_Merge)(argc, argv) /* 169 */
-#endif
-#ifndef Tcl_NewBooleanObj
-#define Tcl_NewBooleanObj(boolValue) \
-	(tclStubsPtr->tcl_NewBooleanObj)(boolValue) /* 170 */
-#endif
-#ifndef Tcl_NewByteArrayObj
-#define Tcl_NewByteArrayObj(bytes, length) \
-	(tclStubsPtr->tcl_NewByteArrayObj)(bytes, length) /* 171 */
-#endif
-#ifndef Tcl_NewDoubleObj
-#define Tcl_NewDoubleObj(doubleValue) \
-	(tclStubsPtr->tcl_NewDoubleObj)(doubleValue) /* 172 */
-#endif
-#ifndef Tcl_NewIntObj
-#define Tcl_NewIntObj(intValue) \
-	(tclStubsPtr->tcl_NewIntObj)(intValue) /* 173 */
-#endif
-#ifndef Tcl_NewListObj
-#define Tcl_NewListObj(objc, objv) \
-	(tclStubsPtr->tcl_NewListObj)(objc, objv) /* 174 */
-#endif
-#ifndef Tcl_NewLongObj
-#define Tcl_NewLongObj(longValue) \
-	(tclStubsPtr->tcl_NewLongObj)(longValue) /* 175 */
-#endif
-#ifndef Tcl_NewObj
-#define Tcl_NewObj() \
-	(tclStubsPtr->tcl_NewObj)() /* 176 */
-#endif
-#ifndef Tcl_NewStringObj
-#define Tcl_NewStringObj(bytes, length) \
-	(tclStubsPtr->tcl_NewStringObj)(bytes, length) /* 177 */
+	(tclStubsPtr->tcl_Merge)(argc, argv) /* 192 */
 #endif
 #ifndef Tcl_NextHashEntry
 #define Tcl_NextHashEntry(searchPtr) \
-	(tclStubsPtr->tcl_NextHashEntry)(searchPtr) /* 178 */
+	(tclStubsPtr->tcl_NextHashEntry)(searchPtr) /* 193 */
 #endif
 #ifndef Tcl_NotifyChannel
 #define Tcl_NotifyChannel(channel, mask) \
-	(tclStubsPtr->tcl_NotifyChannel)(channel, mask) /* 179 */
+	(tclStubsPtr->tcl_NotifyChannel)(channel, mask) /* 194 */
 #endif
 #ifndef Tcl_ObjGetVar2
 #define Tcl_ObjGetVar2(interp, part1Ptr, part2Ptr, flags) \
-	(tclStubsPtr->tcl_ObjGetVar2)(interp, part1Ptr, part2Ptr, flags) /* 180 */
+	(tclStubsPtr->tcl_ObjGetVar2)(interp, part1Ptr, part2Ptr, flags) /* 195 */
 #endif
 #ifndef Tcl_ObjSetVar2
 #define Tcl_ObjSetVar2(interp, part1Ptr, part2Ptr, newValuePtr, flags) \
-	(tclStubsPtr->tcl_ObjSetVar2)(interp, part1Ptr, part2Ptr, newValuePtr, flags) /* 181 */
+	(tclStubsPtr->tcl_ObjSetVar2)(interp, part1Ptr, part2Ptr, newValuePtr, flags) /* 196 */
 #endif
 #ifndef Tcl_OpenCommandChannel
 #define Tcl_OpenCommandChannel(interp, argc, argv, flags) \
-	(tclStubsPtr->tcl_OpenCommandChannel)(interp, argc, argv, flags) /* 182 */
+	(tclStubsPtr->tcl_OpenCommandChannel)(interp, argc, argv, flags) /* 197 */
 #endif
 #ifndef Tcl_OpenFileChannel
 #define Tcl_OpenFileChannel(interp, fileName, modeString, permissions) \
-	(tclStubsPtr->tcl_OpenFileChannel)(interp, fileName, modeString, permissions) /* 183 */
+	(tclStubsPtr->tcl_OpenFileChannel)(interp, fileName, modeString, permissions) /* 198 */
 #endif
 #ifndef Tcl_OpenTcpClient
 #define Tcl_OpenTcpClient(interp, port, address, myaddr, myport, async) \
-	(tclStubsPtr->tcl_OpenTcpClient)(interp, port, address, myaddr, myport, async) /* 184 */
+	(tclStubsPtr->tcl_OpenTcpClient)(interp, port, address, myaddr, myport, async) /* 199 */
 #endif
 #ifndef Tcl_OpenTcpServer
 #define Tcl_OpenTcpServer(interp, port, host, acceptProc, callbackData) \
-	(tclStubsPtr->tcl_OpenTcpServer)(interp, port, host, acceptProc, callbackData) /* 185 */
-#endif
-#ifndef panic
-#define panic \
-	(tclStubsPtr->panic) /* 186 */
-#endif
-#ifndef panicVA
-#define panicVA(format, argList) \
-	(tclStubsPtr->panicVA)(format, argList) /* 187 */
-#endif
-#ifndef Tcl_ParseVar
-#define Tcl_ParseVar(interp, str, termPtr) \
-	(tclStubsPtr->tcl_ParseVar)(interp, str, termPtr) /* 188 */
-#endif
-#ifndef Tcl_PkgPresent
-#define Tcl_PkgPresent(interp, name, version, exact) \
-	(tclStubsPtr->tcl_PkgPresent)(interp, name, version, exact) /* 189 */
-#endif
-#ifndef Tcl_PkgPresentEx
-#define Tcl_PkgPresentEx(interp, name, version, exact, clientDataPtr) \
-	(tclStubsPtr->tcl_PkgPresentEx)(interp, name, version, exact, clientDataPtr) /* 190 */
-#endif
-#ifndef Tcl_PkgProvide
-#define Tcl_PkgProvide(interp, name, version) \
-	(tclStubsPtr->tcl_PkgProvide)(interp, name, version) /* 191 */
-#endif
-#ifndef Tcl_PkgProvideEx
-#define Tcl_PkgProvideEx(interp, name, version, clientData) \
-	(tclStubsPtr->tcl_PkgProvideEx)(interp, name, version, clientData) /* 192 */
-#endif
-#ifndef Tcl_PkgRequire
-#define Tcl_PkgRequire(interp, name, version, exact) \
-	(tclStubsPtr->tcl_PkgRequire)(interp, name, version, exact) /* 193 */
-#endif
-#ifndef Tcl_PkgRequireEx
-#define Tcl_PkgRequireEx(interp, name, version, exact, clientDataPtr) \
-	(tclStubsPtr->tcl_PkgRequireEx)(interp, name, version, exact, clientDataPtr) /* 194 */
-#endif
-#ifndef Tcl_PosixError
-#define Tcl_PosixError(interp) \
-	(tclStubsPtr->tcl_PosixError)(interp) /* 195 */
+	(tclStubsPtr->tcl_OpenTcpServer)(interp, port, host, acceptProc, callbackData) /* 200 */
 #endif
 #ifndef Tcl_Preserve
 #define Tcl_Preserve(data) \
-	(tclStubsPtr->tcl_Preserve)(data) /* 196 */
+	(tclStubsPtr->tcl_Preserve)(data) /* 201 */
 #endif
 #ifndef Tcl_PrintDouble
 #define Tcl_PrintDouble(interp, value, dst) \
-	(tclStubsPtr->tcl_PrintDouble)(interp, value, dst) /* 197 */
+	(tclStubsPtr->tcl_PrintDouble)(interp, value, dst) /* 202 */
 #endif
 #ifndef Tcl_PutEnv
-#define Tcl_PutEnv(str) \
-	(tclStubsPtr->tcl_PutEnv)(str) /* 198 */
+#define Tcl_PutEnv(string) \
+	(tclStubsPtr->tcl_PutEnv)(string) /* 203 */
+#endif
+#ifndef Tcl_PosixError
+#define Tcl_PosixError(interp) \
+	(tclStubsPtr->tcl_PosixError)(interp) /* 204 */
 #endif
 #ifndef Tcl_QueueEvent
 #define Tcl_QueueEvent(evPtr, position) \
-	(tclStubsPtr->tcl_QueueEvent)(evPtr, position) /* 199 */
+	(tclStubsPtr->tcl_QueueEvent)(evPtr, position) /* 205 */
 #endif
 #ifndef Tcl_Read
 #define Tcl_Read(chan, bufPtr, toRead) \
-	(tclStubsPtr->tcl_Read)(chan, bufPtr, toRead) /* 200 */
-#endif
-#ifndef Tcl_Realloc
-#define Tcl_Realloc(ptr, size) \
-	(tclStubsPtr->tcl_Realloc)(ptr, size) /* 201 */
+	(tclStubsPtr->tcl_Read)(chan, bufPtr, toRead) /* 206 */
 #endif
 #ifndef Tcl_ReapDetachedProcs
 #define Tcl_ReapDetachedProcs() \
-	(tclStubsPtr->tcl_ReapDetachedProcs)() /* 202 */
+	(tclStubsPtr->tcl_ReapDetachedProcs)() /* 207 */
 #endif
 #ifndef Tcl_RecordAndEval
 #define Tcl_RecordAndEval(interp, cmd, flags) \
-	(tclStubsPtr->tcl_RecordAndEval)(interp, cmd, flags) /* 203 */
+	(tclStubsPtr->tcl_RecordAndEval)(interp, cmd, flags) /* 208 */
 #endif
 #ifndef Tcl_RecordAndEvalObj
 #define Tcl_RecordAndEvalObj(interp, cmdPtr, flags) \
-	(tclStubsPtr->tcl_RecordAndEvalObj)(interp, cmdPtr, flags) /* 204 */
+	(tclStubsPtr->tcl_RecordAndEvalObj)(interp, cmdPtr, flags) /* 209 */
+#endif
+#ifndef Tcl_RegisterChannel
+#define Tcl_RegisterChannel(interp, chan) \
+	(tclStubsPtr->tcl_RegisterChannel)(interp, chan) /* 210 */
+#endif
+#ifndef Tcl_RegisterObjType
+#define Tcl_RegisterObjType(typePtr) \
+	(tclStubsPtr->tcl_RegisterObjType)(typePtr) /* 211 */
 #endif
 #ifndef Tcl_RegExpCompile
-#define Tcl_RegExpCompile(interp, str) \
-	(tclStubsPtr->tcl_RegExpCompile)(interp, str) /* 205 */
+#define Tcl_RegExpCompile(interp, string) \
+	(tclStubsPtr->tcl_RegExpCompile)(interp, string) /* 212 */
 #endif
 #ifndef Tcl_RegExpExec
-#define Tcl_RegExpExec(interp, regexp, str, start) \
-	(tclStubsPtr->tcl_RegExpExec)(interp, regexp, str, start) /* 206 */
+#define Tcl_RegExpExec(interp, regexp, string, start) \
+	(tclStubsPtr->tcl_RegExpExec)(interp, regexp, string, start) /* 213 */
 #endif
 #ifndef Tcl_RegExpMatch
-#define Tcl_RegExpMatch(interp, str, pattern) \
-	(tclStubsPtr->tcl_RegExpMatch)(interp, str, pattern) /* 207 */
+#define Tcl_RegExpMatch(interp, string, pattern) \
+	(tclStubsPtr->tcl_RegExpMatch)(interp, string, pattern) /* 214 */
 #endif
 #ifndef Tcl_RegExpRange
 #define Tcl_RegExpRange(regexp, index, startPtr, endPtr) \
-	(tclStubsPtr->tcl_RegExpRange)(regexp, index, startPtr, endPtr) /* 208 */
-#endif
-#ifndef Tcl_RegisterChannel
-#define Tcl_RegisterChannel(interp, chan) \
-	(tclStubsPtr->tcl_RegisterChannel)(interp, chan) /* 209 */
-#endif
-#ifndef Tcl_RegisterObjType
-#define Tcl_RegisterObjType(typePtr) \
-	(tclStubsPtr->tcl_RegisterObjType)(typePtr) /* 210 */
+	(tclStubsPtr->tcl_RegExpRange)(regexp, index, startPtr, endPtr) /* 215 */
 #endif
 #ifndef Tcl_Release
 #define Tcl_Release(clientData) \
-	(tclStubsPtr->tcl_Release)(clientData) /* 211 */
+	(tclStubsPtr->tcl_Release)(clientData) /* 216 */
 #endif
 #ifndef Tcl_ResetResult
 #define Tcl_ResetResult(interp) \
-	(tclStubsPtr->tcl_ResetResult)(interp) /* 212 */
-#endif
-#ifndef Tcl_ScanCountedElement
-#define Tcl_ScanCountedElement(str, length, flagPtr) \
-	(tclStubsPtr->tcl_ScanCountedElement)(str, length, flagPtr) /* 213 */
+	(tclStubsPtr->tcl_ResetResult)(interp) /* 217 */
 #endif
 #ifndef Tcl_ScanElement
-#define Tcl_ScanElement(str, flagPtr) \
-	(tclStubsPtr->tcl_ScanElement)(str, flagPtr) /* 214 */
+#define Tcl_ScanElement(string, flagPtr) \
+	(tclStubsPtr->tcl_ScanElement)(string, flagPtr) /* 218 */
+#endif
+#ifndef Tcl_ScanCountedElement
+#define Tcl_ScanCountedElement(string, length, flagPtr) \
+	(tclStubsPtr->tcl_ScanCountedElement)(string, length, flagPtr) /* 219 */
 #endif
 #ifndef Tcl_Seek
 #define Tcl_Seek(chan, offset, mode) \
-	(tclStubsPtr->tcl_Seek)(chan, offset, mode) /* 215 */
+	(tclStubsPtr->tcl_Seek)(chan, offset, mode) /* 220 */
 #endif
 #ifndef Tcl_ServiceAll
 #define Tcl_ServiceAll() \
-	(tclStubsPtr->tcl_ServiceAll)() /* 216 */
+	(tclStubsPtr->tcl_ServiceAll)() /* 221 */
 #endif
 #ifndef Tcl_ServiceEvent
 #define Tcl_ServiceEvent(flags) \
-	(tclStubsPtr->tcl_ServiceEvent)(flags) /* 217 */
+	(tclStubsPtr->tcl_ServiceEvent)(flags) /* 222 */
 #endif
 #ifndef Tcl_SetAssocData
 #define Tcl_SetAssocData(interp, name, proc, clientData) \
-	(tclStubsPtr->tcl_SetAssocData)(interp, name, proc, clientData) /* 218 */
-#endif
-#ifndef Tcl_SetBooleanObj
-#define Tcl_SetBooleanObj(objPtr, boolValue) \
-	(tclStubsPtr->tcl_SetBooleanObj)(objPtr, boolValue) /* 219 */
-#endif
-#ifndef Tcl_SetByteArrayLength
-#define Tcl_SetByteArrayLength(objPtr, length) \
-	(tclStubsPtr->tcl_SetByteArrayLength)(objPtr, length) /* 220 */
-#endif
-#ifndef Tcl_SetByteArrayObj
-#define Tcl_SetByteArrayObj(objPtr, bytes, length) \
-	(tclStubsPtr->tcl_SetByteArrayObj)(objPtr, bytes, length) /* 221 */
+	(tclStubsPtr->tcl_SetAssocData)(interp, name, proc, clientData) /* 223 */
 #endif
 #ifndef Tcl_SetChannelBufferSize
 #define Tcl_SetChannelBufferSize(chan, sz) \
-	(tclStubsPtr->tcl_SetChannelBufferSize)(chan, sz) /* 222 */
+	(tclStubsPtr->tcl_SetChannelBufferSize)(chan, sz) /* 224 */
 #endif
 #ifndef Tcl_SetChannelOption
 #define Tcl_SetChannelOption(interp, chan, optionName, newValue) \
-	(tclStubsPtr->tcl_SetChannelOption)(interp, chan, optionName, newValue) /* 223 */
+	(tclStubsPtr->tcl_SetChannelOption)(interp, chan, optionName, newValue) /* 225 */
 #endif
 #ifndef Tcl_SetCommandInfo
 #define Tcl_SetCommandInfo(interp, cmdName, infoPtr) \
-	(tclStubsPtr->tcl_SetCommandInfo)(interp, cmdName, infoPtr) /* 224 */
-#endif
-#ifndef Tcl_SetDoubleObj
-#define Tcl_SetDoubleObj(objPtr, doubleValue) \
-	(tclStubsPtr->tcl_SetDoubleObj)(objPtr, doubleValue) /* 225 */
+	(tclStubsPtr->tcl_SetCommandInfo)(interp, cmdName, infoPtr) /* 226 */
 #endif
 #ifndef Tcl_SetErrno
 #define Tcl_SetErrno(err) \
-	(tclStubsPtr->tcl_SetErrno)(err) /* 226 */
+	(tclStubsPtr->tcl_SetErrno)(err) /* 227 */
 #endif
 #ifndef Tcl_SetErrorCode
 #define Tcl_SetErrorCode \
-	(tclStubsPtr->tcl_SetErrorCode) /* 227 */
-#endif
-#ifndef Tcl_SetErrorCodeVA
-#define Tcl_SetErrorCodeVA(interp, argList) \
-	(tclStubsPtr->tcl_SetErrorCodeVA)(interp, argList) /* 228 */
-#endif
-#ifndef Tcl_SetIntObj
-#define Tcl_SetIntObj(objPtr, intValue) \
-	(tclStubsPtr->tcl_SetIntObj)(objPtr, intValue) /* 229 */
-#endif
-#ifndef Tcl_SetListObj
-#define Tcl_SetListObj(objPtr, objc, objv) \
-	(tclStubsPtr->tcl_SetListObj)(objPtr, objc, objv) /* 230 */
-#endif
-#ifndef Tcl_SetLongObj
-#define Tcl_SetLongObj(objPtr, longValue) \
-	(tclStubsPtr->tcl_SetLongObj)(objPtr, longValue) /* 231 */
+	(tclStubsPtr->tcl_SetErrorCode) /* 228 */
 #endif
 #ifndef Tcl_SetMaxBlockTime
 #define Tcl_SetMaxBlockTime(timePtr) \
-	(tclStubsPtr->tcl_SetMaxBlockTime)(timePtr) /* 232 */
-#endif
-#ifndef Tcl_SetObjErrorCode
-#define Tcl_SetObjErrorCode(interp, errorObjPtr) \
-	(tclStubsPtr->tcl_SetObjErrorCode)(interp, errorObjPtr) /* 233 */
-#endif
-#ifndef Tcl_SetObjLength
-#define Tcl_SetObjLength(objPtr, length) \
-	(tclStubsPtr->tcl_SetObjLength)(objPtr, length) /* 234 */
-#endif
-#ifndef Tcl_SetObjResult
-#define Tcl_SetObjResult(interp, resultObjPtr) \
-	(tclStubsPtr->tcl_SetObjResult)(interp, resultObjPtr) /* 235 */
+	(tclStubsPtr->tcl_SetMaxBlockTime)(timePtr) /* 229 */
 #endif
 #ifndef Tcl_SetPanicProc
 #define Tcl_SetPanicProc(panicProc) \
-	(tclStubsPtr->tcl_SetPanicProc)(panicProc) /* 236 */
+	(tclStubsPtr->tcl_SetPanicProc)(panicProc) /* 230 */
 #endif
 #ifndef Tcl_SetRecursionLimit
 #define Tcl_SetRecursionLimit(interp, depth) \
-	(tclStubsPtr->tcl_SetRecursionLimit)(interp, depth) /* 237 */
+	(tclStubsPtr->tcl_SetRecursionLimit)(interp, depth) /* 231 */
 #endif
 #ifndef Tcl_SetResult
-#define Tcl_SetResult(interp, str, freeProc) \
-	(tclStubsPtr->tcl_SetResult)(interp, str, freeProc) /* 238 */
+#define Tcl_SetResult(interp, string, freeProc) \
+	(tclStubsPtr->tcl_SetResult)(interp, string, freeProc) /* 232 */
 #endif
 #ifndef Tcl_SetServiceMode
 #define Tcl_SetServiceMode(mode) \
-	(tclStubsPtr->tcl_SetServiceMode)(mode) /* 239 */
+	(tclStubsPtr->tcl_SetServiceMode)(mode) /* 233 */
 #endif
-#ifndef Tcl_SetStdChannel
-#define Tcl_SetStdChannel(channel, type) \
-	(tclStubsPtr->tcl_SetStdChannel)(channel, type) /* 240 */
+#ifndef Tcl_SetObjErrorCode
+#define Tcl_SetObjErrorCode(interp, errorObjPtr) \
+	(tclStubsPtr->tcl_SetObjErrorCode)(interp, errorObjPtr) /* 234 */
 #endif
-#ifndef Tcl_SetStringObj
-#define Tcl_SetStringObj(objPtr, bytes, length) \
-	(tclStubsPtr->tcl_SetStringObj)(objPtr, bytes, length) /* 241 */
+#ifndef Tcl_SetObjResult
+#define Tcl_SetObjResult(interp, resultObjPtr) \
+	(tclStubsPtr->tcl_SetObjResult)(interp, resultObjPtr) /* 235 */
 #endif
-#ifndef Tcl_SetTimer
-#define Tcl_SetTimer(timePtr) \
-	(tclStubsPtr->tcl_SetTimer)(timePtr) /* 242 */
+#ifndef Tcl_SetStdChannel
+#define Tcl_SetStdChannel(channel, type) \
+	(tclStubsPtr->tcl_SetStdChannel)(channel, type) /* 236 */
 #endif
 #ifndef Tcl_SetVar
 #define Tcl_SetVar(interp, varName, newValue, flags) \
-	(tclStubsPtr->tcl_SetVar)(interp, varName, newValue, flags) /* 243 */
+	(tclStubsPtr->tcl_SetVar)(interp, varName, newValue, flags) /* 237 */
 #endif
 #ifndef Tcl_SetVar2
 #define Tcl_SetVar2(interp, part1, part2, newValue, flags) \
-	(tclStubsPtr->tcl_SetVar2)(interp, part1, part2, newValue, flags) /* 244 */
+	(tclStubsPtr->tcl_SetVar2)(interp, part1, part2, newValue, flags) /* 238 */
 #endif
 #ifndef Tcl_SignalId
 #define Tcl_SignalId(sig) \
-	(tclStubsPtr->tcl_SignalId)(sig) /* 245 */
+	(tclStubsPtr->tcl_SignalId)(sig) /* 239 */
 #endif
 #ifndef Tcl_SignalMsg
 #define Tcl_SignalMsg(sig) \
-	(tclStubsPtr->tcl_SignalMsg)(sig) /* 246 */
-#endif
-#ifndef Tcl_Sleep
-#define Tcl_Sleep(ms) \
-	(tclStubsPtr->tcl_Sleep)(ms) /* 247 */
+	(tclStubsPtr->tcl_SignalMsg)(sig) /* 240 */
 #endif
 #ifndef Tcl_SourceRCFile
 #define Tcl_SourceRCFile(interp) \
-	(tclStubsPtr->tcl_SourceRCFile)(interp) /* 248 */
+	(tclStubsPtr->tcl_SourceRCFile)(interp) /* 241 */
 #endif
 #ifndef Tcl_SplitList
-#define Tcl_SplitList(interp, listStr, argcPtr, argvPtr) \
-	(tclStubsPtr->tcl_SplitList)(interp, listStr, argcPtr, argvPtr) /* 249 */
+#define Tcl_SplitList(interp, list, argcPtr, argvPtr) \
+	(tclStubsPtr->tcl_SplitList)(interp, list, argcPtr, argvPtr) /* 242 */
 #endif
 #ifndef Tcl_SplitPath
 #define Tcl_SplitPath(path, argcPtr, argvPtr) \
-	(tclStubsPtr->tcl_SplitPath)(path, argcPtr, argvPtr) /* 250 */
+	(tclStubsPtr->tcl_SplitPath)(path, argcPtr, argvPtr) /* 243 */
 #endif
 #ifndef Tcl_StaticPackage
 #define Tcl_StaticPackage(interp, pkgName, initProc, safeInitProc) \
-	(tclStubsPtr->tcl_StaticPackage)(interp, pkgName, initProc, safeInitProc) /* 251 */
+	(tclStubsPtr->tcl_StaticPackage)(interp, pkgName, initProc, safeInitProc) /* 244 */
 #endif
 #ifndef Tcl_StringMatch
-#define Tcl_StringMatch(str, pattern) \
-	(tclStubsPtr->tcl_StringMatch)(str, pattern) /* 252 */
+#define Tcl_StringMatch(string, pattern) \
+	(tclStubsPtr->tcl_StringMatch)(string, pattern) /* 245 */
 #endif
 #ifndef Tcl_Tell
 #define Tcl_Tell(chan) \
-	(tclStubsPtr->tcl_Tell)(chan) /* 253 */
+	(tclStubsPtr->tcl_Tell)(chan) /* 246 */
 #endif
 #ifndef Tcl_TraceVar
 #define Tcl_TraceVar(interp, varName, flags, proc, clientData) \
-	(tclStubsPtr->tcl_TraceVar)(interp, varName, flags, proc, clientData) /* 254 */
+	(tclStubsPtr->tcl_TraceVar)(interp, varName, flags, proc, clientData) /* 247 */
 #endif
 #ifndef Tcl_TraceVar2
 #define Tcl_TraceVar2(interp, part1, part2, flags, proc, clientData) \
-	(tclStubsPtr->tcl_TraceVar2)(interp, part1, part2, flags, proc, clientData) /* 255 */
+	(tclStubsPtr->tcl_TraceVar2)(interp, part1, part2, flags, proc, clientData) /* 248 */
 #endif
 #ifndef Tcl_TranslateFileName
 #define Tcl_TranslateFileName(interp, name, bufferPtr) \
-	(tclStubsPtr->tcl_TranslateFileName)(interp, name, bufferPtr) /* 256 */
+	(tclStubsPtr->tcl_TranslateFileName)(interp, name, bufferPtr) /* 249 */
 #endif
 #ifndef Tcl_Ungets
 #define Tcl_Ungets(chan, str, len, atHead) \
-	(tclStubsPtr->tcl_Ungets)(chan, str, len, atHead) /* 257 */
+	(tclStubsPtr->tcl_Ungets)(chan, str, len, atHead) /* 250 */
 #endif
 #ifndef Tcl_UnlinkVar
 #define Tcl_UnlinkVar(interp, varName) \
-	(tclStubsPtr->tcl_UnlinkVar)(interp, varName) /* 258 */
+	(tclStubsPtr->tcl_UnlinkVar)(interp, varName) /* 251 */
 #endif
 #ifndef Tcl_UnregisterChannel
 #define Tcl_UnregisterChannel(interp, chan) \
-	(tclStubsPtr->tcl_UnregisterChannel)(interp, chan) /* 259 */
+	(tclStubsPtr->tcl_UnregisterChannel)(interp, chan) /* 252 */
 #endif
 #ifndef Tcl_UnsetVar
 #define Tcl_UnsetVar(interp, varName, flags) \
-	(tclStubsPtr->tcl_UnsetVar)(interp, varName, flags) /* 260 */
+	(tclStubsPtr->tcl_UnsetVar)(interp, varName, flags) /* 253 */
 #endif
 #ifndef Tcl_UnsetVar2
 #define Tcl_UnsetVar2(interp, part1, part2, flags) \
-	(tclStubsPtr->tcl_UnsetVar2)(interp, part1, part2, flags) /* 261 */
+	(tclStubsPtr->tcl_UnsetVar2)(interp, part1, part2, flags) /* 254 */
 #endif
 #ifndef Tcl_UntraceVar
 #define Tcl_UntraceVar(interp, varName, flags, proc, clientData) \
-	(tclStubsPtr->tcl_UntraceVar)(interp, varName, flags, proc, clientData) /* 262 */
+	(tclStubsPtr->tcl_UntraceVar)(interp, varName, flags, proc, clientData) /* 255 */
 #endif
 #ifndef Tcl_UntraceVar2
 #define Tcl_UntraceVar2(interp, part1, part2, flags, proc, clientData) \
-	(tclStubsPtr->tcl_UntraceVar2)(interp, part1, part2, flags, proc, clientData) /* 263 */
+	(tclStubsPtr->tcl_UntraceVar2)(interp, part1, part2, flags, proc, clientData) /* 256 */
 #endif
 #ifndef Tcl_UpdateLinkedVar
 #define Tcl_UpdateLinkedVar(interp, varName) \
-	(tclStubsPtr->tcl_UpdateLinkedVar)(interp, varName) /* 264 */
+	(tclStubsPtr->tcl_UpdateLinkedVar)(interp, varName) /* 257 */
 #endif
 #ifndef Tcl_UpVar
 #define Tcl_UpVar(interp, frameName, varName, localName, flags) \
-	(tclStubsPtr->tcl_UpVar)(interp, frameName, varName, localName, flags) /* 265 */
+	(tclStubsPtr->tcl_UpVar)(interp, frameName, varName, localName, flags) /* 258 */
 #endif
 #ifndef Tcl_UpVar2
 #define Tcl_UpVar2(interp, frameName, part1, part2, localName, flags) \
-	(tclStubsPtr->tcl_UpVar2)(interp, frameName, part1, part2, localName, flags) /* 266 */
-#endif
-#ifndef Tcl_ValidateAllMemory
-#define Tcl_ValidateAllMemory(file, line) \
-	(tclStubsPtr->tcl_ValidateAllMemory)(file, line) /* 267 */
+	(tclStubsPtr->tcl_UpVar2)(interp, frameName, part1, part2, localName, flags) /* 259 */
 #endif
 #ifndef Tcl_VarEval
 #define Tcl_VarEval \
-	(tclStubsPtr->tcl_VarEval) /* 268 */
-#endif
-#ifndef Tcl_VarEvalVA
-#define Tcl_VarEvalVA(interp, argList) \
-	(tclStubsPtr->tcl_VarEvalVA)(interp, argList) /* 269 */
+	(tclStubsPtr->tcl_VarEval) /* 260 */
 #endif
 #ifndef Tcl_VarTraceInfo
 #define Tcl_VarTraceInfo(interp, varName, flags, procPtr, prevClientData) \
-	(tclStubsPtr->tcl_VarTraceInfo)(interp, varName, flags, procPtr, prevClientData) /* 270 */
+	(tclStubsPtr->tcl_VarTraceInfo)(interp, varName, flags, procPtr, prevClientData) /* 261 */
 #endif
 #ifndef Tcl_VarTraceInfo2
 #define Tcl_VarTraceInfo2(interp, part1, part2, flags, procPtr, prevClientData) \
-	(tclStubsPtr->tcl_VarTraceInfo2)(interp, part1, part2, flags, procPtr, prevClientData) /* 271 */
-#endif
-#ifndef Tcl_WaitForEvent
-#define Tcl_WaitForEvent(timePtr) \
-	(tclStubsPtr->tcl_WaitForEvent)(timePtr) /* 272 */
-#endif
-#ifndef Tcl_WaitPid
-#define Tcl_WaitPid(pid, statPtr, options) \
-	(tclStubsPtr->tcl_WaitPid)(pid, statPtr, options) /* 273 */
+	(tclStubsPtr->tcl_VarTraceInfo2)(interp, part1, part2, flags, procPtr, prevClientData) /* 262 */
 #endif
 #ifndef Tcl_Write
 #define Tcl_Write(chan, s, slen) \
-	(tclStubsPtr->tcl_Write)(chan, s, slen) /* 274 */
+	(tclStubsPtr->tcl_Write)(chan, s, slen) /* 263 */
 #endif
 #ifndef Tcl_WrongNumArgs
 #define Tcl_WrongNumArgs(interp, objc, objv, message) \
-	(tclStubsPtr->tcl_WrongNumArgs)(interp, objc, objv, message) /* 275 */
+	(tclStubsPtr->tcl_WrongNumArgs)(interp, objc, objv, message) /* 264 */
+#endif
+#ifndef Tcl_DumpActiveMemory
+#define Tcl_DumpActiveMemory(fileName) \
+	(tclStubsPtr->tcl_DumpActiveMemory)(fileName) /* 265 */
+#endif
+#ifndef Tcl_ValidateAllMemory
+#define Tcl_ValidateAllMemory(file, line) \
+	(tclStubsPtr->tcl_ValidateAllMemory)(file, line) /* 266 */
+#endif
+#ifndef Tcl_AppendResultVA
+#define Tcl_AppendResultVA(interp, argList) \
+	(tclStubsPtr->tcl_AppendResultVA)(interp, argList) /* 267 */
+#endif
+#ifndef Tcl_AppendStringsToObjVA
+#define Tcl_AppendStringsToObjVA(objPtr, argList) \
+	(tclStubsPtr->tcl_AppendStringsToObjVA)(objPtr, argList) /* 268 */
+#endif
+#ifndef Tcl_HashStats
+#define Tcl_HashStats(tablePtr) \
+	(tclStubsPtr->tcl_HashStats)(tablePtr) /* 269 */
+#endif
+#ifndef Tcl_ParseVar
+#define Tcl_ParseVar(interp, string, termPtr) \
+	(tclStubsPtr->tcl_ParseVar)(interp, string, termPtr) /* 270 */
+#endif
+#ifndef Tcl_PkgPresent
+#define Tcl_PkgPresent(interp, name, version, exact) \
+	(tclStubsPtr->tcl_PkgPresent)(interp, name, version, exact) /* 271 */
+#endif
+#ifndef Tcl_PkgPresentEx
+#define Tcl_PkgPresentEx(interp, name, version, exact, clientDataPtr) \
+	(tclStubsPtr->tcl_PkgPresentEx)(interp, name, version, exact, clientDataPtr) /* 272 */
+#endif
+#ifndef Tcl_PkgProvide
+#define Tcl_PkgProvide(interp, name, version) \
+	(tclStubsPtr->tcl_PkgProvide)(interp, name, version) /* 273 */
+#endif
+#ifndef Tcl_PkgRequire
+#define Tcl_PkgRequire(interp, name, version, exact) \
+	(tclStubsPtr->tcl_PkgRequire)(interp, name, version, exact) /* 274 */
+#endif
+#ifndef Tcl_SetErrorCodeVA
+#define Tcl_SetErrorCodeVA(interp, argList) \
+	(tclStubsPtr->tcl_SetErrorCodeVA)(interp, argList) /* 275 */
+#endif
+#ifndef Tcl_VarEvalVA
+#define Tcl_VarEvalVA(interp, argList) \
+	(tclStubsPtr->tcl_VarEvalVA)(interp, argList) /* 276 */
+#endif
+#ifndef Tcl_WaitPid
+#define Tcl_WaitPid(pid, statPtr, options) \
+	(tclStubsPtr->tcl_WaitPid)(pid, statPtr, options) /* 277 */
+#endif
+#ifndef panicVA
+#define panicVA(format, argList) \
+	(tclStubsPtr->panicVA)(format, argList) /* 278 */
 #endif
 #ifndef Tcl_AppendObjToObj
 #define Tcl_AppendObjToObj(objPtr, appendObjPtr) \
-	(tclStubsPtr->tcl_AppendObjToObj)(objPtr, appendObjPtr) /* 276 */
+	(tclStubsPtr->tcl_AppendObjToObj)(objPtr, appendObjPtr) /* 279 */
 #endif
 #ifndef Tcl_AlertNotifier
 #define Tcl_AlertNotifier(clientData) \
-	(tclStubsPtr->tcl_AlertNotifier)(clientData) /* 277 */
+	(tclStubsPtr->tcl_AlertNotifier)(clientData) /* 280 */
 #endif
 #ifndef Tcl_CreateEncoding
 #define Tcl_CreateEncoding(typePtr) \
-	(tclStubsPtr->tcl_CreateEncoding)(typePtr) /* 278 */
+	(tclStubsPtr->tcl_CreateEncoding)(typePtr) /* 281 */
 #endif
 #ifndef Tcl_CreateThreadExitHandler
 #define Tcl_CreateThreadExitHandler(proc, clientData) \
-	(tclStubsPtr->tcl_CreateThreadExitHandler)(proc, clientData) /* 279 */
+	(tclStubsPtr->tcl_CreateThreadExitHandler)(proc, clientData) /* 282 */
 #endif
 #ifndef Tcl_DeleteThreadExitHandler
 #define Tcl_DeleteThreadExitHandler(proc, clientData) \
-	(tclStubsPtr->tcl_DeleteThreadExitHandler)(proc, clientData) /* 280 */
+	(tclStubsPtr->tcl_DeleteThreadExitHandler)(proc, clientData) /* 283 */
 #endif
 #ifndef Tcl_DiscardResult
 #define Tcl_DiscardResult(statePtr) \
-	(tclStubsPtr->tcl_DiscardResult)(statePtr) /* 281 */
+	(tclStubsPtr->tcl_DiscardResult)(statePtr) /* 284 */
 #endif
 #ifndef Tcl_EvalEx
 #define Tcl_EvalEx(interp, script, numBytes, flags) \
-	(tclStubsPtr->tcl_EvalEx)(interp, script, numBytes, flags) /* 282 */
+	(tclStubsPtr->tcl_EvalEx)(interp, script, numBytes, flags) /* 285 */
 #endif
 #ifndef Tcl_EvalObjv
 #define Tcl_EvalObjv(interp, objc, objv, flags) \
-	(tclStubsPtr->tcl_EvalObjv)(interp, objc, objv, flags) /* 283 */
+	(tclStubsPtr->tcl_EvalObjv)(interp, objc, objv, flags) /* 286 */
 #endif
 #ifndef Tcl_EvalObjEx
 #define Tcl_EvalObjEx(interp, objPtr, flags) \
-	(tclStubsPtr->tcl_EvalObjEx)(interp, objPtr, flags) /* 284 */
+	(tclStubsPtr->tcl_EvalObjEx)(interp, objPtr, flags) /* 287 */
 #endif
 #ifndef Tcl_ExitThread
 #define Tcl_ExitThread(status) \
-	(tclStubsPtr->tcl_ExitThread)(status) /* 285 */
+	(tclStubsPtr->tcl_ExitThread)(status) /* 288 */
 #endif
 #ifndef Tcl_ExternalToUtf
 #define Tcl_ExternalToUtf(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr) \
-	(tclStubsPtr->tcl_ExternalToUtf)(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr) /* 286 */
+	(tclStubsPtr->tcl_ExternalToUtf)(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr) /* 289 */
 #endif
 #ifndef Tcl_ExternalToUtfDString
 #define Tcl_ExternalToUtfDString(encoding, src, srcLen, dsPtr) \
-	(tclStubsPtr->tcl_ExternalToUtfDString)(encoding, src, srcLen, dsPtr) /* 287 */
+	(tclStubsPtr->tcl_ExternalToUtfDString)(encoding, src, srcLen, dsPtr) /* 290 */
 #endif
 #ifndef Tcl_FinalizeThread
 #define Tcl_FinalizeThread() \
-	(tclStubsPtr->tcl_FinalizeThread)() /* 288 */
+	(tclStubsPtr->tcl_FinalizeThread)() /* 291 */
 #endif
 #ifndef Tcl_FinalizeNotifier
 #define Tcl_FinalizeNotifier(clientData) \
-	(tclStubsPtr->tcl_FinalizeNotifier)(clientData) /* 289 */
+	(tclStubsPtr->tcl_FinalizeNotifier)(clientData) /* 292 */
 #endif
 #ifndef Tcl_FreeEncoding
 #define Tcl_FreeEncoding(encoding) \
-	(tclStubsPtr->tcl_FreeEncoding)(encoding) /* 290 */
+	(tclStubsPtr->tcl_FreeEncoding)(encoding) /* 293 */
 #endif
 #ifndef Tcl_GetCurrentThread
 #define Tcl_GetCurrentThread() \
-	(tclStubsPtr->tcl_GetCurrentThread)() /* 291 */
+	(tclStubsPtr->tcl_GetCurrentThread)() /* 294 */
 #endif
 #ifndef Tcl_GetEncoding
 #define Tcl_GetEncoding(interp, name) \
-	(tclStubsPtr->tcl_GetEncoding)(interp, name) /* 292 */
+	(tclStubsPtr->tcl_GetEncoding)(interp, name) /* 295 */
 #endif
 #ifndef Tcl_GetEncodingName
 #define Tcl_GetEncodingName(encoding) \
-	(tclStubsPtr->tcl_GetEncodingName)(encoding) /* 293 */
+	(tclStubsPtr->tcl_GetEncodingName)(encoding) /* 296 */
 #endif
 #ifndef Tcl_GetEncodingNames
 #define Tcl_GetEncodingNames(interp) \
-	(tclStubsPtr->tcl_GetEncodingNames)(interp) /* 294 */
+	(tclStubsPtr->tcl_GetEncodingNames)(interp) /* 297 */
 #endif
 #ifndef Tcl_GetIndexFromObjStruct
 #define Tcl_GetIndexFromObjStruct(interp, objPtr, tablePtr, offset, msg, flags, indexPtr) \
-	(tclStubsPtr->tcl_GetIndexFromObjStruct)(interp, objPtr, tablePtr, offset, msg, flags, indexPtr) /* 295 */
+	(tclStubsPtr->tcl_GetIndexFromObjStruct)(interp, objPtr, tablePtr, offset, msg, flags, indexPtr) /* 298 */
 #endif
 #ifndef Tcl_GetThreadData
 #define Tcl_GetThreadData(keyPtr, size) \
-	(tclStubsPtr->tcl_GetThreadData)(keyPtr, size) /* 296 */
+	(tclStubsPtr->tcl_GetThreadData)(keyPtr, size) /* 299 */
 #endif
 #ifndef Tcl_GetVar2Ex
 #define Tcl_GetVar2Ex(interp, part1, part2, flags) \
-	(tclStubsPtr->tcl_GetVar2Ex)(interp, part1, part2, flags) /* 297 */
+	(tclStubsPtr->tcl_GetVar2Ex)(interp, part1, part2, flags) /* 300 */
 #endif
 #ifndef Tcl_InitNotifier
 #define Tcl_InitNotifier() \
-	(tclStubsPtr->tcl_InitNotifier)() /* 298 */
+	(tclStubsPtr->tcl_InitNotifier)() /* 301 */
 #endif
 #ifndef Tcl_MutexLock
 #define Tcl_MutexLock(mutexPtr) \
-	(tclStubsPtr->tcl_MutexLock)(mutexPtr) /* 299 */
+	(tclStubsPtr->tcl_MutexLock)(mutexPtr) /* 302 */
 #endif
 #ifndef Tcl_MutexUnlock
 #define Tcl_MutexUnlock(mutexPtr) \
-	(tclStubsPtr->tcl_MutexUnlock)(mutexPtr) /* 300 */
+	(tclStubsPtr->tcl_MutexUnlock)(mutexPtr) /* 303 */
 #endif
 #ifndef Tcl_ConditionNotify
 #define Tcl_ConditionNotify(condPtr) \
-	(tclStubsPtr->tcl_ConditionNotify)(condPtr) /* 301 */
+	(tclStubsPtr->tcl_ConditionNotify)(condPtr) /* 304 */
 #endif
 #ifndef Tcl_ConditionWait
 #define Tcl_ConditionWait(condPtr, mutexPtr, timePtr) \
-	(tclStubsPtr->tcl_ConditionWait)(condPtr, mutexPtr, timePtr) /* 302 */
+	(tclStubsPtr->tcl_ConditionWait)(condPtr, mutexPtr, timePtr) /* 305 */
 #endif
 #ifndef Tcl_NumUtfChars
 #define Tcl_NumUtfChars(src, len) \
-	(tclStubsPtr->tcl_NumUtfChars)(src, len) /* 303 */
+	(tclStubsPtr->tcl_NumUtfChars)(src, len) /* 306 */
 #endif
 #ifndef Tcl_ReadChars
 #define Tcl_ReadChars(channel, objPtr, charsToRead, appendFlag) \
-	(tclStubsPtr->tcl_ReadChars)(channel, objPtr, charsToRead, appendFlag) /* 304 */
+	(tclStubsPtr->tcl_ReadChars)(channel, objPtr, charsToRead, appendFlag) /* 307 */
 #endif
 #ifndef Tcl_RestoreResult
 #define Tcl_RestoreResult(interp, statePtr) \
-	(tclStubsPtr->tcl_RestoreResult)(interp, statePtr) /* 305 */
+	(tclStubsPtr->tcl_RestoreResult)(interp, statePtr) /* 308 */
 #endif
 #ifndef Tcl_SaveResult
 #define Tcl_SaveResult(interp, statePtr) \
-	(tclStubsPtr->tcl_SaveResult)(interp, statePtr) /* 306 */
+	(tclStubsPtr->tcl_SaveResult)(interp, statePtr) /* 309 */
 #endif
 #ifndef Tcl_SetSystemEncoding
 #define Tcl_SetSystemEncoding(interp, name) \
-	(tclStubsPtr->tcl_SetSystemEncoding)(interp, name) /* 307 */
+	(tclStubsPtr->tcl_SetSystemEncoding)(interp, name) /* 310 */
 #endif
 #ifndef Tcl_SetVar2Ex
 #define Tcl_SetVar2Ex(interp, part1, part2, newValuePtr, flags) \
-	(tclStubsPtr->tcl_SetVar2Ex)(interp, part1, part2, newValuePtr, flags) /* 308 */
+	(tclStubsPtr->tcl_SetVar2Ex)(interp, part1, part2, newValuePtr, flags) /* 311 */
 #endif
 #ifndef Tcl_ThreadAlert
 #define Tcl_ThreadAlert(threadId) \
-	(tclStubsPtr->tcl_ThreadAlert)(threadId) /* 309 */
+	(tclStubsPtr->tcl_ThreadAlert)(threadId) /* 312 */
 #endif
 #ifndef Tcl_ThreadQueueEvent
 #define Tcl_ThreadQueueEvent(threadId, evPtr, position) \
-	(tclStubsPtr->tcl_ThreadQueueEvent)(threadId, evPtr, position) /* 310 */
+	(tclStubsPtr->tcl_ThreadQueueEvent)(threadId, evPtr, position) /* 313 */
 #endif
 #ifndef Tcl_UniCharAtIndex
 #define Tcl_UniCharAtIndex(src, index) \
-	(tclStubsPtr->tcl_UniCharAtIndex)(src, index) /* 311 */
+	(tclStubsPtr->tcl_UniCharAtIndex)(src, index) /* 314 */
 #endif
 #ifndef Tcl_UniCharToLower
 #define Tcl_UniCharToLower(ch) \
-	(tclStubsPtr->tcl_UniCharToLower)(ch) /* 312 */
+	(tclStubsPtr->tcl_UniCharToLower)(ch) /* 315 */
 #endif
 #ifndef Tcl_UniCharToTitle
 #define Tcl_UniCharToTitle(ch) \
-	(tclStubsPtr->tcl_UniCharToTitle)(ch) /* 313 */
+	(tclStubsPtr->tcl_UniCharToTitle)(ch) /* 316 */
 #endif
 #ifndef Tcl_UniCharToUpper
 #define Tcl_UniCharToUpper(ch) \
-	(tclStubsPtr->tcl_UniCharToUpper)(ch) /* 314 */
+	(tclStubsPtr->tcl_UniCharToUpper)(ch) /* 317 */
 #endif
 #ifndef Tcl_UniCharToUtf
 #define Tcl_UniCharToUtf(ch, buf) \
-	(tclStubsPtr->tcl_UniCharToUtf)(ch, buf) /* 315 */
+	(tclStubsPtr->tcl_UniCharToUtf)(ch, buf) /* 318 */
 #endif
 #ifndef Tcl_UtfAtIndex
 #define Tcl_UtfAtIndex(src, index) \
-	(tclStubsPtr->tcl_UtfAtIndex)(src, index) /* 316 */
+	(tclStubsPtr->tcl_UtfAtIndex)(src, index) /* 319 */
 #endif
 #ifndef Tcl_UtfCharComplete
 #define Tcl_UtfCharComplete(src, len) \
-	(tclStubsPtr->tcl_UtfCharComplete)(src, len) /* 317 */
+	(tclStubsPtr->tcl_UtfCharComplete)(src, len) /* 320 */
 #endif
 #ifndef Tcl_UtfBackslash
 #define Tcl_UtfBackslash(src, readPtr, dst) \
-	(tclStubsPtr->tcl_UtfBackslash)(src, readPtr, dst) /* 318 */
+	(tclStubsPtr->tcl_UtfBackslash)(src, readPtr, dst) /* 321 */
 #endif
 #ifndef Tcl_UtfFindFirst
 #define Tcl_UtfFindFirst(src, ch) \
-	(tclStubsPtr->tcl_UtfFindFirst)(src, ch) /* 319 */
+	(tclStubsPtr->tcl_UtfFindFirst)(src, ch) /* 322 */
 #endif
 #ifndef Tcl_UtfFindLast
 #define Tcl_UtfFindLast(src, ch) \
-	(tclStubsPtr->tcl_UtfFindLast)(src, ch) /* 320 */
+	(tclStubsPtr->tcl_UtfFindLast)(src, ch) /* 323 */
 #endif
-/* Slot 321 is reserved */
-/* Slot 322 is reserved */
 #ifndef Tcl_UtfNext
 #define Tcl_UtfNext(src) \
-	(tclStubsPtr->tcl_UtfNext)(src) /* 323 */
+	(tclStubsPtr->tcl_UtfNext)(src) /* 324 */
 #endif
 #ifndef Tcl_UtfPrev
 #define Tcl_UtfPrev(src, start) \
-	(tclStubsPtr->tcl_UtfPrev)(src, start) /* 324 */
+	(tclStubsPtr->tcl_UtfPrev)(src, start) /* 325 */
 #endif
 #ifndef Tcl_UtfToExternal
 #define Tcl_UtfToExternal(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr) \
-	(tclStubsPtr->tcl_UtfToExternal)(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr) /* 325 */
+	(tclStubsPtr->tcl_UtfToExternal)(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr) /* 326 */
 #endif
 #ifndef Tcl_UtfToExternalDString
 #define Tcl_UtfToExternalDString(encoding, src, srcLen, dsPtr) \
-	(tclStubsPtr->tcl_UtfToExternalDString)(encoding, src, srcLen, dsPtr) /* 326 */
+	(tclStubsPtr->tcl_UtfToExternalDString)(encoding, src, srcLen, dsPtr) /* 327 */
 #endif
 #ifndef Tcl_UtfToLower
 #define Tcl_UtfToLower(src) \
-	(tclStubsPtr->tcl_UtfToLower)(src) /* 327 */
+	(tclStubsPtr->tcl_UtfToLower)(src) /* 328 */
 #endif
 #ifndef Tcl_UtfToTitle
 #define Tcl_UtfToTitle(src) \
-	(tclStubsPtr->tcl_UtfToTitle)(src) /* 328 */
+	(tclStubsPtr->tcl_UtfToTitle)(src) /* 329 */
 #endif
 #ifndef Tcl_UtfToUniChar
 #define Tcl_UtfToUniChar(src, chPtr) \
-	(tclStubsPtr->tcl_UtfToUniChar)(src, chPtr) /* 329 */
+	(tclStubsPtr->tcl_UtfToUniChar)(src, chPtr) /* 330 */
 #endif
 #ifndef Tcl_UtfToUpper
 #define Tcl_UtfToUpper(src) \
-	(tclStubsPtr->tcl_UtfToUpper)(src) /* 330 */
+	(tclStubsPtr->tcl_UtfToUpper)(src) /* 331 */
 #endif
 #ifndef Tcl_WriteChars
 #define Tcl_WriteChars(chan, src, srcLen) \
-	(tclStubsPtr->tcl_WriteChars)(chan, src, srcLen) /* 331 */
+	(tclStubsPtr->tcl_WriteChars)(chan, src, srcLen) /* 332 */
 #endif
 #ifndef Tcl_WriteObj
 #define Tcl_WriteObj(chan, objPtr) \
-	(tclStubsPtr->tcl_WriteObj)(chan, objPtr) /* 332 */
+	(tclStubsPtr->tcl_WriteObj)(chan, objPtr) /* 333 */
 #endif
 
 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
diff --git a/generic/tclInt.decls b/generic/tclInt.decls
index 924b45c..2ea5f18 100644
--- a/generic/tclInt.decls
+++ b/generic/tclInt.decls
@@ -10,7 +10,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 # 
-# RCS: @(#) $Id: tclInt.decls,v 1.2.4.2 1999/03/09 02:37:15 stanton Exp $
+# RCS: @(#) $Id: tclInt.decls,v 1.2.4.3 1999/03/10 06:41:50 stanton Exp $
 
 library tcl
 
@@ -496,82 +496,37 @@ declare 131 generic {
 	    Tcl_ResolveCmdProc *cmdProc, Tcl_ResolveVarProc *varProc, \
 	    Tcl_ResolveCompiledVarProc *compiledVarProc)
 }
-
-# Compilation procedures for commands in the generic core:
-
-# Signature changed in 8.1:
-#  declare 132 generic {
-#      int TclCompileBreakCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 133 generic {
-#      int TclCompileCatchCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 134 generic {
-#      int TclCompileContinueCmd(Tcl_Interp *interp, char *string, \
-#  	    char *lastChar, int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 135 generic {
-#      int TclCompileExprCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 136 generic {
-#      int TclCompileForCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 137 generic {
-#      int TclCompileForeachCmd(Tcl_Interp *interp, char *string, \
-#  	    char *lastChar, int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 138 generic {
-#      int TclCompileIfCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 139 generic {
-#      int TclCompileIncrCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 140 generic {
-#      int TclCompileSetCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-#  declare 141 generic {
-#      int TclCompileWhileCmd(Tcl_Interp *interp, char *string, char *lastChar, \
-#  	    int compileFlags, struct CompileEnv *compileEnvPtr)
-#  }
-
-declare 142 generic {
+declare 132 generic {
     int TclpHasSockets(Tcl_Interp *interp)
 }
-declare 143 generic {
+declare 133 generic {
     struct tm *	TclpGetDate(TclpTime_t time, int useGMT)
 }
-declare 144 generic {
+declare 134 generic {
     size_t TclpStrftime(char *s, size_t maxsize, const char *format, \
 	    const struct tm *t)
 }
-declare 145 generic {
+declare 135 generic {
     int TclpCheckStackSpace(void)
 }
 
 # Added in 8.1:
 
-declare 146 generic {
+declare 136 generic {
     char * Tcl_GetString(Tcl_Obj *objPtr)
 }
-declare 147 generic {
+declare 137 generic {
     int TclpChdir(CONST char *dirName)
 }
-declare 148 generic {
+declare 138 generic {
     char * TclGetEnv(CONST char *name, Tcl_DString *valuePtr)
 }
-declare 149 generic {
+declare 139 generic {
     int TclpLoadFile(Tcl_Interp *interp, char *fileName, char *sym1, \
 	    char *sym2, Tcl_PackageInitProc **proc1Ptr, \
 	    Tcl_PackageInitProc **proc2Ptr, ClientData *clientDataPtr)
 }
-declare 150 generic {
+declare 140 generic {
     int TclLooksLikeInt(char *bytes, int length)
 }
 
@@ -770,6 +725,15 @@ declare 20 win {
 declare 21 win {
     char * TclpGetTZName(int isdst)
 }
+declare 22 win {
+    char * TclWinNoBackslash(char *path)
+}
+declare 23 win {
+    TCHAR * Tcl_WinUtfToTChar(CONST char *string, int len, Tcl_DString *dsPtr)
+}
+declare 24 win {
+    char * Tcl_WinTCharToUtf(CONST TCHAR *string, int len, Tcl_DString *dsPtr)
+}
 
 #########################
 # Unix specific internals
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h
index b76551c..7fd3d1e 100644
--- a/generic/tclIntDecls.h
+++ b/generic/tclIntDecls.h
@@ -11,7 +11,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclIntDecls.h,v 1.2.2.2 1999/03/09 02:37:16 stanton Exp $
+ * RCS: @(#) $Id: tclIntDecls.h,v 1.2.2.3 1999/03/10 06:41:50 stanton Exp $
  */
 
 #ifndef _TCLINTDECLS
@@ -416,39 +416,29 @@ EXTERN void		Tcl_SetNamespaceResolvers _ANSI_ARGS_((
 				Tcl_ResolveCmdProc * cmdProc, 
 				Tcl_ResolveVarProc * varProc, 
 				Tcl_ResolveCompiledVarProc * compiledVarProc));
-/* Slot 132 is reserved */
-/* Slot 133 is reserved */
-/* Slot 134 is reserved */
-/* Slot 135 is reserved */
-/* Slot 136 is reserved */
-/* Slot 137 is reserved */
-/* Slot 138 is reserved */
-/* Slot 139 is reserved */
-/* Slot 140 is reserved */
-/* Slot 141 is reserved */
-/* 142 */
+/* 132 */
 EXTERN int		TclpHasSockets _ANSI_ARGS_((Tcl_Interp * interp));
-/* 143 */
+/* 133 */
 EXTERN struct tm *	TclpGetDate _ANSI_ARGS_((TclpTime_t time, int useGMT));
-/* 144 */
+/* 134 */
 EXTERN size_t		TclpStrftime _ANSI_ARGS_((char * s, size_t maxsize, 
 				const char * format, const struct tm * t));
-/* 145 */
+/* 135 */
 EXTERN int		TclpCheckStackSpace _ANSI_ARGS_((void));
-/* 146 */
+/* 136 */
 EXTERN char *		Tcl_GetString _ANSI_ARGS_((Tcl_Obj * objPtr));
-/* 147 */
+/* 137 */
 EXTERN int		TclpChdir _ANSI_ARGS_((CONST char * dirName));
-/* 148 */
+/* 138 */
 EXTERN char *		TclGetEnv _ANSI_ARGS_((CONST char * name, 
 				Tcl_DString * valuePtr));
-/* 149 */
+/* 139 */
 EXTERN int		TclpLoadFile _ANSI_ARGS_((Tcl_Interp * interp, 
 				char * fileName, char * sym1, char * sym2, 
 				Tcl_PackageInitProc ** proc1Ptr, 
 				Tcl_PackageInitProc ** proc2Ptr, 
 				ClientData * clientDataPtr));
-/* 150 */
+/* 140 */
 EXTERN int		TclLooksLikeInt _ANSI_ARGS_((char * bytes, 
 				int length));
 
@@ -588,25 +578,15 @@ typedef struct TclIntStubs {
     int (*tcl_PushCallFrame) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame)); /* 129 */
     int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name)); /* 130 */
     void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 131 */
-    void *reserved132;
-    void *reserved133;
-    void *reserved134;
-    void *reserved135;
-    void *reserved136;
-    void *reserved137;
-    void *reserved138;
-    void *reserved139;
-    void *reserved140;
-    void *reserved141;
-    int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 142 */
-    struct tm * (*tclpGetDate) _ANSI_ARGS_((TclpTime_t time, int useGMT)); /* 143 */
-    size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, const char * format, const struct tm * t)); /* 144 */
-    int (*tclpCheckStackSpace) _ANSI_ARGS_((void)); /* 145 */
-    char * (*tcl_GetString) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 146 */
-    int (*tclpChdir) _ANSI_ARGS_((CONST char * dirName)); /* 147 */
-    char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name, Tcl_DString * valuePtr)); /* 148 */
-    int (*tclpLoadFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * sym1, char * sym2, Tcl_PackageInitProc ** proc1Ptr, Tcl_PackageInitProc ** proc2Ptr, ClientData * clientDataPtr)); /* 149 */
-    int (*tclLooksLikeInt) _ANSI_ARGS_((char * bytes, int length)); /* 150 */
+    int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 132 */
+    struct tm * (*tclpGetDate) _ANSI_ARGS_((TclpTime_t time, int useGMT)); /* 133 */
+    size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, const char * format, const struct tm * t)); /* 134 */
+    int (*tclpCheckStackSpace) _ANSI_ARGS_((void)); /* 135 */
+    char * (*tcl_GetString) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 136 */
+    int (*tclpChdir) _ANSI_ARGS_((CONST char * dirName)); /* 137 */
+    char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name, Tcl_DString * valuePtr)); /* 138 */
+    int (*tclpLoadFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * sym1, char * sym2, Tcl_PackageInitProc ** proc1Ptr, Tcl_PackageInitProc ** proc2Ptr, ClientData * clientDataPtr)); /* 139 */
+    int (*tclLooksLikeInt) _ANSI_ARGS_((char * bytes, int length)); /* 140 */
 } TclIntStubs;
 
 extern TclIntStubs *tclIntStubsPtr;
@@ -1106,51 +1086,41 @@ extern TclIntStubs *tclIntStubsPtr;
 #define Tcl_SetNamespaceResolvers(namespacePtr, cmdProc, varProc, compiledVarProc) \
 	(tclIntStubsPtr->tcl_SetNamespaceResolvers)(namespacePtr, cmdProc, varProc, compiledVarProc) /* 131 */
 #endif
-/* Slot 132 is reserved */
-/* Slot 133 is reserved */
-/* Slot 134 is reserved */
-/* Slot 135 is reserved */
-/* Slot 136 is reserved */
-/* Slot 137 is reserved */
-/* Slot 138 is reserved */
-/* Slot 139 is reserved */
-/* Slot 140 is reserved */
-/* Slot 141 is reserved */
 #ifndef TclpHasSockets
 #define TclpHasSockets(interp) \
-	(tclIntStubsPtr->tclpHasSockets)(interp) /* 142 */
+	(tclIntStubsPtr->tclpHasSockets)(interp) /* 132 */
 #endif
 #ifndef TclpGetDate
 #define TclpGetDate(time, useGMT) \
-	(tclIntStubsPtr->tclpGetDate)(time, useGMT) /* 143 */
+	(tclIntStubsPtr->tclpGetDate)(time, useGMT) /* 133 */
 #endif
 #ifndef TclpStrftime
 #define TclpStrftime(s, maxsize, format, t) \
-	(tclIntStubsPtr->tclpStrftime)(s, maxsize, format, t) /* 144 */
+	(tclIntStubsPtr->tclpStrftime)(s, maxsize, format, t) /* 134 */
 #endif
 #ifndef TclpCheckStackSpace
 #define TclpCheckStackSpace() \
-	(tclIntStubsPtr->tclpCheckStackSpace)() /* 145 */
+	(tclIntStubsPtr->tclpCheckStackSpace)() /* 135 */
 #endif
 #ifndef Tcl_GetString
 #define Tcl_GetString(objPtr) \
-	(tclIntStubsPtr->tcl_GetString)(objPtr) /* 146 */
+	(tclIntStubsPtr->tcl_GetString)(objPtr) /* 136 */
 #endif
 #ifndef TclpChdir
 #define TclpChdir(dirName) \
-	(tclIntStubsPtr->tclpChdir)(dirName) /* 147 */
+	(tclIntStubsPtr->tclpChdir)(dirName) /* 137 */
 #endif
 #ifndef TclGetEnv
 #define TclGetEnv(name, valuePtr) \
-	(tclIntStubsPtr->tclGetEnv)(name, valuePtr) /* 148 */
+	(tclIntStubsPtr->tclGetEnv)(name, valuePtr) /* 138 */
 #endif
 #ifndef TclpLoadFile
 #define TclpLoadFile(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr) \
-	(tclIntStubsPtr->tclpLoadFile)(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr) /* 149 */
+	(tclIntStubsPtr->tclpLoadFile)(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr) /* 139 */
 #endif
 #ifndef TclLooksLikeInt
 #define TclLooksLikeInt(bytes, length) \
-	(tclIntStubsPtr->tclLooksLikeInt)(bytes, length) /* 150 */
+	(tclIntStubsPtr->tclLooksLikeInt)(bytes, length) /* 140 */
 #endif
 
 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
diff --git a/generic/tclIntPlatDecls.h b/generic/tclIntPlatDecls.h
index f698293..d384000 100644
--- a/generic/tclIntPlatDecls.h
+++ b/generic/tclIntPlatDecls.h
@@ -9,7 +9,7 @@
  * Copyright (c) 1998-1999 by Scriptics Corporation.
  * All rights reserved.
  *
- * RCS: @(#) $Id: tclIntPlatDecls.h,v 1.2.2.2 1999/03/09 02:37:16 stanton Exp $
+ * RCS: @(#) $Id: tclIntPlatDecls.h,v 1.2.2.3 1999/03/10 06:41:51 stanton Exp $
  */
 
 #ifndef _TCLINTPLATDECLS
@@ -27,6 +27,39 @@
  * Exported function declarations:
  */
 
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+/* 0 */
+EXTERN void		TclGetAndDetachPids _ANSI_ARGS_((Tcl_Interp * interp, 
+				Tcl_Channel chan));
+/* 1 */
+EXTERN int		TclpCloseFile _ANSI_ARGS_((TclFile file));
+/* 2 */
+EXTERN Tcl_Channel	TclpCreateCommandChannel _ANSI_ARGS_((
+				TclFile readFile, TclFile writeFile, 
+				TclFile errorFile, int numPids, 
+				Tcl_Pid * pidPtr));
+/* 3 */
+EXTERN int		TclpCreatePipe _ANSI_ARGS_((TclFile * readPipe, 
+				TclFile * writePipe));
+/* 4 */
+EXTERN int		TclpCreateProcess _ANSI_ARGS_((Tcl_Interp * interp, 
+				int argc, char ** argv, TclFile inputFile, 
+				TclFile outputFile, TclFile errorFile, 
+				Tcl_Pid * pidPtr));
+/* Slot 5 is reserved */
+/* 6 */
+EXTERN TclFile		TclpMakeFile _ANSI_ARGS_((Tcl_Channel channel, 
+				int direction));
+/* 7 */
+EXTERN TclFile		TclpOpenFile _ANSI_ARGS_((CONST char * fname, 
+				int mode));
+/* 8 */
+EXTERN int		TclUnixWaitForFile _ANSI_ARGS_((int fd, int mask, 
+				int timeout));
+/* 9 */
+EXTERN TclFile		TclpCreateTempFile _ANSI_ARGS_((
+				CONST char * contents));
+#endif /* UNIX */
 #ifdef __WIN32__
 /* 0 */
 EXTERN void		TclWinConvertError _ANSI_ARGS_((DWORD errCode));
@@ -86,40 +119,15 @@ EXTERN TclFile		TclpCreateTempFile _ANSI_ARGS_((
 				CONST char * contents));
 /* 21 */
 EXTERN char *		TclpGetTZName _ANSI_ARGS_((int isdst));
+/* 22 */
+EXTERN char *		TclWinNoBackslash _ANSI_ARGS_((char * path));
+/* 23 */
+EXTERN TCHAR *		Tcl_WinUtfToTChar _ANSI_ARGS_((CONST char * string, 
+				int len, Tcl_DString * dsPtr));
+/* 24 */
+EXTERN char *		Tcl_WinTCharToUtf _ANSI_ARGS_((CONST TCHAR * string, 
+				int len, Tcl_DString * dsPtr));
 #endif /* __WIN32__ */
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-/* 0 */
-EXTERN void		TclGetAndDetachPids _ANSI_ARGS_((Tcl_Interp * interp, 
-				Tcl_Channel chan));
-/* 1 */
-EXTERN int		TclpCloseFile _ANSI_ARGS_((TclFile file));
-/* 2 */
-EXTERN Tcl_Channel	TclpCreateCommandChannel _ANSI_ARGS_((
-				TclFile readFile, TclFile writeFile, 
-				TclFile errorFile, int numPids, 
-				Tcl_Pid * pidPtr));
-/* 3 */
-EXTERN int		TclpCreatePipe _ANSI_ARGS_((TclFile * readPipe, 
-				TclFile * writePipe));
-/* 4 */
-EXTERN int		TclpCreateProcess _ANSI_ARGS_((Tcl_Interp * interp, 
-				int argc, char ** argv, TclFile inputFile, 
-				TclFile outputFile, TclFile errorFile, 
-				Tcl_Pid * pidPtr));
-/* Slot 5 is reserved */
-/* 6 */
-EXTERN TclFile		TclpMakeFile _ANSI_ARGS_((Tcl_Channel channel, 
-				int direction));
-/* 7 */
-EXTERN TclFile		TclpOpenFile _ANSI_ARGS_((CONST char * fname, 
-				int mode));
-/* 8 */
-EXTERN int		TclUnixWaitForFile _ANSI_ARGS_((int fd, int mask, 
-				int timeout));
-/* 9 */
-EXTERN TclFile		TclpCreateTempFile _ANSI_ARGS_((
-				CONST char * contents));
-#endif /* UNIX */
 #ifdef MAC_TCL
 /* 0 */
 EXTERN VOID *		TclpSysAlloc _ANSI_ARGS_((long size, int isBin));
@@ -192,6 +200,18 @@ typedef struct TclIntPlatStubs {
     int magic;
     struct TclIntPlatStubHooks *hooks;
 
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    void (*tclGetAndDetachPids) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 0 */
+    int (*tclpCloseFile) _ANSI_ARGS_((TclFile file)); /* 1 */
+    Tcl_Channel (*tclpCreateCommandChannel) _ANSI_ARGS_((TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr)); /* 2 */
+    int (*tclpCreatePipe) _ANSI_ARGS_((TclFile * readPipe, TclFile * writePipe)); /* 3 */
+    int (*tclpCreateProcess) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr)); /* 4 */
+    void *reserved5;
+    TclFile (*tclpMakeFile) _ANSI_ARGS_((Tcl_Channel channel, int direction)); /* 6 */
+    TclFile (*tclpOpenFile) _ANSI_ARGS_((CONST char * fname, int mode)); /* 7 */
+    int (*tclUnixWaitForFile) _ANSI_ARGS_((int fd, int mask, int timeout)); /* 8 */
+    TclFile (*tclpCreateTempFile) _ANSI_ARGS_((CONST char * contents)); /* 9 */
+#endif /* UNIX */
 #ifdef __WIN32__
     void (*tclWinConvertError) _ANSI_ARGS_((DWORD errCode)); /* 0 */
     void (*tclWinConvertWSAError) _ANSI_ARGS_((DWORD errCode)); /* 1 */
@@ -215,19 +235,10 @@ typedef struct TclIntPlatStubs {
     TclFile (*tclpOpenFile) _ANSI_ARGS_((CONST char * fname, int mode)); /* 19 */
     TclFile (*tclpCreateTempFile) _ANSI_ARGS_((CONST char * contents)); /* 20 */
     char * (*tclpGetTZName) _ANSI_ARGS_((int isdst)); /* 21 */
+    char * (*tclWinNoBackslash) _ANSI_ARGS_((char * path)); /* 22 */
+    TCHAR * (*tcl_WinUtfToTChar) _ANSI_ARGS_((CONST char * string, int len, Tcl_DString * dsPtr)); /* 23 */
+    char * (*tcl_WinTCharToUtf) _ANSI_ARGS_((CONST TCHAR * string, int len, Tcl_DString * dsPtr)); /* 24 */
 #endif /* __WIN32__ */
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-    void (*tclGetAndDetachPids) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 0 */
-    int (*tclpCloseFile) _ANSI_ARGS_((TclFile file)); /* 1 */
-    Tcl_Channel (*tclpCreateCommandChannel) _ANSI_ARGS_((TclFile readFile, TclFile writeFile, TclFile errorFile, int numPids, Tcl_Pid * pidPtr)); /* 2 */
-    int (*tclpCreatePipe) _ANSI_ARGS_((TclFile * readPipe, TclFile * writePipe)); /* 3 */
-    int (*tclpCreateProcess) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, TclFile inputFile, TclFile outputFile, TclFile errorFile, Tcl_Pid * pidPtr)); /* 4 */
-    void *reserved5;
-    TclFile (*tclpMakeFile) _ANSI_ARGS_((Tcl_Channel channel, int direction)); /* 6 */
-    TclFile (*tclpOpenFile) _ANSI_ARGS_((CONST char * fname, int mode)); /* 7 */
-    int (*tclUnixWaitForFile) _ANSI_ARGS_((int fd, int mask, int timeout)); /* 8 */
-    TclFile (*tclpCreateTempFile) _ANSI_ARGS_((CONST char * contents)); /* 9 */
-#endif /* UNIX */
 #ifdef MAC_TCL
     VOID * (*tclpSysAlloc) _ANSI_ARGS_((long size, int isBin)); /* 0 */
     void (*tclpSysFree) _ANSI_ARGS_((VOID * ptr)); /* 1 */
@@ -266,6 +277,45 @@ extern TclIntPlatStubs *tclIntPlatStubsPtr;
  * Inline function declarations:
  */
 
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+#ifndef TclGetAndDetachPids
+#define TclGetAndDetachPids(interp, chan) \
+	(tclIntPlatStubsPtr->tclGetAndDetachPids)(interp, chan) /* 0 */
+#endif
+#ifndef TclpCloseFile
+#define TclpCloseFile(file) \
+	(tclIntPlatStubsPtr->tclpCloseFile)(file) /* 1 */
+#endif
+#ifndef TclpCreateCommandChannel
+#define TclpCreateCommandChannel(readFile, writeFile, errorFile, numPids, pidPtr) \
+	(tclIntPlatStubsPtr->tclpCreateCommandChannel)(readFile, writeFile, errorFile, numPids, pidPtr) /* 2 */
+#endif
+#ifndef TclpCreatePipe
+#define TclpCreatePipe(readPipe, writePipe) \
+	(tclIntPlatStubsPtr->tclpCreatePipe)(readPipe, writePipe) /* 3 */
+#endif
+#ifndef TclpCreateProcess
+#define TclpCreateProcess(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr) \
+	(tclIntPlatStubsPtr->tclpCreateProcess)(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr) /* 4 */
+#endif
+/* Slot 5 is reserved */
+#ifndef TclpMakeFile
+#define TclpMakeFile(channel, direction) \
+	(tclIntPlatStubsPtr->tclpMakeFile)(channel, direction) /* 6 */
+#endif
+#ifndef TclpOpenFile
+#define TclpOpenFile(fname, mode) \
+	(tclIntPlatStubsPtr->tclpOpenFile)(fname, mode) /* 7 */
+#endif
+#ifndef TclUnixWaitForFile
+#define TclUnixWaitForFile(fd, mask, timeout) \
+	(tclIntPlatStubsPtr->tclUnixWaitForFile)(fd, mask, timeout) /* 8 */
+#endif
+#ifndef TclpCreateTempFile
+#define TclpCreateTempFile(contents) \
+	(tclIntPlatStubsPtr->tclpCreateTempFile)(contents) /* 9 */
+#endif
+#endif /* UNIX */
 #ifdef __WIN32__
 #ifndef TclWinConvertError
 #define TclWinConvertError(errCode) \
@@ -346,46 +396,19 @@ extern TclIntPlatStubs *tclIntPlatStubsPtr;
 #define TclpGetTZName(isdst) \
 	(tclIntPlatStubsPtr->tclpGetTZName)(isdst) /* 21 */
 #endif
-#endif /* __WIN32__ */
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-#ifndef TclGetAndDetachPids
-#define TclGetAndDetachPids(interp, chan) \
-	(tclIntPlatStubsPtr->tclGetAndDetachPids)(interp, chan) /* 0 */
-#endif
-#ifndef TclpCloseFile
-#define TclpCloseFile(file) \
-	(tclIntPlatStubsPtr->tclpCloseFile)(file) /* 1 */
-#endif
-#ifndef TclpCreateCommandChannel
-#define TclpCreateCommandChannel(readFile, writeFile, errorFile, numPids, pidPtr) \
-	(tclIntPlatStubsPtr->tclpCreateCommandChannel)(readFile, writeFile, errorFile, numPids, pidPtr) /* 2 */
-#endif
-#ifndef TclpCreatePipe
-#define TclpCreatePipe(readPipe, writePipe) \
-	(tclIntPlatStubsPtr->tclpCreatePipe)(readPipe, writePipe) /* 3 */
-#endif
-#ifndef TclpCreateProcess
-#define TclpCreateProcess(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr) \
-	(tclIntPlatStubsPtr->tclpCreateProcess)(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr) /* 4 */
-#endif
-/* Slot 5 is reserved */
-#ifndef TclpMakeFile
-#define TclpMakeFile(channel, direction) \
-	(tclIntPlatStubsPtr->tclpMakeFile)(channel, direction) /* 6 */
-#endif
-#ifndef TclpOpenFile
-#define TclpOpenFile(fname, mode) \
-	(tclIntPlatStubsPtr->tclpOpenFile)(fname, mode) /* 7 */
+#ifndef TclWinNoBackslash
+#define TclWinNoBackslash(path) \
+	(tclIntPlatStubsPtr->tclWinNoBackslash)(path) /* 22 */
 #endif
-#ifndef TclUnixWaitForFile
-#define TclUnixWaitForFile(fd, mask, timeout) \
-	(tclIntPlatStubsPtr->tclUnixWaitForFile)(fd, mask, timeout) /* 8 */
+#ifndef Tcl_WinUtfToTChar
+#define Tcl_WinUtfToTChar(string, len, dsPtr) \
+	(tclIntPlatStubsPtr->tcl_WinUtfToTChar)(string, len, dsPtr) /* 23 */
 #endif
-#ifndef TclpCreateTempFile
-#define TclpCreateTempFile(contents) \
-	(tclIntPlatStubsPtr->tclpCreateTempFile)(contents) /* 9 */
+#ifndef Tcl_WinTCharToUtf
+#define Tcl_WinTCharToUtf(string, len, dsPtr) \
+	(tclIntPlatStubsPtr->tcl_WinTCharToUtf)(string, len, dsPtr) /* 24 */
 #endif
-#endif /* UNIX */
+#endif /* __WIN32__ */
 #ifdef MAC_TCL
 #ifndef TclpSysAlloc
 #define TclpSysAlloc(size, isBin) \
diff --git a/generic/tclIntPlatStubs.c b/generic/tclIntPlatStubs.c
index 7df2393..691bbd1 100644
--- a/generic/tclIntPlatStubs.c
+++ b/generic/tclIntPlatStubs.c
@@ -7,7 +7,7 @@
  * Copyright (c) 1998-1999 by Scriptics Corporation.
  * All rights reserved.
  *
- * RCS: @(#) $Id: tclIntPlatStubs.c,v 1.2.2.2 1999/03/09 02:37:16 stanton Exp $
+ * RCS: @(#) $Id: tclIntPlatStubs.c,v 1.2.2.3 1999/03/10 06:41:51 stanton Exp $
  */
 
 #include "tclInt.h"
@@ -25,6 +25,97 @@
  * Exported stub functions:
  */
 
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+/* Slot 0 */
+void
+TclGetAndDetachPids(interp, chan)
+    Tcl_Interp * interp;
+    Tcl_Channel chan;
+{
+    (tclIntPlatStubsPtr->tclGetAndDetachPids)(interp, chan);
+}
+
+/* Slot 1 */
+int
+TclpCloseFile(file)
+    TclFile file;
+{
+    return (tclIntPlatStubsPtr->tclpCloseFile)(file);
+}
+
+/* Slot 2 */
+Tcl_Channel
+TclpCreateCommandChannel(readFile, writeFile, errorFile, numPids, pidPtr)
+    TclFile readFile;
+    TclFile writeFile;
+    TclFile errorFile;
+    int numPids;
+    Tcl_Pid * pidPtr;
+{
+    return (tclIntPlatStubsPtr->tclpCreateCommandChannel)(readFile, writeFile, errorFile, numPids, pidPtr);
+}
+
+/* Slot 3 */
+int
+TclpCreatePipe(readPipe, writePipe)
+    TclFile * readPipe;
+    TclFile * writePipe;
+{
+    return (tclIntPlatStubsPtr->tclpCreatePipe)(readPipe, writePipe);
+}
+
+/* Slot 4 */
+int
+TclpCreateProcess(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr)
+    Tcl_Interp * interp;
+    int argc;
+    char ** argv;
+    TclFile inputFile;
+    TclFile outputFile;
+    TclFile errorFile;
+    Tcl_Pid * pidPtr;
+{
+    return (tclIntPlatStubsPtr->tclpCreateProcess)(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr);
+}
+
+/* Slot 5 is reserved */
+/* Slot 6 */
+TclFile
+TclpMakeFile(channel, direction)
+    Tcl_Channel channel;
+    int direction;
+{
+    return (tclIntPlatStubsPtr->tclpMakeFile)(channel, direction);
+}
+
+/* Slot 7 */
+TclFile
+TclpOpenFile(fname, mode)
+    CONST char * fname;
+    int mode;
+{
+    return (tclIntPlatStubsPtr->tclpOpenFile)(fname, mode);
+}
+
+/* Slot 8 */
+int
+TclUnixWaitForFile(fd, mask, timeout)
+    int fd;
+    int mask;
+    int timeout;
+{
+    return (tclIntPlatStubsPtr->tclUnixWaitForFile)(fd, mask, timeout);
+}
+
+/* Slot 9 */
+TclFile
+TclpCreateTempFile(contents)
+    CONST char * contents;
+{
+    return (tclIntPlatStubsPtr->tclpCreateTempFile)(contents);
+}
+
+#endif /* UNIX */
 #ifdef __WIN32__
 /* Slot 0 */
 void
@@ -205,98 +296,35 @@ TclpGetTZName(isdst)
     return (tclIntPlatStubsPtr->tclpGetTZName)(isdst);
 }
 
-#endif /* __WIN32__ */
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-/* Slot 0 */
-void
-TclGetAndDetachPids(interp, chan)
-    Tcl_Interp * interp;
-    Tcl_Channel chan;
-{
-    (tclIntPlatStubsPtr->tclGetAndDetachPids)(interp, chan);
-}
-
-/* Slot 1 */
-int
-TclpCloseFile(file)
-    TclFile file;
-{
-    return (tclIntPlatStubsPtr->tclpCloseFile)(file);
-}
-
-/* Slot 2 */
-Tcl_Channel
-TclpCreateCommandChannel(readFile, writeFile, errorFile, numPids, pidPtr)
-    TclFile readFile;
-    TclFile writeFile;
-    TclFile errorFile;
-    int numPids;
-    Tcl_Pid * pidPtr;
-{
-    return (tclIntPlatStubsPtr->tclpCreateCommandChannel)(readFile, writeFile, errorFile, numPids, pidPtr);
-}
-
-/* Slot 3 */
-int
-TclpCreatePipe(readPipe, writePipe)
-    TclFile * readPipe;
-    TclFile * writePipe;
-{
-    return (tclIntPlatStubsPtr->tclpCreatePipe)(readPipe, writePipe);
-}
-
-/* Slot 4 */
-int
-TclpCreateProcess(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr)
-    Tcl_Interp * interp;
-    int argc;
-    char ** argv;
-    TclFile inputFile;
-    TclFile outputFile;
-    TclFile errorFile;
-    Tcl_Pid * pidPtr;
-{
-    return (tclIntPlatStubsPtr->tclpCreateProcess)(interp, argc, argv, inputFile, outputFile, errorFile, pidPtr);
-}
-
-/* Slot 5 is reserved */
-/* Slot 6 */
-TclFile
-TclpMakeFile(channel, direction)
-    Tcl_Channel channel;
-    int direction;
-{
-    return (tclIntPlatStubsPtr->tclpMakeFile)(channel, direction);
-}
-
-/* Slot 7 */
-TclFile
-TclpOpenFile(fname, mode)
-    CONST char * fname;
-    int mode;
+/* Slot 22 */
+char *
+TclWinNoBackslash(path)
+    char * path;
 {
-    return (tclIntPlatStubsPtr->tclpOpenFile)(fname, mode);
+    return (tclIntPlatStubsPtr->tclWinNoBackslash)(path);
 }
 
-/* Slot 8 */
-int
-TclUnixWaitForFile(fd, mask, timeout)
-    int fd;
-    int mask;
-    int timeout;
+/* Slot 23 */
+TCHAR *
+Tcl_WinUtfToTChar(string, len, dsPtr)
+    CONST char * string;
+    int len;
+    Tcl_DString * dsPtr;
 {
-    return (tclIntPlatStubsPtr->tclUnixWaitForFile)(fd, mask, timeout);
+    return (tclIntPlatStubsPtr->tcl_WinUtfToTChar)(string, len, dsPtr);
 }
 
-/* Slot 9 */
-TclFile
-TclpCreateTempFile(contents)
-    CONST char * contents;
+/* Slot 24 */
+char *
+Tcl_WinTCharToUtf(string, len, dsPtr)
+    CONST TCHAR * string;
+    int len;
+    Tcl_DString * dsPtr;
 {
-    return (tclIntPlatStubsPtr->tclpCreateTempFile)(contents);
+    return (tclIntPlatStubsPtr->tcl_WinTCharToUtf)(string, len, dsPtr);
 }
 
-#endif /* UNIX */
+#endif /* __WIN32__ */
 #ifdef MAC_TCL
 /* Slot 0 */
 VOID *
diff --git a/generic/tclIntStubs.c b/generic/tclIntStubs.c
index fea427b..4d565de 100644
--- a/generic/tclIntStubs.c
+++ b/generic/tclIntStubs.c
@@ -7,7 +7,7 @@
  * Copyright (c) 1998-1999 by Scriptics Corporation.
  * All rights reserved.
  *
- * RCS: @(#) $Id: tclIntStubs.c,v 1.2.2.2 1999/03/09 02:37:17 stanton Exp $
+ * RCS: @(#) $Id: tclIntStubs.c,v 1.2.2.3 1999/03/10 06:41:51 stanton Exp $
  */
 
 #include "tclInt.h"
@@ -1180,17 +1180,7 @@ Tcl_SetNamespaceResolvers(namespacePtr, cmdProc, varProc, compiledVarProc)
     (tclIntStubsPtr->tcl_SetNamespaceResolvers)(namespacePtr, cmdProc, varProc, compiledVarProc);
 }
 
-/* Slot 132 is reserved */
-/* Slot 133 is reserved */
-/* Slot 134 is reserved */
-/* Slot 135 is reserved */
-/* Slot 136 is reserved */
-/* Slot 137 is reserved */
-/* Slot 138 is reserved */
-/* Slot 139 is reserved */
-/* Slot 140 is reserved */
-/* Slot 141 is reserved */
-/* Slot 142 */
+/* Slot 132 */
 int
 TclpHasSockets(interp)
     Tcl_Interp * interp;
@@ -1198,7 +1188,7 @@ TclpHasSockets(interp)
     return (tclIntStubsPtr->tclpHasSockets)(interp);
 }
 
-/* Slot 143 */
+/* Slot 133 */
 struct tm *
 TclpGetDate(time, useGMT)
     TclpTime_t time;
@@ -1207,7 +1197,7 @@ TclpGetDate(time, useGMT)
     return (tclIntStubsPtr->tclpGetDate)(time, useGMT);
 }
 
-/* Slot 144 */
+/* Slot 134 */
 size_t
 TclpStrftime(s, maxsize, format, t)
     char * s;
@@ -1218,14 +1208,14 @@ TclpStrftime(s, maxsize, format, t)
     return (tclIntStubsPtr->tclpStrftime)(s, maxsize, format, t);
 }
 
-/* Slot 145 */
+/* Slot 135 */
 int
 TclpCheckStackSpace()
 {
     return (tclIntStubsPtr->tclpCheckStackSpace)();
 }
 
-/* Slot 146 */
+/* Slot 136 */
 char *
 Tcl_GetString(objPtr)
     Tcl_Obj * objPtr;
@@ -1233,7 +1223,7 @@ Tcl_GetString(objPtr)
     return (tclIntStubsPtr->tcl_GetString)(objPtr);
 }
 
-/* Slot 147 */
+/* Slot 137 */
 int
 TclpChdir(dirName)
     CONST char * dirName;
@@ -1241,7 +1231,7 @@ TclpChdir(dirName)
     return (tclIntStubsPtr->tclpChdir)(dirName);
 }
 
-/* Slot 148 */
+/* Slot 138 */
 char *
 TclGetEnv(name, valuePtr)
     CONST char * name;
@@ -1250,7 +1240,7 @@ TclGetEnv(name, valuePtr)
     return (tclIntStubsPtr->tclGetEnv)(name, valuePtr);
 }
 
-/* Slot 149 */
+/* Slot 139 */
 int
 TclpLoadFile(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr)
     Tcl_Interp * interp;
@@ -1264,7 +1254,7 @@ TclpLoadFile(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr)
     return (tclIntStubsPtr->tclpLoadFile)(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr);
 }
 
-/* Slot 150 */
+/* Slot 140 */
 int
 TclLooksLikeInt(bytes, length)
     char * bytes;
diff --git a/generic/tclPlatDecls.h b/generic/tclPlatDecls.h
index d0373d7..9df194d 100644
--- a/generic/tclPlatDecls.h
+++ b/generic/tclPlatDecls.h
@@ -5,17 +5,6 @@
  * Exported function declarations:
  */
 
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-/* 0 */
-EXTERN void		Tcl_CreateFileHandler _ANSI_ARGS_((int fd, int mask, 
-				Tcl_FileProc * proc, ClientData clientData));
-/* 1 */
-EXTERN void		Tcl_DeleteFileHandler _ANSI_ARGS_((int fd));
-/* 2 */
-EXTERN int		Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp, 
-				char * str, int write, int checkUsage, 
-				ClientData * filePtr));
-#endif /* UNIX */
 #ifdef MAC_TCL
 /* 0 */
 EXTERN void		Tcl_MacSetEventProc _ANSI_ARGS_((
@@ -53,11 +42,6 @@ typedef struct TclPlatStubs {
     int magic;
     struct TclPlatStubHooks *hooks;
 
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-    void (*tcl_CreateFileHandler) _ANSI_ARGS_((int fd, int mask, Tcl_FileProc * proc, ClientData clientData)); /* 0 */
-    void (*tcl_DeleteFileHandler) _ANSI_ARGS_((int fd)); /* 1 */
-    int (*tcl_GetOpenFile) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int write, int checkUsage, ClientData * filePtr)); /* 2 */
-#endif /* UNIX */
 #ifdef MAC_TCL
     void (*tcl_MacSetEventProc) _ANSI_ARGS_((Tcl_MacConvertEventPtr procPtr)); /* 0 */
     char * (*tcl_MacConvertTextResource) _ANSI_ARGS_((Handle resource)); /* 1 */
@@ -79,20 +63,6 @@ extern TclPlatStubs *tclPlatStubsPtr;
  * Inline function declarations:
  */
 
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-#ifndef Tcl_CreateFileHandler
-#define Tcl_CreateFileHandler(fd, mask, proc, clientData) \
-	(tclPlatStubsPtr->tcl_CreateFileHandler)(fd, mask, proc, clientData) /* 0 */
-#endif
-#ifndef Tcl_DeleteFileHandler
-#define Tcl_DeleteFileHandler(fd) \
-	(tclPlatStubsPtr->tcl_DeleteFileHandler)(fd) /* 1 */
-#endif
-#ifndef Tcl_GetOpenFile
-#define Tcl_GetOpenFile(interp, str, write, checkUsage, filePtr) \
-	(tclPlatStubsPtr->tcl_GetOpenFile)(interp, str, write, checkUsage, filePtr) /* 2 */
-#endif
-#endif /* UNIX */
 #ifdef MAC_TCL
 #ifndef Tcl_MacSetEventProc
 #define Tcl_MacSetEventProc(procPtr) \
diff --git a/generic/tclPlatStubs.c b/generic/tclPlatStubs.c
index 307501c..d7a8971 100644
--- a/generic/tclPlatStubs.c
+++ b/generic/tclPlatStubs.c
@@ -7,7 +7,7 @@
  * Copyright (c) 1998-1999 by Scriptics Corporation.
  * All rights reserved.
  *
- * RCS: @(#) $Id: tclPlatStubs.c,v 1.2.2.1 1999/03/08 20:14:11 stanton Exp $
+ * RCS: @(#) $Id: tclPlatStubs.c,v 1.2.2.2 1999/03/10 06:41:52 stanton Exp $
  */
 
 #include "tcl.h"
@@ -24,39 +24,6 @@
  * Exported stub functions:
  */
 
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-/* Slot 0 */
-void
-Tcl_CreateFileHandler(fd, mask, proc, clientData)
-    int fd;
-    int mask;
-    Tcl_FileProc * proc;
-    ClientData clientData;
-{
-    (tclPlatStubsPtr->tcl_CreateFileHandler)(fd, mask, proc, clientData);
-}
-
-/* Slot 1 */
-void
-Tcl_DeleteFileHandler(fd)
-    int fd;
-{
-    (tclPlatStubsPtr->tcl_DeleteFileHandler)(fd);
-}
-
-/* Slot 2 */
-int
-Tcl_GetOpenFile(interp, str, write, checkUsage, filePtr)
-    Tcl_Interp * interp;
-    char * str;
-    int write;
-    int checkUsage;
-    ClientData * filePtr;
-{
-    return (tclPlatStubsPtr->tcl_GetOpenFile)(interp, str, write, checkUsage, filePtr);
-}
-
-#endif /* UNIX */
 #ifdef MAC_TCL
 /* Slot 0 */
 void
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index 7e0d83f..6c22ced 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -8,7 +8,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclStubInit.c,v 1.2.4.2 1999/03/09 02:37:18 stanton Exp $
+ * RCS: @(#) $Id: tclStubInit.c,v 1.2.4.3 1999/03/10 06:41:52 stanton Exp $
  */
 
 #include "tclInt.h"
@@ -45,339 +45,364 @@ static TclStubHooks tclStubHooks;
 TclStubs tclStubs = {
     TCL_STUB_MAGIC,
     &tclStubHooks,
-    Tcl_AddErrorInfo, /* 0 */
-    Tcl_AddObjErrorInfo, /* 1 */
-    Tcl_Alloc, /* 2 */
-    Tcl_AllowExceptions, /* 3 */
-    Tcl_AppendAllObjTypes, /* 4 */
-    Tcl_AppendElement, /* 5 */
-    Tcl_AppendResult, /* 6 */
-    Tcl_AppendResultVA, /* 7 */
-    Tcl_AppendToObj, /* 8 */
-    Tcl_AppendStringsToObj, /* 9 */
-    Tcl_AppendStringsToObjVA, /* 10 */
-    Tcl_AsyncCreate, /* 11 */
-    Tcl_AsyncDelete, /* 12 */
-    Tcl_AsyncInvoke, /* 13 */
-    Tcl_AsyncMark, /* 14 */
-    Tcl_AsyncReady, /* 15 */
-    Tcl_BackgroundError, /* 16 */
-    Tcl_Backslash, /* 17 */
-    Tcl_BadChannelOption, /* 18 */
-    Tcl_CallWhenDeleted, /* 19 */
-    Tcl_CancelIdleCall, /* 20 */
-    Tcl_Close, /* 21 */
-    Tcl_CommandComplete, /* 22 */
-    Tcl_Concat, /* 23 */
-    Tcl_ConcatObj, /* 24 */
-    Tcl_ConvertCountedElement, /* 25 */
-    Tcl_ConvertElement, /* 26 */
-    Tcl_ConvertToType, /* 27 */
-    Tcl_CreateAlias, /* 28 */
-    Tcl_CreateAliasObj, /* 29 */
-    Tcl_CreateChannel, /* 30 */
-    Tcl_CreateChannelHandler, /* 31 */
-    Tcl_CreateCloseHandler, /* 32 */
-    Tcl_CreateCommand, /* 33 */
-    Tcl_CreateEventSource, /* 34 */
-    Tcl_CreateExitHandler, /* 35 */
-    Tcl_CreateInterp, /* 36 */
-    Tcl_CreateMathFunc, /* 37 */
-    Tcl_CreateObjCommand, /* 38 */
-    Tcl_CreateSlave, /* 39 */
-    Tcl_CreateTimerHandler, /* 40 */
-    Tcl_CreateTrace, /* 41 */
-    Tcl_DbCkalloc, /* 42 */
-    Tcl_DbCkfree, /* 43 */
-    Tcl_DbCkrealloc, /* 44 */
-    Tcl_DbDecrRefCount, /* 45 */
-    Tcl_DbIncrRefCount, /* 46 */
-    Tcl_DbIsShared, /* 47 */
-    Tcl_DbNewBooleanObj, /* 48 */
-    Tcl_DbNewByteArrayObj, /* 49 */
-    Tcl_DbNewDoubleObj, /* 50 */
-    Tcl_DbNewListObj, /* 51 */
-    Tcl_DbNewLongObj, /* 52 */
-    Tcl_DbNewObj, /* 53 */
-    Tcl_DbNewStringObj, /* 54 */
-    Tcl_DeleteAssocData, /* 55 */
-    Tcl_DeleteCommand, /* 56 */
-    Tcl_DeleteCommandFromToken, /* 57 */
-    Tcl_DeleteChannelHandler, /* 58 */
-    Tcl_DeleteCloseHandler, /* 59 */
-    Tcl_DeleteEvents, /* 60 */
-    Tcl_DeleteEventSource, /* 61 */
-    Tcl_DeleteExitHandler, /* 62 */
-    Tcl_DeleteHashEntry, /* 63 */
-    Tcl_DeleteHashTable, /* 64 */
-    Tcl_DeleteInterp, /* 65 */
-    Tcl_DeleteTimerHandler, /* 66 */
-    Tcl_DeleteTrace, /* 67 */
-    Tcl_DetachPids, /* 68 */
-    Tcl_DontCallWhenDeleted, /* 69 */
-    Tcl_DoOneEvent, /* 70 */
-    Tcl_DoWhenIdle, /* 71 */
-    Tcl_DStringAppend, /* 72 */
-    Tcl_DStringAppendElement, /* 73 */
-    Tcl_DStringEndSublist, /* 74 */
-    Tcl_DStringFree, /* 75 */
-    Tcl_DStringGetResult, /* 76 */
-    Tcl_DStringInit, /* 77 */
-    Tcl_DStringResult, /* 78 */
-    Tcl_DStringSetLength, /* 79 */
-    Tcl_DStringStartSublist, /* 80 */
-    Tcl_DumpActiveMemory, /* 81 */
-    Tcl_DuplicateObj, /* 82 */
-    Tcl_Eof, /* 83 */
-    Tcl_ErrnoId, /* 84 */
-    Tcl_ErrnoMsg, /* 85 */
-    Tcl_Eval, /* 86 */
-    Tcl_EvalFile, /* 87 */
-    Tcl_EventuallyFree, /* 88 */
-    Tcl_EvalObj, /* 89 */
-    Tcl_Exit, /* 90 */
-    Tcl_ExposeCommand, /* 91 */
-    Tcl_ExprBoolean, /* 92 */
-    Tcl_ExprBooleanObj, /* 93 */
-    Tcl_ExprDouble, /* 94 */
-    Tcl_ExprDoubleObj, /* 95 */
-    Tcl_ExprLong, /* 96 */
-    Tcl_ExprLongObj, /* 97 */
-    Tcl_ExprObj, /* 98 */
-    Tcl_ExprString, /* 99 */
-    Tcl_Finalize, /* 100 */
-    Tcl_FindExecutable, /* 101 */
-    Tcl_FirstHashEntry, /* 102 */
-    Tcl_Flush, /* 103 */
-    Tcl_Free, /* 104 */
-    TclFreeObj, /* 105 */
-    Tcl_FreeResult, /* 106 */
-    Tcl_GetAlias, /* 107 */
-    Tcl_GetAliasObj, /* 108 */
-    Tcl_GetAssocData, /* 109 */
-    Tcl_GetBoolean, /* 110 */
-    Tcl_GetBooleanFromObj, /* 111 */
-    Tcl_GetByteArrayFromObj, /* 112 */
-    Tcl_GetChannel, /* 113 */
-    Tcl_GetChannelBufferSize, /* 114 */
-    Tcl_GetChannelHandle, /* 115 */
-    Tcl_GetChannelInstanceData, /* 116 */
-    Tcl_GetChannelMode, /* 117 */
-    Tcl_GetChannelName, /* 118 */
-    Tcl_GetChannelOption, /* 119 */
-    Tcl_GetChannelType, /* 120 */
-    Tcl_GetCommandInfo, /* 121 */
-    Tcl_GetCommandName, /* 122 */
-    Tcl_GetDouble, /* 123 */
-    Tcl_GetDoubleFromObj, /* 124 */
-    Tcl_GetErrno, /* 125 */
-    Tcl_GetHostName, /* 126 */
-    Tcl_GetIndexFromObj, /* 127 */
-    Tcl_GetInt, /* 128 */
-    Tcl_GetInterpPath, /* 129 */
-    Tcl_GetIntFromObj, /* 130 */
-    Tcl_GetLongFromObj, /* 131 */
-    Tcl_GetMaster, /* 132 */
-    Tcl_GetNameOfExecutable, /* 133 */
-    Tcl_GetObjResult, /* 134 */
-    Tcl_GetObjType, /* 135 */
-    Tcl_GetPathType, /* 136 */
-    Tcl_Gets, /* 137 */
-    Tcl_GetsObj, /* 138 */
-    Tcl_GetServiceMode, /* 139 */
-    Tcl_GetSlave, /* 140 */
-    Tcl_GetStdChannel, /* 141 */
-    Tcl_GetStringFromObj, /* 142 */
-    Tcl_GetStringResult, /* 143 */
-    Tcl_GetVar, /* 144 */
-    Tcl_GetVar2, /* 145 */
-    Tcl_GlobalEval, /* 146 */
-    Tcl_GlobalEvalObj, /* 147 */
-    Tcl_HashStats, /* 148 */
-    Tcl_HideCommand, /* 149 */
-    Tcl_Init, /* 150 */
-    Tcl_InitHashTable, /* 151 */
-    Tcl_InitMemory, /* 152 */
-    Tcl_InputBlocked, /* 153 */
-    Tcl_InputBuffered, /* 154 */
-    Tcl_InterpDeleted, /* 155 */
-    Tcl_IsSafe, /* 156 */
-    Tcl_InvalidateStringRep, /* 157 */
-    Tcl_JoinPath, /* 158 */
-    Tcl_LinkVar, /* 159 */
-    Tcl_ListObjAppendList, /* 160 */
-    Tcl_ListObjAppendElement, /* 161 */
-    Tcl_ListObjGetElements, /* 162 */
-    Tcl_ListObjIndex, /* 163 */
-    Tcl_ListObjLength, /* 164 */
-    Tcl_ListObjReplace, /* 165 */
-    Tcl_MakeFileChannel, /* 166 */
-    Tcl_MakeSafe, /* 167 */
-    Tcl_MakeTcpClientChannel, /* 168 */
-    Tcl_Merge, /* 169 */
-    Tcl_NewBooleanObj, /* 170 */
-    Tcl_NewByteArrayObj, /* 171 */
-    Tcl_NewDoubleObj, /* 172 */
-    Tcl_NewIntObj, /* 173 */
-    Tcl_NewListObj, /* 174 */
-    Tcl_NewLongObj, /* 175 */
-    Tcl_NewObj, /* 176 */
-    Tcl_NewStringObj, /* 177 */
-    Tcl_NextHashEntry, /* 178 */
-    Tcl_NotifyChannel, /* 179 */
-    Tcl_ObjGetVar2, /* 180 */
-    Tcl_ObjSetVar2, /* 181 */
-    Tcl_OpenCommandChannel, /* 182 */
-    Tcl_OpenFileChannel, /* 183 */
-    Tcl_OpenTcpClient, /* 184 */
-    Tcl_OpenTcpServer, /* 185 */
-    panic, /* 186 */
-    panicVA, /* 187 */
-    Tcl_ParseVar, /* 188 */
-    Tcl_PkgPresent, /* 189 */
-    Tcl_PkgPresentEx, /* 190 */
-    Tcl_PkgProvide, /* 191 */
-    Tcl_PkgProvideEx, /* 192 */
-    Tcl_PkgRequire, /* 193 */
-    Tcl_PkgRequireEx, /* 194 */
-    Tcl_PosixError, /* 195 */
-    Tcl_Preserve, /* 196 */
-    Tcl_PrintDouble, /* 197 */
-    Tcl_PutEnv, /* 198 */
-    Tcl_QueueEvent, /* 199 */
-    Tcl_Read, /* 200 */
-    Tcl_Realloc, /* 201 */
-    Tcl_ReapDetachedProcs, /* 202 */
-    Tcl_RecordAndEval, /* 203 */
-    Tcl_RecordAndEvalObj, /* 204 */
-    Tcl_RegExpCompile, /* 205 */
-    Tcl_RegExpExec, /* 206 */
-    Tcl_RegExpMatch, /* 207 */
-    Tcl_RegExpRange, /* 208 */
-    Tcl_RegisterChannel, /* 209 */
-    Tcl_RegisterObjType, /* 210 */
-    Tcl_Release, /* 211 */
-    Tcl_ResetResult, /* 212 */
-    Tcl_ScanCountedElement, /* 213 */
-    Tcl_ScanElement, /* 214 */
-    Tcl_Seek, /* 215 */
-    Tcl_ServiceAll, /* 216 */
-    Tcl_ServiceEvent, /* 217 */
-    Tcl_SetAssocData, /* 218 */
-    Tcl_SetBooleanObj, /* 219 */
-    Tcl_SetByteArrayLength, /* 220 */
-    Tcl_SetByteArrayObj, /* 221 */
-    Tcl_SetChannelBufferSize, /* 222 */
-    Tcl_SetChannelOption, /* 223 */
-    Tcl_SetCommandInfo, /* 224 */
-    Tcl_SetDoubleObj, /* 225 */
-    Tcl_SetErrno, /* 226 */
-    Tcl_SetErrorCode, /* 227 */
-    Tcl_SetErrorCodeVA, /* 228 */
-    Tcl_SetIntObj, /* 229 */
-    Tcl_SetListObj, /* 230 */
-    Tcl_SetLongObj, /* 231 */
-    Tcl_SetMaxBlockTime, /* 232 */
-    Tcl_SetObjErrorCode, /* 233 */
-    Tcl_SetObjLength, /* 234 */
+    Tcl_PkgProvideEx, /* 0 */
+    Tcl_PkgRequireEx, /* 1 */
+    panic, /* 2 */
+    Tcl_Alloc, /* 3 */
+    Tcl_Free, /* 4 */
+    Tcl_Realloc, /* 5 */
+    Tcl_DbCkalloc, /* 6 */
+    Tcl_DbCkfree, /* 7 */
+    Tcl_DbCkrealloc, /* 8 */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    Tcl_CreateFileHandler, /* 9 */
+#endif /* UNIX */
+#ifdef __WIN32__
+    NULL, /* 9 */
+#endif /* __WIN32__ */
+#ifdef MAC_TCL
+    NULL, /* 9 */
+#endif /* MAC_TCL */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    Tcl_DeleteFileHandler, /* 10 */
+#endif /* UNIX */
+#ifdef __WIN32__
+    NULL, /* 10 */
+#endif /* __WIN32__ */
+#ifdef MAC_TCL
+    NULL, /* 10 */
+#endif /* MAC_TCL */
+    Tcl_SetTimer, /* 11 */
+    Tcl_Sleep, /* 12 */
+    Tcl_WaitForEvent, /* 13 */
+    Tcl_AppendAllObjTypes, /* 14 */
+    Tcl_AppendStringsToObj, /* 15 */
+    Tcl_AppendToObj, /* 16 */
+    Tcl_ConcatObj, /* 17 */
+    Tcl_ConvertToType, /* 18 */
+    Tcl_DbDecrRefCount, /* 19 */
+    Tcl_DbIncrRefCount, /* 20 */
+    Tcl_DbIsShared, /* 21 */
+    Tcl_DbNewBooleanObj, /* 22 */
+    Tcl_DbNewByteArrayObj, /* 23 */
+    Tcl_DbNewDoubleObj, /* 24 */
+    Tcl_DbNewListObj, /* 25 */
+    Tcl_DbNewLongObj, /* 26 */
+    Tcl_DbNewObj, /* 27 */
+    Tcl_DbNewStringObj, /* 28 */
+    Tcl_DuplicateObj, /* 29 */
+    TclFreeObj, /* 30 */
+    Tcl_GetBoolean, /* 31 */
+    Tcl_GetBooleanFromObj, /* 32 */
+    Tcl_GetByteArrayFromObj, /* 33 */
+    Tcl_GetDouble, /* 34 */
+    Tcl_GetDoubleFromObj, /* 35 */
+    Tcl_GetIndexFromObj, /* 36 */
+    Tcl_GetInt, /* 37 */
+    Tcl_GetIntFromObj, /* 38 */
+    Tcl_GetLongFromObj, /* 39 */
+    Tcl_GetObjType, /* 40 */
+    Tcl_GetStringFromObj, /* 41 */
+    Tcl_InvalidateStringRep, /* 42 */
+    Tcl_ListObjAppendList, /* 43 */
+    Tcl_ListObjAppendElement, /* 44 */
+    Tcl_ListObjGetElements, /* 45 */
+    Tcl_ListObjIndex, /* 46 */
+    Tcl_ListObjLength, /* 47 */
+    Tcl_ListObjReplace, /* 48 */
+    Tcl_NewBooleanObj, /* 49 */
+    Tcl_NewByteArrayObj, /* 50 */
+    Tcl_NewDoubleObj, /* 51 */
+    Tcl_NewIntObj, /* 52 */
+    Tcl_NewListObj, /* 53 */
+    Tcl_NewLongObj, /* 54 */
+    Tcl_NewObj, /* 55 */
+    Tcl_NewStringObj, /* 56 */
+    Tcl_SetBooleanObj, /* 57 */
+    Tcl_SetByteArrayLength, /* 58 */
+    Tcl_SetByteArrayObj, /* 59 */
+    Tcl_SetDoubleObj, /* 60 */
+    Tcl_SetIntObj, /* 61 */
+    Tcl_SetListObj, /* 62 */
+    Tcl_SetLongObj, /* 63 */
+    Tcl_SetObjLength, /* 64 */
+    Tcl_SetStringObj, /* 65 */
+    Tcl_AddErrorInfo, /* 66 */
+    Tcl_AddObjErrorInfo, /* 67 */
+    Tcl_AllowExceptions, /* 68 */
+    Tcl_AppendElement, /* 69 */
+    Tcl_AppendResult, /* 70 */
+    Tcl_AsyncCreate, /* 71 */
+    Tcl_AsyncDelete, /* 72 */
+    Tcl_AsyncInvoke, /* 73 */
+    Tcl_AsyncMark, /* 74 */
+    Tcl_AsyncReady, /* 75 */
+    Tcl_BackgroundError, /* 76 */
+    Tcl_Backslash, /* 77 */
+    Tcl_BadChannelOption, /* 78 */
+    Tcl_CallWhenDeleted, /* 79 */
+    Tcl_CancelIdleCall, /* 80 */
+    Tcl_Close, /* 81 */
+    Tcl_CommandComplete, /* 82 */
+    Tcl_Concat, /* 83 */
+    Tcl_ConvertElement, /* 84 */
+    Tcl_ConvertCountedElement, /* 85 */
+    Tcl_CreateAlias, /* 86 */
+    Tcl_CreateAliasObj, /* 87 */
+    Tcl_CreateChannel, /* 88 */
+    Tcl_CreateChannelHandler, /* 89 */
+    Tcl_CreateCloseHandler, /* 90 */
+    Tcl_CreateCommand, /* 91 */
+    Tcl_CreateEventSource, /* 92 */
+    Tcl_CreateExitHandler, /* 93 */
+    Tcl_CreateInterp, /* 94 */
+    Tcl_CreateMathFunc, /* 95 */
+    Tcl_CreateObjCommand, /* 96 */
+    Tcl_CreateSlave, /* 97 */
+    Tcl_CreateTimerHandler, /* 98 */
+    Tcl_CreateTrace, /* 99 */
+    Tcl_DeleteAssocData, /* 100 */
+    Tcl_DeleteChannelHandler, /* 101 */
+    Tcl_DeleteCloseHandler, /* 102 */
+    Tcl_DeleteCommand, /* 103 */
+    Tcl_DeleteCommandFromToken, /* 104 */
+    Tcl_DeleteEvents, /* 105 */
+    Tcl_DeleteEventSource, /* 106 */
+    Tcl_DeleteExitHandler, /* 107 */
+    Tcl_DeleteHashEntry, /* 108 */
+    Tcl_DeleteHashTable, /* 109 */
+    Tcl_DeleteInterp, /* 110 */
+    Tcl_DetachPids, /* 111 */
+    Tcl_DeleteTimerHandler, /* 112 */
+    Tcl_DeleteTrace, /* 113 */
+    Tcl_DontCallWhenDeleted, /* 114 */
+    Tcl_DoOneEvent, /* 115 */
+    Tcl_DoWhenIdle, /* 116 */
+    Tcl_DStringAppend, /* 117 */
+    Tcl_DStringAppendElement, /* 118 */
+    Tcl_DStringEndSublist, /* 119 */
+    Tcl_DStringFree, /* 120 */
+    Tcl_DStringGetResult, /* 121 */
+    Tcl_DStringInit, /* 122 */
+    Tcl_DStringResult, /* 123 */
+    Tcl_DStringSetLength, /* 124 */
+    Tcl_DStringStartSublist, /* 125 */
+    Tcl_Eof, /* 126 */
+    Tcl_ErrnoId, /* 127 */
+    Tcl_ErrnoMsg, /* 128 */
+    Tcl_Eval, /* 129 */
+    Tcl_EvalFile, /* 130 */
+    Tcl_EvalObj, /* 131 */
+    Tcl_EventuallyFree, /* 132 */
+    Tcl_Exit, /* 133 */
+    Tcl_ExposeCommand, /* 134 */
+    Tcl_ExprBoolean, /* 135 */
+    Tcl_ExprBooleanObj, /* 136 */
+    Tcl_ExprDouble, /* 137 */
+    Tcl_ExprDoubleObj, /* 138 */
+    Tcl_ExprLong, /* 139 */
+    Tcl_ExprLongObj, /* 140 */
+    Tcl_ExprObj, /* 141 */
+    Tcl_ExprString, /* 142 */
+    Tcl_Finalize, /* 143 */
+    Tcl_FindExecutable, /* 144 */
+    Tcl_FirstHashEntry, /* 145 */
+    Tcl_Flush, /* 146 */
+    Tcl_FreeResult, /* 147 */
+    Tcl_GetAlias, /* 148 */
+    Tcl_GetAliasObj, /* 149 */
+    Tcl_GetAssocData, /* 150 */
+    Tcl_GetChannel, /* 151 */
+    Tcl_GetChannelBufferSize, /* 152 */
+    Tcl_GetChannelHandle, /* 153 */
+    Tcl_GetChannelInstanceData, /* 154 */
+    Tcl_GetChannelMode, /* 155 */
+    Tcl_GetChannelName, /* 156 */
+    Tcl_GetChannelOption, /* 157 */
+    Tcl_GetChannelType, /* 158 */
+    Tcl_GetCommandInfo, /* 159 */
+    Tcl_GetCommandName, /* 160 */
+    Tcl_GetErrno, /* 161 */
+    Tcl_GetHostName, /* 162 */
+    Tcl_GetInterpPath, /* 163 */
+    Tcl_GetMaster, /* 164 */
+    Tcl_GetNameOfExecutable, /* 165 */
+    Tcl_GetObjResult, /* 166 */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    Tcl_GetOpenFile, /* 167 */
+#endif /* UNIX */
+#ifdef __WIN32__
+    NULL, /* 167 */
+#endif /* __WIN32__ */
+#ifdef MAC_TCL
+    NULL, /* 167 */
+#endif /* MAC_TCL */
+    Tcl_GetPathType, /* 168 */
+    Tcl_Gets, /* 169 */
+    Tcl_GetsObj, /* 170 */
+    Tcl_GetServiceMode, /* 171 */
+    Tcl_GetSlave, /* 172 */
+    Tcl_GetStdChannel, /* 173 */
+    Tcl_GetStringResult, /* 174 */
+    Tcl_GetVar, /* 175 */
+    Tcl_GetVar2, /* 176 */
+    Tcl_GlobalEval, /* 177 */
+    Tcl_GlobalEvalObj, /* 178 */
+    Tcl_HideCommand, /* 179 */
+    Tcl_Init, /* 180 */
+    Tcl_InitHashTable, /* 181 */
+    Tcl_InputBlocked, /* 182 */
+    Tcl_InputBuffered, /* 183 */
+    Tcl_InterpDeleted, /* 184 */
+    Tcl_IsSafe, /* 185 */
+    Tcl_JoinPath, /* 186 */
+    Tcl_LinkVar, /* 187 */
+    NULL, /* 188 */
+    Tcl_MakeFileChannel, /* 189 */
+    Tcl_MakeSafe, /* 190 */
+    Tcl_MakeTcpClientChannel, /* 191 */
+    Tcl_Merge, /* 192 */
+    Tcl_NextHashEntry, /* 193 */
+    Tcl_NotifyChannel, /* 194 */
+    Tcl_ObjGetVar2, /* 195 */
+    Tcl_ObjSetVar2, /* 196 */
+    Tcl_OpenCommandChannel, /* 197 */
+    Tcl_OpenFileChannel, /* 198 */
+    Tcl_OpenTcpClient, /* 199 */
+    Tcl_OpenTcpServer, /* 200 */
+    Tcl_Preserve, /* 201 */
+    Tcl_PrintDouble, /* 202 */
+    Tcl_PutEnv, /* 203 */
+    Tcl_PosixError, /* 204 */
+    Tcl_QueueEvent, /* 205 */
+    Tcl_Read, /* 206 */
+    Tcl_ReapDetachedProcs, /* 207 */
+    Tcl_RecordAndEval, /* 208 */
+    Tcl_RecordAndEvalObj, /* 209 */
+    Tcl_RegisterChannel, /* 210 */
+    Tcl_RegisterObjType, /* 211 */
+    Tcl_RegExpCompile, /* 212 */
+    Tcl_RegExpExec, /* 213 */
+    Tcl_RegExpMatch, /* 214 */
+    Tcl_RegExpRange, /* 215 */
+    Tcl_Release, /* 216 */
+    Tcl_ResetResult, /* 217 */
+    Tcl_ScanElement, /* 218 */
+    Tcl_ScanCountedElement, /* 219 */
+    Tcl_Seek, /* 220 */
+    Tcl_ServiceAll, /* 221 */
+    Tcl_ServiceEvent, /* 222 */
+    Tcl_SetAssocData, /* 223 */
+    Tcl_SetChannelBufferSize, /* 224 */
+    Tcl_SetChannelOption, /* 225 */
+    Tcl_SetCommandInfo, /* 226 */
+    Tcl_SetErrno, /* 227 */
+    Tcl_SetErrorCode, /* 228 */
+    Tcl_SetMaxBlockTime, /* 229 */
+    Tcl_SetPanicProc, /* 230 */
+    Tcl_SetRecursionLimit, /* 231 */
+    Tcl_SetResult, /* 232 */
+    Tcl_SetServiceMode, /* 233 */
+    Tcl_SetObjErrorCode, /* 234 */
     Tcl_SetObjResult, /* 235 */
-    Tcl_SetPanicProc, /* 236 */
-    Tcl_SetRecursionLimit, /* 237 */
-    Tcl_SetResult, /* 238 */
-    Tcl_SetServiceMode, /* 239 */
-    Tcl_SetStdChannel, /* 240 */
-    Tcl_SetStringObj, /* 241 */
-    Tcl_SetTimer, /* 242 */
-    Tcl_SetVar, /* 243 */
-    Tcl_SetVar2, /* 244 */
-    Tcl_SignalId, /* 245 */
-    Tcl_SignalMsg, /* 246 */
-    Tcl_Sleep, /* 247 */
-    Tcl_SourceRCFile, /* 248 */
-    Tcl_SplitList, /* 249 */
-    Tcl_SplitPath, /* 250 */
-    Tcl_StaticPackage, /* 251 */
-    Tcl_StringMatch, /* 252 */
-    Tcl_Tell, /* 253 */
-    Tcl_TraceVar, /* 254 */
-    Tcl_TraceVar2, /* 255 */
-    Tcl_TranslateFileName, /* 256 */
-    Tcl_Ungets, /* 257 */
-    Tcl_UnlinkVar, /* 258 */
-    Tcl_UnregisterChannel, /* 259 */
-    Tcl_UnsetVar, /* 260 */
-    Tcl_UnsetVar2, /* 261 */
-    Tcl_UntraceVar, /* 262 */
-    Tcl_UntraceVar2, /* 263 */
-    Tcl_UpdateLinkedVar, /* 264 */
-    Tcl_UpVar, /* 265 */
-    Tcl_UpVar2, /* 266 */
-    Tcl_ValidateAllMemory, /* 267 */
-    Tcl_VarEval, /* 268 */
-    Tcl_VarEvalVA, /* 269 */
-    Tcl_VarTraceInfo, /* 270 */
-    Tcl_VarTraceInfo2, /* 271 */
-    Tcl_WaitForEvent, /* 272 */
-    Tcl_WaitPid, /* 273 */
-    Tcl_Write, /* 274 */
-    Tcl_WrongNumArgs, /* 275 */
-    Tcl_AppendObjToObj, /* 276 */
-    Tcl_AlertNotifier, /* 277 */
-    Tcl_CreateEncoding, /* 278 */
-    Tcl_CreateThreadExitHandler, /* 279 */
-    Tcl_DeleteThreadExitHandler, /* 280 */
-    Tcl_DiscardResult, /* 281 */
-    Tcl_EvalEx, /* 282 */
-    Tcl_EvalObjv, /* 283 */
-    Tcl_EvalObjEx, /* 284 */
-    Tcl_ExitThread, /* 285 */
-    Tcl_ExternalToUtf, /* 286 */
-    Tcl_ExternalToUtfDString, /* 287 */
-    Tcl_FinalizeThread, /* 288 */
-    Tcl_FinalizeNotifier, /* 289 */
-    Tcl_FreeEncoding, /* 290 */
-    Tcl_GetCurrentThread, /* 291 */
-    Tcl_GetEncoding, /* 292 */
-    Tcl_GetEncodingName, /* 293 */
-    Tcl_GetEncodingNames, /* 294 */
-    Tcl_GetIndexFromObjStruct, /* 295 */
-    Tcl_GetThreadData, /* 296 */
-    Tcl_GetVar2Ex, /* 297 */
-    Tcl_InitNotifier, /* 298 */
-    Tcl_MutexLock, /* 299 */
-    Tcl_MutexUnlock, /* 300 */
-    Tcl_ConditionNotify, /* 301 */
-    Tcl_ConditionWait, /* 302 */
-    Tcl_NumUtfChars, /* 303 */
-    Tcl_ReadChars, /* 304 */
-    Tcl_RestoreResult, /* 305 */
-    Tcl_SaveResult, /* 306 */
-    Tcl_SetSystemEncoding, /* 307 */
-    Tcl_SetVar2Ex, /* 308 */
-    Tcl_ThreadAlert, /* 309 */
-    Tcl_ThreadQueueEvent, /* 310 */
-    Tcl_UniCharAtIndex, /* 311 */
-    Tcl_UniCharToLower, /* 312 */
-    Tcl_UniCharToTitle, /* 313 */
-    Tcl_UniCharToUpper, /* 314 */
-    Tcl_UniCharToUtf, /* 315 */
-    Tcl_UtfAtIndex, /* 316 */
-    Tcl_UtfCharComplete, /* 317 */
-    Tcl_UtfBackslash, /* 318 */
-    Tcl_UtfFindFirst, /* 319 */
-    Tcl_UtfFindLast, /* 320 */
-    NULL, /* 321 */
-    NULL, /* 322 */
-    Tcl_UtfNext, /* 323 */
-    Tcl_UtfPrev, /* 324 */
-    Tcl_UtfToExternal, /* 325 */
-    Tcl_UtfToExternalDString, /* 326 */
-    Tcl_UtfToLower, /* 327 */
-    Tcl_UtfToTitle, /* 328 */
-    Tcl_UtfToUniChar, /* 329 */
-    Tcl_UtfToUpper, /* 330 */
-    Tcl_WriteChars, /* 331 */
-    Tcl_WriteObj, /* 332 */
+    Tcl_SetStdChannel, /* 236 */
+    Tcl_SetVar, /* 237 */
+    Tcl_SetVar2, /* 238 */
+    Tcl_SignalId, /* 239 */
+    Tcl_SignalMsg, /* 240 */
+    Tcl_SourceRCFile, /* 241 */
+    Tcl_SplitList, /* 242 */
+    Tcl_SplitPath, /* 243 */
+    Tcl_StaticPackage, /* 244 */
+    Tcl_StringMatch, /* 245 */
+    Tcl_Tell, /* 246 */
+    Tcl_TraceVar, /* 247 */
+    Tcl_TraceVar2, /* 248 */
+    Tcl_TranslateFileName, /* 249 */
+    Tcl_Ungets, /* 250 */
+    Tcl_UnlinkVar, /* 251 */
+    Tcl_UnregisterChannel, /* 252 */
+    Tcl_UnsetVar, /* 253 */
+    Tcl_UnsetVar2, /* 254 */
+    Tcl_UntraceVar, /* 255 */
+    Tcl_UntraceVar2, /* 256 */
+    Tcl_UpdateLinkedVar, /* 257 */
+    Tcl_UpVar, /* 258 */
+    Tcl_UpVar2, /* 259 */
+    Tcl_VarEval, /* 260 */
+    Tcl_VarTraceInfo, /* 261 */
+    Tcl_VarTraceInfo2, /* 262 */
+    Tcl_Write, /* 263 */
+    Tcl_WrongNumArgs, /* 264 */
+    Tcl_DumpActiveMemory, /* 265 */
+    Tcl_ValidateAllMemory, /* 266 */
+    Tcl_AppendResultVA, /* 267 */
+    Tcl_AppendStringsToObjVA, /* 268 */
+    Tcl_HashStats, /* 269 */
+    Tcl_ParseVar, /* 270 */
+    Tcl_PkgPresent, /* 271 */
+    Tcl_PkgPresentEx, /* 272 */
+    Tcl_PkgProvide, /* 273 */
+    Tcl_PkgRequire, /* 274 */
+    Tcl_SetErrorCodeVA, /* 275 */
+    Tcl_VarEvalVA, /* 276 */
+    Tcl_WaitPid, /* 277 */
+    panicVA, /* 278 */
+    Tcl_AppendObjToObj, /* 279 */
+    Tcl_AlertNotifier, /* 280 */
+    Tcl_CreateEncoding, /* 281 */
+    Tcl_CreateThreadExitHandler, /* 282 */
+    Tcl_DeleteThreadExitHandler, /* 283 */
+    Tcl_DiscardResult, /* 284 */
+    Tcl_EvalEx, /* 285 */
+    Tcl_EvalObjv, /* 286 */
+    Tcl_EvalObjEx, /* 287 */
+    Tcl_ExitThread, /* 288 */
+    Tcl_ExternalToUtf, /* 289 */
+    Tcl_ExternalToUtfDString, /* 290 */
+    Tcl_FinalizeThread, /* 291 */
+    Tcl_FinalizeNotifier, /* 292 */
+    Tcl_FreeEncoding, /* 293 */
+    Tcl_GetCurrentThread, /* 294 */
+    Tcl_GetEncoding, /* 295 */
+    Tcl_GetEncodingName, /* 296 */
+    Tcl_GetEncodingNames, /* 297 */
+    Tcl_GetIndexFromObjStruct, /* 298 */
+    Tcl_GetThreadData, /* 299 */
+    Tcl_GetVar2Ex, /* 300 */
+    Tcl_InitNotifier, /* 301 */
+    Tcl_MutexLock, /* 302 */
+    Tcl_MutexUnlock, /* 303 */
+    Tcl_ConditionNotify, /* 304 */
+    Tcl_ConditionWait, /* 305 */
+    Tcl_NumUtfChars, /* 306 */
+    Tcl_ReadChars, /* 307 */
+    Tcl_RestoreResult, /* 308 */
+    Tcl_SaveResult, /* 309 */
+    Tcl_SetSystemEncoding, /* 310 */
+    Tcl_SetVar2Ex, /* 311 */
+    Tcl_ThreadAlert, /* 312 */
+    Tcl_ThreadQueueEvent, /* 313 */
+    Tcl_UniCharAtIndex, /* 314 */
+    Tcl_UniCharToLower, /* 315 */
+    Tcl_UniCharToTitle, /* 316 */
+    Tcl_UniCharToUpper, /* 317 */
+    Tcl_UniCharToUtf, /* 318 */
+    Tcl_UtfAtIndex, /* 319 */
+    Tcl_UtfCharComplete, /* 320 */
+    Tcl_UtfBackslash, /* 321 */
+    Tcl_UtfFindFirst, /* 322 */
+    Tcl_UtfFindLast, /* 323 */
+    Tcl_UtfNext, /* 324 */
+    Tcl_UtfPrev, /* 325 */
+    Tcl_UtfToExternal, /* 326 */
+    Tcl_UtfToExternalDString, /* 327 */
+    Tcl_UtfToLower, /* 328 */
+    Tcl_UtfToTitle, /* 329 */
+    Tcl_UtfToUniChar, /* 330 */
+    Tcl_UtfToUpper, /* 331 */
+    Tcl_WriteChars, /* 332 */
+    Tcl_WriteObj, /* 333 */
 };
 
 TclStubs *tclStubsPtr = &tclStubs;
@@ -517,25 +542,15 @@ TclIntStubs tclIntStubs = {
     Tcl_PushCallFrame, /* 129 */
     Tcl_RemoveInterpResolvers, /* 130 */
     Tcl_SetNamespaceResolvers, /* 131 */
-    NULL, /* 132 */
-    NULL, /* 133 */
-    NULL, /* 134 */
-    NULL, /* 135 */
-    NULL, /* 136 */
-    NULL, /* 137 */
-    NULL, /* 138 */
-    NULL, /* 139 */
-    NULL, /* 140 */
-    NULL, /* 141 */
-    TclpHasSockets, /* 142 */
-    TclpGetDate, /* 143 */
-    TclpStrftime, /* 144 */
-    TclpCheckStackSpace, /* 145 */
-    Tcl_GetString, /* 146 */
-    TclpChdir, /* 147 */
-    TclGetEnv, /* 148 */
-    TclpLoadFile, /* 149 */
-    TclLooksLikeInt, /* 150 */
+    TclpHasSockets, /* 132 */
+    TclpGetDate, /* 133 */
+    TclpStrftime, /* 134 */
+    TclpCheckStackSpace, /* 135 */
+    Tcl_GetString, /* 136 */
+    TclpChdir, /* 137 */
+    TclGetEnv, /* 138 */
+    TclpLoadFile, /* 139 */
+    TclLooksLikeInt, /* 140 */
 };
 
 TclIntStubs *tclIntStubsPtr = &tclIntStubs;
@@ -543,6 +558,18 @@ TclIntStubs *tclIntStubsPtr = &tclIntStubs;
 TclIntPlatStubs tclIntPlatStubs = {
     TCL_STUB_MAGIC,
     NULL,
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+    TclGetAndDetachPids, /* 0 */
+    TclpCloseFile, /* 1 */
+    TclpCreateCommandChannel, /* 2 */
+    TclpCreatePipe, /* 3 */
+    TclpCreateProcess, /* 4 */
+    NULL, /* 5 */
+    TclpMakeFile, /* 6 */
+    TclpOpenFile, /* 7 */
+    TclUnixWaitForFile, /* 8 */
+    TclpCreateTempFile, /* 9 */
+#endif /* UNIX */
 #ifdef __WIN32__
     TclWinConvertError, /* 0 */
     TclWinConvertWSAError, /* 1 */
@@ -566,19 +593,10 @@ TclIntPlatStubs tclIntPlatStubs = {
     TclpOpenFile, /* 19 */
     TclpCreateTempFile, /* 20 */
     TclpGetTZName, /* 21 */
+    TclWinNoBackslash, /* 22 */
+    Tcl_WinUtfToTChar, /* 23 */
+    Tcl_WinTCharToUtf, /* 24 */
 #endif /* __WIN32__ */
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-    TclGetAndDetachPids, /* 0 */
-    TclpCloseFile, /* 1 */
-    TclpCreateCommandChannel, /* 2 */
-    TclpCreatePipe, /* 3 */
-    TclpCreateProcess, /* 4 */
-    NULL, /* 5 */
-    TclpMakeFile, /* 6 */
-    TclpOpenFile, /* 7 */
-    TclUnixWaitForFile, /* 8 */
-    TclpCreateTempFile, /* 9 */
-#endif /* UNIX */
 #ifdef MAC_TCL
     TclpSysAlloc, /* 0 */
     TclpSysFree, /* 1 */
@@ -614,11 +632,6 @@ TclIntPlatStubs *tclIntPlatStubsPtr = &tclIntPlatStubs;
 TclPlatStubs tclPlatStubs = {
     TCL_STUB_MAGIC,
     NULL,
-#if !defined(__WIN32__) && !defined(MAC_TCL)
-    Tcl_CreateFileHandler, /* 0 */
-    Tcl_DeleteFileHandler, /* 1 */
-    Tcl_GetOpenFile, /* 2 */
-#endif /* UNIX */
 #ifdef MAC_TCL
     Tcl_MacSetEventProc, /* 0 */
     Tcl_MacConvertTextResource, /* 1 */
diff --git a/generic/tclStubs.c b/generic/tclStubs.c
index a1884c0..740c9ad 100644
--- a/generic/tclStubs.c
+++ b/generic/tclStubs.c
@@ -9,7 +9,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclStubs.c,v 1.2.4.1 1999/03/08 20:14:12 stanton Exp $
+ * RCS: @(#) $Id: tclStubs.c,v 1.2.4.2 1999/03/10 06:41:52 stanton Exp $
  */
 
 #include "tcl.h"
@@ -52,25 +52,42 @@
  */
 
 /* Slot 0 */
-void
-Tcl_AddErrorInfo(interp, message)
+int
+Tcl_PkgProvideEx(interp, name, version, clientData)
     Tcl_Interp * interp;
-    CONST char * message;
+    char * name;
+    char * version;
+    ClientData clientData;
 {
-    (tclStubsPtr->tcl_AddErrorInfo)(interp, message);
+    return (tclStubsPtr->tcl_PkgProvideEx)(interp, name, version, clientData);
 }
 
 /* Slot 1 */
-void
-Tcl_AddObjErrorInfo(interp, message, length)
+char *
+Tcl_PkgRequireEx(interp, name, version, exact, clientDataPtr)
     Tcl_Interp * interp;
-    CONST char * message;
-    int length;
+    char * name;
+    char * version;
+    int exact;
+    ClientData * clientDataPtr;
 {
-    (tclStubsPtr->tcl_AddObjErrorInfo)(interp, message, length);
+    return (tclStubsPtr->tcl_PkgRequireEx)(interp, name, version, exact, clientDataPtr);
 }
 
 /* Slot 2 */
+void
+panic TCL_VARARGS_DEF(char *,format)
+{
+    char * var;
+    va_list argList;
+
+    var = (char *) TCL_VARARGS_START(char *,format,argList);
+
+    (tclStubsPtr->panicVA)(var, argList);
+    va_end(argList);
+}
+
+/* Slot 3 */
 char *
 Tcl_Alloc(size)
     unsigned int size;
@@ -78,15 +95,102 @@ Tcl_Alloc(size)
     return (tclStubsPtr->tcl_Alloc)(size);
 }
 
-/* Slot 3 */
+/* Slot 4 */
 void
-Tcl_AllowExceptions(interp)
-    Tcl_Interp * interp;
+Tcl_Free(ptr)
+    char * ptr;
 {
-    (tclStubsPtr->tcl_AllowExceptions)(interp);
+    (tclStubsPtr->tcl_Free)(ptr);
 }
 
-/* Slot 4 */
+/* Slot 5 */
+char *
+Tcl_Realloc(ptr, size)
+    char * ptr;
+    unsigned int size;
+{
+    return (tclStubsPtr->tcl_Realloc)(ptr, size);
+}
+
+/* Slot 6 */
+char *
+Tcl_DbCkalloc(size, file, line)
+    unsigned int size;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbCkalloc)(size, file, line);
+}
+
+/* Slot 7 */
+int
+Tcl_DbCkfree(ptr, file, line)
+    char * ptr;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbCkfree)(ptr, file, line);
+}
+
+/* Slot 8 */
+char *
+Tcl_DbCkrealloc(ptr, size, file, line)
+    char * ptr;
+    unsigned int size;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbCkrealloc)(ptr, size, file, line);
+}
+
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+/* Slot 9 */
+void
+Tcl_CreateFileHandler(fd, mask, proc, clientData)
+    int fd;
+    int mask;
+    Tcl_FileProc * proc;
+    ClientData clientData;
+{
+    (tclStubsPtr->tcl_CreateFileHandler)(fd, mask, proc, clientData);
+}
+
+#endif /* UNIX */
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+/* Slot 10 */
+void
+Tcl_DeleteFileHandler(fd)
+    int fd;
+{
+    (tclStubsPtr->tcl_DeleteFileHandler)(fd);
+}
+
+#endif /* UNIX */
+/* Slot 11 */
+void
+Tcl_SetTimer(timePtr)
+    Tcl_Time * timePtr;
+{
+    (tclStubsPtr->tcl_SetTimer)(timePtr);
+}
+
+/* Slot 12 */
+void
+Tcl_Sleep(ms)
+    int ms;
+{
+    (tclStubsPtr->tcl_Sleep)(ms);
+}
+
+/* Slot 13 */
+int
+Tcl_WaitForEvent(timePtr)
+    Tcl_Time * timePtr;
+{
+    return (tclStubsPtr->tcl_WaitForEvent)(timePtr);
+}
+
+/* Slot 14 */
 int
 Tcl_AppendAllObjTypes(interp, objPtr)
     Tcl_Interp * interp;
@@ -95,70 +199,548 @@ Tcl_AppendAllObjTypes(interp, objPtr)
     return (tclStubsPtr->tcl_AppendAllObjTypes)(interp, objPtr);
 }
 
-/* Slot 5 */
+/* Slot 15 */
 void
-Tcl_AppendElement(interp, str)
+Tcl_AppendStringsToObj TCL_VARARGS_DEF(Tcl_Obj *,objPtr)
+{
+    Tcl_Obj * var;
+    va_list argList;
+
+    var = (Tcl_Obj *) TCL_VARARGS_START(Tcl_Obj *,objPtr,argList);
+
+    (tclStubsPtr->tcl_AppendStringsToObjVA)(var, argList);
+    va_end(argList);
+}
+
+/* Slot 16 */
+void
+Tcl_AppendToObj(objPtr, bytes, length)
+    Tcl_Obj * objPtr;
+    char * bytes;
+    int length;
+{
+    (tclStubsPtr->tcl_AppendToObj)(objPtr, bytes, length);
+}
+
+/* Slot 17 */
+Tcl_Obj *
+Tcl_ConcatObj(objc, objv)
+    int objc;
+    Tcl_Obj *CONST objv[];
+{
+    return (tclStubsPtr->tcl_ConcatObj)(objc, objv);
+}
+
+/* Slot 18 */
+int
+Tcl_ConvertToType(interp, objPtr, typePtr)
     Tcl_Interp * interp;
-    CONST char * str;
+    Tcl_Obj * objPtr;
+    Tcl_ObjType * typePtr;
 {
-    (tclStubsPtr->tcl_AppendElement)(interp, str);
+    return (tclStubsPtr->tcl_ConvertToType)(interp, objPtr, typePtr);
 }
 
-/* Slot 6 */
+/* Slot 19 */
 void
-Tcl_AppendResult TCL_VARARGS_DEF(Tcl_Interp *,interp)
+Tcl_DbDecrRefCount(objPtr, file, line)
+    Tcl_Obj * objPtr;
+    char * file;
+    int line;
 {
-    Tcl_Interp * var;
-    va_list argList;
+    (tclStubsPtr->tcl_DbDecrRefCount)(objPtr, file, line);
+}
 
-    var = (Tcl_Interp *) TCL_VARARGS_START(Tcl_Interp *,interp,argList);
+/* Slot 20 */
+void
+Tcl_DbIncrRefCount(objPtr, file, line)
+    Tcl_Obj * objPtr;
+    char * file;
+    int line;
+{
+    (tclStubsPtr->tcl_DbIncrRefCount)(objPtr, file, line);
+}
 
-    (tclStubsPtr->tcl_AppendResultVA)(var, argList);
-    va_end(argList);
+/* Slot 21 */
+int
+Tcl_DbIsShared(objPtr, file, line)
+    Tcl_Obj * objPtr;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbIsShared)(objPtr, file, line);
 }
 
-/* Slot 7 */
+/* Slot 22 */
+Tcl_Obj *
+Tcl_DbNewBooleanObj(boolValue, file, line)
+    int boolValue;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbNewBooleanObj)(boolValue, file, line);
+}
+
+/* Slot 23 */
+Tcl_Obj *
+Tcl_DbNewByteArrayObj(bytes, length, file, line)
+    unsigned char * bytes;
+    int length;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbNewByteArrayObj)(bytes, length, file, line);
+}
+
+/* Slot 24 */
+Tcl_Obj *
+Tcl_DbNewDoubleObj(doubleValue, file, line)
+    double doubleValue;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbNewDoubleObj)(doubleValue, file, line);
+}
+
+/* Slot 25 */
+Tcl_Obj *
+Tcl_DbNewListObj(objc, objv, file, line)
+    int objc;
+    Tcl_Obj *CONST objv[];
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbNewListObj)(objc, objv, file, line);
+}
+
+/* Slot 26 */
+Tcl_Obj *
+Tcl_DbNewLongObj(longValue, file, line)
+    long longValue;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbNewLongObj)(longValue, file, line);
+}
+
+/* Slot 27 */
+Tcl_Obj *
+Tcl_DbNewObj(file, line)
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbNewObj)(file, line);
+}
+
+/* Slot 28 */
+Tcl_Obj *
+Tcl_DbNewStringObj(bytes, length, file, line)
+    CONST char * bytes;
+    int length;
+    char * file;
+    int line;
+{
+    return (tclStubsPtr->tcl_DbNewStringObj)(bytes, length, file, line);
+}
+
+/* Slot 29 */
+Tcl_Obj *
+Tcl_DuplicateObj(objPtr)
+    Tcl_Obj * objPtr;
+{
+    return (tclStubsPtr->tcl_DuplicateObj)(objPtr);
+}
+
+/* Slot 30 */
 void
-Tcl_AppendResultVA(interp, argList)
+TclFreeObj(objPtr)
+    Tcl_Obj * objPtr;
+{
+    (tclStubsPtr->tclFreeObj)(objPtr);
+}
+
+/* Slot 31 */
+int
+Tcl_GetBoolean(interp, string, boolPtr)
     Tcl_Interp * interp;
-    va_list argList;
+    char * string;
+    int * boolPtr;
 {
-    (tclStubsPtr->tcl_AppendResultVA)(interp, argList);
+    return (tclStubsPtr->tcl_GetBoolean)(interp, string, boolPtr);
 }
 
-/* Slot 8 */
+/* Slot 32 */
+int
+Tcl_GetBooleanFromObj(interp, objPtr, boolPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * objPtr;
+    int * boolPtr;
+{
+    return (tclStubsPtr->tcl_GetBooleanFromObj)(interp, objPtr, boolPtr);
+}
+
+/* Slot 33 */
+unsigned char *
+Tcl_GetByteArrayFromObj(objPtr, lengthPtr)
+    Tcl_Obj * objPtr;
+    int * lengthPtr;
+{
+    return (tclStubsPtr->tcl_GetByteArrayFromObj)(objPtr, lengthPtr);
+}
+
+/* Slot 34 */
+int
+Tcl_GetDouble(interp, string, doublePtr)
+    Tcl_Interp * interp;
+    char * string;
+    double * doublePtr;
+{
+    return (tclStubsPtr->tcl_GetDouble)(interp, string, doublePtr);
+}
+
+/* Slot 35 */
+int
+Tcl_GetDoubleFromObj(interp, objPtr, doublePtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * objPtr;
+    double * doublePtr;
+{
+    return (tclStubsPtr->tcl_GetDoubleFromObj)(interp, objPtr, doublePtr);
+}
+
+/* Slot 36 */
+int
+Tcl_GetIndexFromObj(interp, objPtr, tablePtr, msg, flags, indexPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * objPtr;
+    char ** tablePtr;
+    char * msg;
+    int flags;
+    int * indexPtr;
+{
+    return (tclStubsPtr->tcl_GetIndexFromObj)(interp, objPtr, tablePtr, msg, flags, indexPtr);
+}
+
+/* Slot 37 */
+int
+Tcl_GetInt(interp, string, intPtr)
+    Tcl_Interp * interp;
+    char * string;
+    int * intPtr;
+{
+    return (tclStubsPtr->tcl_GetInt)(interp, string, intPtr);
+}
+
+/* Slot 38 */
+int
+Tcl_GetIntFromObj(interp, objPtr, intPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * objPtr;
+    int * intPtr;
+{
+    return (tclStubsPtr->tcl_GetIntFromObj)(interp, objPtr, intPtr);
+}
+
+/* Slot 39 */
+int
+Tcl_GetLongFromObj(interp, objPtr, longPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * objPtr;
+    long * longPtr;
+{
+    return (tclStubsPtr->tcl_GetLongFromObj)(interp, objPtr, longPtr);
+}
+
+/* Slot 40 */
+Tcl_ObjType *
+Tcl_GetObjType(typeName)
+    char * typeName;
+{
+    return (tclStubsPtr->tcl_GetObjType)(typeName);
+}
+
+/* Slot 41 */
+char *
+Tcl_GetStringFromObj(objPtr, lengthPtr)
+    Tcl_Obj * objPtr;
+    int * lengthPtr;
+{
+    return (tclStubsPtr->tcl_GetStringFromObj)(objPtr, lengthPtr);
+}
+
+/* Slot 42 */
 void
-Tcl_AppendToObj(objPtr, bytes, length)
+Tcl_InvalidateStringRep(objPtr)
     Tcl_Obj * objPtr;
-    char * bytes;
+{
+    (tclStubsPtr->tcl_InvalidateStringRep)(objPtr);
+}
+
+/* Slot 43 */
+int
+Tcl_ListObjAppendList(interp, listPtr, elemListPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * listPtr;
+    Tcl_Obj * elemListPtr;
+{
+    return (tclStubsPtr->tcl_ListObjAppendList)(interp, listPtr, elemListPtr);
+}
+
+/* Slot 44 */
+int
+Tcl_ListObjAppendElement(interp, listPtr, objPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * listPtr;
+    Tcl_Obj * objPtr;
+{
+    return (tclStubsPtr->tcl_ListObjAppendElement)(interp, listPtr, objPtr);
+}
+
+/* Slot 45 */
+int
+Tcl_ListObjGetElements(interp, listPtr, objcPtr, objvPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * listPtr;
+    int * objcPtr;
+    Tcl_Obj *** objvPtr;
+{
+    return (tclStubsPtr->tcl_ListObjGetElements)(interp, listPtr, objcPtr, objvPtr);
+}
+
+/* Slot 46 */
+int
+Tcl_ListObjIndex(interp, listPtr, index, objPtrPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * listPtr;
+    int index;
+    Tcl_Obj ** objPtrPtr;
+{
+    return (tclStubsPtr->tcl_ListObjIndex)(interp, listPtr, index, objPtrPtr);
+}
+
+/* Slot 47 */
+int
+Tcl_ListObjLength(interp, listPtr, intPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * listPtr;
+    int * intPtr;
+{
+    return (tclStubsPtr->tcl_ListObjLength)(interp, listPtr, intPtr);
+}
+
+/* Slot 48 */
+int
+Tcl_ListObjReplace(interp, listPtr, first, count, objc, objv)
+    Tcl_Interp * interp;
+    Tcl_Obj * listPtr;
+    int first;
+    int count;
+    int objc;
+    Tcl_Obj *CONST objv[];
+{
+    return (tclStubsPtr->tcl_ListObjReplace)(interp, listPtr, first, count, objc, objv);
+}
+
+/* Slot 49 */
+Tcl_Obj *
+Tcl_NewBooleanObj(boolValue)
+    int boolValue;
+{
+    return (tclStubsPtr->tcl_NewBooleanObj)(boolValue);
+}
+
+/* Slot 50 */
+Tcl_Obj *
+Tcl_NewByteArrayObj(bytes, length)
+    unsigned char * bytes;
     int length;
 {
-    (tclStubsPtr->tcl_AppendToObj)(objPtr, bytes, length);
+    return (tclStubsPtr->tcl_NewByteArrayObj)(bytes, length);
 }
 
-/* Slot 9 */
+/* Slot 51 */
+Tcl_Obj *
+Tcl_NewDoubleObj(doubleValue)
+    double doubleValue;
+{
+    return (tclStubsPtr->tcl_NewDoubleObj)(doubleValue);
+}
+
+/* Slot 52 */
+Tcl_Obj *
+Tcl_NewIntObj(intValue)
+    int intValue;
+{
+    return (tclStubsPtr->tcl_NewIntObj)(intValue);
+}
+
+/* Slot 53 */
+Tcl_Obj *
+Tcl_NewListObj(objc, objv)
+    int objc;
+    Tcl_Obj *CONST objv[];
+{
+    return (tclStubsPtr->tcl_NewListObj)(objc, objv);
+}
+
+/* Slot 54 */
+Tcl_Obj *
+Tcl_NewLongObj(longValue)
+    long longValue;
+{
+    return (tclStubsPtr->tcl_NewLongObj)(longValue);
+}
+
+/* Slot 55 */
+Tcl_Obj *
+Tcl_NewObj()
+{
+    return (tclStubsPtr->tcl_NewObj)();
+}
+
+/* Slot 56 */
+Tcl_Obj *
+Tcl_NewStringObj(bytes, length)
+    CONST char * bytes;
+    int length;
+{
+    return (tclStubsPtr->tcl_NewStringObj)(bytes, length);
+}
+
+/* Slot 57 */
 void
-Tcl_AppendStringsToObj TCL_VARARGS_DEF(Tcl_Obj *,objPtr)
+Tcl_SetBooleanObj(objPtr, boolValue)
+    Tcl_Obj * objPtr;
+    int boolValue;
 {
-    Tcl_Obj * var;
-    va_list argList;
+    (tclStubsPtr->tcl_SetBooleanObj)(objPtr, boolValue);
+}
 
-    var = (Tcl_Obj *) TCL_VARARGS_START(Tcl_Obj *,objPtr,argList);
+/* Slot 58 */
+unsigned char *
+Tcl_SetByteArrayLength(objPtr, length)
+    Tcl_Obj * objPtr;
+    int length;
+{
+    return (tclStubsPtr->tcl_SetByteArrayLength)(objPtr, length);
+}
 
-    (tclStubsPtr->tcl_AppendStringsToObjVA)(var, argList);
-    va_end(argList);
+/* Slot 59 */
+void
+Tcl_SetByteArrayObj(objPtr, bytes, length)
+    Tcl_Obj * objPtr;
+    unsigned char * bytes;
+    int length;
+{
+    (tclStubsPtr->tcl_SetByteArrayObj)(objPtr, bytes, length);
 }
 
-/* Slot 10 */
+/* Slot 60 */
 void
-Tcl_AppendStringsToObjVA(objPtr, argList)
+Tcl_SetDoubleObj(objPtr, doubleValue)
     Tcl_Obj * objPtr;
-    va_list argList;
+    double doubleValue;
 {
-    (tclStubsPtr->tcl_AppendStringsToObjVA)(objPtr, argList);
+    (tclStubsPtr->tcl_SetDoubleObj)(objPtr, doubleValue);
 }
 
-/* Slot 11 */
+/* Slot 61 */
+void
+Tcl_SetIntObj(objPtr, intValue)
+    Tcl_Obj * objPtr;
+    int intValue;
+{
+    (tclStubsPtr->tcl_SetIntObj)(objPtr, intValue);
+}
+
+/* Slot 62 */
+void
+Tcl_SetListObj(objPtr, objc, objv)
+    Tcl_Obj * objPtr;
+    int objc;
+    Tcl_Obj *CONST objv[];
+{
+    (tclStubsPtr->tcl_SetListObj)(objPtr, objc, objv);
+}
+
+/* Slot 63 */
+void
+Tcl_SetLongObj(objPtr, longValue)
+    Tcl_Obj * objPtr;
+    long longValue;
+{
+    (tclStubsPtr->tcl_SetLongObj)(objPtr, longValue);
+}
+
+/* Slot 64 */
+void
+Tcl_SetObjLength(objPtr, length)
+    Tcl_Obj * objPtr;
+    int length;
+{
+    (tclStubsPtr->tcl_SetObjLength)(objPtr, length);
+}
+
+/* Slot 65 */
+void
+Tcl_SetStringObj(objPtr, bytes, length)
+    Tcl_Obj * objPtr;
+    char * bytes;
+    int length;
+{
+    (tclStubsPtr->tcl_SetStringObj)(objPtr, bytes, length);
+}
+
+/* Slot 66 */
+void
+Tcl_AddErrorInfo(interp, message)
+    Tcl_Interp * interp;
+    CONST char * message;
+{
+    (tclStubsPtr->tcl_AddErrorInfo)(interp, message);
+}
+
+/* Slot 67 */
+void
+Tcl_AddObjErrorInfo(interp, message, length)
+    Tcl_Interp * interp;
+    CONST char * message;
+    int length;
+{
+    (tclStubsPtr->tcl_AddObjErrorInfo)(interp, message, length);
+}
+
+/* Slot 68 */
+void
+Tcl_AllowExceptions(interp)
+    Tcl_Interp * interp;
+{
+    (tclStubsPtr->tcl_AllowExceptions)(interp);
+}
+
+/* Slot 69 */
+void
+Tcl_AppendElement(interp, string)
+    Tcl_Interp * interp;
+    CONST char * string;
+{
+    (tclStubsPtr->tcl_AppendElement)(interp, string);
+}
+
+/* Slot 70 */
+void
+Tcl_AppendResult TCL_VARARGS_DEF(Tcl_Interp *,interp)
+{
+    Tcl_Interp * var;
+    va_list argList;
+
+    var = (Tcl_Interp *) TCL_VARARGS_START(Tcl_Interp *,interp,argList);
+
+    (tclStubsPtr->tcl_AppendResultVA)(var, argList);
+    va_end(argList);
+}
+
+/* Slot 71 */
 Tcl_AsyncHandler
 Tcl_AsyncCreate(proc, clientData)
     Tcl_AsyncProc * proc;
@@ -167,7 +749,7 @@ Tcl_AsyncCreate(proc, clientData)
     return (tclStubsPtr->tcl_AsyncCreate)(proc, clientData);
 }
 
-/* Slot 12 */
+/* Slot 72 */
 void
 Tcl_AsyncDelete(async)
     Tcl_AsyncHandler async;
@@ -175,7 +757,7 @@ Tcl_AsyncDelete(async)
     (tclStubsPtr->tcl_AsyncDelete)(async);
 }
 
-/* Slot 13 */
+/* Slot 73 */
 int
 Tcl_AsyncInvoke(interp, code)
     Tcl_Interp * interp;
@@ -184,7 +766,7 @@ Tcl_AsyncInvoke(interp, code)
     return (tclStubsPtr->tcl_AsyncInvoke)(interp, code);
 }
 
-/* Slot 14 */
+/* Slot 74 */
 void
 Tcl_AsyncMark(async)
     Tcl_AsyncHandler async;
@@ -192,14 +774,14 @@ Tcl_AsyncMark(async)
     (tclStubsPtr->tcl_AsyncMark)(async);
 }
 
-/* Slot 15 */
+/* Slot 75 */
 int
 Tcl_AsyncReady()
 {
     return (tclStubsPtr->tcl_AsyncReady)();
 }
 
-/* Slot 16 */
+/* Slot 76 */
 void
 Tcl_BackgroundError(interp)
     Tcl_Interp * interp;
@@ -207,7 +789,7 @@ Tcl_BackgroundError(interp)
     (tclStubsPtr->tcl_BackgroundError)(interp);
 }
 
-/* Slot 17 */
+/* Slot 77 */
 char
 Tcl_Backslash(src, readPtr)
     CONST char * src;
@@ -216,7 +798,7 @@ Tcl_Backslash(src, readPtr)
     return (tclStubsPtr->tcl_Backslash)(src, readPtr);
 }
 
-/* Slot 18 */
+/* Slot 78 */
 int
 Tcl_BadChannelOption(interp, optionName, optionList)
     Tcl_Interp * interp;
@@ -226,7 +808,7 @@ Tcl_BadChannelOption(interp, optionName, optionList)
     return (tclStubsPtr->tcl_BadChannelOption)(interp, optionName, optionList);
 }
 
-/* Slot 19 */
+/* Slot 79 */
 void
 Tcl_CallWhenDeleted(interp, proc, clientData)
     Tcl_Interp * interp;
@@ -236,7 +818,7 @@ Tcl_CallWhenDeleted(interp, proc, clientData)
     (tclStubsPtr->tcl_CallWhenDeleted)(interp, proc, clientData);
 }
 
-/* Slot 20 */
+/* Slot 80 */
 void
 Tcl_CancelIdleCall(idleProc, clientData)
     Tcl_IdleProc * idleProc;
@@ -245,7 +827,7 @@ Tcl_CancelIdleCall(idleProc, clientData)
     (tclStubsPtr->tcl_CancelIdleCall)(idleProc, clientData);
 }
 
-/* Slot 21 */
+/* Slot 81 */
 int
 Tcl_Close(interp, chan)
     Tcl_Interp * interp;
@@ -254,7 +836,7 @@ Tcl_Close(interp, chan)
     return (tclStubsPtr->tcl_Close)(interp, chan);
 }
 
-/* Slot 22 */
+/* Slot 82 */
 int
 Tcl_CommandComplete(cmd)
     char * cmd;
@@ -262,7 +844,7 @@ Tcl_CommandComplete(cmd)
     return (tclStubsPtr->tcl_CommandComplete)(cmd);
 }
 
-/* Slot 23 */
+/* Slot 83 */
 char *
 Tcl_Concat(argc, argv)
     int argc;
@@ -271,47 +853,28 @@ Tcl_Concat(argc, argv)
     return (tclStubsPtr->tcl_Concat)(argc, argv);
 }
 
-/* Slot 24 */
-Tcl_Obj *
-Tcl_ConcatObj(objc, objv)
-    int objc;
-    Tcl_Obj *CONST objv[];
-{
-    return (tclStubsPtr->tcl_ConcatObj)(objc, objv);
-}
-
-/* Slot 25 */
+/* Slot 84 */
 int
-Tcl_ConvertCountedElement(src, length, dst, flags)
+Tcl_ConvertElement(src, dst, flags)
     CONST char * src;
-    int length;
     char * dst;
     int flags;
 {
-    return (tclStubsPtr->tcl_ConvertCountedElement)(src, length, dst, flags);
+    return (tclStubsPtr->tcl_ConvertElement)(src, dst, flags);
 }
 
-/* Slot 26 */
+/* Slot 85 */
 int
-Tcl_ConvertElement(src, dst, flags)
+Tcl_ConvertCountedElement(src, length, dst, flags)
     CONST char * src;
+    int length;
     char * dst;
     int flags;
 {
-    return (tclStubsPtr->tcl_ConvertElement)(src, dst, flags);
-}
-
-/* Slot 27 */
-int
-Tcl_ConvertToType(interp, objPtr, typePtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * objPtr;
-    Tcl_ObjType * typePtr;
-{
-    return (tclStubsPtr->tcl_ConvertToType)(interp, objPtr, typePtr);
+    return (tclStubsPtr->tcl_ConvertCountedElement)(src, length, dst, flags);
 }
 
-/* Slot 28 */
+/* Slot 86 */
 int
 Tcl_CreateAlias(slave, slaveCmd, target, targetCmd, argc, argv)
     Tcl_Interp * slave;
@@ -324,7 +887,7 @@ Tcl_CreateAlias(slave, slaveCmd, target, targetCmd, argc, argv)
     return (tclStubsPtr->tcl_CreateAlias)(slave, slaveCmd, target, targetCmd, argc, argv);
 }
 
-/* Slot 29 */
+/* Slot 87 */
 int
 Tcl_CreateAliasObj(slave, slaveCmd, target, targetCmd, objc, objv)
     Tcl_Interp * slave;
@@ -337,7 +900,7 @@ Tcl_CreateAliasObj(slave, slaveCmd, target, targetCmd, objc, objv)
     return (tclStubsPtr->tcl_CreateAliasObj)(slave, slaveCmd, target, targetCmd, objc, objv);
 }
 
-/* Slot 30 */
+/* Slot 88 */
 Tcl_Channel
 Tcl_CreateChannel(typePtr, chanName, instanceData, mask)
     Tcl_ChannelType * typePtr;
@@ -348,7 +911,7 @@ Tcl_CreateChannel(typePtr, chanName, instanceData, mask)
     return (tclStubsPtr->tcl_CreateChannel)(typePtr, chanName, instanceData, mask);
 }
 
-/* Slot 31 */
+/* Slot 89 */
 void
 Tcl_CreateChannelHandler(chan, mask, proc, clientData)
     Tcl_Channel chan;
@@ -359,7 +922,7 @@ Tcl_CreateChannelHandler(chan, mask, proc, clientData)
     (tclStubsPtr->tcl_CreateChannelHandler)(chan, mask, proc, clientData);
 }
 
-/* Slot 32 */
+/* Slot 90 */
 void
 Tcl_CreateCloseHandler(chan, proc, clientData)
     Tcl_Channel chan;
@@ -369,7 +932,7 @@ Tcl_CreateCloseHandler(chan, proc, clientData)
     (tclStubsPtr->tcl_CreateCloseHandler)(chan, proc, clientData);
 }
 
-/* Slot 33 */
+/* Slot 91 */
 Tcl_Command
 Tcl_CreateCommand(interp, cmdName, proc, clientData, deleteProc)
     Tcl_Interp * interp;
@@ -381,7 +944,7 @@ Tcl_CreateCommand(interp, cmdName, proc, clientData, deleteProc)
     return (tclStubsPtr->tcl_CreateCommand)(interp, cmdName, proc, clientData, deleteProc);
 }
 
-/* Slot 34 */
+/* Slot 92 */
 void
 Tcl_CreateEventSource(setupProc, checkProc, clientData)
     Tcl_EventSetupProc * setupProc;
@@ -391,7 +954,7 @@ Tcl_CreateEventSource(setupProc, checkProc, clientData)
     (tclStubsPtr->tcl_CreateEventSource)(setupProc, checkProc, clientData);
 }
 
-/* Slot 35 */
+/* Slot 93 */
 void
 Tcl_CreateExitHandler(proc, clientData)
     Tcl_ExitProc * proc;
@@ -400,14 +963,14 @@ Tcl_CreateExitHandler(proc, clientData)
     (tclStubsPtr->tcl_CreateExitHandler)(proc, clientData);
 }
 
-/* Slot 36 */
+/* Slot 94 */
 Tcl_Interp *
 Tcl_CreateInterp()
 {
     return (tclStubsPtr->tcl_CreateInterp)();
 }
 
-/* Slot 37 */
+/* Slot 95 */
 void
 Tcl_CreateMathFunc(interp, name, numArgs, argTypes, proc, clientData)
     Tcl_Interp * interp;
@@ -420,7 +983,7 @@ Tcl_CreateMathFunc(interp, name, numArgs, argTypes, proc, clientData)
     (tclStubsPtr->tcl_CreateMathFunc)(interp, name, numArgs, argTypes, proc, clientData);
 }
 
-/* Slot 38 */
+/* Slot 96 */
 Tcl_Command
 Tcl_CreateObjCommand(interp, cmdName, proc, clientData, deleteProc)
     Tcl_Interp * interp;
@@ -432,7 +995,7 @@ Tcl_CreateObjCommand(interp, cmdName, proc, clientData, deleteProc)
     return (tclStubsPtr->tcl_CreateObjCommand)(interp, cmdName, proc, clientData, deleteProc);
 }
 
-/* Slot 39 */
+/* Slot 97 */
 Tcl_Interp *
 Tcl_CreateSlave(interp, slaveName, isSafe)
     Tcl_Interp * interp;
@@ -442,7 +1005,7 @@ Tcl_CreateSlave(interp, slaveName, isSafe)
     return (tclStubsPtr->tcl_CreateSlave)(interp, slaveName, isSafe);
 }
 
-/* Slot 40 */
+/* Slot 98 */
 Tcl_TimerToken
 Tcl_CreateTimerHandler(milliseconds, proc, clientData)
     int milliseconds;
@@ -452,7 +1015,7 @@ Tcl_CreateTimerHandler(milliseconds, proc, clientData)
     return (tclStubsPtr->tcl_CreateTimerHandler)(milliseconds, proc, clientData);
 }
 
-/* Slot 41 */
+/* Slot 99 */
 Tcl_Trace
 Tcl_CreateTrace(interp, level, proc, clientData)
     Tcl_Interp * interp;
@@ -463,149 +1026,36 @@ Tcl_CreateTrace(interp, level, proc, clientData)
     return (tclStubsPtr->tcl_CreateTrace)(interp, level, proc, clientData);
 }
 
-/* Slot 42 */
-char *
-Tcl_DbCkalloc(size, file, line)
-    unsigned int size;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbCkalloc)(size, file, line);
-}
-
-/* Slot 43 */
-int
-Tcl_DbCkfree(ptr, file, line)
-    char * ptr;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbCkfree)(ptr, file, line);
-}
-
-/* Slot 44 */
-char *
-Tcl_DbCkrealloc(ptr, size, file, line)
-    char * ptr;
-    unsigned int size;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbCkrealloc)(ptr, size, file, line);
-}
-
-/* Slot 45 */
+/* Slot 100 */
 void
-Tcl_DbDecrRefCount(objPtr, file, line)
-    Tcl_Obj * objPtr;
-    char * file;
-    int line;
+Tcl_DeleteAssocData(interp, name)
+    Tcl_Interp * interp;
+    char * name;
 {
-    (tclStubsPtr->tcl_DbDecrRefCount)(objPtr, file, line);
+    (tclStubsPtr->tcl_DeleteAssocData)(interp, name);
 }
 
-/* Slot 46 */
+/* Slot 101 */
 void
-Tcl_DbIncrRefCount(objPtr, file, line)
-    Tcl_Obj * objPtr;
-    char * file;
-    int line;
-{
-    (tclStubsPtr->tcl_DbIncrRefCount)(objPtr, file, line);
-}
-
-/* Slot 47 */
-int
-Tcl_DbIsShared(objPtr, file, line)
-    Tcl_Obj * objPtr;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbIsShared)(objPtr, file, line);
-}
-
-/* Slot 48 */
-Tcl_Obj *
-Tcl_DbNewBooleanObj(boolValue, file, line)
-    int boolValue;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbNewBooleanObj)(boolValue, file, line);
-}
-
-/* Slot 49 */
-Tcl_Obj *
-Tcl_DbNewByteArrayObj(bytes, length, file, line)
-    unsigned char * bytes;
-    int length;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbNewByteArrayObj)(bytes, length, file, line);
-}
-
-/* Slot 50 */
-Tcl_Obj *
-Tcl_DbNewDoubleObj(doubleValue, file, line)
-    double doubleValue;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbNewDoubleObj)(doubleValue, file, line);
-}
-
-/* Slot 51 */
-Tcl_Obj *
-Tcl_DbNewListObj(objc, objv, file, line)
-    int objc;
-    Tcl_Obj *CONST objv[];
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbNewListObj)(objc, objv, file, line);
-}
-
-/* Slot 52 */
-Tcl_Obj *
-Tcl_DbNewLongObj(longValue, file, line)
-    long longValue;
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbNewLongObj)(longValue, file, line);
-}
-
-/* Slot 53 */
-Tcl_Obj *
-Tcl_DbNewObj(file, line)
-    char * file;
-    int line;
-{
-    return (tclStubsPtr->tcl_DbNewObj)(file, line);
-}
-
-/* Slot 54 */
-Tcl_Obj *
-Tcl_DbNewStringObj(bytes, length, file, line)
-    CONST char * bytes;
-    int length;
-    char * file;
-    int line;
+Tcl_DeleteChannelHandler(chan, proc, clientData)
+    Tcl_Channel chan;
+    Tcl_ChannelProc * proc;
+    ClientData clientData;
 {
-    return (tclStubsPtr->tcl_DbNewStringObj)(bytes, length, file, line);
+    (tclStubsPtr->tcl_DeleteChannelHandler)(chan, proc, clientData);
 }
 
-/* Slot 55 */
+/* Slot 102 */
 void
-Tcl_DeleteAssocData(interp, name)
-    Tcl_Interp * interp;
-    char * name;
+Tcl_DeleteCloseHandler(chan, proc, clientData)
+    Tcl_Channel chan;
+    Tcl_CloseProc * proc;
+    ClientData clientData;
 {
-    (tclStubsPtr->tcl_DeleteAssocData)(interp, name);
+    (tclStubsPtr->tcl_DeleteCloseHandler)(chan, proc, clientData);
 }
 
-/* Slot 56 */
+/* Slot 103 */
 int
 Tcl_DeleteCommand(interp, cmdName)
     Tcl_Interp * interp;
@@ -614,7 +1064,7 @@ Tcl_DeleteCommand(interp, cmdName)
     return (tclStubsPtr->tcl_DeleteCommand)(interp, cmdName);
 }
 
-/* Slot 57 */
+/* Slot 104 */
 int
 Tcl_DeleteCommandFromToken(interp, command)
     Tcl_Interp * interp;
@@ -623,27 +1073,7 @@ Tcl_DeleteCommandFromToken(interp, command)
     return (tclStubsPtr->tcl_DeleteCommandFromToken)(interp, command);
 }
 
-/* Slot 58 */
-void
-Tcl_DeleteChannelHandler(chan, proc, clientData)
-    Tcl_Channel chan;
-    Tcl_ChannelProc * proc;
-    ClientData clientData;
-{
-    (tclStubsPtr->tcl_DeleteChannelHandler)(chan, proc, clientData);
-}
-
-/* Slot 59 */
-void
-Tcl_DeleteCloseHandler(chan, proc, clientData)
-    Tcl_Channel chan;
-    Tcl_CloseProc * proc;
-    ClientData clientData;
-{
-    (tclStubsPtr->tcl_DeleteCloseHandler)(chan, proc, clientData);
-}
-
-/* Slot 60 */
+/* Slot 105 */
 void
 Tcl_DeleteEvents(proc, clientData)
     Tcl_EventDeleteProc * proc;
@@ -652,7 +1082,7 @@ Tcl_DeleteEvents(proc, clientData)
     (tclStubsPtr->tcl_DeleteEvents)(proc, clientData);
 }
 
-/* Slot 61 */
+/* Slot 106 */
 void
 Tcl_DeleteEventSource(setupProc, checkProc, clientData)
     Tcl_EventSetupProc * setupProc;
@@ -662,7 +1092,7 @@ Tcl_DeleteEventSource(setupProc, checkProc, clientData)
     (tclStubsPtr->tcl_DeleteEventSource)(setupProc, checkProc, clientData);
 }
 
-/* Slot 62 */
+/* Slot 107 */
 void
 Tcl_DeleteExitHandler(proc, clientData)
     Tcl_ExitProc * proc;
@@ -671,7 +1101,7 @@ Tcl_DeleteExitHandler(proc, clientData)
     (tclStubsPtr->tcl_DeleteExitHandler)(proc, clientData);
 }
 
-/* Slot 63 */
+/* Slot 108 */
 void
 Tcl_DeleteHashEntry(entryPtr)
     Tcl_HashEntry * entryPtr;
@@ -679,7 +1109,7 @@ Tcl_DeleteHashEntry(entryPtr)
     (tclStubsPtr->tcl_DeleteHashEntry)(entryPtr);
 }
 
-/* Slot 64 */
+/* Slot 109 */
 void
 Tcl_DeleteHashTable(tablePtr)
     Tcl_HashTable * tablePtr;
@@ -687,7 +1117,7 @@ Tcl_DeleteHashTable(tablePtr)
     (tclStubsPtr->tcl_DeleteHashTable)(tablePtr);
 }
 
-/* Slot 65 */
+/* Slot 110 */
 void
 Tcl_DeleteInterp(interp)
     Tcl_Interp * interp;
@@ -695,7 +1125,16 @@ Tcl_DeleteInterp(interp)
     (tclStubsPtr->tcl_DeleteInterp)(interp);
 }
 
-/* Slot 66 */
+/* Slot 111 */
+void
+Tcl_DetachPids(numPids, pidPtr)
+    int numPids;
+    Tcl_Pid * pidPtr;
+{
+    (tclStubsPtr->tcl_DetachPids)(numPids, pidPtr);
+}
+
+/* Slot 112 */
 void
 Tcl_DeleteTimerHandler(token)
     Tcl_TimerToken token;
@@ -703,7 +1142,7 @@ Tcl_DeleteTimerHandler(token)
     (tclStubsPtr->tcl_DeleteTimerHandler)(token);
 }
 
-/* Slot 67 */
+/* Slot 113 */
 void
 Tcl_DeleteTrace(interp, trace)
     Tcl_Interp * interp;
@@ -712,16 +1151,7 @@ Tcl_DeleteTrace(interp, trace)
     (tclStubsPtr->tcl_DeleteTrace)(interp, trace);
 }
 
-/* Slot 68 */
-void
-Tcl_DetachPids(numPids, pidPtr)
-    int numPids;
-    Tcl_Pid * pidPtr;
-{
-    (tclStubsPtr->tcl_DetachPids)(numPids, pidPtr);
-}
-
-/* Slot 69 */
+/* Slot 114 */
 void
 Tcl_DontCallWhenDeleted(interp, proc, clientData)
     Tcl_Interp * interp;
@@ -731,7 +1161,7 @@ Tcl_DontCallWhenDeleted(interp, proc, clientData)
     (tclStubsPtr->tcl_DontCallWhenDeleted)(interp, proc, clientData);
 }
 
-/* Slot 70 */
+/* Slot 115 */
 int
 Tcl_DoOneEvent(flags)
     int flags;
@@ -739,7 +1169,7 @@ Tcl_DoOneEvent(flags)
     return (tclStubsPtr->tcl_DoOneEvent)(flags);
 }
 
-/* Slot 71 */
+/* Slot 116 */
 void
 Tcl_DoWhenIdle(proc, clientData)
     Tcl_IdleProc * proc;
@@ -748,26 +1178,26 @@ Tcl_DoWhenIdle(proc, clientData)
     (tclStubsPtr->tcl_DoWhenIdle)(proc, clientData);
 }
 
-/* Slot 72 */
+/* Slot 117 */
 char *
-Tcl_DStringAppend(dsPtr, str, length)
+Tcl_DStringAppend(dsPtr, string, length)
     Tcl_DString * dsPtr;
-    CONST char * str;
+    CONST char * string;
     int length;
 {
-    return (tclStubsPtr->tcl_DStringAppend)(dsPtr, str, length);
+    return (tclStubsPtr->tcl_DStringAppend)(dsPtr, string, length);
 }
 
-/* Slot 73 */
+/* Slot 118 */
 char *
-Tcl_DStringAppendElement(dsPtr, str)
+Tcl_DStringAppendElement(dsPtr, string)
     Tcl_DString * dsPtr;
-    CONST char * str;
+    CONST char * string;
 {
-    return (tclStubsPtr->tcl_DStringAppendElement)(dsPtr, str);
+    return (tclStubsPtr->tcl_DStringAppendElement)(dsPtr, string);
 }
 
-/* Slot 74 */
+/* Slot 119 */
 void
 Tcl_DStringEndSublist(dsPtr)
     Tcl_DString * dsPtr;
@@ -775,7 +1205,7 @@ Tcl_DStringEndSublist(dsPtr)
     (tclStubsPtr->tcl_DStringEndSublist)(dsPtr);
 }
 
-/* Slot 75 */
+/* Slot 120 */
 void
 Tcl_DStringFree(dsPtr)
     Tcl_DString * dsPtr;
@@ -783,7 +1213,7 @@ Tcl_DStringFree(dsPtr)
     (tclStubsPtr->tcl_DStringFree)(dsPtr);
 }
 
-/* Slot 76 */
+/* Slot 121 */
 void
 Tcl_DStringGetResult(interp, dsPtr)
     Tcl_Interp * interp;
@@ -792,7 +1222,7 @@ Tcl_DStringGetResult(interp, dsPtr)
     (tclStubsPtr->tcl_DStringGetResult)(interp, dsPtr);
 }
 
-/* Slot 77 */
+/* Slot 122 */
 void
 Tcl_DStringInit(dsPtr)
     Tcl_DString * dsPtr;
@@ -800,7 +1230,7 @@ Tcl_DStringInit(dsPtr)
     (tclStubsPtr->tcl_DStringInit)(dsPtr);
 }
 
-/* Slot 78 */
+/* Slot 123 */
 void
 Tcl_DStringResult(interp, dsPtr)
     Tcl_Interp * interp;
@@ -809,7 +1239,7 @@ Tcl_DStringResult(interp, dsPtr)
     (tclStubsPtr->tcl_DStringResult)(interp, dsPtr);
 }
 
-/* Slot 79 */
+/* Slot 124 */
 void
 Tcl_DStringSetLength(dsPtr, length)
     Tcl_DString * dsPtr;
@@ -818,7 +1248,7 @@ Tcl_DStringSetLength(dsPtr, length)
     (tclStubsPtr->tcl_DStringSetLength)(dsPtr, length);
 }
 
-/* Slot 80 */
+/* Slot 125 */
 void
 Tcl_DStringStartSublist(dsPtr)
     Tcl_DString * dsPtr;
@@ -826,23 +1256,7 @@ Tcl_DStringStartSublist(dsPtr)
     (tclStubsPtr->tcl_DStringStartSublist)(dsPtr);
 }
 
-/* Slot 81 */
-int
-Tcl_DumpActiveMemory(fileName)
-    char * fileName;
-{
-    return (tclStubsPtr->tcl_DumpActiveMemory)(fileName);
-}
-
-/* Slot 82 */
-Tcl_Obj *
-Tcl_DuplicateObj(objPtr)
-    Tcl_Obj * objPtr;
-{
-    return (tclStubsPtr->tcl_DuplicateObj)(objPtr);
-}
-
-/* Slot 83 */
+/* Slot 126 */
 int
 Tcl_Eof(chan)
     Tcl_Channel chan;
@@ -850,14 +1264,14 @@ Tcl_Eof(chan)
     return (tclStubsPtr->tcl_Eof)(chan);
 }
 
-/* Slot 84 */
+/* Slot 127 */
 char *
 Tcl_ErrnoId()
 {
     return (tclStubsPtr->tcl_ErrnoId)();
 }
 
-/* Slot 85 */
+/* Slot 128 */
 char *
 Tcl_ErrnoMsg(err)
     int err;
@@ -865,16 +1279,16 @@ Tcl_ErrnoMsg(err)
     return (tclStubsPtr->tcl_ErrnoMsg)(err);
 }
 
-/* Slot 86 */
+/* Slot 129 */
 int
-Tcl_Eval(interp, str)
+Tcl_Eval(interp, string)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
 {
-    return (tclStubsPtr->tcl_Eval)(interp, str);
+    return (tclStubsPtr->tcl_Eval)(interp, string);
 }
 
-/* Slot 87 */
+/* Slot 130 */
 int
 Tcl_EvalFile(interp, fileName)
     Tcl_Interp * interp;
@@ -883,16 +1297,7 @@ Tcl_EvalFile(interp, fileName)
     return (tclStubsPtr->tcl_EvalFile)(interp, fileName);
 }
 
-/* Slot 88 */
-void
-Tcl_EventuallyFree(clientData, freeProc)
-    ClientData clientData;
-    Tcl_FreeProc * freeProc;
-{
-    (tclStubsPtr->tcl_EventuallyFree)(clientData, freeProc);
-}
-
-/* Slot 89 */
+/* Slot 131 */
 int
 Tcl_EvalObj(interp, objPtr)
     Tcl_Interp * interp;
@@ -901,7 +1306,16 @@ Tcl_EvalObj(interp, objPtr)
     return (tclStubsPtr->tcl_EvalObj)(interp, objPtr);
 }
 
-/* Slot 90 */
+/* Slot 132 */
+void
+Tcl_EventuallyFree(clientData, freeProc)
+    ClientData clientData;
+    Tcl_FreeProc * freeProc;
+{
+    (tclStubsPtr->tcl_EventuallyFree)(clientData, freeProc);
+}
+
+/* Slot 133 */
 void
 Tcl_Exit(status)
     int status;
@@ -909,7 +1323,7 @@ Tcl_Exit(status)
     (tclStubsPtr->tcl_Exit)(status);
 }
 
-/* Slot 91 */
+/* Slot 134 */
 int
 Tcl_ExposeCommand(interp, hiddenCmdToken, cmdName)
     Tcl_Interp * interp;
@@ -919,17 +1333,17 @@ Tcl_ExposeCommand(interp, hiddenCmdToken, cmdName)
     return (tclStubsPtr->tcl_ExposeCommand)(interp, hiddenCmdToken, cmdName);
 }
 
-/* Slot 92 */
+/* Slot 135 */
 int
-Tcl_ExprBoolean(interp, str, ptr)
+Tcl_ExprBoolean(interp, string, ptr)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
     int * ptr;
 {
-    return (tclStubsPtr->tcl_ExprBoolean)(interp, str, ptr);
+    return (tclStubsPtr->tcl_ExprBoolean)(interp, string, ptr);
 }
 
-/* Slot 93 */
+/* Slot 136 */
 int
 Tcl_ExprBooleanObj(interp, objPtr, ptr)
     Tcl_Interp * interp;
@@ -939,17 +1353,17 @@ Tcl_ExprBooleanObj(interp, objPtr, ptr)
     return (tclStubsPtr->tcl_ExprBooleanObj)(interp, objPtr, ptr);
 }
 
-/* Slot 94 */
+/* Slot 137 */
 int
-Tcl_ExprDouble(interp, str, ptr)
+Tcl_ExprDouble(interp, string, ptr)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
     double * ptr;
 {
-    return (tclStubsPtr->tcl_ExprDouble)(interp, str, ptr);
+    return (tclStubsPtr->tcl_ExprDouble)(interp, string, ptr);
 }
 
-/* Slot 95 */
+/* Slot 138 */
 int
 Tcl_ExprDoubleObj(interp, objPtr, ptr)
     Tcl_Interp * interp;
@@ -959,17 +1373,17 @@ Tcl_ExprDoubleObj(interp, objPtr, ptr)
     return (tclStubsPtr->tcl_ExprDoubleObj)(interp, objPtr, ptr);
 }
 
-/* Slot 96 */
+/* Slot 139 */
 int
-Tcl_ExprLong(interp, str, ptr)
+Tcl_ExprLong(interp, string, ptr)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
     long * ptr;
 {
-    return (tclStubsPtr->tcl_ExprLong)(interp, str, ptr);
+    return (tclStubsPtr->tcl_ExprLong)(interp, string, ptr);
 }
 
-/* Slot 97 */
+/* Slot 140 */
 int
 Tcl_ExprLongObj(interp, objPtr, ptr)
     Tcl_Interp * interp;
@@ -979,7 +1393,7 @@ Tcl_ExprLongObj(interp, objPtr, ptr)
     return (tclStubsPtr->tcl_ExprLongObj)(interp, objPtr, ptr);
 }
 
-/* Slot 98 */
+/* Slot 141 */
 int
 Tcl_ExprObj(interp, objPtr, resultPtrPtr)
     Tcl_Interp * interp;
@@ -989,23 +1403,23 @@ Tcl_ExprObj(interp, objPtr, resultPtrPtr)
     return (tclStubsPtr->tcl_ExprObj)(interp, objPtr, resultPtrPtr);
 }
 
-/* Slot 99 */
+/* Slot 142 */
 int
-Tcl_ExprString(interp, str)
+Tcl_ExprString(interp, string)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
 {
-    return (tclStubsPtr->tcl_ExprString)(interp, str);
+    return (tclStubsPtr->tcl_ExprString)(interp, string);
 }
 
-/* Slot 100 */
+/* Slot 143 */
 void
 Tcl_Finalize()
 {
     (tclStubsPtr->tcl_Finalize)();
 }
 
-/* Slot 101 */
+/* Slot 144 */
 void
 Tcl_FindExecutable(argv0)
     CONST char * argv0;
@@ -1013,7 +1427,7 @@ Tcl_FindExecutable(argv0)
     (tclStubsPtr->tcl_FindExecutable)(argv0);
 }
 
-/* Slot 102 */
+/* Slot 145 */
 Tcl_HashEntry *
 Tcl_FirstHashEntry(tablePtr, searchPtr)
     Tcl_HashTable * tablePtr;
@@ -1022,7 +1436,7 @@ Tcl_FirstHashEntry(tablePtr, searchPtr)
     return (tclStubsPtr->tcl_FirstHashEntry)(tablePtr, searchPtr);
 }
 
-/* Slot 103 */
+/* Slot 146 */
 int
 Tcl_Flush(chan)
     Tcl_Channel chan;
@@ -1030,23 +1444,7 @@ Tcl_Flush(chan)
     return (tclStubsPtr->tcl_Flush)(chan);
 }
 
-/* Slot 104 */
-void
-Tcl_Free(ptr)
-    char * ptr;
-{
-    (tclStubsPtr->tcl_Free)(ptr);
-}
-
-/* Slot 105 */
-void
-TclFreeObj(objPtr)
-    Tcl_Obj * objPtr;
-{
-    (tclStubsPtr->tclFreeObj)(objPtr);
-}
-
-/* Slot 106 */
+/* Slot 147 */
 void
 Tcl_FreeResult(interp)
     Tcl_Interp * interp;
@@ -1054,7 +1452,7 @@ Tcl_FreeResult(interp)
     (tclStubsPtr->tcl_FreeResult)(interp);
 }
 
-/* Slot 107 */
+/* Slot 148 */
 int
 Tcl_GetAlias(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr)
     Tcl_Interp * interp;
@@ -1067,7 +1465,7 @@ Tcl_GetAlias(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr)
     return (tclStubsPtr->tcl_GetAlias)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr);
 }
 
-/* Slot 108 */
+/* Slot 149 */
 int
 Tcl_GetAliasObj(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv)
     Tcl_Interp * interp;
@@ -1080,7 +1478,7 @@ Tcl_GetAliasObj(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv)
     return (tclStubsPtr->tcl_GetAliasObj)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv);
 }
 
-/* Slot 109 */
+/* Slot 150 */
 ClientData
 Tcl_GetAssocData(interp, name, procPtr)
     Tcl_Interp * interp;
@@ -1090,36 +1488,7 @@ Tcl_GetAssocData(interp, name, procPtr)
     return (tclStubsPtr->tcl_GetAssocData)(interp, name, procPtr);
 }
 
-/* Slot 110 */
-int
-Tcl_GetBoolean(interp, str, boolPtr)
-    Tcl_Interp * interp;
-    char * str;
-    int * boolPtr;
-{
-    return (tclStubsPtr->tcl_GetBoolean)(interp, str, boolPtr);
-}
-
-/* Slot 111 */
-int
-Tcl_GetBooleanFromObj(interp, objPtr, boolPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * objPtr;
-    int * boolPtr;
-{
-    return (tclStubsPtr->tcl_GetBooleanFromObj)(interp, objPtr, boolPtr);
-}
-
-/* Slot 112 */
-unsigned char *
-Tcl_GetByteArrayFromObj(objPtr, lengthPtr)
-    Tcl_Obj * objPtr;
-    int * lengthPtr;
-{
-    return (tclStubsPtr->tcl_GetByteArrayFromObj)(objPtr, lengthPtr);
-}
-
-/* Slot 113 */
+/* Slot 151 */
 Tcl_Channel
 Tcl_GetChannel(interp, chanName, modePtr)
     Tcl_Interp * interp;
@@ -1129,7 +1498,7 @@ Tcl_GetChannel(interp, chanName, modePtr)
     return (tclStubsPtr->tcl_GetChannel)(interp, chanName, modePtr);
 }
 
-/* Slot 114 */
+/* Slot 152 */
 int
 Tcl_GetChannelBufferSize(chan)
     Tcl_Channel chan;
@@ -1137,7 +1506,7 @@ Tcl_GetChannelBufferSize(chan)
     return (tclStubsPtr->tcl_GetChannelBufferSize)(chan);
 }
 
-/* Slot 115 */
+/* Slot 153 */
 int
 Tcl_GetChannelHandle(chan, direction, handlePtr)
     Tcl_Channel chan;
@@ -1147,7 +1516,7 @@ Tcl_GetChannelHandle(chan, direction, handlePtr)
     return (tclStubsPtr->tcl_GetChannelHandle)(chan, direction, handlePtr);
 }
 
-/* Slot 116 */
+/* Slot 154 */
 ClientData
 Tcl_GetChannelInstanceData(chan)
     Tcl_Channel chan;
@@ -1155,7 +1524,7 @@ Tcl_GetChannelInstanceData(chan)
     return (tclStubsPtr->tcl_GetChannelInstanceData)(chan);
 }
 
-/* Slot 117 */
+/* Slot 155 */
 int
 Tcl_GetChannelMode(chan)
     Tcl_Channel chan;
@@ -1163,7 +1532,7 @@ Tcl_GetChannelMode(chan)
     return (tclStubsPtr->tcl_GetChannelMode)(chan);
 }
 
-/* Slot 118 */
+/* Slot 156 */
 char *
 Tcl_GetChannelName(chan)
     Tcl_Channel chan;
@@ -1171,7 +1540,7 @@ Tcl_GetChannelName(chan)
     return (tclStubsPtr->tcl_GetChannelName)(chan);
 }
 
-/* Slot 119 */
+/* Slot 157 */
 int
 Tcl_GetChannelOption(interp, chan, optionName, dsPtr)
     Tcl_Interp * interp;
@@ -1182,7 +1551,7 @@ Tcl_GetChannelOption(interp, chan, optionName, dsPtr)
     return (tclStubsPtr->tcl_GetChannelOption)(interp, chan, optionName, dsPtr);
 }
 
-/* Slot 120 */
+/* Slot 158 */
 Tcl_ChannelType *
 Tcl_GetChannelType(chan)
     Tcl_Channel chan;
@@ -1190,7 +1559,7 @@ Tcl_GetChannelType(chan)
     return (tclStubsPtr->tcl_GetChannelType)(chan);
 }
 
-/* Slot 121 */
+/* Slot 159 */
 int
 Tcl_GetCommandInfo(interp, cmdName, infoPtr)
     Tcl_Interp * interp;
@@ -1200,7 +1569,7 @@ Tcl_GetCommandInfo(interp, cmdName, infoPtr)
     return (tclStubsPtr->tcl_GetCommandInfo)(interp, cmdName, infoPtr);
 }
 
-/* Slot 122 */
+/* Slot 160 */
 char *
 Tcl_GetCommandName(interp, command)
     Tcl_Interp * interp;
@@ -1209,64 +1578,21 @@ Tcl_GetCommandName(interp, command)
     return (tclStubsPtr->tcl_GetCommandName)(interp, command);
 }
 
-/* Slot 123 */
-int
-Tcl_GetDouble(interp, str, doublePtr)
-    Tcl_Interp * interp;
-    char * str;
-    double * doublePtr;
-{
-    return (tclStubsPtr->tcl_GetDouble)(interp, str, doublePtr);
-}
-
-/* Slot 124 */
-int
-Tcl_GetDoubleFromObj(interp, objPtr, doublePtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * objPtr;
-    double * doublePtr;
-{
-    return (tclStubsPtr->tcl_GetDoubleFromObj)(interp, objPtr, doublePtr);
-}
-
-/* Slot 125 */
+/* Slot 161 */
 int
 Tcl_GetErrno()
 {
     return (tclStubsPtr->tcl_GetErrno)();
 }
 
-/* Slot 126 */
+/* Slot 162 */
 char *
 Tcl_GetHostName()
 {
     return (tclStubsPtr->tcl_GetHostName)();
 }
 
-/* Slot 127 */
-int
-Tcl_GetIndexFromObj(interp, objPtr, tablePtr, msg, flags, indexPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * objPtr;
-    char ** tablePtr;
-    char * msg;
-    int flags;
-    int * indexPtr;
-{
-    return (tclStubsPtr->tcl_GetIndexFromObj)(interp, objPtr, tablePtr, msg, flags, indexPtr);
-}
-
-/* Slot 128 */
-int
-Tcl_GetInt(interp, str, intPtr)
-    Tcl_Interp * interp;
-    char * str;
-    int * intPtr;
-{
-    return (tclStubsPtr->tcl_GetInt)(interp, str, intPtr);
-}
-
-/* Slot 129 */
+/* Slot 163 */
 int
 Tcl_GetInterpPath(askInterp, slaveInterp)
     Tcl_Interp * askInterp;
@@ -1275,27 +1601,7 @@ Tcl_GetInterpPath(askInterp, slaveInterp)
     return (tclStubsPtr->tcl_GetInterpPath)(askInterp, slaveInterp);
 }
 
-/* Slot 130 */
-int
-Tcl_GetIntFromObj(interp, objPtr, intPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * objPtr;
-    int * intPtr;
-{
-    return (tclStubsPtr->tcl_GetIntFromObj)(interp, objPtr, intPtr);
-}
-
-/* Slot 131 */
-int
-Tcl_GetLongFromObj(interp, objPtr, longPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * objPtr;
-    long * longPtr;
-{
-    return (tclStubsPtr->tcl_GetLongFromObj)(interp, objPtr, longPtr);
-}
-
-/* Slot 132 */
+/* Slot 164 */
 Tcl_Interp *
 Tcl_GetMaster(interp)
     Tcl_Interp * interp;
@@ -1303,14 +1609,14 @@ Tcl_GetMaster(interp)
     return (tclStubsPtr->tcl_GetMaster)(interp);
 }
 
-/* Slot 133 */
+/* Slot 165 */
 CONST char *
 Tcl_GetNameOfExecutable()
 {
     return (tclStubsPtr->tcl_GetNameOfExecutable)();
 }
 
-/* Slot 134 */
+/* Slot 166 */
 Tcl_Obj *
 Tcl_GetObjResult(interp)
     Tcl_Interp * interp;
@@ -1318,15 +1624,21 @@ Tcl_GetObjResult(interp)
     return (tclStubsPtr->tcl_GetObjResult)(interp);
 }
 
-/* Slot 135 */
-Tcl_ObjType *
-Tcl_GetObjType(typeName)
-    char * typeName;
+#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
+/* Slot 167 */
+int
+Tcl_GetOpenFile(interp, string, write, checkUsage, filePtr)
+    Tcl_Interp * interp;
+    char * string;
+    int write;
+    int checkUsage;
+    ClientData * filePtr;
 {
-    return (tclStubsPtr->tcl_GetObjType)(typeName);
+    return (tclStubsPtr->tcl_GetOpenFile)(interp, string, write, checkUsage, filePtr);
 }
 
-/* Slot 136 */
+#endif /* UNIX */
+/* Slot 168 */
 Tcl_PathType
 Tcl_GetPathType(path)
     char * path;
@@ -1334,7 +1646,7 @@ Tcl_GetPathType(path)
     return (tclStubsPtr->tcl_GetPathType)(path);
 }
 
-/* Slot 137 */
+/* Slot 169 */
 int
 Tcl_Gets(chan, dsPtr)
     Tcl_Channel chan;
@@ -1343,7 +1655,7 @@ Tcl_Gets(chan, dsPtr)
     return (tclStubsPtr->tcl_Gets)(chan, dsPtr);
 }
 
-/* Slot 138 */
+/* Slot 170 */
 int
 Tcl_GetsObj(chan, objPtr)
     Tcl_Channel chan;
@@ -1352,14 +1664,14 @@ Tcl_GetsObj(chan, objPtr)
     return (tclStubsPtr->tcl_GetsObj)(chan, objPtr);
 }
 
-/* Slot 139 */
+/* Slot 171 */
 int
 Tcl_GetServiceMode()
 {
     return (tclStubsPtr->tcl_GetServiceMode)();
 }
 
-/* Slot 140 */
+/* Slot 172 */
 Tcl_Interp *
 Tcl_GetSlave(interp, slaveName)
     Tcl_Interp * interp;
@@ -1368,7 +1680,7 @@ Tcl_GetSlave(interp, slaveName)
     return (tclStubsPtr->tcl_GetSlave)(interp, slaveName);
 }
 
-/* Slot 141 */
+/* Slot 173 */
 Tcl_Channel
 Tcl_GetStdChannel(type)
     int type;
@@ -1376,16 +1688,7 @@ Tcl_GetStdChannel(type)
     return (tclStubsPtr->tcl_GetStdChannel)(type);
 }
 
-/* Slot 142 */
-char *
-Tcl_GetStringFromObj(objPtr, lengthPtr)
-    Tcl_Obj * objPtr;
-    int * lengthPtr;
-{
-    return (tclStubsPtr->tcl_GetStringFromObj)(objPtr, lengthPtr);
-}
-
-/* Slot 143 */
+/* Slot 174 */
 char *
 Tcl_GetStringResult(interp)
     Tcl_Interp * interp;
@@ -1393,7 +1696,7 @@ Tcl_GetStringResult(interp)
     return (tclStubsPtr->tcl_GetStringResult)(interp);
 }
 
-/* Slot 144 */
+/* Slot 175 */
 char *
 Tcl_GetVar(interp, varName, flags)
     Tcl_Interp * interp;
@@ -1403,7 +1706,7 @@ Tcl_GetVar(interp, varName, flags)
     return (tclStubsPtr->tcl_GetVar)(interp, varName, flags);
 }
 
-/* Slot 145 */
+/* Slot 176 */
 char *
 Tcl_GetVar2(interp, part1, part2, flags)
     Tcl_Interp * interp;
@@ -1414,7 +1717,7 @@ Tcl_GetVar2(interp, part1, part2, flags)
     return (tclStubsPtr->tcl_GetVar2)(interp, part1, part2, flags);
 }
 
-/* Slot 146 */
+/* Slot 177 */
 int
 Tcl_GlobalEval(interp, command)
     Tcl_Interp * interp;
@@ -1423,7 +1726,7 @@ Tcl_GlobalEval(interp, command)
     return (tclStubsPtr->tcl_GlobalEval)(interp, command);
 }
 
-/* Slot 147 */
+/* Slot 178 */
 int
 Tcl_GlobalEvalObj(interp, objPtr)
     Tcl_Interp * interp;
@@ -1432,15 +1735,7 @@ Tcl_GlobalEvalObj(interp, objPtr)
     return (tclStubsPtr->tcl_GlobalEvalObj)(interp, objPtr);
 }
 
-/* Slot 148 */
-char *
-Tcl_HashStats(tablePtr)
-    Tcl_HashTable * tablePtr;
-{
-    return (tclStubsPtr->tcl_HashStats)(tablePtr);
-}
-
-/* Slot 149 */
+/* Slot 179 */
 int
 Tcl_HideCommand(interp, cmdName, hiddenCmdToken)
     Tcl_Interp * interp;
@@ -1450,7 +1745,7 @@ Tcl_HideCommand(interp, cmdName, hiddenCmdToken)
     return (tclStubsPtr->tcl_HideCommand)(interp, cmdName, hiddenCmdToken);
 }
 
-/* Slot 150 */
+/* Slot 180 */
 int
 Tcl_Init(interp)
     Tcl_Interp * interp;
@@ -1458,7 +1753,7 @@ Tcl_Init(interp)
     return (tclStubsPtr->tcl_Init)(interp);
 }
 
-/* Slot 151 */
+/* Slot 181 */
 void
 Tcl_InitHashTable(tablePtr, keyType)
     Tcl_HashTable * tablePtr;
@@ -1467,15 +1762,7 @@ Tcl_InitHashTable(tablePtr, keyType)
     (tclStubsPtr->tcl_InitHashTable)(tablePtr, keyType);
 }
 
-/* Slot 152 */
-void
-Tcl_InitMemory(interp)
-    Tcl_Interp * interp;
-{
-    (tclStubsPtr->tcl_InitMemory)(interp);
-}
-
-/* Slot 153 */
+/* Slot 182 */
 int
 Tcl_InputBlocked(chan)
     Tcl_Channel chan;
@@ -1483,7 +1770,7 @@ Tcl_InputBlocked(chan)
     return (tclStubsPtr->tcl_InputBlocked)(chan);
 }
 
-/* Slot 154 */
+/* Slot 183 */
 int
 Tcl_InputBuffered(chan)
     Tcl_Channel chan;
@@ -1491,7 +1778,7 @@ Tcl_InputBuffered(chan)
     return (tclStubsPtr->tcl_InputBuffered)(chan);
 }
 
-/* Slot 155 */
+/* Slot 184 */
 int
 Tcl_InterpDeleted(interp)
     Tcl_Interp * interp;
@@ -1499,7 +1786,7 @@ Tcl_InterpDeleted(interp)
     return (tclStubsPtr->tcl_InterpDeleted)(interp);
 }
 
-/* Slot 156 */
+/* Slot 185 */
 int
 Tcl_IsSafe(interp)
     Tcl_Interp * interp;
@@ -1507,15 +1794,7 @@ Tcl_IsSafe(interp)
     return (tclStubsPtr->tcl_IsSafe)(interp);
 }
 
-/* Slot 157 */
-void
-Tcl_InvalidateStringRep(objPtr)
-    Tcl_Obj * objPtr;
-{
-    (tclStubsPtr->tcl_InvalidateStringRep)(objPtr);
-}
-
-/* Slot 158 */
+/* Slot 186 */
 char *
 Tcl_JoinPath(argc, argv, resultPtr)
     int argc;
@@ -1525,7 +1804,7 @@ Tcl_JoinPath(argc, argv, resultPtr)
     return (tclStubsPtr->tcl_JoinPath)(argc, argv, resultPtr);
 }
 
-/* Slot 159 */
+/* Slot 187 */
 int
 Tcl_LinkVar(interp, varName, addr, type)
     Tcl_Interp * interp;
@@ -1536,72 +1815,8 @@ Tcl_LinkVar(interp, varName, addr, type)
     return (tclStubsPtr->tcl_LinkVar)(interp, varName, addr, type);
 }
 
-/* Slot 160 */
-int
-Tcl_ListObjAppendList(interp, listPtr, elemListPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * listPtr;
-    Tcl_Obj * elemListPtr;
-{
-    return (tclStubsPtr->tcl_ListObjAppendList)(interp, listPtr, elemListPtr);
-}
-
-/* Slot 161 */
-int
-Tcl_ListObjAppendElement(interp, listPtr, objPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * listPtr;
-    Tcl_Obj * objPtr;
-{
-    return (tclStubsPtr->tcl_ListObjAppendElement)(interp, listPtr, objPtr);
-}
-
-/* Slot 162 */
-int
-Tcl_ListObjGetElements(interp, listPtr, objcPtr, objvPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * listPtr;
-    int * objcPtr;
-    Tcl_Obj *** objvPtr;
-{
-    return (tclStubsPtr->tcl_ListObjGetElements)(interp, listPtr, objcPtr, objvPtr);
-}
-
-/* Slot 163 */
-int
-Tcl_ListObjIndex(interp, listPtr, index, objPtrPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * listPtr;
-    int index;
-    Tcl_Obj ** objPtrPtr;
-{
-    return (tclStubsPtr->tcl_ListObjIndex)(interp, listPtr, index, objPtrPtr);
-}
-
-/* Slot 164 */
-int
-Tcl_ListObjLength(interp, listPtr, intPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * listPtr;
-    int * intPtr;
-{
-    return (tclStubsPtr->tcl_ListObjLength)(interp, listPtr, intPtr);
-}
-
-/* Slot 165 */
-int
-Tcl_ListObjReplace(interp, listPtr, first, count, objc, objv)
-    Tcl_Interp * interp;
-    Tcl_Obj * listPtr;
-    int first;
-    int count;
-    int objc;
-    Tcl_Obj *CONST objv[];
-{
-    return (tclStubsPtr->tcl_ListObjReplace)(interp, listPtr, first, count, objc, objv);
-}
-
-/* Slot 166 */
+/* Slot 188 is reserved */
+/* Slot 189 */
 Tcl_Channel
 Tcl_MakeFileChannel(handle, mode)
     ClientData handle;
@@ -1610,7 +1825,7 @@ Tcl_MakeFileChannel(handle, mode)
     return (tclStubsPtr->tcl_MakeFileChannel)(handle, mode);
 }
 
-/* Slot 167 */
+/* Slot 190 */
 int
 Tcl_MakeSafe(interp)
     Tcl_Interp * interp;
@@ -1618,7 +1833,7 @@ Tcl_MakeSafe(interp)
     return (tclStubsPtr->tcl_MakeSafe)(interp);
 }
 
-/* Slot 168 */
+/* Slot 191 */
 Tcl_Channel
 Tcl_MakeTcpClientChannel(tcpSocket)
     ClientData tcpSocket;
@@ -1626,7 +1841,7 @@ Tcl_MakeTcpClientChannel(tcpSocket)
     return (tclStubsPtr->tcl_MakeTcpClientChannel)(tcpSocket);
 }
 
-/* Slot 169 */
+/* Slot 192 */
 char *
 Tcl_Merge(argc, argv)
     int argc;
@@ -1635,73 +1850,7 @@ Tcl_Merge(argc, argv)
     return (tclStubsPtr->tcl_Merge)(argc, argv);
 }
 
-/* Slot 170 */
-Tcl_Obj *
-Tcl_NewBooleanObj(boolValue)
-    int boolValue;
-{
-    return (tclStubsPtr->tcl_NewBooleanObj)(boolValue);
-}
-
-/* Slot 171 */
-Tcl_Obj *
-Tcl_NewByteArrayObj(bytes, length)
-    unsigned char * bytes;
-    int length;
-{
-    return (tclStubsPtr->tcl_NewByteArrayObj)(bytes, length);
-}
-
-/* Slot 172 */
-Tcl_Obj *
-Tcl_NewDoubleObj(doubleValue)
-    double doubleValue;
-{
-    return (tclStubsPtr->tcl_NewDoubleObj)(doubleValue);
-}
-
-/* Slot 173 */
-Tcl_Obj *
-Tcl_NewIntObj(intValue)
-    int intValue;
-{
-    return (tclStubsPtr->tcl_NewIntObj)(intValue);
-}
-
-/* Slot 174 */
-Tcl_Obj *
-Tcl_NewListObj(objc, objv)
-    int objc;
-    Tcl_Obj *CONST objv[];
-{
-    return (tclStubsPtr->tcl_NewListObj)(objc, objv);
-}
-
-/* Slot 175 */
-Tcl_Obj *
-Tcl_NewLongObj(longValue)
-    long longValue;
-{
-    return (tclStubsPtr->tcl_NewLongObj)(longValue);
-}
-
-/* Slot 176 */
-Tcl_Obj *
-Tcl_NewObj()
-{
-    return (tclStubsPtr->tcl_NewObj)();
-}
-
-/* Slot 177 */
-Tcl_Obj *
-Tcl_NewStringObj(bytes, length)
-    CONST char * bytes;
-    int length;
-{
-    return (tclStubsPtr->tcl_NewStringObj)(bytes, length);
-}
-
-/* Slot 178 */
+/* Slot 193 */
 Tcl_HashEntry *
 Tcl_NextHashEntry(searchPtr)
     Tcl_HashSearch * searchPtr;
@@ -1709,7 +1858,7 @@ Tcl_NextHashEntry(searchPtr)
     return (tclStubsPtr->tcl_NextHashEntry)(searchPtr);
 }
 
-/* Slot 179 */
+/* Slot 194 */
 void
 Tcl_NotifyChannel(channel, mask)
     Tcl_Channel channel;
@@ -1718,7 +1867,7 @@ Tcl_NotifyChannel(channel, mask)
     (tclStubsPtr->tcl_NotifyChannel)(channel, mask);
 }
 
-/* Slot 180 */
+/* Slot 195 */
 Tcl_Obj *
 Tcl_ObjGetVar2(interp, part1Ptr, part2Ptr, flags)
     Tcl_Interp * interp;
@@ -1729,7 +1878,7 @@ Tcl_ObjGetVar2(interp, part1Ptr, part2Ptr, flags)
     return (tclStubsPtr->tcl_ObjGetVar2)(interp, part1Ptr, part2Ptr, flags);
 }
 
-/* Slot 181 */
+/* Slot 196 */
 Tcl_Obj *
 Tcl_ObjSetVar2(interp, part1Ptr, part2Ptr, newValuePtr, flags)
     Tcl_Interp * interp;
@@ -1741,7 +1890,7 @@ Tcl_ObjSetVar2(interp, part1Ptr, part2Ptr, newValuePtr, flags)
     return (tclStubsPtr->tcl_ObjSetVar2)(interp, part1Ptr, part2Ptr, newValuePtr, flags);
 }
 
-/* Slot 182 */
+/* Slot 197 */
 Tcl_Channel
 Tcl_OpenCommandChannel(interp, argc, argv, flags)
     Tcl_Interp * interp;
@@ -1752,7 +1901,7 @@ Tcl_OpenCommandChannel(interp, argc, argv, flags)
     return (tclStubsPtr->tcl_OpenCommandChannel)(interp, argc, argv, flags);
 }
 
-/* Slot 183 */
+/* Slot 198 */
 Tcl_Channel
 Tcl_OpenFileChannel(interp, fileName, modeString, permissions)
     Tcl_Interp * interp;
@@ -1763,7 +1912,7 @@ Tcl_OpenFileChannel(interp, fileName, modeString, permissions)
     return (tclStubsPtr->tcl_OpenFileChannel)(interp, fileName, modeString, permissions);
 }
 
-/* Slot 184 */
+/* Slot 199 */
 Tcl_Channel
 Tcl_OpenTcpClient(interp, port, address, myaddr, myport, async)
     Tcl_Interp * interp;
@@ -1776,7 +1925,7 @@ Tcl_OpenTcpClient(interp, port, address, myaddr, myport, async)
     return (tclStubsPtr->tcl_OpenTcpClient)(interp, port, address, myaddr, myport, async);
 }
 
-/* Slot 185 */
+/* Slot 200 */
 Tcl_Channel
 Tcl_OpenTcpServer(interp, port, host, acceptProc, callbackData)
     Tcl_Interp * interp;
@@ -1788,114 +1937,7 @@ Tcl_OpenTcpServer(interp, port, host, acceptProc, callbackData)
     return (tclStubsPtr->tcl_OpenTcpServer)(interp, port, host, acceptProc, callbackData);
 }
 
-/* Slot 186 */
-void
-panic TCL_VARARGS_DEF(char *,format)
-{
-    char * var;
-    va_list argList;
-
-    var = (char *) TCL_VARARGS_START(char *,format,argList);
-
-    (tclStubsPtr->panicVA)(var, argList);
-    va_end(argList);
-}
-
-/* Slot 187 */
-void
-panicVA(format, argList)
-    char * format;
-    va_list argList;
-{
-    (tclStubsPtr->panicVA)(format, argList);
-}
-
-/* Slot 188 */
-char *
-Tcl_ParseVar(interp, str, termPtr)
-    Tcl_Interp * interp;
-    char * str;
-    char ** termPtr;
-{
-    return (tclStubsPtr->tcl_ParseVar)(interp, str, termPtr);
-}
-
-/* Slot 189 */
-char *
-Tcl_PkgPresent(interp, name, version, exact)
-    Tcl_Interp * interp;
-    char * name;
-    char * version;
-    int exact;
-{
-    return (tclStubsPtr->tcl_PkgPresent)(interp, name, version, exact);
-}
-
-/* Slot 190 */
-char *
-Tcl_PkgPresentEx(interp, name, version, exact, clientDataPtr)
-    Tcl_Interp * interp;
-    char * name;
-    char * version;
-    int exact;
-    ClientData * clientDataPtr;
-{
-    return (tclStubsPtr->tcl_PkgPresentEx)(interp, name, version, exact, clientDataPtr);
-}
-
-/* Slot 191 */
-int
-Tcl_PkgProvide(interp, name, version)
-    Tcl_Interp * interp;
-    char * name;
-    char * version;
-{
-    return (tclStubsPtr->tcl_PkgProvide)(interp, name, version);
-}
-
-/* Slot 192 */
-int
-Tcl_PkgProvideEx(interp, name, version, clientData)
-    Tcl_Interp * interp;
-    char * name;
-    char * version;
-    ClientData clientData;
-{
-    return (tclStubsPtr->tcl_PkgProvideEx)(interp, name, version, clientData);
-}
-
-/* Slot 193 */
-char *
-Tcl_PkgRequire(interp, name, version, exact)
-    Tcl_Interp * interp;
-    char * name;
-    char * version;
-    int exact;
-{
-    return (tclStubsPtr->tcl_PkgRequire)(interp, name, version, exact);
-}
-
-/* Slot 194 */
-char *
-Tcl_PkgRequireEx(interp, name, version, exact, clientDataPtr)
-    Tcl_Interp * interp;
-    char * name;
-    char * version;
-    int exact;
-    ClientData * clientDataPtr;
-{
-    return (tclStubsPtr->tcl_PkgRequireEx)(interp, name, version, exact, clientDataPtr);
-}
-
-/* Slot 195 */
-char *
-Tcl_PosixError(interp)
-    Tcl_Interp * interp;
-{
-    return (tclStubsPtr->tcl_PosixError)(interp);
-}
-
-/* Slot 196 */
+/* Slot 201 */
 void
 Tcl_Preserve(data)
     ClientData data;
@@ -1903,7 +1945,7 @@ Tcl_Preserve(data)
     (tclStubsPtr->tcl_Preserve)(data);
 }
 
-/* Slot 197 */
+/* Slot 202 */
 void
 Tcl_PrintDouble(interp, value, dst)
     Tcl_Interp * interp;
@@ -1913,15 +1955,23 @@ Tcl_PrintDouble(interp, value, dst)
     (tclStubsPtr->tcl_PrintDouble)(interp, value, dst);
 }
 
-/* Slot 198 */
+/* Slot 203 */
 int
-Tcl_PutEnv(str)
-    CONST char * str;
+Tcl_PutEnv(string)
+    CONST char * string;
 {
-    return (tclStubsPtr->tcl_PutEnv)(str);
+    return (tclStubsPtr->tcl_PutEnv)(string);
 }
 
-/* Slot 199 */
+/* Slot 204 */
+char *
+Tcl_PosixError(interp)
+    Tcl_Interp * interp;
+{
+    return (tclStubsPtr->tcl_PosixError)(interp);
+}
+
+/* Slot 205 */
 void
 Tcl_QueueEvent(evPtr, position)
     Tcl_Event * evPtr;
@@ -1930,7 +1980,7 @@ Tcl_QueueEvent(evPtr, position)
     (tclStubsPtr->tcl_QueueEvent)(evPtr, position);
 }
 
-/* Slot 200 */
+/* Slot 206 */
 int
 Tcl_Read(chan, bufPtr, toRead)
     Tcl_Channel chan;
@@ -1940,23 +1990,14 @@ Tcl_Read(chan, bufPtr, toRead)
     return (tclStubsPtr->tcl_Read)(chan, bufPtr, toRead);
 }
 
-/* Slot 201 */
-char *
-Tcl_Realloc(ptr, size)
-    char * ptr;
-    unsigned int size;
-{
-    return (tclStubsPtr->tcl_Realloc)(ptr, size);
-}
-
-/* Slot 202 */
+/* Slot 207 */
 void
 Tcl_ReapDetachedProcs()
 {
     (tclStubsPtr->tcl_ReapDetachedProcs)();
 }
 
-/* Slot 203 */
+/* Slot 208 */
 int
 Tcl_RecordAndEval(interp, cmd, flags)
     Tcl_Interp * interp;
@@ -1966,7 +2007,7 @@ Tcl_RecordAndEval(interp, cmd, flags)
     return (tclStubsPtr->tcl_RecordAndEval)(interp, cmd, flags);
 }
 
-/* Slot 204 */
+/* Slot 209 */
 int
 Tcl_RecordAndEvalObj(interp, cmdPtr, flags)
     Tcl_Interp * interp;
@@ -1976,37 +2017,54 @@ Tcl_RecordAndEvalObj(interp, cmdPtr, flags)
     return (tclStubsPtr->tcl_RecordAndEvalObj)(interp, cmdPtr, flags);
 }
 
-/* Slot 205 */
+/* Slot 210 */
+void
+Tcl_RegisterChannel(interp, chan)
+    Tcl_Interp * interp;
+    Tcl_Channel chan;
+{
+    (tclStubsPtr->tcl_RegisterChannel)(interp, chan);
+}
+
+/* Slot 211 */
+void
+Tcl_RegisterObjType(typePtr)
+    Tcl_ObjType * typePtr;
+{
+    (tclStubsPtr->tcl_RegisterObjType)(typePtr);
+}
+
+/* Slot 212 */
 Tcl_RegExp
-Tcl_RegExpCompile(interp, str)
+Tcl_RegExpCompile(interp, string)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
 {
-    return (tclStubsPtr->tcl_RegExpCompile)(interp, str);
+    return (tclStubsPtr->tcl_RegExpCompile)(interp, string);
 }
 
-/* Slot 206 */
+/* Slot 213 */
 int
-Tcl_RegExpExec(interp, regexp, str, start)
+Tcl_RegExpExec(interp, regexp, string, start)
     Tcl_Interp * interp;
     Tcl_RegExp regexp;
-    CONST char * str;
+    CONST char * string;
     CONST char * start;
 {
-    return (tclStubsPtr->tcl_RegExpExec)(interp, regexp, str, start);
+    return (tclStubsPtr->tcl_RegExpExec)(interp, regexp, string, start);
 }
 
-/* Slot 207 */
+/* Slot 214 */
 int
-Tcl_RegExpMatch(interp, str, pattern)
+Tcl_RegExpMatch(interp, string, pattern)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
     char * pattern;
 {
-    return (tclStubsPtr->tcl_RegExpMatch)(interp, str, pattern);
+    return (tclStubsPtr->tcl_RegExpMatch)(interp, string, pattern);
 }
 
-/* Slot 208 */
+/* Slot 215 */
 void
 Tcl_RegExpRange(regexp, index, startPtr, endPtr)
     Tcl_RegExp regexp;
@@ -2017,24 +2075,7 @@ Tcl_RegExpRange(regexp, index, startPtr, endPtr)
     (tclStubsPtr->tcl_RegExpRange)(regexp, index, startPtr, endPtr);
 }
 
-/* Slot 209 */
-void
-Tcl_RegisterChannel(interp, chan)
-    Tcl_Interp * interp;
-    Tcl_Channel chan;
-{
-    (tclStubsPtr->tcl_RegisterChannel)(interp, chan);
-}
-
-/* Slot 210 */
-void
-Tcl_RegisterObjType(typePtr)
-    Tcl_ObjType * typePtr;
-{
-    (tclStubsPtr->tcl_RegisterObjType)(typePtr);
-}
-
-/* Slot 211 */
+/* Slot 216 */
 void
 Tcl_Release(clientData)
     ClientData clientData;
@@ -2042,7 +2083,7 @@ Tcl_Release(clientData)
     (tclStubsPtr->tcl_Release)(clientData);
 }
 
-/* Slot 212 */
+/* Slot 217 */
 void
 Tcl_ResetResult(interp)
     Tcl_Interp * interp;
@@ -2050,26 +2091,26 @@ Tcl_ResetResult(interp)
     (tclStubsPtr->tcl_ResetResult)(interp);
 }
 
-/* Slot 213 */
+/* Slot 218 */
 int
-Tcl_ScanCountedElement(str, length, flagPtr)
-    CONST char * str;
-    int length;
+Tcl_ScanElement(string, flagPtr)
+    CONST char * string;
     int * flagPtr;
 {
-    return (tclStubsPtr->tcl_ScanCountedElement)(str, length, flagPtr);
+    return (tclStubsPtr->tcl_ScanElement)(string, flagPtr);
 }
 
-/* Slot 214 */
+/* Slot 219 */
 int
-Tcl_ScanElement(str, flagPtr)
-    CONST char * str;
+Tcl_ScanCountedElement(string, length, flagPtr)
+    CONST char * string;
+    int length;
     int * flagPtr;
 {
-    return (tclStubsPtr->tcl_ScanElement)(str, flagPtr);
+    return (tclStubsPtr->tcl_ScanCountedElement)(string, length, flagPtr);
 }
 
-/* Slot 215 */
+/* Slot 220 */
 int
 Tcl_Seek(chan, offset, mode)
     Tcl_Channel chan;
@@ -2079,14 +2120,14 @@ Tcl_Seek(chan, offset, mode)
     return (tclStubsPtr->tcl_Seek)(chan, offset, mode);
 }
 
-/* Slot 216 */
+/* Slot 221 */
 int
 Tcl_ServiceAll()
 {
     return (tclStubsPtr->tcl_ServiceAll)();
 }
 
-/* Slot 217 */
+/* Slot 222 */
 int
 Tcl_ServiceEvent(flags)
     int flags;
@@ -2094,7 +2135,7 @@ Tcl_ServiceEvent(flags)
     return (tclStubsPtr->tcl_ServiceEvent)(flags);
 }
 
-/* Slot 218 */
+/* Slot 223 */
 void
 Tcl_SetAssocData(interp, name, proc, clientData)
     Tcl_Interp * interp;
@@ -2105,35 +2146,7 @@ Tcl_SetAssocData(interp, name, proc, clientData)
     (tclStubsPtr->tcl_SetAssocData)(interp, name, proc, clientData);
 }
 
-/* Slot 219 */
-void
-Tcl_SetBooleanObj(objPtr, boolValue)
-    Tcl_Obj * objPtr;
-    int boolValue;
-{
-    (tclStubsPtr->tcl_SetBooleanObj)(objPtr, boolValue);
-}
-
-/* Slot 220 */
-unsigned char *
-Tcl_SetByteArrayLength(objPtr, length)
-    Tcl_Obj * objPtr;
-    int length;
-{
-    return (tclStubsPtr->tcl_SetByteArrayLength)(objPtr, length);
-}
-
-/* Slot 221 */
-void
-Tcl_SetByteArrayObj(objPtr, bytes, length)
-    Tcl_Obj * objPtr;
-    unsigned char * bytes;
-    int length;
-{
-    (tclStubsPtr->tcl_SetByteArrayObj)(objPtr, bytes, length);
-}
-
-/* Slot 222 */
+/* Slot 224 */
 void
 Tcl_SetChannelBufferSize(chan, sz)
     Tcl_Channel chan;
@@ -2142,7 +2155,7 @@ Tcl_SetChannelBufferSize(chan, sz)
     (tclStubsPtr->tcl_SetChannelBufferSize)(chan, sz);
 }
 
-/* Slot 223 */
+/* Slot 225 */
 int
 Tcl_SetChannelOption(interp, chan, optionName, newValue)
     Tcl_Interp * interp;
@@ -2153,7 +2166,7 @@ Tcl_SetChannelOption(interp, chan, optionName, newValue)
     return (tclStubsPtr->tcl_SetChannelOption)(interp, chan, optionName, newValue);
 }
 
-/* Slot 224 */
+/* Slot 226 */
 int
 Tcl_SetCommandInfo(interp, cmdName, infoPtr)
     Tcl_Interp * interp;
@@ -2163,16 +2176,7 @@ Tcl_SetCommandInfo(interp, cmdName, infoPtr)
     return (tclStubsPtr->tcl_SetCommandInfo)(interp, cmdName, infoPtr);
 }
 
-/* Slot 225 */
-void
-Tcl_SetDoubleObj(objPtr, doubleValue)
-    Tcl_Obj * objPtr;
-    double doubleValue;
-{
-    (tclStubsPtr->tcl_SetDoubleObj)(objPtr, doubleValue);
-}
-
-/* Slot 226 */
+/* Slot 227 */
 void
 Tcl_SetErrno(err)
     int err;
@@ -2180,7 +2184,7 @@ Tcl_SetErrno(err)
     (tclStubsPtr->tcl_SetErrno)(err);
 }
 
-/* Slot 227 */
+/* Slot 228 */
 void
 Tcl_SetErrorCode TCL_VARARGS_DEF(Tcl_Interp *,interp)
 {
@@ -2193,79 +2197,15 @@ Tcl_SetErrorCode TCL_VARARGS_DEF(Tcl_Interp *,interp)
     va_end(argList);
 }
 
-/* Slot 228 */
-void
-Tcl_SetErrorCodeVA(interp, argList)
-    Tcl_Interp * interp;
-    va_list argList;
-{
-    (tclStubsPtr->tcl_SetErrorCodeVA)(interp, argList);
-}
-
 /* Slot 229 */
 void
-Tcl_SetIntObj(objPtr, intValue)
-    Tcl_Obj * objPtr;
-    int intValue;
-{
-    (tclStubsPtr->tcl_SetIntObj)(objPtr, intValue);
-}
-
-/* Slot 230 */
-void
-Tcl_SetListObj(objPtr, objc, objv)
-    Tcl_Obj * objPtr;
-    int objc;
-    Tcl_Obj *CONST objv[];
-{
-    (tclStubsPtr->tcl_SetListObj)(objPtr, objc, objv);
-}
-
-/* Slot 231 */
-void
-Tcl_SetLongObj(objPtr, longValue)
-    Tcl_Obj * objPtr;
-    long longValue;
-{
-    (tclStubsPtr->tcl_SetLongObj)(objPtr, longValue);
-}
-
-/* Slot 232 */
-void
 Tcl_SetMaxBlockTime(timePtr)
     Tcl_Time * timePtr;
 {
     (tclStubsPtr->tcl_SetMaxBlockTime)(timePtr);
 }
 
-/* Slot 233 */
-void
-Tcl_SetObjErrorCode(interp, errorObjPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * errorObjPtr;
-{
-    (tclStubsPtr->tcl_SetObjErrorCode)(interp, errorObjPtr);
-}
-
-/* Slot 234 */
-void
-Tcl_SetObjLength(objPtr, length)
-    Tcl_Obj * objPtr;
-    int length;
-{
-    (tclStubsPtr->tcl_SetObjLength)(objPtr, length);
-}
-
-/* Slot 235 */
-void
-Tcl_SetObjResult(interp, resultObjPtr)
-    Tcl_Interp * interp;
-    Tcl_Obj * resultObjPtr;
-{
-    (tclStubsPtr->tcl_SetObjResult)(interp, resultObjPtr);
-}
-
-/* Slot 236 */
+/* Slot 230 */
 void
 Tcl_SetPanicProc(panicProc)
     Tcl_PanicProc * panicProc;
@@ -2273,7 +2213,7 @@ Tcl_SetPanicProc(panicProc)
     (tclStubsPtr->tcl_SetPanicProc)(panicProc);
 }
 
-/* Slot 237 */
+/* Slot 231 */
 int
 Tcl_SetRecursionLimit(interp, depth)
     Tcl_Interp * interp;
@@ -2282,17 +2222,17 @@ Tcl_SetRecursionLimit(interp, depth)
     return (tclStubsPtr->tcl_SetRecursionLimit)(interp, depth);
 }
 
-/* Slot 238 */
+/* Slot 232 */
 void
-Tcl_SetResult(interp, str, freeProc)
+Tcl_SetResult(interp, string, freeProc)
     Tcl_Interp * interp;
-    char * str;
+    char * string;
     Tcl_FreeProc * freeProc;
 {
-    (tclStubsPtr->tcl_SetResult)(interp, str, freeProc);
+    (tclStubsPtr->tcl_SetResult)(interp, string, freeProc);
 }
 
-/* Slot 239 */
+/* Slot 233 */
 int
 Tcl_SetServiceMode(mode)
     int mode;
@@ -2300,34 +2240,34 @@ Tcl_SetServiceMode(mode)
     return (tclStubsPtr->tcl_SetServiceMode)(mode);
 }
 
-/* Slot 240 */
+/* Slot 234 */
 void
-Tcl_SetStdChannel(channel, type)
-    Tcl_Channel channel;
-    int type;
+Tcl_SetObjErrorCode(interp, errorObjPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * errorObjPtr;
 {
-    (tclStubsPtr->tcl_SetStdChannel)(channel, type);
+    (tclStubsPtr->tcl_SetObjErrorCode)(interp, errorObjPtr);
 }
 
-/* Slot 241 */
+/* Slot 235 */
 void
-Tcl_SetStringObj(objPtr, bytes, length)
-    Tcl_Obj * objPtr;
-    char * bytes;
-    int length;
+Tcl_SetObjResult(interp, resultObjPtr)
+    Tcl_Interp * interp;
+    Tcl_Obj * resultObjPtr;
 {
-    (tclStubsPtr->tcl_SetStringObj)(objPtr, bytes, length);
+    (tclStubsPtr->tcl_SetObjResult)(interp, resultObjPtr);
 }
 
-/* Slot 242 */
+/* Slot 236 */
 void
-Tcl_SetTimer(timePtr)
-    Tcl_Time * timePtr;
+Tcl_SetStdChannel(channel, type)
+    Tcl_Channel channel;
+    int type;
 {
-    (tclStubsPtr->tcl_SetTimer)(timePtr);
+    (tclStubsPtr->tcl_SetStdChannel)(channel, type);
 }
 
-/* Slot 243 */
+/* Slot 237 */
 char *
 Tcl_SetVar(interp, varName, newValue, flags)
     Tcl_Interp * interp;
@@ -2338,7 +2278,7 @@ Tcl_SetVar(interp, varName, newValue, flags)
     return (tclStubsPtr->tcl_SetVar)(interp, varName, newValue, flags);
 }
 
-/* Slot 244 */
+/* Slot 238 */
 char *
 Tcl_SetVar2(interp, part1, part2, newValue, flags)
     Tcl_Interp * interp;
@@ -2350,7 +2290,7 @@ Tcl_SetVar2(interp, part1, part2, newValue, flags)
     return (tclStubsPtr->tcl_SetVar2)(interp, part1, part2, newValue, flags);
 }
 
-/* Slot 245 */
+/* Slot 239 */
 char *
 Tcl_SignalId(sig)
     int sig;
@@ -2358,7 +2298,7 @@ Tcl_SignalId(sig)
     return (tclStubsPtr->tcl_SignalId)(sig);
 }
 
-/* Slot 246 */
+/* Slot 240 */
 char *
 Tcl_SignalMsg(sig)
     int sig;
@@ -2366,15 +2306,7 @@ Tcl_SignalMsg(sig)
     return (tclStubsPtr->tcl_SignalMsg)(sig);
 }
 
-/* Slot 247 */
-void
-Tcl_Sleep(ms)
-    int ms;
-{
-    (tclStubsPtr->tcl_Sleep)(ms);
-}
-
-/* Slot 248 */
+/* Slot 241 */
 void
 Tcl_SourceRCFile(interp)
     Tcl_Interp * interp;
@@ -2382,18 +2314,18 @@ Tcl_SourceRCFile(interp)
     (tclStubsPtr->tcl_SourceRCFile)(interp);
 }
 
-/* Slot 249 */
+/* Slot 242 */
 int
-Tcl_SplitList(interp, listStr, argcPtr, argvPtr)
+Tcl_SplitList(interp, list, argcPtr, argvPtr)
     Tcl_Interp * interp;
-    CONST char * listStr;
+    CONST char * list;
     int * argcPtr;
     char *** argvPtr;
 {
-    return (tclStubsPtr->tcl_SplitList)(interp, listStr, argcPtr, argvPtr);
+    return (tclStubsPtr->tcl_SplitList)(interp, list, argcPtr, argvPtr);
 }
 
-/* Slot 250 */
+/* Slot 243 */
 void
 Tcl_SplitPath(path, argcPtr, argvPtr)
     CONST char * path;
@@ -2403,7 +2335,7 @@ Tcl_SplitPath(path, argcPtr, argvPtr)
     (tclStubsPtr->tcl_SplitPath)(path, argcPtr, argvPtr);
 }
 
-/* Slot 251 */
+/* Slot 244 */
 void
 Tcl_StaticPackage(interp, pkgName, initProc, safeInitProc)
     Tcl_Interp * interp;
@@ -2414,16 +2346,16 @@ Tcl_StaticPackage(interp, pkgName, initProc, safeInitProc)
     (tclStubsPtr->tcl_StaticPackage)(interp, pkgName, initProc, safeInitProc);
 }
 
-/* Slot 252 */
+/* Slot 245 */
 int
-Tcl_StringMatch(str, pattern)
-    CONST char * str;
+Tcl_StringMatch(string, pattern)
+    CONST char * string;
     CONST char * pattern;
 {
-    return (tclStubsPtr->tcl_StringMatch)(str, pattern);
+    return (tclStubsPtr->tcl_StringMatch)(string, pattern);
 }
 
-/* Slot 253 */
+/* Slot 246 */
 int
 Tcl_Tell(chan)
     Tcl_Channel chan;
@@ -2431,7 +2363,7 @@ Tcl_Tell(chan)
     return (tclStubsPtr->tcl_Tell)(chan);
 }
 
-/* Slot 254 */
+/* Slot 247 */
 int
 Tcl_TraceVar(interp, varName, flags, proc, clientData)
     Tcl_Interp * interp;
@@ -2443,7 +2375,7 @@ Tcl_TraceVar(interp, varName, flags, proc, clientData)
     return (tclStubsPtr->tcl_TraceVar)(interp, varName, flags, proc, clientData);
 }
 
-/* Slot 255 */
+/* Slot 248 */
 int
 Tcl_TraceVar2(interp, part1, part2, flags, proc, clientData)
     Tcl_Interp * interp;
@@ -2456,7 +2388,7 @@ Tcl_TraceVar2(interp, part1, part2, flags, proc, clientData)
     return (tclStubsPtr->tcl_TraceVar2)(interp, part1, part2, flags, proc, clientData);
 }
 
-/* Slot 256 */
+/* Slot 249 */
 char *
 Tcl_TranslateFileName(interp, name, bufferPtr)
     Tcl_Interp * interp;
@@ -2466,7 +2398,7 @@ Tcl_TranslateFileName(interp, name, bufferPtr)
     return (tclStubsPtr->tcl_TranslateFileName)(interp, name, bufferPtr);
 }
 
-/* Slot 257 */
+/* Slot 250 */
 int
 Tcl_Ungets(chan, str, len, atHead)
     Tcl_Channel chan;
@@ -2477,7 +2409,7 @@ Tcl_Ungets(chan, str, len, atHead)
     return (tclStubsPtr->tcl_Ungets)(chan, str, len, atHead);
 }
 
-/* Slot 258 */
+/* Slot 251 */
 void
 Tcl_UnlinkVar(interp, varName)
     Tcl_Interp * interp;
@@ -2486,7 +2418,7 @@ Tcl_UnlinkVar(interp, varName)
     (tclStubsPtr->tcl_UnlinkVar)(interp, varName);
 }
 
-/* Slot 259 */
+/* Slot 252 */
 int
 Tcl_UnregisterChannel(interp, chan)
     Tcl_Interp * interp;
@@ -2495,7 +2427,7 @@ Tcl_UnregisterChannel(interp, chan)
     return (tclStubsPtr->tcl_UnregisterChannel)(interp, chan);
 }
 
-/* Slot 260 */
+/* Slot 253 */
 int
 Tcl_UnsetVar(interp, varName, flags)
     Tcl_Interp * interp;
@@ -2505,7 +2437,7 @@ Tcl_UnsetVar(interp, varName, flags)
     return (tclStubsPtr->tcl_UnsetVar)(interp, varName, flags);
 }
 
-/* Slot 261 */
+/* Slot 254 */
 int
 Tcl_UnsetVar2(interp, part1, part2, flags)
     Tcl_Interp * interp;
@@ -2516,7 +2448,7 @@ Tcl_UnsetVar2(interp, part1, part2, flags)
     return (tclStubsPtr->tcl_UnsetVar2)(interp, part1, part2, flags);
 }
 
-/* Slot 262 */
+/* Slot 255 */
 void
 Tcl_UntraceVar(interp, varName, flags, proc, clientData)
     Tcl_Interp * interp;
@@ -2528,7 +2460,7 @@ Tcl_UntraceVar(interp, varName, flags, proc, clientData)
     (tclStubsPtr->tcl_UntraceVar)(interp, varName, flags, proc, clientData);
 }
 
-/* Slot 263 */
+/* Slot 256 */
 void
 Tcl_UntraceVar2(interp, part1, part2, flags, proc, clientData)
     Tcl_Interp * interp;
@@ -2541,7 +2473,7 @@ Tcl_UntraceVar2(interp, part1, part2, flags, proc, clientData)
     (tclStubsPtr->tcl_UntraceVar2)(interp, part1, part2, flags, proc, clientData);
 }
 
-/* Slot 264 */
+/* Slot 257 */
 void
 Tcl_UpdateLinkedVar(interp, varName)
     Tcl_Interp * interp;
@@ -2550,7 +2482,7 @@ Tcl_UpdateLinkedVar(interp, varName)
     (tclStubsPtr->tcl_UpdateLinkedVar)(interp, varName);
 }
 
-/* Slot 265 */
+/* Slot 258 */
 int
 Tcl_UpVar(interp, frameName, varName, localName, flags)
     Tcl_Interp * interp;
@@ -2562,7 +2494,7 @@ Tcl_UpVar(interp, frameName, varName, localName, flags)
     return (tclStubsPtr->tcl_UpVar)(interp, frameName, varName, localName, flags);
 }
 
-/* Slot 266 */
+/* Slot 259 */
 int
 Tcl_UpVar2(interp, frameName, part1, part2, localName, flags)
     Tcl_Interp * interp;
@@ -2575,16 +2507,7 @@ Tcl_UpVar2(interp, frameName, part1, part2, localName, flags)
     return (tclStubsPtr->tcl_UpVar2)(interp, frameName, part1, part2, localName, flags);
 }
 
-/* Slot 267 */
-void
-Tcl_ValidateAllMemory(file, line)
-    char * file;
-    int line;
-{
-    (tclStubsPtr->tcl_ValidateAllMemory)(file, line);
-}
-
-/* Slot 268 */
+/* Slot 260 */
 int
 Tcl_VarEval TCL_VARARGS_DEF(Tcl_Interp *,interp)
 {
@@ -2599,16 +2522,7 @@ Tcl_VarEval TCL_VARARGS_DEF(Tcl_Interp *,interp)
 return resultValue;
 }
 
-/* Slot 269 */
-int
-Tcl_VarEvalVA(interp, argList)
-    Tcl_Interp * interp;
-    va_list argList;
-{
-    return (tclStubsPtr->tcl_VarEvalVA)(interp, argList);
-}
-
-/* Slot 270 */
+/* Slot 261 */
 ClientData
 Tcl_VarTraceInfo(interp, varName, flags, procPtr, prevClientData)
     Tcl_Interp * interp;
@@ -2620,7 +2534,7 @@ Tcl_VarTraceInfo(interp, varName, flags, procPtr, prevClientData)
     return (tclStubsPtr->tcl_VarTraceInfo)(interp, varName, flags, procPtr, prevClientData);
 }
 
-/* Slot 271 */
+/* Slot 262 */
 ClientData
 Tcl_VarTraceInfo2(interp, part1, part2, flags, procPtr, prevClientData)
     Tcl_Interp * interp;
@@ -2633,25 +2547,7 @@ Tcl_VarTraceInfo2(interp, part1, part2, flags, procPtr, prevClientData)
     return (tclStubsPtr->tcl_VarTraceInfo2)(interp, part1, part2, flags, procPtr, prevClientData);
 }
 
-/* Slot 272 */
-int
-Tcl_WaitForEvent(timePtr)
-    Tcl_Time * timePtr;
-{
-    return (tclStubsPtr->tcl_WaitForEvent)(timePtr);
-}
-
-/* Slot 273 */
-Tcl_Pid
-Tcl_WaitPid(pid, statPtr, options)
-    Tcl_Pid pid;
-    int * statPtr;
-    int options;
-{
-    return (tclStubsPtr->tcl_WaitPid)(pid, statPtr, options);
-}
-
-/* Slot 274 */
+/* Slot 263 */
 int
 Tcl_Write(chan, s, slen)
     Tcl_Channel chan;
@@ -2661,7 +2557,7 @@ Tcl_Write(chan, s, slen)
     return (tclStubsPtr->tcl_Write)(chan, s, slen);
 }
 
-/* Slot 275 */
+/* Slot 264 */
 void
 Tcl_WrongNumArgs(interp, objc, objv, message)
     Tcl_Interp * interp;
@@ -2672,7 +2568,141 @@ Tcl_WrongNumArgs(interp, objc, objv, message)
     (tclStubsPtr->tcl_WrongNumArgs)(interp, objc, objv, message);
 }
 
+/* Slot 265 */
+int
+Tcl_DumpActiveMemory(fileName)
+    char * fileName;
+{
+    return (tclStubsPtr->tcl_DumpActiveMemory)(fileName);
+}
+
+/* Slot 266 */
+void
+Tcl_ValidateAllMemory(file, line)
+    char * file;
+    int line;
+{
+    (tclStubsPtr->tcl_ValidateAllMemory)(file, line);
+}
+
+/* Slot 267 */
+void
+Tcl_AppendResultVA(interp, argList)
+    Tcl_Interp * interp;
+    va_list argList;
+{
+    (tclStubsPtr->tcl_AppendResultVA)(interp, argList);
+}
+
+/* Slot 268 */
+void
+Tcl_AppendStringsToObjVA(objPtr, argList)
+    Tcl_Obj * objPtr;
+    va_list argList;
+{
+    (tclStubsPtr->tcl_AppendStringsToObjVA)(objPtr, argList);
+}
+
+/* Slot 269 */
+char *
+Tcl_HashStats(tablePtr)
+    Tcl_HashTable * tablePtr;
+{
+    return (tclStubsPtr->tcl_HashStats)(tablePtr);
+}
+
+/* Slot 270 */
+char *
+Tcl_ParseVar(interp, string, termPtr)
+    Tcl_Interp * interp;
+    char * string;
+    char ** termPtr;
+{
+    return (tclStubsPtr->tcl_ParseVar)(interp, string, termPtr);
+}
+
+/* Slot 271 */
+char *
+Tcl_PkgPresent(interp, name, version, exact)
+    Tcl_Interp * interp;
+    char * name;
+    char * version;
+    int exact;
+{
+    return (tclStubsPtr->tcl_PkgPresent)(interp, name, version, exact);
+}
+
+/* Slot 272 */
+char *
+Tcl_PkgPresentEx(interp, name, version, exact, clientDataPtr)
+    Tcl_Interp * interp;
+    char * name;
+    char * version;
+    int exact;
+    ClientData * clientDataPtr;
+{
+    return (tclStubsPtr->tcl_PkgPresentEx)(interp, name, version, exact, clientDataPtr);
+}
+
+/* Slot 273 */
+int
+Tcl_PkgProvide(interp, name, version)
+    Tcl_Interp * interp;
+    char * name;
+    char * version;
+{
+    return (tclStubsPtr->tcl_PkgProvide)(interp, name, version);
+}
+
+/* Slot 274 */
+char *
+Tcl_PkgRequire(interp, name, version, exact)
+    Tcl_Interp * interp;
+    char * name;
+    char * version;
+    int exact;
+{
+    return (tclStubsPtr->tcl_PkgRequire)(interp, name, version, exact);
+}
+
+/* Slot 275 */
+void
+Tcl_SetErrorCodeVA(interp, argList)
+    Tcl_Interp * interp;
+    va_list argList;
+{
+    (tclStubsPtr->tcl_SetErrorCodeVA)(interp, argList);
+}
+
 /* Slot 276 */
+int
+Tcl_VarEvalVA(interp, argList)
+    Tcl_Interp * interp;
+    va_list argList;
+{
+    return (tclStubsPtr->tcl_VarEvalVA)(interp, argList);
+}
+
+/* Slot 277 */
+Tcl_Pid
+Tcl_WaitPid(pid, statPtr, options)
+    Tcl_Pid pid;
+    int * statPtr;
+    int options;
+{
+    return (tclStubsPtr->tcl_WaitPid)(pid, statPtr, options);
+}
+
+/* Slot 278 */
+void
+panicVA(format, argList)
+    char * format;
+    va_list argList;
+{
+    (tclStubsPtr->panicVA)(format, argList);
+}
+
+/* Slot 279 */
 void
 Tcl_AppendObjToObj(objPtr, appendObjPtr)
     Tcl_Obj * objPtr;
@@ -2681,7 +2711,7 @@ Tcl_AppendObjToObj(objPtr, appendObjPtr)
     (tclStubsPtr->tcl_AppendObjToObj)(objPtr, appendObjPtr);
 }
 
-/* Slot 277 */
+/* Slot 280 */
 void
 Tcl_AlertNotifier(clientData)
     ClientData clientData;
@@ -2689,7 +2719,7 @@ Tcl_AlertNotifier(clientData)
     (tclStubsPtr->tcl_AlertNotifier)(clientData);
 }
 
-/* Slot 278 */
+/* Slot 281 */
 Tcl_Encoding
 Tcl_CreateEncoding(typePtr)
     Tcl_EncodingType * typePtr;
@@ -2697,7 +2727,7 @@ Tcl_CreateEncoding(typePtr)
     return (tclStubsPtr->tcl_CreateEncoding)(typePtr);
 }
 
-/* Slot 279 */
+/* Slot 282 */
 void
 Tcl_CreateThreadExitHandler(proc, clientData)
     Tcl_ExitProc * proc;
@@ -2706,7 +2736,7 @@ Tcl_CreateThreadExitHandler(proc, clientData)
     (tclStubsPtr->tcl_CreateThreadExitHandler)(proc, clientData);
 }
 
-/* Slot 280 */
+/* Slot 283 */
 void
 Tcl_DeleteThreadExitHandler(proc, clientData)
     Tcl_ExitProc * proc;
@@ -2715,7 +2745,7 @@ Tcl_DeleteThreadExitHandler(proc, clientData)
     (tclStubsPtr->tcl_DeleteThreadExitHandler)(proc, clientData);
 }
 
-/* Slot 281 */
+/* Slot 284 */
 void
 Tcl_DiscardResult(statePtr)
     Tcl_SavedResult * statePtr;
@@ -2723,7 +2753,7 @@ Tcl_DiscardResult(statePtr)
     (tclStubsPtr->tcl_DiscardResult)(statePtr);
 }
 
-/* Slot 282 */
+/* Slot 285 */
 int
 Tcl_EvalEx(interp, script, numBytes, flags)
     Tcl_Interp * interp;
@@ -2734,7 +2764,7 @@ Tcl_EvalEx(interp, script, numBytes, flags)
     return (tclStubsPtr->tcl_EvalEx)(interp, script, numBytes, flags);
 }
 
-/* Slot 283 */
+/* Slot 286 */
 int
 Tcl_EvalObjv(interp, objc, objv, flags)
     Tcl_Interp * interp;
@@ -2745,7 +2775,7 @@ Tcl_EvalObjv(interp, objc, objv, flags)
     return (tclStubsPtr->tcl_EvalObjv)(interp, objc, objv, flags);
 }
 
-/* Slot 284 */
+/* Slot 287 */
 int
 Tcl_EvalObjEx(interp, objPtr, flags)
     Tcl_Interp * interp;
@@ -2755,7 +2785,7 @@ Tcl_EvalObjEx(interp, objPtr, flags)
     return (tclStubsPtr->tcl_EvalObjEx)(interp, objPtr, flags);
 }
 
-/* Slot 285 */
+/* Slot 288 */
 void
 Tcl_ExitThread(status)
     int status;
@@ -2763,7 +2793,7 @@ Tcl_ExitThread(status)
     (tclStubsPtr->tcl_ExitThread)(status);
 }
 
-/* Slot 286 */
+/* Slot 289 */
 int
 Tcl_ExternalToUtf(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr)
     Tcl_Interp * interp;
@@ -2781,7 +2811,7 @@ Tcl_ExternalToUtf(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, s
     return (tclStubsPtr->tcl_ExternalToUtf)(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr);
 }
 
-/* Slot 287 */
+/* Slot 290 */
 char *
 Tcl_ExternalToUtfDString(encoding, src, srcLen, dsPtr)
     Tcl_Encoding encoding;
@@ -2792,14 +2822,14 @@ Tcl_ExternalToUtfDString(encoding, src, srcLen, dsPtr)
     return (tclStubsPtr->tcl_ExternalToUtfDString)(encoding, src, srcLen, dsPtr);
 }
 
-/* Slot 288 */
+/* Slot 291 */
 void
 Tcl_FinalizeThread()
 {
     (tclStubsPtr->tcl_FinalizeThread)();
 }
 
-/* Slot 289 */
+/* Slot 292 */
 void
 Tcl_FinalizeNotifier(clientData)
     ClientData clientData;
@@ -2807,7 +2837,7 @@ Tcl_FinalizeNotifier(clientData)
     (tclStubsPtr->tcl_FinalizeNotifier)(clientData);
 }
 
-/* Slot 290 */
+/* Slot 293 */
 void
 Tcl_FreeEncoding(encoding)
     Tcl_Encoding encoding;
@@ -2815,14 +2845,14 @@ Tcl_FreeEncoding(encoding)
     (tclStubsPtr->tcl_FreeEncoding)(encoding);
 }
 
-/* Slot 291 */
+/* Slot 294 */
 Tcl_ThreadId
 Tcl_GetCurrentThread()
 {
     return (tclStubsPtr->tcl_GetCurrentThread)();
 }
 
-/* Slot 292 */
+/* Slot 295 */
 Tcl_Encoding
 Tcl_GetEncoding(interp, name)
     Tcl_Interp * interp;
@@ -2831,7 +2861,7 @@ Tcl_GetEncoding(interp, name)
     return (tclStubsPtr->tcl_GetEncoding)(interp, name);
 }
 
-/* Slot 293 */
+/* Slot 296 */
 char *
 Tcl_GetEncodingName(encoding)
     Tcl_Encoding encoding;
@@ -2839,7 +2869,7 @@ Tcl_GetEncodingName(encoding)
     return (tclStubsPtr->tcl_GetEncodingName)(encoding);
 }
 
-/* Slot 294 */
+/* Slot 297 */
 void
 Tcl_GetEncodingNames(interp)
     Tcl_Interp * interp;
@@ -2847,7 +2877,7 @@ Tcl_GetEncodingNames(interp)
     (tclStubsPtr->tcl_GetEncodingNames)(interp);
 }
 
-/* Slot 295 */
+/* Slot 298 */
 int
 Tcl_GetIndexFromObjStruct(interp, objPtr, tablePtr, offset, msg, flags, indexPtr)
     Tcl_Interp * interp;
@@ -2861,7 +2891,7 @@ Tcl_GetIndexFromObjStruct(interp, objPtr, tablePtr, offset, msg, flags, indexPtr
     return (tclStubsPtr->tcl_GetIndexFromObjStruct)(interp, objPtr, tablePtr, offset, msg, flags, indexPtr);
 }
 
-/* Slot 296 */
+/* Slot 299 */
 VOID *
 Tcl_GetThreadData(keyPtr, size)
     Tcl_ThreadDataKey * keyPtr;
@@ -2870,7 +2900,7 @@ Tcl_GetThreadData(keyPtr, size)
     return (tclStubsPtr->tcl_GetThreadData)(keyPtr, size);
 }
 
-/* Slot 297 */
+/* Slot 300 */
 Tcl_Obj *
 Tcl_GetVar2Ex(interp, part1, part2, flags)
     Tcl_Interp * interp;
@@ -2881,14 +2911,14 @@ Tcl_GetVar2Ex(interp, part1, part2, flags)
     return (tclStubsPtr->tcl_GetVar2Ex)(interp, part1, part2, flags);
 }
 
-/* Slot 298 */
+/* Slot 301 */
 ClientData
 Tcl_InitNotifier()
 {
     return (tclStubsPtr->tcl_InitNotifier)();
 }
 
-/* Slot 299 */
+/* Slot 302 */
 void
 Tcl_MutexLock(mutexPtr)
     Tcl_Mutex * mutexPtr;
@@ -2896,7 +2926,7 @@ Tcl_MutexLock(mutexPtr)
     (tclStubsPtr->tcl_MutexLock)(mutexPtr);
 }
 
-/* Slot 300 */
+/* Slot 303 */
 void
 Tcl_MutexUnlock(mutexPtr)
     Tcl_Mutex * mutexPtr;
@@ -2904,7 +2934,7 @@ Tcl_MutexUnlock(mutexPtr)
     (tclStubsPtr->tcl_MutexUnlock)(mutexPtr);
 }
 
-/* Slot 301 */
+/* Slot 304 */
 void
 Tcl_ConditionNotify(condPtr)
     Tcl_Condition * condPtr;
@@ -2912,7 +2942,7 @@ Tcl_ConditionNotify(condPtr)
     (tclStubsPtr->tcl_ConditionNotify)(condPtr);
 }
 
-/* Slot 302 */
+/* Slot 305 */
 void
 Tcl_ConditionWait(condPtr, mutexPtr, timePtr)
     Tcl_Condition * condPtr;
@@ -2922,7 +2952,7 @@ Tcl_ConditionWait(condPtr, mutexPtr, timePtr)
     (tclStubsPtr->tcl_ConditionWait)(condPtr, mutexPtr, timePtr);
 }
 
-/* Slot 303 */
+/* Slot 306 */
 int
 Tcl_NumUtfChars(src, len)
     CONST char * src;
@@ -2931,7 +2961,7 @@ Tcl_NumUtfChars(src, len)
     return (tclStubsPtr->tcl_NumUtfChars)(src, len);
 }
 
-/* Slot 304 */
+/* Slot 307 */
 int
 Tcl_ReadChars(channel, objPtr, charsToRead, appendFlag)
     Tcl_Channel channel;
@@ -2942,7 +2972,7 @@ Tcl_ReadChars(channel, objPtr, charsToRead, appendFlag)
     return (tclStubsPtr->tcl_ReadChars)(channel, objPtr, charsToRead, appendFlag);
 }
 
-/* Slot 305 */
+/* Slot 308 */
 void
 Tcl_RestoreResult(interp, statePtr)
     Tcl_Interp * interp;
@@ -2951,7 +2981,7 @@ Tcl_RestoreResult(interp, statePtr)
     (tclStubsPtr->tcl_RestoreResult)(interp, statePtr);
 }
 
-/* Slot 306 */
+/* Slot 309 */
 void
 Tcl_SaveResult(interp, statePtr)
     Tcl_Interp * interp;
@@ -2960,7 +2990,7 @@ Tcl_SaveResult(interp, statePtr)
     (tclStubsPtr->tcl_SaveResult)(interp, statePtr);
 }
 
-/* Slot 307 */
+/* Slot 310 */
 int
 Tcl_SetSystemEncoding(interp, name)
     Tcl_Interp * interp;
@@ -2969,7 +2999,7 @@ Tcl_SetSystemEncoding(interp, name)
     return (tclStubsPtr->tcl_SetSystemEncoding)(interp, name);
 }
 
-/* Slot 308 */
+/* Slot 311 */
 Tcl_Obj *
 Tcl_SetVar2Ex(interp, part1, part2, newValuePtr, flags)
     Tcl_Interp * interp;
@@ -2981,7 +3011,7 @@ Tcl_SetVar2Ex(interp, part1, part2, newValuePtr, flags)
     return (tclStubsPtr->tcl_SetVar2Ex)(interp, part1, part2, newValuePtr, flags);
 }
 
-/* Slot 309 */
+/* Slot 312 */
 void
 Tcl_ThreadAlert(threadId)
     Tcl_ThreadId threadId;
@@ -2989,7 +3019,7 @@ Tcl_ThreadAlert(threadId)
     (tclStubsPtr->tcl_ThreadAlert)(threadId);
 }
 
-/* Slot 310 */
+/* Slot 313 */
 void
 Tcl_ThreadQueueEvent(threadId, evPtr, position)
     Tcl_ThreadId threadId;
@@ -2999,7 +3029,7 @@ Tcl_ThreadQueueEvent(threadId, evPtr, position)
     (tclStubsPtr->tcl_ThreadQueueEvent)(threadId, evPtr, position);
 }
 
-/* Slot 311 */
+/* Slot 314 */
 Tcl_UniChar
 Tcl_UniCharAtIndex(src, index)
     CONST char * src;
@@ -3008,7 +3038,7 @@ Tcl_UniCharAtIndex(src, index)
     return (tclStubsPtr->tcl_UniCharAtIndex)(src, index);
 }
 
-/* Slot 312 */
+/* Slot 315 */
 Tcl_UniChar
 Tcl_UniCharToLower(ch)
     int ch;
@@ -3016,7 +3046,7 @@ Tcl_UniCharToLower(ch)
     return (tclStubsPtr->tcl_UniCharToLower)(ch);
 }
 
-/* Slot 313 */
+/* Slot 316 */
 Tcl_UniChar
 Tcl_UniCharToTitle(ch)
     int ch;
@@ -3024,7 +3054,7 @@ Tcl_UniCharToTitle(ch)
     return (tclStubsPtr->tcl_UniCharToTitle)(ch);
 }
 
-/* Slot 314 */
+/* Slot 317 */
 Tcl_UniChar
 Tcl_UniCharToUpper(ch)
     int ch;
@@ -3032,7 +3062,7 @@ Tcl_UniCharToUpper(ch)
     return (tclStubsPtr->tcl_UniCharToUpper)(ch);
 }
 
-/* Slot 315 */
+/* Slot 318 */
 int
 Tcl_UniCharToUtf(ch, buf)
     int ch;
@@ -3041,7 +3071,7 @@ Tcl_UniCharToUtf(ch, buf)
     return (tclStubsPtr->tcl_UniCharToUtf)(ch, buf);
 }
 
-/* Slot 316 */
+/* Slot 319 */
 char *
 Tcl_UtfAtIndex(src, index)
     CONST char * src;
@@ -3050,7 +3080,7 @@ Tcl_UtfAtIndex(src, index)
     return (tclStubsPtr->tcl_UtfAtIndex)(src, index);
 }
 
-/* Slot 317 */
+/* Slot 320 */
 int
 Tcl_UtfCharComplete(src, len)
     CONST char * src;
@@ -3059,7 +3089,7 @@ Tcl_UtfCharComplete(src, len)
     return (tclStubsPtr->tcl_UtfCharComplete)(src, len);
 }
 
-/* Slot 318 */
+/* Slot 321 */
 int
 Tcl_UtfBackslash(src, readPtr, dst)
     CONST char * src;
@@ -3069,7 +3099,7 @@ Tcl_UtfBackslash(src, readPtr, dst)
     return (tclStubsPtr->tcl_UtfBackslash)(src, readPtr, dst);
 }
 
-/* Slot 319 */
+/* Slot 322 */
 char *
 Tcl_UtfFindFirst(src, ch)
     CONST char * src;
@@ -3078,7 +3108,7 @@ Tcl_UtfFindFirst(src, ch)
     return (tclStubsPtr->tcl_UtfFindFirst)(src, ch);
 }
 
-/* Slot 320 */
+/* Slot 323 */
 char *
 Tcl_UtfFindLast(src, ch)
     CONST char * src;
@@ -3087,9 +3117,7 @@ Tcl_UtfFindLast(src, ch)
     return (tclStubsPtr->tcl_UtfFindLast)(src, ch);
 }
 
-/* Slot 321 is reserved */
-/* Slot 322 is reserved */
-/* Slot 323 */
+/* Slot 324 */
 char *
 Tcl_UtfNext(src)
     CONST char * src;
@@ -3097,7 +3125,7 @@ Tcl_UtfNext(src)
     return (tclStubsPtr->tcl_UtfNext)(src);
 }
 
-/* Slot 324 */
+/* Slot 325 */
 char *
 Tcl_UtfPrev(src, start)
     CONST char * src;
@@ -3106,7 +3134,7 @@ Tcl_UtfPrev(src, start)
     return (tclStubsPtr->tcl_UtfPrev)(src, start);
 }
 
-/* Slot 325 */
+/* Slot 326 */
 int
 Tcl_UtfToExternal(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr)
     Tcl_Interp * interp;
@@ -3124,7 +3152,7 @@ Tcl_UtfToExternal(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, s
     return (tclStubsPtr->tcl_UtfToExternal)(interp, encoding, src, srcLen, flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr, dstCharsPtr);
 }
 
-/* Slot 326 */
+/* Slot 327 */
 char *
 Tcl_UtfToExternalDString(encoding, src, srcLen, dsPtr)
     Tcl_Encoding encoding;
@@ -3135,7 +3163,7 @@ Tcl_UtfToExternalDString(encoding, src, srcLen, dsPtr)
     return (tclStubsPtr->tcl_UtfToExternalDString)(encoding, src, srcLen, dsPtr);
 }
 
-/* Slot 327 */
+/* Slot 328 */
 int
 Tcl_UtfToLower(src)
     char * src;
@@ -3143,7 +3171,7 @@ Tcl_UtfToLower(src)
     return (tclStubsPtr->tcl_UtfToLower)(src);
 }
 
-/* Slot 328 */
+/* Slot 329 */
 int
 Tcl_UtfToTitle(src)
     char * src;
@@ -3151,7 +3179,7 @@ Tcl_UtfToTitle(src)
     return (tclStubsPtr->tcl_UtfToTitle)(src);
 }
 
-/* Slot 329 */
+/* Slot 330 */
 int
 Tcl_UtfToUniChar(src, chPtr)
     CONST char * src;
@@ -3160,7 +3188,7 @@ Tcl_UtfToUniChar(src, chPtr)
     return (tclStubsPtr->tcl_UtfToUniChar)(src, chPtr);
 }
 
-/* Slot 330 */
+/* Slot 331 */
 int
 Tcl_UtfToUpper(src)
     char * src;
@@ -3168,7 +3196,7 @@ Tcl_UtfToUpper(src)
     return (tclStubsPtr->tcl_UtfToUpper)(src);
 }
 
-/* Slot 331 */
+/* Slot 332 */
 int
 Tcl_WriteChars(chan, src, srcLen)
     Tcl_Channel chan;
@@ -3178,7 +3206,7 @@ Tcl_WriteChars(chan, src, srcLen)
     return (tclStubsPtr->tcl_WriteChars)(chan, src, srcLen);
 }
 
-/* Slot 332 */
+/* Slot 333 */
 int
 Tcl_WriteObj(chan, objPtr)
     Tcl_Channel chan;
diff --git a/tests/pkg.test b/tests/pkg.test
index 2fac347..acc5f1c 100644
--- a/tests/pkg.test
+++ b/tests/pkg.test
@@ -9,7 +9,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: pkg.test,v 1.1.2.2.2.1 1999/03/08 20:14:14 stanton Exp $
+# RCS: @(#) $Id: pkg.test,v 1.1.2.2.2.2 1999/03/10 06:41:53 stanton Exp $
 
 if {[string compare test [info procs test]] == 1} then {source defs}
 
@@ -604,16 +604,16 @@ test pkg-7.10 {Tcl_PkgPresent procedure, unknown package} {
 } {1 {package t 2.4 is not present}}
 test pkg-7.11 {Tcl_PackageCmd procedure, "present" option} {
     list [catch {package present} msg] $msg
-} {1 {wrong # args: must be "package present ?-exact? package ?version?"}}
+} {1 {wrong # args: should be "package present ?-exact? package ?version?"}}
 test pkg-7.12 {Tcl_PackageCmd procedure, "present" option} {
     list [catch {package present a b c} msg] $msg
-} {1 {wrong # args: must be "package present ?-exact? package ?version?"}}
+} {1 {wrong # args: should be "package present ?-exact? package ?version?"}}
 test pkg-7.13 {Tcl_PackageCmd procedure, "present" option} {
     list [catch {package present -exact a b c} msg] $msg
-} {1 {wrong # args: must be "package present ?-exact? package ?version?"}}
+} {1 {wrong # args: should be "package present ?-exact? package ?version?"}}
 test pkg-7.14 {Tcl_PackageCmd procedure, "present" option} {
     list [catch {package present -bs a b} msg] $msg
-} {1 {wrong # args: must be "package present ?-exact? package ?version?"}}
+} {1 {wrong # args: should be "package present ?-exact? package ?version?"}}
 test pkg-7.15 {Tcl_PackageCmd procedure, "present" option} {
     list [catch {package present x a.b} msg] $msg
 } {1 {expected version number but got "a.b"}}
@@ -622,10 +622,10 @@ test pkg-7.16 {Tcl_PackageCmd procedure, "present" option} {
 } {1 {expected version number but got "a.b"}}
 test pkg-7.17 {Tcl_PackageCmd procedure, "present" option} {
     list [catch {package present -exact x} msg] $msg
-} {1 {wrong # args: must be "package present ?-exact? package ?version?"}}
+} {1 {wrong # args: should be "package present ?-exact? package ?version?"}}
 test pkg-7.18 {Tcl_PackageCmd procedure, "present" option} {
     list [catch {package present -exact} msg] $msg
-} {1 {wrong # args: must be "package present ?-exact? package ?version?"}}
+} {1 {wrong # args: should be "package present ?-exact? package ?version?"}}
 
 set auto_path $oldPath
 package unknown $oldPkgUnknown
diff --git a/tools/genStubs.tcl b/tools/genStubs.tcl
index 1686fa0..072044e 100644
--- a/tools/genStubs.tcl
+++ b/tools/genStubs.tcl
@@ -8,7 +8,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 # 
-# RCS: @(#) $Id: genStubs.tcl,v 1.1.4.1 1999/03/08 20:14:15 stanton Exp $
+# RCS: @(#) $Id: genStubs.tcl,v 1.1.4.2 1999/03/10 06:41:53 stanton Exp $
 
 namespace eval genStubs {
     # libraryName --
@@ -214,7 +214,7 @@ proc genStubs::addPlatformGuard {plat text} {
 	    return "#ifdef __WIN32__\n${text}#endif /* __WIN32__ */\n"
 	}
 	unix {
-	    return "#if !defined(__WIN32__) && !defined(MAC_TCL)\n${text}#endif /* UNIX */\n"
+	    return "#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */\n${text}#endif /* UNIX */\n"
 	}		    
 	mac {
 	    return "#ifdef MAC_TCL\n${text}#endif /* MAC_TCL */\n"
@@ -226,8 +226,8 @@ proc genStubs::addPlatformGuard {plat text} {
 # genStubs::emitSlots --
 #
 #	Generate the stub table slots for the given interface.  If there
-#	are no platform specific slots, then one table is generated for
-#	all platforms, otherwise one table is generated for each platform.
+#	are no generic slots, then one table is generated for each
+#	platform, otherwise one table is generated for all platforms.
 #
 # Arguments:
 #	name	The name of the interface being emitted.
@@ -240,43 +240,7 @@ proc genStubs::emitSlots {name textVar} {
     variable stubs
     upvar $textVar text
 
-    set lastNum -1
-    if {[info exists stubs($name,generic,lastNum)]} {
-	set lastNum $stubs($name,generic,lastNum)
-    }
-    set output 0
-    foreach plat {win unix mac} {
-	if {[info exists stubs($name,$plat,lastNum)]} {
-	    set num $stubs($name,$plat,lastNum)
-	    if {$num < $lastNum} {
-		set num $lastNum
-	    }
-	    set temp ""
-	    for {set i 0} {$i <= $num} {incr i} {
-		if {[info exists stubs($name,$plat,$i)]} {
-		    if {[info exists stubs($name,generic,$i)]} {
-			puts stderr "platform entry duplicates generic entry: $i"
-		    }
-		    append temp [makeSlot $stubs($name,$plat,$i) $i]
-		} elseif {[info exists stubs($name,generic,$i)]} {
-		    append temp [makeSlot $stubs($name,generic,$i) $i]
-		} else {
-		    append temp "    void *reserved$i;\n"
-		}
-	    }
-	    append text [addPlatformGuard $plat $temp]
-	    set output 1
-	}
-    }
-    if {!$output} {
-	for {set i 0} {$i <= $lastNum} {incr i} {
-	    if {[info exists stubs($name,generic,$i)]} {
-		append text [makeSlot $stubs($name,generic,$i) $i]
-	    } else {
-		append text "    void *reserved$i;\n"
-	    }
-	}
-    }
+    forAllStubs $name makeSlot 1 text {"    void *reserved$i;\n"}
     return
 }
 
@@ -532,13 +496,14 @@ proc genStubs::makeStub {name decl index} {
 #	Generate the stub table entry for a function.
 #
 # Arguments:
+#	name	The interface name.
 #	decl	The function declaration.
 #	index	The slot index for this function.
 #
 # Results:
 #	Returns the formatted table entry.
 
-proc genStubs::makeSlot {decl index} {
+proc genStubs::makeSlot {name decl index} {
     lassign $decl rtype fname args
 
     set lfname [string tolower [string index $fname 0]]
@@ -571,6 +536,23 @@ proc genStubs::makeSlot {decl index} {
     return $text
 }
 
+# genStubs::makeInit --
+#
+#	Generate the prototype for a function.
+#
+# Arguments:
+#	name	The interface name.
+#	decl	The function declaration.
+#	index	The slot index for this function.
+#
+# Results:
+#	Returns the formatted declaration string.
+
+proc genStubs::makeInit {name decl index} {
+    append text "    " [lindex $decl 1] ", /* " $index " */\n"
+    return $text
+}
+
 # genStubs::forAllStubs --
 #
 #	This function iterates over all of the platforms and invokes
@@ -582,29 +564,74 @@ proc genStubs::makeSlot {decl index} {
 #	slotProc	The proc to invoke to handle the slot.  It will
 #			have the interface name, the declaration,  and
 #			the index appended.
+#	onAll		If 1, emit the skip string even if there are
+#			definitions for one or more platforms.
 #	textVar		The variable to use for output.
+#	skipString	The string to emit if a slot is skipped.  This
+#			string will be subst'ed in the loop so "$i" can
+#			be used to substitute the index value.
 #
 # Results:
 #	None.
 
-proc genStubs::forAllStubs {name slotProc textVar} {
+proc genStubs::forAllStubs {name slotProc onAll textVar \
+	{skipString {"/* Slot $i is reserved */\n"}}} {
     variable stubs
     upvar $textVar text
 
-    foreach plat {generic win unix mac} {
-	if {[info exists stubs($name,$plat,lastNum)]} {
-	    set lastNum $stubs($name,$plat,lastNum)
-	    set temp {}
-	    for {set i 0} {$i <= $lastNum} {incr i} {
-		if {![info exists stubs($name,$plat,$i)]} {
-		    append temp "/* Slot $i is reserved */\n"
-		} else {
-		    append temp [$slotProc $name $stubs($name,$plat,$i) $i]
+    set plats [array names stubs $name,*,lastNum]
+    if {[info exists stubs($name,generic,lastNum)]} {
+	# Emit integrated stubs block
+	set lastNum -1
+	foreach plat [array names stubs $name,*,lastNum] {
+	    if {$stubs($plat) > $lastNum} {
+		set lastNum $stubs($plat)
+	    }
+	}
+	for {set i 0} {$i <= $lastNum} {incr i} {
+	    set slots [array names stubs $name,*,$i]
+	    set emit 0
+	    if {[info exists stubs($name,generic,$i)]} {
+		if {[llength $slots] > 1} {
+		    puts stderr "platform entry duplicates generic entry: $i"
+		}
+		append text [$slotProc $name $stubs($name,generic,$i) $i]
+		set emit 1
+	    } elseif {[llength $slots] > 0} {
+		foreach plat {unix win mac} {
+		    if {[info exists stubs($name,$plat,$i)]} {
+			append text [addPlatformGuard $plat \
+				[$slotProc $name $stubs($name,$plat,$i) $i]]
+			set emit 1
+		    } elseif {$onAll} {
+			append text [eval {addPlatformGuard $plat} $skipString]
+			set emit 1
+		    }
+		}
+	    }
+	    if {$emit == 0} {
+		eval {append text} $skipString
+	    }
+	}
+	
+    } else {
+	# Emit separate stubs blocks per platform
+	foreach plat {unix win mac} {
+	    if {[info exists stubs($name,$plat,lastNum)]} {
+		set lastNum $stubs($name,$plat,lastNum)
+		set temp {}
+		for {set i 0} {$i <= $lastNum} {incr i} {
+		    if {![info exists stubs($name,$plat,$i)]} {
+			eval {append temp} $skipString
+		    } else {
+			append temp [$slotProc $name $stubs($name,$plat,$i) $i]
+		    }
 		}
+		append text [addPlatformGuard $plat $temp]
 	    }
-	    append text [addPlatformGuard $plat $temp]
 	}
     }
+
 }
 
 # genStubs::emitDeclarations --
@@ -623,7 +650,7 @@ proc genStubs::emitDeclarations {name textVar} {
     upvar $textVar text
 
     append text "\n/*\n * Exported function declarations:\n */\n\n"
-    forAllStubs $name makeDecl text
+    forAllStubs $name makeDecl 0 text
     return
 }
 
@@ -647,7 +674,7 @@ proc genStubs::emitMacros {name textVar} {
     append text "\n#if defined(USE_${upName}_STUBS) && !defined(USE_${upName}_STUB_PROCS)\n"
     append text "\n/*\n * Inline function declarations:\n */\n\n"
     
-    forAllStubs $name makeMacro text
+    forAllStubs $name makeMacro 0 text
 
     append text "\n#endif /* defined(USE_${upName}_STUBS) && !defined(USE_${upName}_STUB_PROCS) */\n"
     return
@@ -713,13 +740,13 @@ proc genStubs::emitStubs {name} {
     variable outDir
 
     append text "\n/*\n * Exported stub functions:\n */\n\n"
-    forAllStubs $name makeStub text
+    forAllStubs $name makeStub 0 text
 
     rewriteFile [file join $outDir ${name}Stubs.c] $text
     return    
 }
 
-# genStubs::makeInit --
+# genStubs::emitInit --
 #
 #	Generate the table initializers for an interface.
 #
@@ -730,7 +757,7 @@ proc genStubs::emitStubs {name} {
 # Results:
 #	Returns the formatted output.
 
-proc genStubs::makeInit {name textVar} {
+proc genStubs::emitInit {name textVar} {
     variable stubs
     variable hooks
     upvar $textVar text
@@ -749,53 +776,14 @@ proc genStubs::makeInit {name textVar} {
 	append text "    NULL,\n"
     }
     
-    set lastNum -1
-    if {[info exists stubs($name,generic,lastNum)]} {
-	set lastNum $stubs($name,generic,lastNum)
-    }
-    set output 0
-    foreach plat {win unix mac} {
-	if {[info exists stubs($name,$plat,lastNum)]} {
-	    set num $stubs($name,$plat,lastNum)
-	    if {$num < $lastNum} {
-		set num $lastNum
-	    }
-	    set temp ""
-	    for {set i 0} {$i <= $num} {incr i} {
-		append temp "    "
-		if {[info exists stubs($name,$plat,$i)]} {
-		    if {[info exists stubs($name,generic,$i)]} {
-			puts stderr "platform entry duplicates generic entry: $i"
-		    }
-		    append temp [lindex $stubs($name,$plat,$i) 1]
-		} elseif {[info exists stubs($name,generic,$i)]} {
-		    append temp [lindex $stubs($name,generic,$i) 1]
-		} else {
-		    append temp "NULL"
-		}
-		append temp ", /* $i */\n"
-	    }
-	    append text [addPlatformGuard $plat $temp]
-	    set output 1
-	}
-    }
-    if {!$output} {
-	for {set i 0} {$i <= $lastNum} {incr i} {
-	    append text "    "
-	    if {[info exists stubs($name,generic,$i)]} {
-		append text [lindex $stubs($name,generic,$i) 1]
-	    } else {
-		append text "NULL"
-	    }
-	    append text ", /* $i */\n"
-	}
-    }
+    forAllStubs $name makeInit 1 text {"    NULL, /* $i */\n"}
+
     append text "\};\n\n"
     append text "${capName}Stubs *${name}StubsPtr = &${name}Stubs;\n"
     return
 }
 
-# genStubs::emitInit --
+# genStubs::emitInits --
 #
 #	This function emits the body of the <name>StubInit.c file for
 #	the specified interface.
@@ -806,14 +794,14 @@ proc genStubs::makeInit {name textVar} {
 # Results:
 #	None.
 
-proc genStubs::emitInit {} {
+proc genStubs::emitInits {} {
     variable hooks
     variable outDir
     variable libraryName
     variable interfaces
 
     foreach name [lsort [array names interfaces]] {
-	makeInit $name text
+	emitInit $name text
     }
 
 
@@ -865,7 +853,7 @@ proc genStubs::init {} {
 	emitStubs $name
     }
 
-    emitInit
+    emitInits
 }
 
 # lassign --
diff --git a/unix/tclUnixPort.h b/unix/tclUnixPort.h
index f1d7361..211619a 100644
--- a/unix/tclUnixPort.h
+++ b/unix/tclUnixPort.h
@@ -19,7 +19,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclUnixPort.h,v 1.1.2.4.2.1 1999/03/08 20:14:17 stanton Exp $
+ * RCS: @(#) $Id: tclUnixPort.h,v 1.1.2.4.2.2 1999/03/10 06:41:54 stanton Exp $
  */
 
 #ifndef _TCLUNIXPORT
@@ -469,8 +469,6 @@ EXTERN int		TclpLstat _ANSI_ARGS_((CONST char *path,
 EXTERN int		TclpStat _ANSI_ARGS_((CONST char *path, 
 			    struct stat *buf));
 
-#include "tclIntPlatDecls.h"
-
 /*
  * Platform specific mutex definition used by memory allocators.
  * These mutexes are statically allocated and explicitly initialized.
@@ -491,4 +489,7 @@ typedef int TclpMutex;
 #define	TclpMutexUnlock(a)
 #endif /* TCL_THREADS */
 
+#include "tclPlatDecls.h"
+#include "tclIntPlatDecls.h"
+
 #endif /* _TCLUNIXPORT */
diff --git a/win/tclWinChan.c b/win/tclWinChan.c
index a9bf113..376d2a9 100644
--- a/win/tclWinChan.c
+++ b/win/tclWinChan.c
@@ -9,7 +9,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclWinChan.c,v 1.1.2.4 1999/02/26 02:19:23 redman Exp $
+ * RCS: @(#) $Id: tclWinChan.c,v 1.1.2.4.2.1 1999/03/10 06:41:54 stanton Exp $
  */
 
 #include "tclWinInt.h"
@@ -443,7 +443,8 @@ FileSeekProc(instanceData, offset, mode, errorCodePtr)
     newPos = SetFilePointer(infoPtr->handle, offset, NULL, moveMethod);
     if (newPos == 0xFFFFFFFF) {
         TclWinConvertError(GetLastError());
-        return -1;
+        *errorCodePtr = errno;
+	return -1;
     }
     return newPos;
 }
diff --git a/win/tclWinInt.h b/win/tclWinInt.h
index 8333b24..7b409bf 100644
--- a/win/tclWinInt.h
+++ b/win/tclWinInt.h
@@ -8,7 +8,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclWinInt.h,v 1.1.2.3.2.1 1999/03/08 20:14:18 stanton Exp $
+ * RCS: @(#) $Id: tclWinInt.h,v 1.1.2.3.2.2 1999/03/10 06:41:54 stanton Exp $
  */
 
 #ifndef _TCLWININT
@@ -94,17 +94,16 @@ typedef struct TclWinProcs {
 EXTERN TclWinProcs *tclWinProcs;
 EXTERN Tcl_Encoding tclWinTCharEncoding;
 
+/*
+ * Declarations of functions that are not accessible by way of the
+ * stubs table.
+ */
+
 EXTERN TclPlatformType *TclWinGetPlatform(void);
 EXTERN int		TclWinGetPlatformId(void);
 EXTERN void		TclWinInit(HINSTANCE hInst);
-EXTERN char *		TclWinNoBackslash(char *path);
 EXTERN void		TclWinSetInterfaces(int);
-EXTERN int		TclWinSynchSpawn(void *args, int type, void **trans,
-				Tcl_Pid *pidPtr);
-EXTERN TCHAR *		Tcl_WinUtfToTChar(CONST char *string, int len,
-				Tcl_DString *dsPtr);
-EXTERN char *		Tcl_WinTCharToUtf(CONST TCHAR *string, int len,
-				Tcl_DString *dsPtr);
+
 # undef TCL_STORAGE_CLASS
 # define TCL_STORAGE_CLASS DLLIMPORT