summaryrefslogtreecommitdiffstats
path: root/generic/tclStubs.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclStubs.c')
-rw-r--r--generic/tclStubs.c2653
1 files changed, 0 insertions, 2653 deletions
diff --git a/generic/tclStubs.c b/generic/tclStubs.c
deleted file mode 100644
index 523eefd..0000000
--- a/generic/tclStubs.c
+++ /dev/null
@@ -1,2653 +0,0 @@
-/*
- * tclStubs.c --
- *
- * This file contains the wrapper functions for the platform independent
- * public Tcl API.
- *
- * Copyright (c) 1998-1999 by Scriptics Corporation.
- *
- * 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.1 1999/03/03 00:38:43 stanton Exp $
- */
-
-#include "tcl.h"
-
-/*
- * Undefine function macros that will interfere with the defintions below.
- */
-
-#undef Tcl_DumpActiveMemory
-#undef Tcl_ValidateAllMemory
-#undef Tcl_Alloc
-#undef Tcl_Free
-#undef Tcl_Realloc
-
-/*
- * WARNING: This file is automatically generated by the tools/genStubs.tcl
- * script. Any modifications to the function declarations below should be made
- * in the generic/tcl.decls script.
- */
-
-/* !BEGIN!: Do not edit below this line. */
-
-/*
- * Exported stub functions:
- */
-
-/* Slot 0 */
-void
-Tcl_AddErrorInfo(interp, message)
- Tcl_Interp * interp;
- char * message;
-{
- (tclStubsPtr->tcl_AddErrorInfo)(interp, message);
-}
-
-/* Slot 1 */
-void
-Tcl_AddObjErrorInfo(interp, message, length)
- Tcl_Interp * interp;
- char * message;
- int length;
-{
- (tclStubsPtr->tcl_AddObjErrorInfo)(interp, message, length);
-}
-
-/* Slot 2 */
-char *
-Tcl_Alloc(size)
- unsigned int size;
-{
- return (tclStubsPtr->tcl_Alloc)(size);
-}
-
-/* Slot 3 */
-void
-Tcl_AllowExceptions(interp)
- Tcl_Interp * interp;
-{
- (tclStubsPtr->tcl_AllowExceptions)(interp);
-}
-
-/* Slot 4 */
-int
-Tcl_AppendAllObjTypes(interp, objPtr)
- Tcl_Interp * interp;
- Tcl_Obj * objPtr;
-{
- return (tclStubsPtr->tcl_AppendAllObjTypes)(interp, objPtr);
-}
-
-/* Slot 5 */
-void
-Tcl_AppendElement(interp, string)
- Tcl_Interp * interp;
- char * string;
-{
- (tclStubsPtr->tcl_AppendElement)(interp, string);
-}
-
-/* Slot 6 */
-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 7 */
-void
-Tcl_AppendResultVA(interp, argList)
- Tcl_Interp * interp;
- va_list argList;
-{
- (tclStubsPtr->tcl_AppendResultVA)(interp, argList);
-}
-
-/* Slot 8 */
-void
-Tcl_AppendToObj(objPtr, bytes, length)
- Tcl_Obj * objPtr;
- char * bytes;
- int length;
-{
- (tclStubsPtr->tcl_AppendToObj)(objPtr, bytes, length);
-}
-
-/* Slot 9 */
-void
-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 10 */
-void
-Tcl_AppendStringsToObjVA(objPtr, argList)
- Tcl_Obj * objPtr;
- va_list argList;
-{
- (tclStubsPtr->tcl_AppendStringsToObjVA)(objPtr, argList);
-}
-
-/* Slot 11 */
-Tcl_AsyncHandler
-Tcl_AsyncCreate(proc, clientData)
- Tcl_AsyncProc * proc;
- ClientData clientData;
-{
- return (tclStubsPtr->tcl_AsyncCreate)(proc, clientData);
-}
-
-/* Slot 12 */
-void
-Tcl_AsyncDelete(async)
- Tcl_AsyncHandler async;
-{
- (tclStubsPtr->tcl_AsyncDelete)(async);
-}
-
-/* Slot 13 */
-int
-Tcl_AsyncInvoke(interp, code)
- Tcl_Interp * interp;
- int code;
-{
- return (tclStubsPtr->tcl_AsyncInvoke)(interp, code);
-}
-
-/* Slot 14 */
-void
-Tcl_AsyncMark(async)
- Tcl_AsyncHandler async;
-{
- (tclStubsPtr->tcl_AsyncMark)(async);
-}
-
-/* Slot 15 */
-int
-Tcl_AsyncReady()
-{
- return (tclStubsPtr->tcl_AsyncReady)();
-}
-
-/* Slot 16 */
-void
-Tcl_BackgroundError(interp)
- Tcl_Interp * interp;
-{
- (tclStubsPtr->tcl_BackgroundError)(interp);
-}
-
-/* Slot 17 */
-char
-Tcl_Backslash(src, readPtr)
- CONST char * src;
- int * readPtr;
-{
- return (tclStubsPtr->tcl_Backslash)(src, readPtr);
-}
-
-/* Slot 18 */
-int
-Tcl_BadChannelOption(interp, optionName, optionList)
- Tcl_Interp * interp;
- char * optionName;
- char * optionList;
-{
- return (tclStubsPtr->tcl_BadChannelOption)(interp, optionName, optionList);
-}
-
-/* Slot 19 */
-void
-Tcl_CallWhenDeleted(interp, proc, clientData)
- Tcl_Interp * interp;
- Tcl_InterpDeleteProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_CallWhenDeleted)(interp, proc, clientData);
-}
-
-/* Slot 20 */
-void
-Tcl_CancelIdleCall(idleProc, clientData)
- Tcl_IdleProc * idleProc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_CancelIdleCall)(idleProc, clientData);
-}
-
-/* Slot 21 */
-int
-Tcl_Close(interp, chan)
- Tcl_Interp * interp;
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_Close)(interp, chan);
-}
-
-/* Slot 22 */
-int
-Tcl_CommandComplete(cmd)
- char * cmd;
-{
- return (tclStubsPtr->tcl_CommandComplete)(cmd);
-}
-
-/* Slot 23 */
-char *
-Tcl_Concat(argc, argv)
- int argc;
- char ** 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 */
-int
-Tcl_ConvertCountedElement(src, length, dst, flags)
- CONST char * src;
- int length;
- char * dst;
- int flags;
-{
- return (tclStubsPtr->tcl_ConvertCountedElement)(src, length, dst, flags);
-}
-
-/* Slot 26 */
-int
-Tcl_ConvertElement(src, dst, flags)
- CONST char * src;
- 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);
-}
-
-/* Slot 28 */
-int
-Tcl_CreateAlias(slave, slaveCmd, target, targetCmd, argc, argv)
- Tcl_Interp * slave;
- char * slaveCmd;
- Tcl_Interp * target;
- char * targetCmd;
- int argc;
- char ** argv;
-{
- return (tclStubsPtr->tcl_CreateAlias)(slave, slaveCmd, target, targetCmd, argc, argv);
-}
-
-/* Slot 29 */
-int
-Tcl_CreateAliasObj(slave, slaveCmd, target, targetCmd, objc, objv)
- Tcl_Interp * slave;
- char * slaveCmd;
- Tcl_Interp * target;
- char * targetCmd;
- int objc;
- Tcl_Obj *CONST objv[];
-{
- return (tclStubsPtr->tcl_CreateAliasObj)(slave, slaveCmd, target, targetCmd, objc, objv);
-}
-
-/* Slot 30 */
-Tcl_Channel
-Tcl_CreateChannel(typePtr, chanName, instanceData, mask)
- Tcl_ChannelType * typePtr;
- char * chanName;
- ClientData instanceData;
- int mask;
-{
- return (tclStubsPtr->tcl_CreateChannel)(typePtr, chanName, instanceData, mask);
-}
-
-/* Slot 31 */
-void
-Tcl_CreateChannelHandler(chan, mask, proc, clientData)
- Tcl_Channel chan;
- int mask;
- Tcl_ChannelProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_CreateChannelHandler)(chan, mask, proc, clientData);
-}
-
-/* Slot 32 */
-void
-Tcl_CreateCloseHandler(chan, proc, clientData)
- Tcl_Channel chan;
- Tcl_CloseProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_CreateCloseHandler)(chan, proc, clientData);
-}
-
-/* Slot 33 */
-Tcl_Command
-Tcl_CreateCommand(interp, cmdName, proc, clientData, deleteProc)
- Tcl_Interp * interp;
- char * cmdName;
- Tcl_CmdProc * proc;
- ClientData clientData;
- Tcl_CmdDeleteProc * deleteProc;
-{
- return (tclStubsPtr->tcl_CreateCommand)(interp, cmdName, proc, clientData, deleteProc);
-}
-
-/* Slot 34 */
-void
-Tcl_CreateEventSource(setupProc, checkProc, clientData)
- Tcl_EventSetupProc * setupProc;
- Tcl_EventCheckProc * checkProc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_CreateEventSource)(setupProc, checkProc, clientData);
-}
-
-/* Slot 35 */
-void
-Tcl_CreateExitHandler(proc, clientData)
- Tcl_ExitProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_CreateExitHandler)(proc, clientData);
-}
-
-/* Slot 36 */
-Tcl_Interp *
-Tcl_CreateInterp()
-{
- return (tclStubsPtr->tcl_CreateInterp)();
-}
-
-/* Slot 37 */
-void
-Tcl_CreateMathFunc(interp, name, numArgs, argTypes, proc, clientData)
- Tcl_Interp * interp;
- char * name;
- int numArgs;
- Tcl_ValueType * argTypes;
- Tcl_MathProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_CreateMathFunc)(interp, name, numArgs, argTypes, proc, clientData);
-}
-
-/* Slot 38 */
-Tcl_Command
-Tcl_CreateObjCommand(interp, cmdName, proc, clientData, deleteProc)
- Tcl_Interp * interp;
- char * cmdName;
- Tcl_ObjCmdProc * proc;
- ClientData clientData;
- Tcl_CmdDeleteProc * deleteProc;
-{
- return (tclStubsPtr->tcl_CreateObjCommand)(interp, cmdName, proc, clientData, deleteProc);
-}
-
-/* Slot 39 */
-Tcl_Interp *
-Tcl_CreateSlave(interp, slaveName, isSafe)
- Tcl_Interp * interp;
- char * slaveName;
- int isSafe;
-{
- return (tclStubsPtr->tcl_CreateSlave)(interp, slaveName, isSafe);
-}
-
-/* Slot 40 */
-Tcl_TimerToken
-Tcl_CreateTimerHandler(milliseconds, proc, clientData)
- int milliseconds;
- Tcl_TimerProc * proc;
- ClientData clientData;
-{
- return (tclStubsPtr->tcl_CreateTimerHandler)(milliseconds, proc, clientData);
-}
-
-/* Slot 41 */
-Tcl_Trace
-Tcl_CreateTrace(interp, level, proc, clientData)
- Tcl_Interp * interp;
- int level;
- Tcl_CmdTraceProc * proc;
- ClientData 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 */
-void
-Tcl_DbDecrRefCount(objPtr, file, line)
- Tcl_Obj * objPtr;
- char * file;
- int line;
-{
- (tclStubsPtr->tcl_DbDecrRefCount)(objPtr, file, line);
-}
-
-/* Slot 46 */
-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)
- char * bytes;
- int length;
- char * file;
- int line;
-{
- return (tclStubsPtr->tcl_DbNewStringObj)(bytes, length, file, line);
-}
-
-/* Slot 55 */
-void
-Tcl_DeleteAssocData(interp, name)
- Tcl_Interp * interp;
- char * name;
-{
- (tclStubsPtr->tcl_DeleteAssocData)(interp, name);
-}
-
-/* Slot 56 */
-int
-Tcl_DeleteCommand(interp, cmdName)
- Tcl_Interp * interp;
- char * cmdName;
-{
- return (tclStubsPtr->tcl_DeleteCommand)(interp, cmdName);
-}
-
-/* Slot 57 */
-int
-Tcl_DeleteCommandFromToken(interp, command)
- Tcl_Interp * interp;
- Tcl_Command 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 */
-void
-Tcl_DeleteEvents(proc, clientData)
- Tcl_EventDeleteProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_DeleteEvents)(proc, clientData);
-}
-
-/* Slot 61 */
-void
-Tcl_DeleteEventSource(setupProc, checkProc, clientData)
- Tcl_EventSetupProc * setupProc;
- Tcl_EventCheckProc * checkProc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_DeleteEventSource)(setupProc, checkProc, clientData);
-}
-
-/* Slot 62 */
-void
-Tcl_DeleteExitHandler(proc, clientData)
- Tcl_ExitProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_DeleteExitHandler)(proc, clientData);
-}
-
-/* Slot 63 */
-void
-Tcl_DeleteHashEntry(entryPtr)
- Tcl_HashEntry * entryPtr;
-{
- (tclStubsPtr->tcl_DeleteHashEntry)(entryPtr);
-}
-
-/* Slot 64 */
-void
-Tcl_DeleteHashTable(tablePtr)
- Tcl_HashTable * tablePtr;
-{
- (tclStubsPtr->tcl_DeleteHashTable)(tablePtr);
-}
-
-/* Slot 65 */
-void
-Tcl_DeleteInterp(interp)
- Tcl_Interp * interp;
-{
- (tclStubsPtr->tcl_DeleteInterp)(interp);
-}
-
-/* Slot 66 */
-void
-Tcl_DeleteTimerHandler(token)
- Tcl_TimerToken token;
-{
- (tclStubsPtr->tcl_DeleteTimerHandler)(token);
-}
-
-/* Slot 67 */
-void
-Tcl_DeleteTrace(interp, trace)
- Tcl_Interp * interp;
- Tcl_Trace 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 */
-void
-Tcl_DontCallWhenDeleted(interp, proc, clientData)
- Tcl_Interp * interp;
- Tcl_InterpDeleteProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_DontCallWhenDeleted)(interp, proc, clientData);
-}
-
-/* Slot 70 */
-int
-Tcl_DoOneEvent(flags)
- int flags;
-{
- return (tclStubsPtr->tcl_DoOneEvent)(flags);
-}
-
-/* Slot 71 */
-void
-Tcl_DoWhenIdle(proc, clientData)
- Tcl_IdleProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_DoWhenIdle)(proc, clientData);
-}
-
-/* Slot 72 */
-char *
-Tcl_DStringAppend(dsPtr, string, length)
- Tcl_DString * dsPtr;
- CONST char * string;
- int length;
-{
- return (tclStubsPtr->tcl_DStringAppend)(dsPtr, string, length);
-}
-
-/* Slot 73 */
-char *
-Tcl_DStringAppendElement(dsPtr, string)
- Tcl_DString * dsPtr;
- CONST char * string;
-{
- return (tclStubsPtr->tcl_DStringAppendElement)(dsPtr, string);
-}
-
-/* Slot 74 */
-void
-Tcl_DStringEndSublist(dsPtr)
- Tcl_DString * dsPtr;
-{
- (tclStubsPtr->tcl_DStringEndSublist)(dsPtr);
-}
-
-/* Slot 75 */
-void
-Tcl_DStringFree(dsPtr)
- Tcl_DString * dsPtr;
-{
- (tclStubsPtr->tcl_DStringFree)(dsPtr);
-}
-
-/* Slot 76 */
-void
-Tcl_DStringGetResult(interp, dsPtr)
- Tcl_Interp * interp;
- Tcl_DString * dsPtr;
-{
- (tclStubsPtr->tcl_DStringGetResult)(interp, dsPtr);
-}
-
-/* Slot 77 */
-void
-Tcl_DStringInit(dsPtr)
- Tcl_DString * dsPtr;
-{
- (tclStubsPtr->tcl_DStringInit)(dsPtr);
-}
-
-/* Slot 78 */
-void
-Tcl_DStringResult(interp, dsPtr)
- Tcl_Interp * interp;
- Tcl_DString * dsPtr;
-{
- (tclStubsPtr->tcl_DStringResult)(interp, dsPtr);
-}
-
-/* Slot 79 */
-void
-Tcl_DStringSetLength(dsPtr, length)
- Tcl_DString * dsPtr;
- int length;
-{
- (tclStubsPtr->tcl_DStringSetLength)(dsPtr, length);
-}
-
-/* Slot 80 */
-void
-Tcl_DStringStartSublist(dsPtr)
- Tcl_DString * 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 */
-int
-Tcl_Eof(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_Eof)(chan);
-}
-
-/* Slot 84 */
-char *
-Tcl_ErrnoId()
-{
- return (tclStubsPtr->tcl_ErrnoId)();
-}
-
-/* Slot 85 */
-char *
-Tcl_ErrnoMsg(err)
- int err;
-{
- return (tclStubsPtr->tcl_ErrnoMsg)(err);
-}
-
-/* Slot 86 */
-int
-Tcl_Eval(interp, string)
- Tcl_Interp * interp;
- char * string;
-{
- return (tclStubsPtr->tcl_Eval)(interp, string);
-}
-
-/* Slot 87 */
-int
-Tcl_EvalFile(interp, fileName)
- Tcl_Interp * interp;
- char * 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 */
-int
-Tcl_EvalObj(interp, objPtr)
- Tcl_Interp * interp;
- Tcl_Obj * objPtr;
-{
- return (tclStubsPtr->tcl_EvalObj)(interp, objPtr);
-}
-
-/* Slot 90 */
-void
-Tcl_Exit(status)
- int status;
-{
- (tclStubsPtr->tcl_Exit)(status);
-}
-
-/* Slot 91 */
-int
-Tcl_ExposeCommand(interp, hiddenCmdToken, cmdName)
- Tcl_Interp * interp;
- char * hiddenCmdToken;
- char * cmdName;
-{
- return (tclStubsPtr->tcl_ExposeCommand)(interp, hiddenCmdToken, cmdName);
-}
-
-/* Slot 92 */
-int
-Tcl_ExprBoolean(interp, string, ptr)
- Tcl_Interp * interp;
- char * string;
- int * ptr;
-{
- return (tclStubsPtr->tcl_ExprBoolean)(interp, string, ptr);
-}
-
-/* Slot 93 */
-int
-Tcl_ExprBooleanObj(interp, objPtr, ptr)
- Tcl_Interp * interp;
- Tcl_Obj * objPtr;
- int * ptr;
-{
- return (tclStubsPtr->tcl_ExprBooleanObj)(interp, objPtr, ptr);
-}
-
-/* Slot 94 */
-int
-Tcl_ExprDouble(interp, string, ptr)
- Tcl_Interp * interp;
- char * string;
- double * ptr;
-{
- return (tclStubsPtr->tcl_ExprDouble)(interp, string, ptr);
-}
-
-/* Slot 95 */
-int
-Tcl_ExprDoubleObj(interp, objPtr, ptr)
- Tcl_Interp * interp;
- Tcl_Obj * objPtr;
- double * ptr;
-{
- return (tclStubsPtr->tcl_ExprDoubleObj)(interp, objPtr, ptr);
-}
-
-/* Slot 96 */
-int
-Tcl_ExprLong(interp, string, ptr)
- Tcl_Interp * interp;
- char * string;
- long * ptr;
-{
- return (tclStubsPtr->tcl_ExprLong)(interp, string, ptr);
-}
-
-/* Slot 97 */
-int
-Tcl_ExprLongObj(interp, objPtr, ptr)
- Tcl_Interp * interp;
- Tcl_Obj * objPtr;
- long * ptr;
-{
- return (tclStubsPtr->tcl_ExprLongObj)(interp, objPtr, ptr);
-}
-
-/* Slot 98 */
-int
-Tcl_ExprObj(interp, objPtr, resultPtrPtr)
- Tcl_Interp * interp;
- Tcl_Obj * objPtr;
- Tcl_Obj ** resultPtrPtr;
-{
- return (tclStubsPtr->tcl_ExprObj)(interp, objPtr, resultPtrPtr);
-}
-
-/* Slot 99 */
-int
-Tcl_ExprString(interp, string)
- Tcl_Interp * interp;
- char * string;
-{
- return (tclStubsPtr->tcl_ExprString)(interp, string);
-}
-
-/* Slot 100 */
-void
-Tcl_Finalize()
-{
- (tclStubsPtr->tcl_Finalize)();
-}
-
-/* Slot 101 */
-void
-Tcl_FindExecutable(argv0)
- char * argv0;
-{
- (tclStubsPtr->tcl_FindExecutable)(argv0);
-}
-
-/* Slot 102 */
-Tcl_HashEntry *
-Tcl_FirstHashEntry(tablePtr, searchPtr)
- Tcl_HashTable * tablePtr;
- Tcl_HashSearch * searchPtr;
-{
- return (tclStubsPtr->tcl_FirstHashEntry)(tablePtr, searchPtr);
-}
-
-/* Slot 103 */
-int
-Tcl_Flush(chan)
- Tcl_Channel 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 */
-void
-Tcl_FreeResult(interp)
- Tcl_Interp * interp;
-{
- (tclStubsPtr->tcl_FreeResult)(interp);
-}
-
-/* Slot 107 */
-int
-Tcl_GetAlias(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr)
- Tcl_Interp * interp;
- char * slaveCmd;
- Tcl_Interp ** targetInterpPtr;
- char ** targetCmdPtr;
- int * argcPtr;
- char *** argvPtr;
-{
- return (tclStubsPtr->tcl_GetAlias)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, argcPtr, argvPtr);
-}
-
-/* Slot 108 */
-int
-Tcl_GetAliasObj(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv)
- Tcl_Interp * interp;
- char * slaveCmd;
- Tcl_Interp ** targetInterpPtr;
- char ** targetCmdPtr;
- int * objcPtr;
- Tcl_Obj *** objv;
-{
- return (tclStubsPtr->tcl_GetAliasObj)(interp, slaveCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv);
-}
-
-/* Slot 109 */
-ClientData
-Tcl_GetAssocData(interp, name, procPtr)
- Tcl_Interp * interp;
- char * name;
- Tcl_InterpDeleteProc ** procPtr;
-{
- return (tclStubsPtr->tcl_GetAssocData)(interp, name, procPtr);
-}
-
-/* Slot 110 */
-int
-Tcl_GetBoolean(interp, string, boolPtr)
- Tcl_Interp * interp;
- char * string;
- int * boolPtr;
-{
- return (tclStubsPtr->tcl_GetBoolean)(interp, string, 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 */
-Tcl_Channel
-Tcl_GetChannel(interp, chanName, modePtr)
- Tcl_Interp * interp;
- char * chanName;
- int * modePtr;
-{
- return (tclStubsPtr->tcl_GetChannel)(interp, chanName, modePtr);
-}
-
-/* Slot 114 */
-int
-Tcl_GetChannelBufferSize(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_GetChannelBufferSize)(chan);
-}
-
-/* Slot 115 */
-int
-Tcl_GetChannelHandle(chan, direction, handlePtr)
- Tcl_Channel chan;
- int direction;
- ClientData * handlePtr;
-{
- return (tclStubsPtr->tcl_GetChannelHandle)(chan, direction, handlePtr);
-}
-
-/* Slot 116 */
-ClientData
-Tcl_GetChannelInstanceData(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_GetChannelInstanceData)(chan);
-}
-
-/* Slot 117 */
-int
-Tcl_GetChannelMode(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_GetChannelMode)(chan);
-}
-
-/* Slot 118 */
-char *
-Tcl_GetChannelName(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_GetChannelName)(chan);
-}
-
-/* Slot 119 */
-int
-Tcl_GetChannelOption(interp, chan, optionName, dsPtr)
- Tcl_Interp * interp;
- Tcl_Channel chan;
- char * optionName;
- Tcl_DString * dsPtr;
-{
- return (tclStubsPtr->tcl_GetChannelOption)(interp, chan, optionName, dsPtr);
-}
-
-/* Slot 120 */
-Tcl_ChannelType *
-Tcl_GetChannelType(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_GetChannelType)(chan);
-}
-
-/* Slot 121 */
-int
-Tcl_GetCommandInfo(interp, cmdName, infoPtr)
- Tcl_Interp * interp;
- char * cmdName;
- Tcl_CmdInfo * infoPtr;
-{
- return (tclStubsPtr->tcl_GetCommandInfo)(interp, cmdName, infoPtr);
-}
-
-/* Slot 122 */
-char *
-Tcl_GetCommandName(interp, command)
- Tcl_Interp * interp;
- Tcl_Command command;
-{
- return (tclStubsPtr->tcl_GetCommandName)(interp, command);
-}
-
-/* Slot 123 */
-int
-Tcl_GetDouble(interp, string, doublePtr)
- Tcl_Interp * interp;
- char * string;
- double * doublePtr;
-{
- return (tclStubsPtr->tcl_GetDouble)(interp, string, 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 */
-int
-Tcl_GetErrno()
-{
- return (tclStubsPtr->tcl_GetErrno)();
-}
-
-/* Slot 126 */
-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, string, intPtr)
- Tcl_Interp * interp;
- char * string;
- int * intPtr;
-{
- return (tclStubsPtr->tcl_GetInt)(interp, string, intPtr);
-}
-
-/* Slot 129 */
-int
-Tcl_GetInterpPath(askInterp, slaveInterp)
- Tcl_Interp * askInterp;
- Tcl_Interp * 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 */
-Tcl_Interp *
-Tcl_GetMaster(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_GetMaster)(interp);
-}
-
-/* Slot 133 */
-CONST char *
-Tcl_GetNameOfExecutable()
-{
- return (tclStubsPtr->tcl_GetNameOfExecutable)();
-}
-
-/* Slot 134 */
-Tcl_Obj *
-Tcl_GetObjResult(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_GetObjResult)(interp);
-}
-
-/* Slot 135 */
-Tcl_ObjType *
-Tcl_GetObjType(typeName)
- char * typeName;
-{
- return (tclStubsPtr->tcl_GetObjType)(typeName);
-}
-
-/* Slot 136 */
-Tcl_PathType
-Tcl_GetPathType(path)
- char * path;
-{
- return (tclStubsPtr->tcl_GetPathType)(path);
-}
-
-/* Slot 137 */
-int
-Tcl_Gets(chan, dsPtr)
- Tcl_Channel chan;
- Tcl_DString * dsPtr;
-{
- return (tclStubsPtr->tcl_Gets)(chan, dsPtr);
-}
-
-/* Slot 138 */
-int
-Tcl_GetsObj(chan, objPtr)
- Tcl_Channel chan;
- Tcl_Obj * objPtr;
-{
- return (tclStubsPtr->tcl_GetsObj)(chan, objPtr);
-}
-
-/* Slot 139 */
-int
-Tcl_GetServiceMode()
-{
- return (tclStubsPtr->tcl_GetServiceMode)();
-}
-
-/* Slot 140 */
-Tcl_Interp *
-Tcl_GetSlave(interp, slaveName)
- Tcl_Interp * interp;
- char * slaveName;
-{
- return (tclStubsPtr->tcl_GetSlave)(interp, slaveName);
-}
-
-/* Slot 141 */
-Tcl_Channel
-Tcl_GetStdChannel(type)
- int 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 */
-char *
-Tcl_GetStringResult(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_GetStringResult)(interp);
-}
-
-/* Slot 144 */
-char *
-Tcl_GetVar(interp, varName, flags)
- Tcl_Interp * interp;
- char * varName;
- int flags;
-{
- return (tclStubsPtr->tcl_GetVar)(interp, varName, flags);
-}
-
-/* Slot 145 */
-char *
-Tcl_GetVar2(interp, part1, part2, flags)
- Tcl_Interp * interp;
- char * part1;
- char * part2;
- int flags;
-{
- return (tclStubsPtr->tcl_GetVar2)(interp, part1, part2, flags);
-}
-
-/* Slot 146 */
-int
-Tcl_GlobalEval(interp, command)
- Tcl_Interp * interp;
- char * command;
-{
- return (tclStubsPtr->tcl_GlobalEval)(interp, command);
-}
-
-/* Slot 147 */
-int
-Tcl_GlobalEvalObj(interp, objPtr)
- Tcl_Interp * interp;
- Tcl_Obj * objPtr;
-{
- return (tclStubsPtr->tcl_GlobalEvalObj)(interp, objPtr);
-}
-
-/* Slot 148 */
-char *
-Tcl_HashStats(tablePtr)
- Tcl_HashTable * tablePtr;
-{
- return (tclStubsPtr->tcl_HashStats)(tablePtr);
-}
-
-/* Slot 149 */
-int
-Tcl_HideCommand(interp, cmdName, hiddenCmdToken)
- Tcl_Interp * interp;
- char * cmdName;
- char * hiddenCmdToken;
-{
- return (tclStubsPtr->tcl_HideCommand)(interp, cmdName, hiddenCmdToken);
-}
-
-/* Slot 150 */
-int
-Tcl_Init(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_Init)(interp);
-}
-
-/* Slot 151 */
-void
-Tcl_InitHashTable(tablePtr, keyType)
- Tcl_HashTable * tablePtr;
- int keyType;
-{
- (tclStubsPtr->tcl_InitHashTable)(tablePtr, keyType);
-}
-
-/* Slot 152 */
-int
-Tcl_InputBlocked(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_InputBlocked)(chan);
-}
-
-/* Slot 153 */
-int
-Tcl_InputBuffered(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_InputBuffered)(chan);
-}
-
-/* Slot 154 */
-int
-Tcl_InterpDeleted(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_InterpDeleted)(interp);
-}
-
-/* Slot 155 */
-int
-Tcl_IsSafe(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_IsSafe)(interp);
-}
-
-/* Slot 156 */
-void
-Tcl_InvalidateStringRep(objPtr)
- Tcl_Obj * objPtr;
-{
- (tclStubsPtr->tcl_InvalidateStringRep)(objPtr);
-}
-
-/* Slot 157 */
-char *
-Tcl_JoinPath(argc, argv, resultPtr)
- int argc;
- char ** argv;
- Tcl_DString * resultPtr;
-{
- return (tclStubsPtr->tcl_JoinPath)(argc, argv, resultPtr);
-}
-
-/* Slot 158 */
-int
-Tcl_LinkVar(interp, varName, addr, type)
- Tcl_Interp * interp;
- char * varName;
- char * addr;
- int type;
-{
- return (tclStubsPtr->tcl_LinkVar)(interp, varName, addr, type);
-}
-
-/* Slot 159 */
-int
-Tcl_ListObjAppendList(interp, listPtr, elemListPtr)
- Tcl_Interp * interp;
- Tcl_Obj * listPtr;
- Tcl_Obj * elemListPtr;
-{
- return (tclStubsPtr->tcl_ListObjAppendList)(interp, listPtr, elemListPtr);
-}
-
-/* Slot 160 */
-int
-Tcl_ListObjAppendElement(interp, listPtr, objPtr)
- Tcl_Interp * interp;
- Tcl_Obj * listPtr;
- Tcl_Obj * objPtr;
-{
- return (tclStubsPtr->tcl_ListObjAppendElement)(interp, listPtr, objPtr);
-}
-
-/* Slot 161 */
-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 162 */
-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 163 */
-int
-Tcl_ListObjLength(interp, listPtr, intPtr)
- Tcl_Interp * interp;
- Tcl_Obj * listPtr;
- int * intPtr;
-{
- return (tclStubsPtr->tcl_ListObjLength)(interp, listPtr, intPtr);
-}
-
-/* Slot 164 */
-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 165 */
-Tcl_Channel
-Tcl_MakeFileChannel(handle, mode)
- ClientData handle;
- int mode;
-{
- return (tclStubsPtr->tcl_MakeFileChannel)(handle, mode);
-}
-
-/* Slot 166 */
-int
-Tcl_MakeSafe(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_MakeSafe)(interp);
-}
-
-/* Slot 167 */
-Tcl_Channel
-Tcl_MakeTcpClientChannel(tcpSocket)
- ClientData tcpSocket;
-{
- return (tclStubsPtr->tcl_MakeTcpClientChannel)(tcpSocket);
-}
-
-/* Slot 168 */
-char *
-Tcl_Merge(argc, argv)
- int argc;
- char ** argv;
-{
- return (tclStubsPtr->tcl_Merge)(argc, argv);
-}
-
-/* Slot 169 */
-Tcl_Obj *
-Tcl_NewBooleanObj(boolValue)
- int boolValue;
-{
- return (tclStubsPtr->tcl_NewBooleanObj)(boolValue);
-}
-
-/* Slot 170 */
-Tcl_Obj *
-Tcl_NewByteArrayObj(bytes, length)
- unsigned char * bytes;
- int length;
-{
- return (tclStubsPtr->tcl_NewByteArrayObj)(bytes, length);
-}
-
-/* Slot 171 */
-Tcl_Obj *
-Tcl_NewDoubleObj(doubleValue)
- double doubleValue;
-{
- return (tclStubsPtr->tcl_NewDoubleObj)(doubleValue);
-}
-
-/* Slot 172 */
-Tcl_Obj *
-Tcl_NewIntObj(intValue)
- int intValue;
-{
- return (tclStubsPtr->tcl_NewIntObj)(intValue);
-}
-
-/* Slot 173 */
-Tcl_Obj *
-Tcl_NewListObj(objc, objv)
- int objc;
- Tcl_Obj *CONST objv[];
-{
- return (tclStubsPtr->tcl_NewListObj)(objc, objv);
-}
-
-/* Slot 174 */
-Tcl_Obj *
-Tcl_NewLongObj(longValue)
- long longValue;
-{
- return (tclStubsPtr->tcl_NewLongObj)(longValue);
-}
-
-/* Slot 175 */
-Tcl_Obj *
-Tcl_NewObj()
-{
- return (tclStubsPtr->tcl_NewObj)();
-}
-
-/* Slot 176 */
-Tcl_Obj *
-Tcl_NewStringObj(bytes, length)
- char * bytes;
- int length;
-{
- return (tclStubsPtr->tcl_NewStringObj)(bytes, length);
-}
-
-/* Slot 177 */
-Tcl_HashEntry *
-Tcl_NextHashEntry(searchPtr)
- Tcl_HashSearch * searchPtr;
-{
- return (tclStubsPtr->tcl_NextHashEntry)(searchPtr);
-}
-
-/* Slot 178 */
-void
-Tcl_NotifyChannel(channel, mask)
- Tcl_Channel channel;
- int mask;
-{
- (tclStubsPtr->tcl_NotifyChannel)(channel, mask);
-}
-
-/* Slot 179 */
-Tcl_Obj *
-Tcl_ObjGetVar2(interp, part1Ptr, part2Ptr, flags)
- Tcl_Interp * interp;
- Tcl_Obj * part1Ptr;
- Tcl_Obj * part2Ptr;
- int flags;
-{
- return (tclStubsPtr->tcl_ObjGetVar2)(interp, part1Ptr, part2Ptr, flags);
-}
-
-/* Slot 180 */
-Tcl_Obj *
-Tcl_ObjSetVar2(interp, part1Ptr, part2Ptr, newValuePtr, flags)
- Tcl_Interp * interp;
- Tcl_Obj * part1Ptr;
- Tcl_Obj * part2Ptr;
- Tcl_Obj * newValuePtr;
- int flags;
-{
- return (tclStubsPtr->tcl_ObjSetVar2)(interp, part1Ptr, part2Ptr, newValuePtr, flags);
-}
-
-/* Slot 181 */
-Tcl_Channel
-Tcl_OpenCommandChannel(interp, argc, argv, flags)
- Tcl_Interp * interp;
- int argc;
- char ** argv;
- int flags;
-{
- return (tclStubsPtr->tcl_OpenCommandChannel)(interp, argc, argv, flags);
-}
-
-/* Slot 182 */
-Tcl_Channel
-Tcl_OpenFileChannel(interp, fileName, modeString, permissions)
- Tcl_Interp * interp;
- char * fileName;
- char * modeString;
- int permissions;
-{
- return (tclStubsPtr->tcl_OpenFileChannel)(interp, fileName, modeString, permissions);
-}
-
-/* Slot 183 */
-Tcl_Channel
-Tcl_OpenTcpClient(interp, port, address, myaddr, myport, async)
- Tcl_Interp * interp;
- int port;
- char * address;
- char * myaddr;
- int myport;
- int async;
-{
- return (tclStubsPtr->tcl_OpenTcpClient)(interp, port, address, myaddr, myport, async);
-}
-
-/* Slot 184 */
-Tcl_Channel
-Tcl_OpenTcpServer(interp, port, host, acceptProc, callbackData)
- Tcl_Interp * interp;
- int port;
- char * host;
- Tcl_TcpAcceptProc * acceptProc;
- ClientData callbackData;
-{
- return (tclStubsPtr->tcl_OpenTcpServer)(interp, port, host, acceptProc, callbackData);
-}
-
-/* Slot 185 */
-void
-Tcl_Panic TCL_VARARGS_DEF(char *,format)
-{
- char * var;
- va_list argList;
-
- var = (char *) TCL_VARARGS_START(char *,format,argList);
-
- (tclStubsPtr->tcl_PanicVA)(var, argList);
- va_end(argList);
-}
-
-/* Slot 186 */
-void
-Tcl_PanicVA(format, argList)
- char * format;
- va_list argList;
-{
- (tclStubsPtr->tcl_PanicVA)(format, argList);
-}
-
-/* Slot 187 */
-char *
-Tcl_ParseVar(interp, string, termPtr)
- Tcl_Interp * interp;
- char * string;
- char ** termPtr;
-{
- return (tclStubsPtr->tcl_ParseVar)(interp, string, termPtr);
-}
-
-/* Slot 188 */
-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 189 */
-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 190 */
-int
-Tcl_PkgProvide(interp, name, version)
- Tcl_Interp * interp;
- char * name;
- char * version;
-{
- return (tclStubsPtr->tcl_PkgProvide)(interp, name, version);
-}
-
-/* Slot 191 */
-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 192 */
-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 193 */
-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 194 */
-char *
-Tcl_PosixError(interp)
- Tcl_Interp * interp;
-{
- return (tclStubsPtr->tcl_PosixError)(interp);
-}
-
-/* Slot 195 */
-void
-Tcl_Preserve(data)
- ClientData data;
-{
- (tclStubsPtr->tcl_Preserve)(data);
-}
-
-/* Slot 196 */
-void
-Tcl_PrintDouble(interp, value, dst)
- Tcl_Interp * interp;
- double value;
- char * dst;
-{
- (tclStubsPtr->tcl_PrintDouble)(interp, value, dst);
-}
-
-/* Slot 197 */
-int
-Tcl_PutEnv(string)
- CONST char * string;
-{
- return (tclStubsPtr->tcl_PutEnv)(string);
-}
-
-/* Slot 198 */
-void
-Tcl_QueueEvent(evPtr, position)
- Tcl_Event * evPtr;
- Tcl_QueuePosition position;
-{
- (tclStubsPtr->tcl_QueueEvent)(evPtr, position);
-}
-
-/* Slot 199 */
-int
-Tcl_Read(chan, bufPtr, toRead)
- Tcl_Channel chan;
- char * bufPtr;
- int toRead;
-{
- return (tclStubsPtr->tcl_Read)(chan, bufPtr, toRead);
-}
-
-/* Slot 200 */
-char *
-Tcl_Realloc(ptr, size)
- char * ptr;
- unsigned int size;
-{
- return (tclStubsPtr->tcl_Realloc)(ptr, size);
-}
-
-/* Slot 201 */
-void
-Tcl_ReapDetachedProcs()
-{
- (tclStubsPtr->tcl_ReapDetachedProcs)();
-}
-
-/* Slot 202 */
-int
-Tcl_RecordAndEval(interp, cmd, flags)
- Tcl_Interp * interp;
- char * cmd;
- int flags;
-{
- return (tclStubsPtr->tcl_RecordAndEval)(interp, cmd, flags);
-}
-
-/* Slot 203 */
-int
-Tcl_RecordAndEvalObj(interp, cmdPtr, flags)
- Tcl_Interp * interp;
- Tcl_Obj * cmdPtr;
- int flags;
-{
- return (tclStubsPtr->tcl_RecordAndEvalObj)(interp, cmdPtr, flags);
-}
-
-/* Slot 204 */
-Tcl_RegExp
-Tcl_RegExpCompile(interp, string)
- Tcl_Interp * interp;
- char * string;
-{
- return (tclStubsPtr->tcl_RegExpCompile)(interp, string);
-}
-
-/* Slot 205 */
-int
-Tcl_RegExpExec(interp, regexp, string, start)
- Tcl_Interp * interp;
- Tcl_RegExp regexp;
- char * string;
- char * start;
-{
- return (tclStubsPtr->tcl_RegExpExec)(interp, regexp, string, start);
-}
-
-/* Slot 206 */
-int
-Tcl_RegExpMatch(interp, string, pattern)
- Tcl_Interp * interp;
- char * string;
- char * pattern;
-{
- return (tclStubsPtr->tcl_RegExpMatch)(interp, string, pattern);
-}
-
-/* Slot 207 */
-void
-Tcl_RegExpRange(regexp, index, startPtr, endPtr)
- Tcl_RegExp regexp;
- int index;
- char ** startPtr;
- char ** endPtr;
-{
- (tclStubsPtr->tcl_RegExpRange)(regexp, index, startPtr, endPtr);
-}
-
-/* Slot 208 */
-void
-Tcl_RegisterChannel(interp, chan)
- Tcl_Interp * interp;
- Tcl_Channel chan;
-{
- (tclStubsPtr->tcl_RegisterChannel)(interp, chan);
-}
-
-/* Slot 209 */
-void
-Tcl_RegisterObjType(typePtr)
- Tcl_ObjType * typePtr;
-{
- (tclStubsPtr->tcl_RegisterObjType)(typePtr);
-}
-
-/* Slot 210 */
-void
-Tcl_Release(clientData)
- ClientData clientData;
-{
- (tclStubsPtr->tcl_Release)(clientData);
-}
-
-/* Slot 211 */
-void
-Tcl_ResetResult(interp)
- Tcl_Interp * interp;
-{
- (tclStubsPtr->tcl_ResetResult)(interp);
-}
-
-/* Slot 212 */
-int
-Tcl_ScanCountedElement(string, length, flagPtr)
- CONST char * string;
- int length;
- int * flagPtr;
-{
- return (tclStubsPtr->tcl_ScanCountedElement)(string, length, flagPtr);
-}
-
-/* Slot 213 */
-int
-Tcl_ScanElement(string, flagPtr)
- CONST char * string;
- int * flagPtr;
-{
- return (tclStubsPtr->tcl_ScanElement)(string, flagPtr);
-}
-
-/* Slot 214 */
-int
-Tcl_Seek(chan, offset, mode)
- Tcl_Channel chan;
- int offset;
- int mode;
-{
- return (tclStubsPtr->tcl_Seek)(chan, offset, mode);
-}
-
-/* Slot 215 */
-int
-Tcl_ServiceAll()
-{
- return (tclStubsPtr->tcl_ServiceAll)();
-}
-
-/* Slot 216 */
-int
-Tcl_ServiceEvent(flags)
- int flags;
-{
- return (tclStubsPtr->tcl_ServiceEvent)(flags);
-}
-
-/* Slot 217 */
-void
-Tcl_SetAssocData(interp, name, proc, clientData)
- Tcl_Interp * interp;
- char * name;
- Tcl_InterpDeleteProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_SetAssocData)(interp, name, proc, clientData);
-}
-
-/* Slot 218 */
-void
-Tcl_SetBooleanObj(objPtr, boolValue)
- Tcl_Obj * objPtr;
- int boolValue;
-{
- (tclStubsPtr->tcl_SetBooleanObj)(objPtr, boolValue);
-}
-
-/* Slot 219 */
-unsigned char *
-Tcl_SetByteArrayLength(objPtr, length)
- Tcl_Obj * objPtr;
- int length;
-{
- return (tclStubsPtr->tcl_SetByteArrayLength)(objPtr, length);
-}
-
-/* Slot 220 */
-void
-Tcl_SetByteArrayObj(objPtr, bytes, length)
- Tcl_Obj * objPtr;
- unsigned char * bytes;
- int length;
-{
- (tclStubsPtr->tcl_SetByteArrayObj)(objPtr, bytes, length);
-}
-
-/* Slot 221 */
-void
-Tcl_SetChannelBufferSize(chan, sz)
- Tcl_Channel chan;
- int sz;
-{
- (tclStubsPtr->tcl_SetChannelBufferSize)(chan, sz);
-}
-
-/* Slot 222 */
-int
-Tcl_SetChannelOption(interp, chan, optionName, newValue)
- Tcl_Interp * interp;
- Tcl_Channel chan;
- char * optionName;
- char * newValue;
-{
- return (tclStubsPtr->tcl_SetChannelOption)(interp, chan, optionName, newValue);
-}
-
-/* Slot 223 */
-int
-Tcl_SetCommandInfo(interp, cmdName, infoPtr)
- Tcl_Interp * interp;
- char * cmdName;
- Tcl_CmdInfo * infoPtr;
-{
- return (tclStubsPtr->tcl_SetCommandInfo)(interp, cmdName, infoPtr);
-}
-
-/* Slot 224 */
-void
-Tcl_SetDoubleObj(objPtr, doubleValue)
- Tcl_Obj * objPtr;
- double doubleValue;
-{
- (tclStubsPtr->tcl_SetDoubleObj)(objPtr, doubleValue);
-}
-
-/* Slot 225 */
-void
-Tcl_SetErrno(err)
- int err;
-{
- (tclStubsPtr->tcl_SetErrno)(err);
-}
-
-/* Slot 226 */
-void
-Tcl_SetErrorCode TCL_VARARGS_DEF(Tcl_Interp *,interp)
-{
- Tcl_Interp * var;
- va_list argList;
-
- var = (Tcl_Interp *) TCL_VARARGS_START(Tcl_Interp *,interp,argList);
-
- (tclStubsPtr->tcl_SetErrorCodeVA)(var, argList);
- va_end(argList);
-}
-
-/* Slot 227 */
-void
-Tcl_SetErrorCodeVA(interp, argList)
- Tcl_Interp * interp;
- va_list argList;
-{
- (tclStubsPtr->tcl_SetErrorCodeVA)(interp, argList);
-}
-
-/* Slot 228 */
-void
-Tcl_SetIntObj(objPtr, intValue)
- Tcl_Obj * objPtr;
- int intValue;
-{
- (tclStubsPtr->tcl_SetIntObj)(objPtr, intValue);
-}
-
-/* Slot 229 */
-void
-Tcl_SetListObj(objPtr, objc, objv)
- Tcl_Obj * objPtr;
- int objc;
- Tcl_Obj *CONST objv[];
-{
- (tclStubsPtr->tcl_SetListObj)(objPtr, objc, objv);
-}
-
-/* Slot 230 */
-void
-Tcl_SetLongObj(objPtr, longValue)
- Tcl_Obj * objPtr;
- long longValue;
-{
- (tclStubsPtr->tcl_SetLongObj)(objPtr, longValue);
-}
-
-/* Slot 231 */
-void
-Tcl_SetMaxBlockTime(timePtr)
- Tcl_Time * timePtr;
-{
- (tclStubsPtr->tcl_SetMaxBlockTime)(timePtr);
-}
-
-/* Slot 232 */
-void
-Tcl_SetObjErrorCode(interp, errorObjPtr)
- Tcl_Interp * interp;
- Tcl_Obj * errorObjPtr;
-{
- (tclStubsPtr->tcl_SetObjErrorCode)(interp, errorObjPtr);
-}
-
-/* Slot 233 */
-void
-Tcl_SetObjLength(objPtr, length)
- Tcl_Obj * objPtr;
- int length;
-{
- (tclStubsPtr->tcl_SetObjLength)(objPtr, length);
-}
-
-/* Slot 234 */
-void
-Tcl_SetObjResult(interp, resultObjPtr)
- Tcl_Interp * interp;
- Tcl_Obj * resultObjPtr;
-{
- (tclStubsPtr->tcl_SetObjResult)(interp, resultObjPtr);
-}
-
-/* Slot 235 */
-void
-Tcl_SetPanicProc(panicProc)
- Tcl_PanicProc * panicProc;
-{
- (tclStubsPtr->tcl_SetPanicProc)(panicProc);
-}
-
-/* Slot 236 */
-int
-Tcl_SetRecursionLimit(interp, depth)
- Tcl_Interp * interp;
- int depth;
-{
- return (tclStubsPtr->tcl_SetRecursionLimit)(interp, depth);
-}
-
-/* Slot 237 */
-void
-Tcl_SetResult(interp, string, freeProc)
- Tcl_Interp * interp;
- char * string;
- Tcl_FreeProc * freeProc;
-{
- (tclStubsPtr->tcl_SetResult)(interp, string, freeProc);
-}
-
-/* Slot 238 */
-int
-Tcl_SetServiceMode(mode)
- int mode;
-{
- return (tclStubsPtr->tcl_SetServiceMode)(mode);
-}
-
-/* Slot 239 */
-void
-Tcl_SetStdChannel(channel, type)
- Tcl_Channel channel;
- int type;
-{
- (tclStubsPtr->tcl_SetStdChannel)(channel, type);
-}
-
-/* Slot 240 */
-void
-Tcl_SetStringObj(objPtr, bytes, length)
- Tcl_Obj * objPtr;
- char * bytes;
- int length;
-{
- (tclStubsPtr->tcl_SetStringObj)(objPtr, bytes, length);
-}
-
-/* Slot 241 */
-void
-Tcl_SetTimer(timePtr)
- Tcl_Time * timePtr;
-{
- (tclStubsPtr->tcl_SetTimer)(timePtr);
-}
-
-/* Slot 242 */
-char *
-Tcl_SetVar(interp, varName, newValue, flags)
- Tcl_Interp * interp;
- char * varName;
- char * newValue;
- int flags;
-{
- return (tclStubsPtr->tcl_SetVar)(interp, varName, newValue, flags);
-}
-
-/* Slot 243 */
-char *
-Tcl_SetVar2(interp, part1, part2, newValue, flags)
- Tcl_Interp * interp;
- char * part1;
- char * part2;
- char * newValue;
- int flags;
-{
- return (tclStubsPtr->tcl_SetVar2)(interp, part1, part2, newValue, flags);
-}
-
-/* Slot 244 */
-char *
-Tcl_SignalId(sig)
- int sig;
-{
- return (tclStubsPtr->tcl_SignalId)(sig);
-}
-
-/* Slot 245 */
-char *
-Tcl_SignalMsg(sig)
- int sig;
-{
- return (tclStubsPtr->tcl_SignalMsg)(sig);
-}
-
-/* Slot 246 */
-void
-Tcl_Sleep(ms)
- int ms;
-{
- (tclStubsPtr->tcl_Sleep)(ms);
-}
-
-/* Slot 247 */
-void
-Tcl_SourceRCFile(interp)
- Tcl_Interp * interp;
-{
- (tclStubsPtr->tcl_SourceRCFile)(interp);
-}
-
-/* Slot 248 */
-int
-Tcl_SplitList(interp, list, argcPtr, argvPtr)
- Tcl_Interp * interp;
- char * list;
- int * argcPtr;
- char *** argvPtr;
-{
- return (tclStubsPtr->tcl_SplitList)(interp, list, argcPtr, argvPtr);
-}
-
-/* Slot 249 */
-void
-Tcl_SplitPath(path, argcPtr, argvPtr)
- char * path;
- int * argcPtr;
- char *** argvPtr;
-{
- (tclStubsPtr->tcl_SplitPath)(path, argcPtr, argvPtr);
-}
-
-/* Slot 250 */
-void
-Tcl_StaticPackage(interp, pkgName, initProc, safeInitProc)
- Tcl_Interp * interp;
- char * pkgName;
- Tcl_PackageInitProc * initProc;
- Tcl_PackageInitProc * safeInitProc;
-{
- (tclStubsPtr->tcl_StaticPackage)(interp, pkgName, initProc, safeInitProc);
-}
-
-/* Slot 251 */
-int
-Tcl_StringMatch(string, pattern)
- char * string;
- char * pattern;
-{
- return (tclStubsPtr->tcl_StringMatch)(string, pattern);
-}
-
-/* Slot 252 */
-int
-Tcl_Tell(chan)
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_Tell)(chan);
-}
-
-/* Slot 253 */
-int
-Tcl_TraceVar(interp, varName, flags, proc, clientData)
- Tcl_Interp * interp;
- char * varName;
- int flags;
- Tcl_VarTraceProc * proc;
- ClientData clientData;
-{
- return (tclStubsPtr->tcl_TraceVar)(interp, varName, flags, proc, clientData);
-}
-
-/* Slot 254 */
-int
-Tcl_TraceVar2(interp, part1, part2, flags, proc, clientData)
- Tcl_Interp * interp;
- char * part1;
- char * part2;
- int flags;
- Tcl_VarTraceProc * proc;
- ClientData clientData;
-{
- return (tclStubsPtr->tcl_TraceVar2)(interp, part1, part2, flags, proc, clientData);
-}
-
-/* Slot 255 */
-char *
-Tcl_TranslateFileName(interp, name, bufferPtr)
- Tcl_Interp * interp;
- char * name;
- Tcl_DString * bufferPtr;
-{
- return (tclStubsPtr->tcl_TranslateFileName)(interp, name, bufferPtr);
-}
-
-/* Slot 256 */
-int
-Tcl_Ungets(chan, str, len, atHead)
- Tcl_Channel chan;
- char * str;
- int len;
- int atHead;
-{
- return (tclStubsPtr->tcl_Ungets)(chan, str, len, atHead);
-}
-
-/* Slot 257 */
-void
-Tcl_UnlinkVar(interp, varName)
- Tcl_Interp * interp;
- char * varName;
-{
- (tclStubsPtr->tcl_UnlinkVar)(interp, varName);
-}
-
-/* Slot 258 */
-int
-Tcl_UnregisterChannel(interp, chan)
- Tcl_Interp * interp;
- Tcl_Channel chan;
-{
- return (tclStubsPtr->tcl_UnregisterChannel)(interp, chan);
-}
-
-/* Slot 259 */
-int
-Tcl_UnsetVar(interp, varName, flags)
- Tcl_Interp * interp;
- char * varName;
- int flags;
-{
- return (tclStubsPtr->tcl_UnsetVar)(interp, varName, flags);
-}
-
-/* Slot 260 */
-int
-Tcl_UnsetVar2(interp, part1, part2, flags)
- Tcl_Interp * interp;
- char * part1;
- char * part2;
- int flags;
-{
- return (tclStubsPtr->tcl_UnsetVar2)(interp, part1, part2, flags);
-}
-
-/* Slot 261 */
-void
-Tcl_UntraceVar(interp, varName, flags, proc, clientData)
- Tcl_Interp * interp;
- char * varName;
- int flags;
- Tcl_VarTraceProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_UntraceVar)(interp, varName, flags, proc, clientData);
-}
-
-/* Slot 262 */
-void
-Tcl_UntraceVar2(interp, part1, part2, flags, proc, clientData)
- Tcl_Interp * interp;
- char * part1;
- char * part2;
- int flags;
- Tcl_VarTraceProc * proc;
- ClientData clientData;
-{
- (tclStubsPtr->tcl_UntraceVar2)(interp, part1, part2, flags, proc, clientData);
-}
-
-/* Slot 263 */
-void
-Tcl_UpdateLinkedVar(interp, varName)
- Tcl_Interp * interp;
- char * varName;
-{
- (tclStubsPtr->tcl_UpdateLinkedVar)(interp, varName);
-}
-
-/* Slot 264 */
-int
-Tcl_UpVar(interp, frameName, varName, localName, flags)
- Tcl_Interp * interp;
- char * frameName;
- char * varName;
- char * localName;
- int flags;
-{
- return (tclStubsPtr->tcl_UpVar)(interp, frameName, varName, localName, flags);
-}
-
-/* Slot 265 */
-int
-Tcl_UpVar2(interp, frameName, part1, part2, localName, flags)
- Tcl_Interp * interp;
- char * frameName;
- char * part1;
- char * part2;
- char * localName;
- int flags;
-{
- return (tclStubsPtr->tcl_UpVar2)(interp, frameName, part1, part2, localName, flags);
-}
-
-/* Slot 266 */
-void
-Tcl_ValidateAllMemory(file, line)
- char * file;
- int line;
-{
- (tclStubsPtr->tcl_ValidateAllMemory)(file, line);
-}
-
-/* Slot 267 */
-int
-Tcl_VarEval TCL_VARARGS_DEF(Tcl_Interp *,interp)
-{
- Tcl_Interp * var;
- va_list argList;
- int resultValue;
-
- var = (Tcl_Interp *) TCL_VARARGS_START(Tcl_Interp *,interp,argList);
-
- resultValue = (tclStubsPtr->tcl_VarEvalVA)(var, argList);
- va_end(argList);
-return resultValue;
-}
-
-/* Slot 268 */
-int
-Tcl_VarEvalVA(interp, argList)
- Tcl_Interp * interp;
- va_list argList;
-{
- return (tclStubsPtr->tcl_VarEvalVA)(interp, argList);
-}
-
-/* Slot 269 */
-ClientData
-Tcl_VarTraceInfo(interp, varName, flags, procPtr, prevClientData)
- Tcl_Interp * interp;
- char * varName;
- int flags;
- Tcl_VarTraceProc * procPtr;
- ClientData prevClientData;
-{
- return (tclStubsPtr->tcl_VarTraceInfo)(interp, varName, flags, procPtr, prevClientData);
-}
-
-/* Slot 270 */
-ClientData
-Tcl_VarTraceInfo2(interp, part1, part2, flags, procPtr, prevClientData)
- Tcl_Interp * interp;
- char * part1;
- char * part2;
- int flags;
- Tcl_VarTraceProc * procPtr;
- ClientData prevClientData;
-{
- return (tclStubsPtr->tcl_VarTraceInfo2)(interp, part1, part2, flags, procPtr, prevClientData);
-}
-
-/* Slot 271 */
-int
-Tcl_WaitForEvent(timePtr)
- Tcl_Time * timePtr;
-{
- return (tclStubsPtr->tcl_WaitForEvent)(timePtr);
-}
-
-/* Slot 272 */
-Tcl_Pid
-Tcl_WaitPid(pid, statPtr, options)
- Tcl_Pid pid;
- int * statPtr;
- int options;
-{
- return (tclStubsPtr->tcl_WaitPid)(pid, statPtr, options);
-}
-
-/* Slot 273 */
-int
-Tcl_Write(chan, s, slen)
- Tcl_Channel chan;
- char * s;
- int slen;
-{
- return (tclStubsPtr->tcl_Write)(chan, s, slen);
-}
-
-/* Slot 274 */
-void
-Tcl_WrongNumArgs(interp, objc, objv, message)
- Tcl_Interp * interp;
- int objc;
- Tcl_Obj *CONST objv[];
- char * message;
-{
- (tclStubsPtr->tcl_WrongNumArgs)(interp, objc, objv, message);
-}
-
-
-/* !END!: Do not edit above this line. */
generated by cgit v0.12 at 2024-11-24 02:07:21 (GMT)