Parent Directory | Revision Log | Patch
revision 44 by dashley, Fri Oct 14 02:09:58 2016 UTC | revision 71 by dashley, Sat Nov 5 11:07:06 2016 UTC | |
---|---|---|
# | Line 1 | Line 1 |
/* $Header: /cvsroot/esrg/sfesrg/esrgpcpj/shared/tcl_base/tcldecls.h,v 1.1.1.1 2001/06/13 04:37:26 dtashley Exp $ */ | ||
/* | ||
* tclDecls.h -- | ||
* | ||
* Declarations of functions in 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: tcldecls.h,v 1.1.1.1 2001/06/13 04:37:26 dtashley Exp $ | ||
*/ | ||
#ifndef _TCLDECLS | ||
#define _TCLDECLS | ||
/* | ||
* 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 function declarations: | ||
*/ | ||
/* 0 */ | ||
EXTERN int Tcl_PkgProvideEx _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * name, char * version, | ||
ClientData clientData)); | ||
/* 1 */ | ||
EXTERN char * Tcl_PkgRequireEx _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * name, char * version, int exact, | ||
ClientData * clientDataPtr)); | ||
/* 2 */ | ||
EXTERN void Tcl_Panic _ANSI_ARGS_(TCL_VARARGS(char *,format)); | ||
/* 3 */ | ||
EXTERN char * Tcl_Alloc _ANSI_ARGS_((unsigned int size)); | ||
/* 4 */ | ||
EXTERN void Tcl_Free _ANSI_ARGS_((char * ptr)); | ||
/* 5 */ | ||
EXTERN char * Tcl_Realloc _ANSI_ARGS_((char * ptr, | ||
unsigned int size)); | ||
/* 6 */ | ||
EXTERN char * Tcl_DbCkalloc _ANSI_ARGS_((unsigned int size, | ||
char * file, int line)); | ||
/* 7 */ | ||
EXTERN int Tcl_DbCkfree _ANSI_ARGS_((char * ptr, char * file, | ||
int line)); | ||
/* 8 */ | ||
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_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_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 * str, 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 * str, 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 * str, 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)); | ||
/* 72 */ | ||
EXTERN void Tcl_AsyncDelete _ANSI_ARGS_((Tcl_AsyncHandler async)); | ||
/* 73 */ | ||
EXTERN int Tcl_AsyncInvoke _ANSI_ARGS_((Tcl_Interp * interp, | ||
int code)); | ||
/* 74 */ | ||
EXTERN void Tcl_AsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async)); | ||
/* 75 */ | ||
EXTERN int Tcl_AsyncReady _ANSI_ARGS_((void)); | ||
/* 76 */ | ||
EXTERN void Tcl_BackgroundError _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 77 */ | ||
EXTERN char Tcl_Backslash _ANSI_ARGS_((CONST char * src, | ||
int * readPtr)); | ||
/* 78 */ | ||
EXTERN int Tcl_BadChannelOption _ANSI_ARGS_(( | ||
Tcl_Interp * interp, char * optionName, | ||
char * optionList)); | ||
/* 79 */ | ||
EXTERN void Tcl_CallWhenDeleted _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_InterpDeleteProc * proc, | ||
ClientData clientData)); | ||
/* 80 */ | ||
EXTERN void Tcl_CancelIdleCall _ANSI_ARGS_(( | ||
Tcl_IdleProc * idleProc, | ||
ClientData clientData)); | ||
/* 81 */ | ||
EXTERN int Tcl_Close _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Channel chan)); | ||
/* 82 */ | ||
EXTERN int Tcl_CommandComplete _ANSI_ARGS_((char * cmd)); | ||
/* 83 */ | ||
EXTERN char * Tcl_Concat _ANSI_ARGS_((int argc, char ** argv)); | ||
/* 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)); | ||
/* 86 */ | ||
EXTERN int Tcl_CreateAlias _ANSI_ARGS_((Tcl_Interp * slave, | ||
char * slaveCmd, Tcl_Interp * target, | ||
char * targetCmd, int argc, char ** argv)); | ||
/* 87 */ | ||
EXTERN int Tcl_CreateAliasObj _ANSI_ARGS_((Tcl_Interp * slave, | ||
char * slaveCmd, Tcl_Interp * target, | ||
char * targetCmd, int objc, | ||
Tcl_Obj *CONST objv[])); | ||
/* 88 */ | ||
EXTERN Tcl_Channel Tcl_CreateChannel _ANSI_ARGS_(( | ||
Tcl_ChannelType * typePtr, char * chanName, | ||
ClientData instanceData, int mask)); | ||
/* 89 */ | ||
EXTERN void Tcl_CreateChannelHandler _ANSI_ARGS_(( | ||
Tcl_Channel chan, int mask, | ||
Tcl_ChannelProc * proc, | ||
ClientData clientData)); | ||
/* 90 */ | ||
EXTERN void Tcl_CreateCloseHandler _ANSI_ARGS_((Tcl_Channel chan, | ||
Tcl_CloseProc * proc, ClientData clientData)); | ||
/* 91 */ | ||
EXTERN Tcl_Command Tcl_CreateCommand _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * cmdName, Tcl_CmdProc * proc, | ||
ClientData clientData, | ||
Tcl_CmdDeleteProc * deleteProc)); | ||
/* 92 */ | ||
EXTERN void Tcl_CreateEventSource _ANSI_ARGS_(( | ||
Tcl_EventSetupProc * setupProc, | ||
Tcl_EventCheckProc * checkProc, | ||
ClientData clientData)); | ||
/* 93 */ | ||
EXTERN void Tcl_CreateExitHandler _ANSI_ARGS_(( | ||
Tcl_ExitProc * proc, ClientData clientData)); | ||
/* 94 */ | ||
EXTERN Tcl_Interp * Tcl_CreateInterp _ANSI_ARGS_((void)); | ||
/* 95 */ | ||
EXTERN void Tcl_CreateMathFunc _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * name, int numArgs, | ||
Tcl_ValueType * argTypes, | ||
Tcl_MathProc * proc, ClientData clientData)); | ||
/* 96 */ | ||
EXTERN Tcl_Command Tcl_CreateObjCommand _ANSI_ARGS_(( | ||
Tcl_Interp * interp, char * cmdName, | ||
Tcl_ObjCmdProc * proc, ClientData clientData, | ||
Tcl_CmdDeleteProc * deleteProc)); | ||
/* 97 */ | ||
EXTERN Tcl_Interp * Tcl_CreateSlave _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * slaveName, int isSafe)); | ||
/* 98 */ | ||
EXTERN Tcl_TimerToken Tcl_CreateTimerHandler _ANSI_ARGS_((int milliseconds, | ||
Tcl_TimerProc * proc, ClientData clientData)); | ||
/* 99 */ | ||
EXTERN Tcl_Trace Tcl_CreateTrace _ANSI_ARGS_((Tcl_Interp * interp, | ||
int level, Tcl_CmdTraceProc * proc, | ||
ClientData clientData)); | ||
/* 100 */ | ||
EXTERN void Tcl_DeleteAssocData _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * name)); | ||
/* 101 */ | ||
EXTERN void Tcl_DeleteChannelHandler _ANSI_ARGS_(( | ||
Tcl_Channel chan, Tcl_ChannelProc * proc, | ||
ClientData clientData)); | ||
/* 102 */ | ||
EXTERN void Tcl_DeleteCloseHandler _ANSI_ARGS_((Tcl_Channel chan, | ||
Tcl_CloseProc * proc, ClientData clientData)); | ||
/* 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)); | ||
/* 106 */ | ||
EXTERN void Tcl_DeleteEventSource _ANSI_ARGS_(( | ||
Tcl_EventSetupProc * setupProc, | ||
Tcl_EventCheckProc * checkProc, | ||
ClientData clientData)); | ||
/* 107 */ | ||
EXTERN void Tcl_DeleteExitHandler _ANSI_ARGS_(( | ||
Tcl_ExitProc * proc, ClientData clientData)); | ||
/* 108 */ | ||
EXTERN void Tcl_DeleteHashEntry _ANSI_ARGS_(( | ||
Tcl_HashEntry * entryPtr)); | ||
/* 109 */ | ||
EXTERN void Tcl_DeleteHashTable _ANSI_ARGS_(( | ||
Tcl_HashTable * tablePtr)); | ||
/* 110 */ | ||
EXTERN void Tcl_DeleteInterp _ANSI_ARGS_((Tcl_Interp * interp)); | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
/* 111 */ | ||
EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids, | ||
Tcl_Pid * pidPtr)); | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
/* 111 */ | ||
EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids, | ||
Tcl_Pid * pidPtr)); | ||
#endif /* __WIN32__ */ | ||
/* 112 */ | ||
EXTERN void Tcl_DeleteTimerHandler _ANSI_ARGS_(( | ||
Tcl_TimerToken token)); | ||
/* 113 */ | ||
EXTERN void Tcl_DeleteTrace _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Trace trace)); | ||
/* 114 */ | ||
EXTERN void Tcl_DontCallWhenDeleted _ANSI_ARGS_(( | ||
Tcl_Interp * interp, | ||
Tcl_InterpDeleteProc * proc, | ||
ClientData clientData)); | ||
/* 115 */ | ||
EXTERN int Tcl_DoOneEvent _ANSI_ARGS_((int flags)); | ||
/* 116 */ | ||
EXTERN void Tcl_DoWhenIdle _ANSI_ARGS_((Tcl_IdleProc * proc, | ||
ClientData clientData)); | ||
/* 117 */ | ||
EXTERN char * Tcl_DStringAppend _ANSI_ARGS_((Tcl_DString * dsPtr, | ||
CONST char * str, int length)); | ||
/* 118 */ | ||
EXTERN char * Tcl_DStringAppendElement _ANSI_ARGS_(( | ||
Tcl_DString * dsPtr, CONST char * string)); | ||
/* 119 */ | ||
EXTERN void Tcl_DStringEndSublist _ANSI_ARGS_(( | ||
Tcl_DString * dsPtr)); | ||
/* 120 */ | ||
EXTERN void Tcl_DStringFree _ANSI_ARGS_((Tcl_DString * dsPtr)); | ||
/* 121 */ | ||
EXTERN void Tcl_DStringGetResult _ANSI_ARGS_(( | ||
Tcl_Interp * interp, Tcl_DString * dsPtr)); | ||
/* 122 */ | ||
EXTERN void Tcl_DStringInit _ANSI_ARGS_((Tcl_DString * dsPtr)); | ||
/* 123 */ | ||
EXTERN void Tcl_DStringResult _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_DString * dsPtr)); | ||
/* 124 */ | ||
EXTERN void Tcl_DStringSetLength _ANSI_ARGS_(( | ||
Tcl_DString * dsPtr, int length)); | ||
/* 125 */ | ||
EXTERN void Tcl_DStringStartSublist _ANSI_ARGS_(( | ||
Tcl_DString * dsPtr)); | ||
/* 126 */ | ||
EXTERN int Tcl_Eof _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 127 */ | ||
EXTERN char * Tcl_ErrnoId _ANSI_ARGS_((void)); | ||
/* 128 */ | ||
EXTERN char * Tcl_ErrnoMsg _ANSI_ARGS_((int err)); | ||
/* 129 */ | ||
EXTERN int Tcl_Eval _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * string)); | ||
/* 130 */ | ||
EXTERN int Tcl_EvalFile _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * fileName)); | ||
/* 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)); | ||
/* 133 */ | ||
EXTERN void Tcl_Exit _ANSI_ARGS_((int status)); | ||
/* 134 */ | ||
EXTERN int Tcl_ExposeCommand _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * hiddenCmdToken, char * cmdName)); | ||
/* 135 */ | ||
EXTERN int Tcl_ExprBoolean _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * str, int * ptr)); | ||
/* 136 */ | ||
EXTERN int Tcl_ExprBooleanObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * objPtr, int * ptr)); | ||
/* 137 */ | ||
EXTERN int Tcl_ExprDouble _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * str, double * ptr)); | ||
/* 138 */ | ||
EXTERN int Tcl_ExprDoubleObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * objPtr, double * ptr)); | ||
/* 139 */ | ||
EXTERN int Tcl_ExprLong _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * str, long * ptr)); | ||
/* 140 */ | ||
EXTERN int Tcl_ExprLongObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * objPtr, long * ptr)); | ||
/* 141 */ | ||
EXTERN int Tcl_ExprObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr)); | ||
/* 142 */ | ||
EXTERN int Tcl_ExprString _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * string)); | ||
/* 143 */ | ||
EXTERN void Tcl_Finalize _ANSI_ARGS_((void)); | ||
/* 144 */ | ||
EXTERN void Tcl_FindExecutable _ANSI_ARGS_((CONST char * argv0)); | ||
/* 145 */ | ||
EXTERN Tcl_HashEntry * Tcl_FirstHashEntry _ANSI_ARGS_(( | ||
Tcl_HashTable * tablePtr, | ||
Tcl_HashSearch * searchPtr)); | ||
/* 146 */ | ||
EXTERN int Tcl_Flush _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 147 */ | ||
EXTERN void Tcl_FreeResult _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 148 */ | ||
EXTERN int Tcl_GetAlias _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * slaveCmd, | ||
Tcl_Interp ** targetInterpPtr, | ||
char ** targetCmdPtr, int * argcPtr, | ||
char *** argvPtr)); | ||
/* 149 */ | ||
EXTERN int Tcl_GetAliasObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * slaveCmd, | ||
Tcl_Interp ** targetInterpPtr, | ||
char ** targetCmdPtr, int * objcPtr, | ||
Tcl_Obj *** objv)); | ||
/* 150 */ | ||
EXTERN ClientData Tcl_GetAssocData _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * name, Tcl_InterpDeleteProc ** procPtr)); | ||
/* 151 */ | ||
EXTERN Tcl_Channel Tcl_GetChannel _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * chanName, int * modePtr)); | ||
/* 152 */ | ||
EXTERN int Tcl_GetChannelBufferSize _ANSI_ARGS_(( | ||
Tcl_Channel chan)); | ||
/* 153 */ | ||
EXTERN int Tcl_GetChannelHandle _ANSI_ARGS_((Tcl_Channel chan, | ||
int direction, ClientData * handlePtr)); | ||
/* 154 */ | ||
EXTERN ClientData Tcl_GetChannelInstanceData _ANSI_ARGS_(( | ||
Tcl_Channel chan)); | ||
/* 155 */ | ||
EXTERN int Tcl_GetChannelMode _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 156 */ | ||
EXTERN char * Tcl_GetChannelName _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 157 */ | ||
EXTERN int Tcl_GetChannelOption _ANSI_ARGS_(( | ||
Tcl_Interp * interp, Tcl_Channel chan, | ||
char * optionName, Tcl_DString * dsPtr)); | ||
/* 158 */ | ||
EXTERN Tcl_ChannelType * Tcl_GetChannelType _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 159 */ | ||
EXTERN int Tcl_GetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * cmdName, Tcl_CmdInfo * infoPtr)); | ||
/* 160 */ | ||
EXTERN char * Tcl_GetCommandName _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Command command)); | ||
/* 161 */ | ||
EXTERN int Tcl_GetErrno _ANSI_ARGS_((void)); | ||
/* 162 */ | ||
EXTERN char * Tcl_GetHostName _ANSI_ARGS_((void)); | ||
/* 163 */ | ||
EXTERN int Tcl_GetInterpPath _ANSI_ARGS_(( | ||
Tcl_Interp * askInterp, | ||
Tcl_Interp * slaveInterp)); | ||
/* 164 */ | ||
EXTERN Tcl_Interp * Tcl_GetMaster _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 165 */ | ||
EXTERN CONST char * Tcl_GetNameOfExecutable _ANSI_ARGS_((void)); | ||
/* 166 */ | ||
EXTERN Tcl_Obj * Tcl_GetObjResult _ANSI_ARGS_((Tcl_Interp * interp)); | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
/* 167 */ | ||
EXTERN int Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * str, int forWriting, int checkUsage, | ||
ClientData * filePtr)); | ||
#endif /* UNIX */ | ||
/* 168 */ | ||
EXTERN Tcl_PathType Tcl_GetPathType _ANSI_ARGS_((char * path)); | ||
/* 169 */ | ||
EXTERN int Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan, | ||
Tcl_DString * dsPtr)); | ||
/* 170 */ | ||
EXTERN int Tcl_GetsObj _ANSI_ARGS_((Tcl_Channel chan, | ||
Tcl_Obj * objPtr)); | ||
/* 171 */ | ||
EXTERN int Tcl_GetServiceMode _ANSI_ARGS_((void)); | ||
/* 172 */ | ||
EXTERN Tcl_Interp * Tcl_GetSlave _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * slaveName)); | ||
/* 173 */ | ||
EXTERN Tcl_Channel Tcl_GetStdChannel _ANSI_ARGS_((int type)); | ||
/* 174 */ | ||
EXTERN char * Tcl_GetStringResult _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 175 */ | ||
EXTERN char * Tcl_GetVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName, int flags)); | ||
/* 176 */ | ||
EXTERN char * Tcl_GetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, int flags)); | ||
/* 177 */ | ||
EXTERN int Tcl_GlobalEval _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * command)); | ||
/* 178 */ | ||
EXTERN int Tcl_GlobalEvalObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * objPtr)); | ||
/* 179 */ | ||
EXTERN int Tcl_HideCommand _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * cmdName, char * hiddenCmdToken)); | ||
/* 180 */ | ||
EXTERN int Tcl_Init _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 181 */ | ||
EXTERN void Tcl_InitHashTable _ANSI_ARGS_(( | ||
Tcl_HashTable * tablePtr, int keyType)); | ||
/* 182 */ | ||
EXTERN int Tcl_InputBlocked _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 183 */ | ||
EXTERN int Tcl_InputBuffered _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 184 */ | ||
EXTERN int Tcl_InterpDeleted _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 185 */ | ||
EXTERN int Tcl_IsSafe _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 186 */ | ||
EXTERN char * Tcl_JoinPath _ANSI_ARGS_((int argc, char ** argv, | ||
Tcl_DString * resultPtr)); | ||
/* 187 */ | ||
EXTERN int Tcl_LinkVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName, char * addr, int type)); | ||
/* Slot 188 is reserved */ | ||
/* 189 */ | ||
EXTERN Tcl_Channel Tcl_MakeFileChannel _ANSI_ARGS_((ClientData handle, | ||
int mode)); | ||
/* 190 */ | ||
EXTERN int Tcl_MakeSafe _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 191 */ | ||
EXTERN Tcl_Channel Tcl_MakeTcpClientChannel _ANSI_ARGS_(( | ||
ClientData tcpSocket)); | ||
/* 192 */ | ||
EXTERN char * Tcl_Merge _ANSI_ARGS_((int argc, char ** argv)); | ||
/* 193 */ | ||
EXTERN Tcl_HashEntry * Tcl_NextHashEntry _ANSI_ARGS_(( | ||
Tcl_HashSearch * searchPtr)); | ||
/* 194 */ | ||
EXTERN void Tcl_NotifyChannel _ANSI_ARGS_((Tcl_Channel channel, | ||
int mask)); | ||
/* 195 */ | ||
EXTERN Tcl_Obj * Tcl_ObjGetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, | ||
int flags)); | ||
/* 196 */ | ||
EXTERN Tcl_Obj * Tcl_ObjSetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, | ||
Tcl_Obj * newValuePtr, int flags)); | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
/* 197 */ | ||
EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_(( | ||
Tcl_Interp * interp, int argc, char ** argv, | ||
int flags)); | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
/* 197 */ | ||
EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_(( | ||
Tcl_Interp * interp, int argc, char ** argv, | ||
int flags)); | ||
#endif /* __WIN32__ */ | ||
/* 198 */ | ||
EXTERN Tcl_Channel Tcl_OpenFileChannel _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * fileName, char * modeString, | ||
int permissions)); | ||
/* 199 */ | ||
EXTERN Tcl_Channel Tcl_OpenTcpClient _ANSI_ARGS_((Tcl_Interp * interp, | ||
int port, char * address, char * myaddr, | ||
int myport, int async)); | ||
/* 200 */ | ||
EXTERN Tcl_Channel Tcl_OpenTcpServer _ANSI_ARGS_((Tcl_Interp * interp, | ||
int port, char * host, | ||
Tcl_TcpAcceptProc * acceptProc, | ||
ClientData callbackData)); | ||
/* 201 */ | ||
EXTERN void Tcl_Preserve _ANSI_ARGS_((ClientData data)); | ||
/* 202 */ | ||
EXTERN void Tcl_PrintDouble _ANSI_ARGS_((Tcl_Interp * interp, | ||
double value, char * dst)); | ||
/* 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)); | ||
/* 206 */ | ||
EXTERN int Tcl_Read _ANSI_ARGS_((Tcl_Channel chan, | ||
char * bufPtr, int toRead)); | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
/* 207 */ | ||
EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void)); | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
/* 207 */ | ||
EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void)); | ||
#endif /* __WIN32__ */ | ||
/* 208 */ | ||
EXTERN int Tcl_RecordAndEval _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * cmd, int flags)); | ||
/* 209 */ | ||
EXTERN int Tcl_RecordAndEvalObj _ANSI_ARGS_(( | ||
Tcl_Interp * interp, Tcl_Obj * cmdPtr, | ||
int flags)); | ||
/* 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 * string)); | ||
/* 213 */ | ||
EXTERN int Tcl_RegExpExec _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_RegExp regexp, CONST char * str, | ||
CONST char * start)); | ||
/* 214 */ | ||
EXTERN int Tcl_RegExpMatch _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * str, char * pattern)); | ||
/* 215 */ | ||
EXTERN void Tcl_RegExpRange _ANSI_ARGS_((Tcl_RegExp regexp, | ||
int index, char ** startPtr, char ** endPtr)); | ||
/* 216 */ | ||
EXTERN void Tcl_Release _ANSI_ARGS_((ClientData clientData)); | ||
/* 217 */ | ||
EXTERN void Tcl_ResetResult _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 218 */ | ||
EXTERN int Tcl_ScanElement _ANSI_ARGS_((CONST char * str, | ||
int * flagPtr)); | ||
/* 219 */ | ||
EXTERN int Tcl_ScanCountedElement _ANSI_ARGS_((CONST char * str, | ||
int length, int * flagPtr)); | ||
/* 220 */ | ||
EXTERN int Tcl_Seek _ANSI_ARGS_((Tcl_Channel chan, int offset, | ||
int mode)); | ||
/* 221 */ | ||
EXTERN int Tcl_ServiceAll _ANSI_ARGS_((void)); | ||
/* 222 */ | ||
EXTERN int Tcl_ServiceEvent _ANSI_ARGS_((int flags)); | ||
/* 223 */ | ||
EXTERN void Tcl_SetAssocData _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * name, Tcl_InterpDeleteProc * proc, | ||
ClientData clientData)); | ||
/* 224 */ | ||
EXTERN void Tcl_SetChannelBufferSize _ANSI_ARGS_(( | ||
Tcl_Channel chan, int sz)); | ||
/* 225 */ | ||
EXTERN int Tcl_SetChannelOption _ANSI_ARGS_(( | ||
Tcl_Interp * interp, Tcl_Channel chan, | ||
char * optionName, char * newValue)); | ||
/* 226 */ | ||
EXTERN int Tcl_SetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * cmdName, Tcl_CmdInfo * infoPtr)); | ||
/* 227 */ | ||
EXTERN void Tcl_SetErrno _ANSI_ARGS_((int err)); | ||
/* 228 */ | ||
EXTERN void Tcl_SetErrorCode _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); | ||
/* 229 */ | ||
EXTERN void Tcl_SetMaxBlockTime _ANSI_ARGS_((Tcl_Time * timePtr)); | ||
/* 230 */ | ||
EXTERN void Tcl_SetPanicProc _ANSI_ARGS_(( | ||
Tcl_PanicProc * panicProc)); | ||
/* 231 */ | ||
EXTERN int Tcl_SetRecursionLimit _ANSI_ARGS_(( | ||
Tcl_Interp * interp, int depth)); | ||
/* 232 */ | ||
EXTERN void Tcl_SetResult _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * str, 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)); | ||
/* 235 */ | ||
EXTERN void Tcl_SetObjResult _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * resultObjPtr)); | ||
/* 236 */ | ||
EXTERN void Tcl_SetStdChannel _ANSI_ARGS_((Tcl_Channel channel, | ||
int type)); | ||
/* 237 */ | ||
EXTERN char * Tcl_SetVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName, char * newValue, int flags)); | ||
/* 238 */ | ||
EXTERN char * Tcl_SetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, char * newValue, | ||
int flags)); | ||
/* 239 */ | ||
EXTERN char * Tcl_SignalId _ANSI_ARGS_((int sig)); | ||
/* 240 */ | ||
EXTERN char * Tcl_SignalMsg _ANSI_ARGS_((int sig)); | ||
/* 241 */ | ||
EXTERN void Tcl_SourceRCFile _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 242 */ | ||
EXTERN int Tcl_SplitList _ANSI_ARGS_((Tcl_Interp * interp, | ||
CONST char * listStr, int * argcPtr, | ||
char *** argvPtr)); | ||
/* 243 */ | ||
EXTERN void Tcl_SplitPath _ANSI_ARGS_((CONST char * path, | ||
int * argcPtr, char *** argvPtr)); | ||
/* 244 */ | ||
EXTERN void Tcl_StaticPackage _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * pkgName, | ||
Tcl_PackageInitProc * initProc, | ||
Tcl_PackageInitProc * safeInitProc)); | ||
/* 245 */ | ||
EXTERN int Tcl_StringMatch _ANSI_ARGS_((CONST char * str, | ||
CONST char * pattern)); | ||
/* 246 */ | ||
EXTERN int Tcl_Tell _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* 247 */ | ||
EXTERN int Tcl_TraceVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName, int flags, | ||
Tcl_VarTraceProc * proc, | ||
ClientData clientData)); | ||
/* 248 */ | ||
EXTERN int Tcl_TraceVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, int flags, | ||
Tcl_VarTraceProc * proc, | ||
ClientData clientData)); | ||
/* 249 */ | ||
EXTERN char * Tcl_TranslateFileName _ANSI_ARGS_(( | ||
Tcl_Interp * interp, char * name, | ||
Tcl_DString * bufferPtr)); | ||
/* 250 */ | ||
EXTERN int Tcl_Ungets _ANSI_ARGS_((Tcl_Channel chan, char * str, | ||
int len, int atHead)); | ||
/* 251 */ | ||
EXTERN void Tcl_UnlinkVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName)); | ||
/* 252 */ | ||
EXTERN int Tcl_UnregisterChannel _ANSI_ARGS_(( | ||
Tcl_Interp * interp, Tcl_Channel chan)); | ||
/* 253 */ | ||
EXTERN int Tcl_UnsetVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName, int flags)); | ||
/* 254 */ | ||
EXTERN int Tcl_UnsetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, int flags)); | ||
/* 255 */ | ||
EXTERN void Tcl_UntraceVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName, int flags, | ||
Tcl_VarTraceProc * proc, | ||
ClientData clientData)); | ||
/* 256 */ | ||
EXTERN void Tcl_UntraceVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, int flags, | ||
Tcl_VarTraceProc * proc, | ||
ClientData clientData)); | ||
/* 257 */ | ||
EXTERN void Tcl_UpdateLinkedVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName)); | ||
/* 258 */ | ||
EXTERN int Tcl_UpVar _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * frameName, char * varName, | ||
char * localName, int flags)); | ||
/* 259 */ | ||
EXTERN int Tcl_UpVar2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * frameName, char * part1, char * part2, | ||
char * localName, int flags)); | ||
/* 260 */ | ||
EXTERN int Tcl_VarEval _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); | ||
/* 261 */ | ||
EXTERN ClientData Tcl_VarTraceInfo _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * varName, int flags, | ||
Tcl_VarTraceProc * procPtr, | ||
ClientData prevClientData)); | ||
/* 262 */ | ||
EXTERN ClientData Tcl_VarTraceInfo2 _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, int flags, | ||
Tcl_VarTraceProc * procPtr, | ||
ClientData prevClientData)); | ||
/* 263 */ | ||
EXTERN int Tcl_Write _ANSI_ARGS_((Tcl_Channel chan, char * s, | ||
int slen)); | ||
/* 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 * str, 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)); | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
/* 278 */ | ||
EXTERN void Tcl_PanicVA _ANSI_ARGS_((char * format, | ||
va_list argList)); | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
/* 278 */ | ||
EXTERN void Tcl_PanicVA _ANSI_ARGS_((char * format, | ||
va_list argList)); | ||
#endif /* __WIN32__ */ | ||
/* 279 */ | ||
EXTERN void Tcl_GetVersion _ANSI_ARGS_((int * major, int * minor, | ||
int * patchLevel, int * type)); | ||
/* 280 */ | ||
EXTERN void Tcl_InitMemory _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 281 */ | ||
EXTERN Tcl_Channel Tcl_StackChannel _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_ChannelType * typePtr, | ||
ClientData instanceData, int mask, | ||
Tcl_Channel prevChan)); | ||
/* 282 */ | ||
EXTERN void Tcl_UnstackChannel _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Channel chan)); | ||
/* 283 */ | ||
EXTERN Tcl_Channel Tcl_GetStackedChannel _ANSI_ARGS_((Tcl_Channel chan)); | ||
/* Slot 284 is reserved */ | ||
/* Slot 285 is reserved */ | ||
/* 286 */ | ||
EXTERN void Tcl_AppendObjToObj _ANSI_ARGS_((Tcl_Obj * objPtr, | ||
Tcl_Obj * appendObjPtr)); | ||
/* 287 */ | ||
EXTERN Tcl_Encoding Tcl_CreateEncoding _ANSI_ARGS_(( | ||
Tcl_EncodingType * typePtr)); | ||
/* 288 */ | ||
EXTERN void Tcl_CreateThreadExitHandler _ANSI_ARGS_(( | ||
Tcl_ExitProc * proc, ClientData clientData)); | ||
/* 289 */ | ||
EXTERN void Tcl_DeleteThreadExitHandler _ANSI_ARGS_(( | ||
Tcl_ExitProc * proc, ClientData clientData)); | ||
/* 290 */ | ||
EXTERN void Tcl_DiscardResult _ANSI_ARGS_(( | ||
Tcl_SavedResult * statePtr)); | ||
/* 291 */ | ||
EXTERN int Tcl_EvalEx _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * script, int numBytes, int flags)); | ||
/* 292 */ | ||
EXTERN int Tcl_EvalObjv _ANSI_ARGS_((Tcl_Interp * interp, | ||
int objc, Tcl_Obj *CONST objv[], int flags)); | ||
/* 293 */ | ||
EXTERN int Tcl_EvalObjEx _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * objPtr, int flags)); | ||
/* 294 */ | ||
EXTERN void Tcl_ExitThread _ANSI_ARGS_((int status)); | ||
/* 295 */ | ||
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)); | ||
/* 296 */ | ||
EXTERN char * Tcl_ExternalToUtfDString _ANSI_ARGS_(( | ||
Tcl_Encoding encoding, CONST char * src, | ||
int srcLen, Tcl_DString * dsPtr)); | ||
/* 297 */ | ||
EXTERN void Tcl_FinalizeThread _ANSI_ARGS_((void)); | ||
/* 298 */ | ||
EXTERN void Tcl_FinalizeNotifier _ANSI_ARGS_(( | ||
ClientData clientData)); | ||
/* 299 */ | ||
EXTERN void Tcl_FreeEncoding _ANSI_ARGS_((Tcl_Encoding encoding)); | ||
/* 300 */ | ||
EXTERN Tcl_ThreadId Tcl_GetCurrentThread _ANSI_ARGS_((void)); | ||
/* 301 */ | ||
EXTERN Tcl_Encoding Tcl_GetEncoding _ANSI_ARGS_((Tcl_Interp * interp, | ||
CONST char * name)); | ||
/* 302 */ | ||
EXTERN char * Tcl_GetEncodingName _ANSI_ARGS_(( | ||
Tcl_Encoding encoding)); | ||
/* 303 */ | ||
EXTERN void Tcl_GetEncodingNames _ANSI_ARGS_(( | ||
Tcl_Interp * interp)); | ||
/* 304 */ | ||
EXTERN int Tcl_GetIndexFromObjStruct _ANSI_ARGS_(( | ||
Tcl_Interp * interp, Tcl_Obj * objPtr, | ||
char ** tablePtr, int offset, char * msg, | ||
int flags, int * indexPtr)); | ||
/* 305 */ | ||
EXTERN VOID * Tcl_GetThreadData _ANSI_ARGS_(( | ||
Tcl_ThreadDataKey * keyPtr, int size)); | ||
/* 306 */ | ||
EXTERN Tcl_Obj * Tcl_GetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, int flags)); | ||
/* 307 */ | ||
EXTERN ClientData Tcl_InitNotifier _ANSI_ARGS_((void)); | ||
/* 308 */ | ||
EXTERN void Tcl_MutexLock _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); | ||
/* 309 */ | ||
EXTERN void Tcl_MutexUnlock _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); | ||
/* 310 */ | ||
EXTERN void Tcl_ConditionNotify _ANSI_ARGS_(( | ||
Tcl_Condition * condPtr)); | ||
/* 311 */ | ||
EXTERN void Tcl_ConditionWait _ANSI_ARGS_(( | ||
Tcl_Condition * condPtr, | ||
Tcl_Mutex * mutexPtr, Tcl_Time * timePtr)); | ||
/* 312 */ | ||
EXTERN int Tcl_NumUtfChars _ANSI_ARGS_((CONST char * src, | ||
int len)); | ||
/* 313 */ | ||
EXTERN int Tcl_ReadChars _ANSI_ARGS_((Tcl_Channel channel, | ||
Tcl_Obj * objPtr, int charsToRead, | ||
int appendFlag)); | ||
/* 314 */ | ||
EXTERN void Tcl_RestoreResult _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_SavedResult * statePtr)); | ||
/* 315 */ | ||
EXTERN void Tcl_SaveResult _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_SavedResult * statePtr)); | ||
/* 316 */ | ||
EXTERN int Tcl_SetSystemEncoding _ANSI_ARGS_(( | ||
Tcl_Interp * interp, CONST char * name)); | ||
/* 317 */ | ||
EXTERN Tcl_Obj * Tcl_SetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * part1, char * part2, | ||
Tcl_Obj * newValuePtr, int flags)); | ||
/* 318 */ | ||
EXTERN void Tcl_ThreadAlert _ANSI_ARGS_((Tcl_ThreadId threadId)); | ||
/* 319 */ | ||
EXTERN void Tcl_ThreadQueueEvent _ANSI_ARGS_(( | ||
Tcl_ThreadId threadId, Tcl_Event* evPtr, | ||
Tcl_QueuePosition position)); | ||
/* 320 */ | ||
EXTERN Tcl_UniChar Tcl_UniCharAtIndex _ANSI_ARGS_((CONST char * src, | ||
int index)); | ||
/* 321 */ | ||
EXTERN Tcl_UniChar Tcl_UniCharToLower _ANSI_ARGS_((int ch)); | ||
/* 322 */ | ||
EXTERN Tcl_UniChar Tcl_UniCharToTitle _ANSI_ARGS_((int ch)); | ||
/* 323 */ | ||
EXTERN Tcl_UniChar Tcl_UniCharToUpper _ANSI_ARGS_((int ch)); | ||
/* 324 */ | ||
EXTERN int Tcl_UniCharToUtf _ANSI_ARGS_((int ch, char * buf)); | ||
/* 325 */ | ||
EXTERN char * Tcl_UtfAtIndex _ANSI_ARGS_((CONST char * src, | ||
int index)); | ||
/* 326 */ | ||
EXTERN int Tcl_UtfCharComplete _ANSI_ARGS_((CONST char * src, | ||
int len)); | ||
/* 327 */ | ||
EXTERN int Tcl_UtfBackslash _ANSI_ARGS_((CONST char * src, | ||
int * readPtr, char * dst)); | ||
/* 328 */ | ||
EXTERN char * Tcl_UtfFindFirst _ANSI_ARGS_((CONST char * src, | ||
int ch)); | ||
/* 329 */ | ||
EXTERN char * Tcl_UtfFindLast _ANSI_ARGS_((CONST char * src, | ||
int ch)); | ||
/* 330 */ | ||
EXTERN char * Tcl_UtfNext _ANSI_ARGS_((CONST char * src)); | ||
/* 331 */ | ||
EXTERN char * Tcl_UtfPrev _ANSI_ARGS_((CONST char * src, | ||
CONST char * start)); | ||
/* 332 */ | ||
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)); | ||
/* 333 */ | ||
EXTERN char * Tcl_UtfToExternalDString _ANSI_ARGS_(( | ||
Tcl_Encoding encoding, CONST char * src, | ||
int srcLen, Tcl_DString * dsPtr)); | ||
/* 334 */ | ||
EXTERN int Tcl_UtfToLower _ANSI_ARGS_((char * src)); | ||
/* 335 */ | ||
EXTERN int Tcl_UtfToTitle _ANSI_ARGS_((char * src)); | ||
/* 336 */ | ||
EXTERN int Tcl_UtfToUniChar _ANSI_ARGS_((CONST char * src, | ||
Tcl_UniChar * chPtr)); | ||
/* 337 */ | ||
EXTERN int Tcl_UtfToUpper _ANSI_ARGS_((char * src)); | ||
/* 338 */ | ||
EXTERN int Tcl_WriteChars _ANSI_ARGS_((Tcl_Channel chan, | ||
CONST char * src, int srcLen)); | ||
/* 339 */ | ||
EXTERN int Tcl_WriteObj _ANSI_ARGS_((Tcl_Channel chan, | ||
Tcl_Obj * objPtr)); | ||
/* 340 */ | ||
EXTERN char * Tcl_GetString _ANSI_ARGS_((Tcl_Obj * objPtr)); | ||
/* 341 */ | ||
EXTERN char * Tcl_GetDefaultEncodingDir _ANSI_ARGS_((void)); | ||
/* 342 */ | ||
EXTERN void Tcl_SetDefaultEncodingDir _ANSI_ARGS_((char * path)); | ||
/* 343 */ | ||
EXTERN void Tcl_AlertNotifier _ANSI_ARGS_((ClientData clientData)); | ||
/* 344 */ | ||
EXTERN void Tcl_ServiceModeHook _ANSI_ARGS_((int mode)); | ||
/* 345 */ | ||
EXTERN int Tcl_UniCharIsAlnum _ANSI_ARGS_((int ch)); | ||
/* 346 */ | ||
EXTERN int Tcl_UniCharIsAlpha _ANSI_ARGS_((int ch)); | ||
/* 347 */ | ||
EXTERN int Tcl_UniCharIsDigit _ANSI_ARGS_((int ch)); | ||
/* 348 */ | ||
EXTERN int Tcl_UniCharIsLower _ANSI_ARGS_((int ch)); | ||
/* 349 */ | ||
EXTERN int Tcl_UniCharIsSpace _ANSI_ARGS_((int ch)); | ||
/* 350 */ | ||
EXTERN int Tcl_UniCharIsUpper _ANSI_ARGS_((int ch)); | ||
/* 351 */ | ||
EXTERN int Tcl_UniCharIsWordChar _ANSI_ARGS_((int ch)); | ||
/* 352 */ | ||
EXTERN int Tcl_UniCharLen _ANSI_ARGS_((Tcl_UniChar * str)); | ||
/* 353 */ | ||
EXTERN int Tcl_UniCharNcmp _ANSI_ARGS_((CONST Tcl_UniChar * cs, | ||
CONST Tcl_UniChar * ct, unsigned long n)); | ||
/* 354 */ | ||
EXTERN char * Tcl_UniCharToUtfDString _ANSI_ARGS_(( | ||
CONST Tcl_UniChar * string, int numChars, | ||
Tcl_DString * dsPtr)); | ||
/* 355 */ | ||
EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString _ANSI_ARGS_(( | ||
CONST char * string, int length, | ||
Tcl_DString * dsPtr)); | ||
/* 356 */ | ||
EXTERN Tcl_RegExp Tcl_GetRegExpFromObj _ANSI_ARGS_(( | ||
Tcl_Interp * interp, Tcl_Obj * patObj, | ||
int flags)); | ||
/* 357 */ | ||
EXTERN Tcl_Obj * Tcl_EvalTokens _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Token * tokenPtr, int count)); | ||
/* 358 */ | ||
EXTERN void Tcl_FreeParse _ANSI_ARGS_((Tcl_Parse * parsePtr)); | ||
/* 359 */ | ||
EXTERN void Tcl_LogCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * script, char * command, int length)); | ||
/* 360 */ | ||
EXTERN int Tcl_ParseBraces _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * string, int numBytes, | ||
Tcl_Parse * parsePtr, int append, | ||
char ** termPtr)); | ||
/* 361 */ | ||
EXTERN int Tcl_ParseCommand _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * string, int numBytes, int nested, | ||
Tcl_Parse * parsePtr)); | ||
/* 362 */ | ||
EXTERN int Tcl_ParseExpr _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * string, int numBytes, | ||
Tcl_Parse * parsePtr)); | ||
/* 363 */ | ||
EXTERN int Tcl_ParseQuotedString _ANSI_ARGS_(( | ||
Tcl_Interp * interp, char * string, | ||
int numBytes, Tcl_Parse * parsePtr, | ||
int append, char ** termPtr)); | ||
/* 364 */ | ||
EXTERN int Tcl_ParseVarName _ANSI_ARGS_((Tcl_Interp * interp, | ||
char * string, int numBytes, | ||
Tcl_Parse * parsePtr, int append)); | ||
/* 365 */ | ||
EXTERN char * Tcl_GetCwd _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_DString * cwdPtr)); | ||
/* 366 */ | ||
EXTERN int Tcl_Chdir _ANSI_ARGS_((CONST char * dirName)); | ||
/* 367 */ | ||
EXTERN int Tcl_Access _ANSI_ARGS_((CONST char * path, int mode)); | ||
/* 368 */ | ||
EXTERN int Tcl_Stat _ANSI_ARGS_((CONST char * path, | ||
struct stat * bufPtr)); | ||
/* 369 */ | ||
EXTERN int Tcl_UtfNcmp _ANSI_ARGS_((CONST char * s1, | ||
CONST char * s2, unsigned long n)); | ||
/* 370 */ | ||
EXTERN int Tcl_UtfNcasecmp _ANSI_ARGS_((CONST char * s1, | ||
CONST char * s2, unsigned long n)); | ||
/* 371 */ | ||
EXTERN int Tcl_StringCaseMatch _ANSI_ARGS_((CONST char * str, | ||
CONST char * pattern, int nocase)); | ||
/* 372 */ | ||
EXTERN int Tcl_UniCharIsControl _ANSI_ARGS_((int ch)); | ||
/* 373 */ | ||
EXTERN int Tcl_UniCharIsGraph _ANSI_ARGS_((int ch)); | ||
/* 374 */ | ||
EXTERN int Tcl_UniCharIsPrint _ANSI_ARGS_((int ch)); | ||
/* 375 */ | ||
EXTERN int Tcl_UniCharIsPunct _ANSI_ARGS_((int ch)); | ||
/* 376 */ | ||
EXTERN int Tcl_RegExpExecObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_RegExp regexp, Tcl_Obj * objPtr, | ||
int offset, int nmatches, int flags)); | ||
/* 377 */ | ||
EXTERN void Tcl_RegExpGetInfo _ANSI_ARGS_((Tcl_RegExp regexp, | ||
Tcl_RegExpInfo * infoPtr)); | ||
/* 378 */ | ||
EXTERN Tcl_Obj * Tcl_NewUnicodeObj _ANSI_ARGS_((Tcl_UniChar * unicode, | ||
int numChars)); | ||
/* 379 */ | ||
EXTERN void Tcl_SetUnicodeObj _ANSI_ARGS_((Tcl_Obj * objPtr, | ||
Tcl_UniChar * unicode, int numChars)); | ||
/* 380 */ | ||
EXTERN int Tcl_GetCharLength _ANSI_ARGS_((Tcl_Obj * objPtr)); | ||
/* 381 */ | ||
EXTERN Tcl_UniChar Tcl_GetUniChar _ANSI_ARGS_((Tcl_Obj * objPtr, | ||
int index)); | ||
/* 382 */ | ||
EXTERN Tcl_UniChar * Tcl_GetUnicode _ANSI_ARGS_((Tcl_Obj * objPtr)); | ||
/* 383 */ | ||
EXTERN Tcl_Obj * Tcl_GetRange _ANSI_ARGS_((Tcl_Obj * objPtr, | ||
int first, int last)); | ||
/* 384 */ | ||
EXTERN void Tcl_AppendUnicodeToObj _ANSI_ARGS_((Tcl_Obj * objPtr, | ||
Tcl_UniChar * unicode, int length)); | ||
/* 385 */ | ||
EXTERN int Tcl_RegExpMatchObj _ANSI_ARGS_((Tcl_Interp * interp, | ||
Tcl_Obj * stringObj, Tcl_Obj * patternObj)); | ||
/* 386 */ | ||
EXTERN void Tcl_SetNotifier _ANSI_ARGS_(( | ||
Tcl_NotifierProcs * notifierProcPtr)); | ||
/* 387 */ | ||
EXTERN Tcl_Mutex * Tcl_GetAllocMutex _ANSI_ARGS_((void)); | ||
/* 388 */ | ||
EXTERN int Tcl_GetChannelNames _ANSI_ARGS_((Tcl_Interp * interp)); | ||
/* 389 */ | ||
EXTERN int Tcl_GetChannelNamesEx _ANSI_ARGS_(( | ||
Tcl_Interp * interp, char * pattern)); | ||
/* 390 */ | ||
EXTERN int Tcl_ProcObjCmd _ANSI_ARGS_((ClientData clientData, | ||
Tcl_Interp * interp, int objc, | ||
Tcl_Obj *CONST objv[])); | ||
/* 391 */ | ||
EXTERN void Tcl_ConditionFinalize _ANSI_ARGS_(( | ||
Tcl_Condition * condPtr)); | ||
/* 392 */ | ||
EXTERN void Tcl_MutexFinalize _ANSI_ARGS_((Tcl_Mutex * mutex)); | ||
/* 393 */ | ||
EXTERN int Tcl_CreateThread _ANSI_ARGS_((Tcl_ThreadId * idPtr, | ||
Tcl_ThreadCreateProc proc, | ||
ClientData clientData, int stackSize, | ||
int flags)); | ||
typedef struct TclStubHooks { | ||
struct TclPlatStubs *tclPlatStubs; | ||
struct TclIntStubs *tclIntStubs; | ||
struct TclIntPlatStubs *tclIntPlatStubs; | ||
} TclStubHooks; | ||
typedef struct TclStubs { | ||
int magic; | ||
struct TclStubHooks *hooks; | ||
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 (*tcl_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 * str, 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 * str, 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 * str, 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 */ | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr)); /* 111 */ | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr)); /* 111 */ | ||
#endif /* __WIN32__ */ | ||
#ifdef MAC_TCL | ||
void *reserved111; | ||
#endif /* MAC_TCL */ | ||
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 * str, 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 * str, 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 * str, 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 * str, 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 * str, int forWriting, 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 */ | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 197 */ | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 197 */ | ||
#endif /* __WIN32__ */ | ||
#ifdef MAC_TCL | ||
void *reserved197; | ||
#endif /* MAC_TCL */ | ||
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 */ | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void)); /* 207 */ | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void)); /* 207 */ | ||
#endif /* __WIN32__ */ | ||
#ifdef MAC_TCL | ||
void *reserved207; | ||
#endif /* MAC_TCL */ | ||
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 * str, CONST char * start)); /* 213 */ | ||
int (*tcl_RegExpMatch) _ANSI_ARGS_((Tcl_Interp * interp, char * str, 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 * str, int * flagPtr)); /* 218 */ | ||
int (*tcl_ScanCountedElement) _ANSI_ARGS_((CONST char * str, 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 * str, 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_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 * listStr, 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 * str, 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 * str, 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 */ | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
void (*tcl_PanicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 278 */ | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
void (*tcl_PanicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 278 */ | ||
#endif /* __WIN32__ */ | ||
#ifdef MAC_TCL | ||
void *reserved278; | ||
#endif /* MAC_TCL */ | ||
void (*tcl_GetVersion) _ANSI_ARGS_((int * major, int * minor, int * patchLevel, int * type)); /* 279 */ | ||
void (*tcl_InitMemory) _ANSI_ARGS_((Tcl_Interp * interp)); /* 280 */ | ||
Tcl_Channel (*tcl_StackChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_ChannelType * typePtr, ClientData instanceData, int mask, Tcl_Channel prevChan)); /* 281 */ | ||
void (*tcl_UnstackChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 282 */ | ||
Tcl_Channel (*tcl_GetStackedChannel) _ANSI_ARGS_((Tcl_Channel chan)); /* 283 */ | ||
void *reserved284; | ||
void *reserved285; | ||
void (*tcl_AppendObjToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_Obj * appendObjPtr)); /* 286 */ | ||
Tcl_Encoding (*tcl_CreateEncoding) _ANSI_ARGS_((Tcl_EncodingType * typePtr)); /* 287 */ | ||
void (*tcl_CreateThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 288 */ | ||
void (*tcl_DeleteThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 289 */ | ||
void (*tcl_DiscardResult) _ANSI_ARGS_((Tcl_SavedResult * statePtr)); /* 290 */ | ||
int (*tcl_EvalEx) _ANSI_ARGS_((Tcl_Interp * interp, char * script, int numBytes, int flags)); /* 291 */ | ||
int (*tcl_EvalObjv) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 292 */ | ||
int (*tcl_EvalObjEx) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int flags)); /* 293 */ | ||
void (*tcl_ExitThread) _ANSI_ARGS_((int status)); /* 294 */ | ||
int (*tcl_ExternalToUtf) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Encoding encoding, CONST char * src, int srcLen, int flags, Tcl_EncodingState * statePtr, char * dst, int dstLen, int * srcReadPtr, int * dstWrotePtr, int * dstCharsPtr)); /* 295 */ | ||
char * (*tcl_ExternalToUtfDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 296 */ | ||
void (*tcl_FinalizeThread) _ANSI_ARGS_((void)); /* 297 */ | ||
void (*tcl_FinalizeNotifier) _ANSI_ARGS_((ClientData clientData)); /* 298 */ | ||
void (*tcl_FreeEncoding) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 299 */ | ||
Tcl_ThreadId (*tcl_GetCurrentThread) _ANSI_ARGS_((void)); /* 300 */ | ||
Tcl_Encoding (*tcl_GetEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 301 */ | ||
char * (*tcl_GetEncodingName) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 302 */ | ||
void (*tcl_GetEncodingNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 303 */ | ||
int (*tcl_GetIndexFromObjStruct) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, int offset, char * msg, int flags, int * indexPtr)); /* 304 */ | ||
VOID * (*tcl_GetThreadData) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr, int size)); /* 305 */ | ||
Tcl_Obj * (*tcl_GetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 306 */ | ||
ClientData (*tcl_InitNotifier) _ANSI_ARGS_((void)); /* 307 */ | ||
void (*tcl_MutexLock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 308 */ | ||
void (*tcl_MutexUnlock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); /* 309 */ | ||
void (*tcl_ConditionNotify) _ANSI_ARGS_((Tcl_Condition * condPtr)); /* 310 */ | ||
void (*tcl_ConditionWait) _ANSI_ARGS_((Tcl_Condition * condPtr, Tcl_Mutex * mutexPtr, Tcl_Time * timePtr)); /* 311 */ | ||
int (*tcl_NumUtfChars) _ANSI_ARGS_((CONST char * src, int len)); /* 312 */ | ||
int (*tcl_ReadChars) _ANSI_ARGS_((Tcl_Channel channel, Tcl_Obj * objPtr, int charsToRead, int appendFlag)); /* 313 */ | ||
void (*tcl_RestoreResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 314 */ | ||
void (*tcl_SaveResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr)); /* 315 */ | ||
int (*tcl_SetSystemEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 316 */ | ||
Tcl_Obj * (*tcl_SetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, Tcl_Obj * newValuePtr, int flags)); /* 317 */ | ||
void (*tcl_ThreadAlert) _ANSI_ARGS_((Tcl_ThreadId threadId)); /* 318 */ | ||
void (*tcl_ThreadQueueEvent) _ANSI_ARGS_((Tcl_ThreadId threadId, Tcl_Event* evPtr, Tcl_QueuePosition position)); /* 319 */ | ||
Tcl_UniChar (*tcl_UniCharAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 320 */ | ||
Tcl_UniChar (*tcl_UniCharToLower) _ANSI_ARGS_((int ch)); /* 321 */ | ||
Tcl_UniChar (*tcl_UniCharToTitle) _ANSI_ARGS_((int ch)); /* 322 */ | ||
Tcl_UniChar (*tcl_UniCharToUpper) _ANSI_ARGS_((int ch)); /* 323 */ | ||
int (*tcl_UniCharToUtf) _ANSI_ARGS_((int ch, char * buf)); /* 324 */ | ||
char * (*tcl_UtfAtIndex) _ANSI_ARGS_((CONST char * src, int index)); /* 325 */ | ||
int (*tcl_UtfCharComplete) _ANSI_ARGS_((CONST char * src, int len)); /* 326 */ | ||
int (*tcl_UtfBackslash) _ANSI_ARGS_((CONST char * src, int * readPtr, char * dst)); /* 327 */ | ||
char * (*tcl_UtfFindFirst) _ANSI_ARGS_((CONST char * src, int ch)); /* 328 */ | ||
char * (*tcl_UtfFindLast) _ANSI_ARGS_((CONST char * src, int ch)); /* 329 */ | ||
char * (*tcl_UtfNext) _ANSI_ARGS_((CONST char * src)); /* 330 */ | ||
char * (*tcl_UtfPrev) _ANSI_ARGS_((CONST char * src, CONST char * start)); /* 331 */ | ||
int (*tcl_UtfToExternal) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Encoding encoding, CONST char * src, int srcLen, int flags, Tcl_EncodingState * statePtr, char * dst, int dstLen, int * srcReadPtr, int * dstWrotePtr, int * dstCharsPtr)); /* 332 */ | ||
char * (*tcl_UtfToExternalDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr)); /* 333 */ | ||
int (*tcl_UtfToLower) _ANSI_ARGS_((char * src)); /* 334 */ | ||
int (*tcl_UtfToTitle) _ANSI_ARGS_((char * src)); /* 335 */ | ||
int (*tcl_UtfToUniChar) _ANSI_ARGS_((CONST char * src, Tcl_UniChar * chPtr)); /* 336 */ | ||
int (*tcl_UtfToUpper) _ANSI_ARGS_((char * src)); /* 337 */ | ||
int (*tcl_WriteChars) _ANSI_ARGS_((Tcl_Channel chan, CONST char * src, int srcLen)); /* 338 */ | ||
int (*tcl_WriteObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); /* 339 */ | ||
char * (*tcl_GetString) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 340 */ | ||
char * (*tcl_GetDefaultEncodingDir) _ANSI_ARGS_((void)); /* 341 */ | ||
void (*tcl_SetDefaultEncodingDir) _ANSI_ARGS_((char * path)); /* 342 */ | ||
void (*tcl_AlertNotifier) _ANSI_ARGS_((ClientData clientData)); /* 343 */ | ||
void (*tcl_ServiceModeHook) _ANSI_ARGS_((int mode)); /* 344 */ | ||
int (*tcl_UniCharIsAlnum) _ANSI_ARGS_((int ch)); /* 345 */ | ||
int (*tcl_UniCharIsAlpha) _ANSI_ARGS_((int ch)); /* 346 */ | ||
int (*tcl_UniCharIsDigit) _ANSI_ARGS_((int ch)); /* 347 */ | ||
int (*tcl_UniCharIsLower) _ANSI_ARGS_((int ch)); /* 348 */ | ||
int (*tcl_UniCharIsSpace) _ANSI_ARGS_((int ch)); /* 349 */ | ||
int (*tcl_UniCharIsUpper) _ANSI_ARGS_((int ch)); /* 350 */ | ||
int (*tcl_UniCharIsWordChar) _ANSI_ARGS_((int ch)); /* 351 */ | ||
int (*tcl_UniCharLen) _ANSI_ARGS_((Tcl_UniChar * str)); /* 352 */ | ||
int (*tcl_UniCharNcmp) _ANSI_ARGS_((CONST Tcl_UniChar * cs, CONST Tcl_UniChar * ct, unsigned long n)); /* 353 */ | ||
char * (*tcl_UniCharToUtfDString) _ANSI_ARGS_((CONST Tcl_UniChar * string, int numChars, Tcl_DString * dsPtr)); /* 354 */ | ||
Tcl_UniChar * (*tcl_UtfToUniCharDString) _ANSI_ARGS_((CONST char * string, int length, Tcl_DString * dsPtr)); /* 355 */ | ||
Tcl_RegExp (*tcl_GetRegExpFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * patObj, int flags)); /* 356 */ | ||
Tcl_Obj * (*tcl_EvalTokens) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Token * tokenPtr, int count)); /* 357 */ | ||
void (*tcl_FreeParse) _ANSI_ARGS_((Tcl_Parse * parsePtr)); /* 358 */ | ||
void (*tcl_LogCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * script, char * command, int length)); /* 359 */ | ||
int (*tcl_ParseBraces) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr, int append, char ** termPtr)); /* 360 */ | ||
int (*tcl_ParseCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, int nested, Tcl_Parse * parsePtr)); /* 361 */ | ||
int (*tcl_ParseExpr) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr)); /* 362 */ | ||
int (*tcl_ParseQuotedString) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr, int append, char ** termPtr)); /* 363 */ | ||
int (*tcl_ParseVarName) _ANSI_ARGS_((Tcl_Interp * interp, char * string, int numBytes, Tcl_Parse * parsePtr, int append)); /* 364 */ | ||
char * (*tcl_GetCwd) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * cwdPtr)); /* 365 */ | ||
int (*tcl_Chdir) _ANSI_ARGS_((CONST char * dirName)); /* 366 */ | ||
int (*tcl_Access) _ANSI_ARGS_((CONST char * path, int mode)); /* 367 */ | ||
int (*tcl_Stat) _ANSI_ARGS_((CONST char * path, struct stat * bufPtr)); /* 368 */ | ||
int (*tcl_UtfNcmp) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n)); /* 369 */ | ||
int (*tcl_UtfNcasecmp) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n)); /* 370 */ | ||
int (*tcl_StringCaseMatch) _ANSI_ARGS_((CONST char * str, CONST char * pattern, int nocase)); /* 371 */ | ||
int (*tcl_UniCharIsControl) _ANSI_ARGS_((int ch)); /* 372 */ | ||
int (*tcl_UniCharIsGraph) _ANSI_ARGS_((int ch)); /* 373 */ | ||
int (*tcl_UniCharIsPrint) _ANSI_ARGS_((int ch)); /* 374 */ | ||
int (*tcl_UniCharIsPunct) _ANSI_ARGS_((int ch)); /* 375 */ | ||
int (*tcl_RegExpExecObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp regexp, Tcl_Obj * objPtr, int offset, int nmatches, int flags)); /* 376 */ | ||
void (*tcl_RegExpGetInfo) _ANSI_ARGS_((Tcl_RegExp regexp, Tcl_RegExpInfo * infoPtr)); /* 377 */ | ||
Tcl_Obj * (*tcl_NewUnicodeObj) _ANSI_ARGS_((Tcl_UniChar * unicode, int numChars)); /* 378 */ | ||
void (*tcl_SetUnicodeObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_UniChar * unicode, int numChars)); /* 379 */ | ||
int (*tcl_GetCharLength) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 380 */ | ||
Tcl_UniChar (*tcl_GetUniChar) _ANSI_ARGS_((Tcl_Obj * objPtr, int index)); /* 381 */ | ||
Tcl_UniChar * (*tcl_GetUnicode) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 382 */ | ||
Tcl_Obj * (*tcl_GetRange) _ANSI_ARGS_((Tcl_Obj * objPtr, int first, int last)); /* 383 */ | ||
void (*tcl_AppendUnicodeToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_UniChar * unicode, int length)); /* 384 */ | ||
int (*tcl_RegExpMatchObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * stringObj, Tcl_Obj * patternObj)); /* 385 */ | ||
void (*tcl_SetNotifier) _ANSI_ARGS_((Tcl_NotifierProcs * notifierProcPtr)); /* 386 */ | ||
Tcl_Mutex * (*tcl_GetAllocMutex) _ANSI_ARGS_((void)); /* 387 */ | ||
int (*tcl_GetChannelNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 388 */ | ||
int (*tcl_GetChannelNamesEx) _ANSI_ARGS_((Tcl_Interp * interp, char * pattern)); /* 389 */ | ||
int (*tcl_ProcObjCmd) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 390 */ | ||
void (*tcl_ConditionFinalize) _ANSI_ARGS_((Tcl_Condition * condPtr)); /* 391 */ | ||
void (*tcl_MutexFinalize) _ANSI_ARGS_((Tcl_Mutex * mutex)); /* 392 */ | ||
int (*tcl_CreateThread) _ANSI_ARGS_((Tcl_ThreadId * idPtr, Tcl_ThreadCreateProc proc, ClientData clientData, int stackSize, int flags)); /* 393 */ | ||
} TclStubs; | ||
#ifdef __cplusplus | ||
extern "C" { | ||
#endif | ||
extern TclStubs *tclStubsPtr; | ||
#ifdef __cplusplus | ||
} | ||
#endif | ||
#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) | ||
/* | ||
* Inline function declarations: | ||
*/ | ||
#ifndef Tcl_PkgProvideEx | ||
#define Tcl_PkgProvideEx \ | ||
(tclStubsPtr->tcl_PkgProvideEx) /* 0 */ | ||
#endif | ||
#ifndef Tcl_PkgRequireEx | ||
#define Tcl_PkgRequireEx \ | ||
(tclStubsPtr->tcl_PkgRequireEx) /* 1 */ | ||
#endif | ||
#ifndef Tcl_Panic | ||
#define Tcl_Panic \ | ||
(tclStubsPtr->tcl_Panic) /* 2 */ | ||
#endif | ||
#ifndef Tcl_Alloc | ||
#define Tcl_Alloc \ | ||
(tclStubsPtr->tcl_Alloc) /* 3 */ | ||
#endif | ||
#ifndef Tcl_Free | ||
#define Tcl_Free \ | ||
(tclStubsPtr->tcl_Free) /* 4 */ | ||
#endif | ||
#ifndef Tcl_Realloc | ||
#define Tcl_Realloc \ | ||
(tclStubsPtr->tcl_Realloc) /* 5 */ | ||
#endif | ||
#ifndef Tcl_DbCkalloc | ||
#define Tcl_DbCkalloc \ | ||
(tclStubsPtr->tcl_DbCkalloc) /* 6 */ | ||
#endif | ||
#ifndef Tcl_DbCkfree | ||
#define Tcl_DbCkfree \ | ||
(tclStubsPtr->tcl_DbCkfree) /* 7 */ | ||
#endif | ||
#ifndef Tcl_DbCkrealloc | ||
#define Tcl_DbCkrealloc \ | ||
(tclStubsPtr->tcl_DbCkrealloc) /* 8 */ | ||
#endif | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
#ifndef Tcl_CreateFileHandler | ||
#define Tcl_CreateFileHandler \ | ||
(tclStubsPtr->tcl_CreateFileHandler) /* 9 */ | ||
#endif | ||
#endif /* UNIX */ | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
#ifndef Tcl_DeleteFileHandler | ||
#define Tcl_DeleteFileHandler \ | ||
(tclStubsPtr->tcl_DeleteFileHandler) /* 10 */ | ||
#endif | ||
#endif /* UNIX */ | ||
#ifndef Tcl_SetTimer | ||
#define Tcl_SetTimer \ | ||
(tclStubsPtr->tcl_SetTimer) /* 11 */ | ||
#endif | ||
#ifndef Tcl_Sleep | ||
#define Tcl_Sleep \ | ||
(tclStubsPtr->tcl_Sleep) /* 12 */ | ||
#endif | ||
#ifndef Tcl_WaitForEvent | ||
#define Tcl_WaitForEvent \ | ||
(tclStubsPtr->tcl_WaitForEvent) /* 13 */ | ||
#endif | ||
#ifndef Tcl_AppendAllObjTypes | ||
#define Tcl_AppendAllObjTypes \ | ||
(tclStubsPtr->tcl_AppendAllObjTypes) /* 14 */ | ||
#endif | ||
#ifndef Tcl_AppendStringsToObj | ||
#define Tcl_AppendStringsToObj \ | ||
(tclStubsPtr->tcl_AppendStringsToObj) /* 15 */ | ||
#endif | ||
#ifndef Tcl_AppendToObj | ||
#define Tcl_AppendToObj \ | ||
(tclStubsPtr->tcl_AppendToObj) /* 16 */ | ||
#endif | ||
#ifndef Tcl_ConcatObj | ||
#define Tcl_ConcatObj \ | ||
(tclStubsPtr->tcl_ConcatObj) /* 17 */ | ||
#endif | ||
#ifndef Tcl_ConvertToType | ||
#define Tcl_ConvertToType \ | ||
(tclStubsPtr->tcl_ConvertToType) /* 18 */ | ||
#endif | ||
#ifndef Tcl_DbDecrRefCount | ||
#define Tcl_DbDecrRefCount \ | ||
(tclStubsPtr->tcl_DbDecrRefCount) /* 19 */ | ||
#endif | ||
#ifndef Tcl_DbIncrRefCount | ||
#define Tcl_DbIncrRefCount \ | ||
(tclStubsPtr->tcl_DbIncrRefCount) /* 20 */ | ||
#endif | ||
#ifndef Tcl_DbIsShared | ||
#define Tcl_DbIsShared \ | ||
(tclStubsPtr->tcl_DbIsShared) /* 21 */ | ||
#endif | ||
#ifndef Tcl_DbNewBooleanObj | ||
#define Tcl_DbNewBooleanObj \ | ||
(tclStubsPtr->tcl_DbNewBooleanObj) /* 22 */ | ||
#endif | ||
#ifndef Tcl_DbNewByteArrayObj | ||
#define Tcl_DbNewByteArrayObj \ | ||
(tclStubsPtr->tcl_DbNewByteArrayObj) /* 23 */ | ||
#endif | ||
#ifndef Tcl_DbNewDoubleObj | ||
#define Tcl_DbNewDoubleObj \ | ||
(tclStubsPtr->tcl_DbNewDoubleObj) /* 24 */ | ||
#endif | ||
#ifndef Tcl_DbNewListObj | ||
#define Tcl_DbNewListObj \ | ||
(tclStubsPtr->tcl_DbNewListObj) /* 25 */ | ||
#endif | ||
#ifndef Tcl_DbNewLongObj | ||
#define Tcl_DbNewLongObj \ | ||
(tclStubsPtr->tcl_DbNewLongObj) /* 26 */ | ||
#endif | ||
#ifndef Tcl_DbNewObj | ||
#define Tcl_DbNewObj \ | ||
(tclStubsPtr->tcl_DbNewObj) /* 27 */ | ||
#endif | ||
#ifndef Tcl_DbNewStringObj | ||
#define Tcl_DbNewStringObj \ | ||
(tclStubsPtr->tcl_DbNewStringObj) /* 28 */ | ||
#endif | ||
#ifndef Tcl_DuplicateObj | ||
#define Tcl_DuplicateObj \ | ||
(tclStubsPtr->tcl_DuplicateObj) /* 29 */ | ||
#endif | ||
#ifndef TclFreeObj | ||
#define TclFreeObj \ | ||
(tclStubsPtr->tclFreeObj) /* 30 */ | ||
#endif | ||
#ifndef Tcl_GetBoolean | ||
#define Tcl_GetBoolean \ | ||
(tclStubsPtr->tcl_GetBoolean) /* 31 */ | ||
#endif | ||
#ifndef Tcl_GetBooleanFromObj | ||
#define Tcl_GetBooleanFromObj \ | ||
(tclStubsPtr->tcl_GetBooleanFromObj) /* 32 */ | ||
#endif | ||
#ifndef Tcl_GetByteArrayFromObj | ||
#define Tcl_GetByteArrayFromObj \ | ||
(tclStubsPtr->tcl_GetByteArrayFromObj) /* 33 */ | ||
#endif | ||
#ifndef Tcl_GetDouble | ||
#define Tcl_GetDouble \ | ||
(tclStubsPtr->tcl_GetDouble) /* 34 */ | ||
#endif | ||
#ifndef Tcl_GetDoubleFromObj | ||
#define Tcl_GetDoubleFromObj \ | ||
(tclStubsPtr->tcl_GetDoubleFromObj) /* 35 */ | ||
#endif | ||
#ifndef Tcl_GetIndexFromObj | ||
#define Tcl_GetIndexFromObj \ | ||
(tclStubsPtr->tcl_GetIndexFromObj) /* 36 */ | ||
#endif | ||
#ifndef Tcl_GetInt | ||
#define Tcl_GetInt \ | ||
(tclStubsPtr->tcl_GetInt) /* 37 */ | ||
#endif | ||
#ifndef Tcl_GetIntFromObj | ||
#define Tcl_GetIntFromObj \ | ||
(tclStubsPtr->tcl_GetIntFromObj) /* 38 */ | ||
#endif | ||
#ifndef Tcl_GetLongFromObj | ||
#define Tcl_GetLongFromObj \ | ||
(tclStubsPtr->tcl_GetLongFromObj) /* 39 */ | ||
#endif | ||
#ifndef Tcl_GetObjType | ||
#define Tcl_GetObjType \ | ||
(tclStubsPtr->tcl_GetObjType) /* 40 */ | ||
#endif | ||
#ifndef Tcl_GetStringFromObj | ||
#define Tcl_GetStringFromObj \ | ||
(tclStubsPtr->tcl_GetStringFromObj) /* 41 */ | ||
#endif | ||
#ifndef Tcl_InvalidateStringRep | ||
#define Tcl_InvalidateStringRep \ | ||
(tclStubsPtr->tcl_InvalidateStringRep) /* 42 */ | ||
#endif | ||
#ifndef Tcl_ListObjAppendList | ||
#define Tcl_ListObjAppendList \ | ||
(tclStubsPtr->tcl_ListObjAppendList) /* 43 */ | ||
#endif | ||
#ifndef Tcl_ListObjAppendElement | ||
#define Tcl_ListObjAppendElement \ | ||
(tclStubsPtr->tcl_ListObjAppendElement) /* 44 */ | ||
#endif | ||
#ifndef Tcl_ListObjGetElements | ||
#define Tcl_ListObjGetElements \ | ||
(tclStubsPtr->tcl_ListObjGetElements) /* 45 */ | ||
#endif | ||
#ifndef Tcl_ListObjIndex | ||
#define Tcl_ListObjIndex \ | ||
(tclStubsPtr->tcl_ListObjIndex) /* 46 */ | ||
#endif | ||
#ifndef Tcl_ListObjLength | ||
#define Tcl_ListObjLength \ | ||
(tclStubsPtr->tcl_ListObjLength) /* 47 */ | ||
#endif | ||
#ifndef Tcl_ListObjReplace | ||
#define Tcl_ListObjReplace \ | ||
(tclStubsPtr->tcl_ListObjReplace) /* 48 */ | ||
#endif | ||
#ifndef Tcl_NewBooleanObj | ||
#define Tcl_NewBooleanObj \ | ||
(tclStubsPtr->tcl_NewBooleanObj) /* 49 */ | ||
#endif | ||
#ifndef Tcl_NewByteArrayObj | ||
#define Tcl_NewByteArrayObj \ | ||
(tclStubsPtr->tcl_NewByteArrayObj) /* 50 */ | ||
#endif | ||
#ifndef Tcl_NewDoubleObj | ||
#define Tcl_NewDoubleObj \ | ||
(tclStubsPtr->tcl_NewDoubleObj) /* 51 */ | ||
#endif | ||
#ifndef Tcl_NewIntObj | ||
#define Tcl_NewIntObj \ | ||
(tclStubsPtr->tcl_NewIntObj) /* 52 */ | ||
#endif | ||
#ifndef Tcl_NewListObj | ||
#define Tcl_NewListObj \ | ||
(tclStubsPtr->tcl_NewListObj) /* 53 */ | ||
#endif | ||
#ifndef Tcl_NewLongObj | ||
#define Tcl_NewLongObj \ | ||
(tclStubsPtr->tcl_NewLongObj) /* 54 */ | ||
#endif | ||
#ifndef Tcl_NewObj | ||
#define Tcl_NewObj \ | ||
(tclStubsPtr->tcl_NewObj) /* 55 */ | ||
#endif | ||
#ifndef Tcl_NewStringObj | ||
#define Tcl_NewStringObj \ | ||
(tclStubsPtr->tcl_NewStringObj) /* 56 */ | ||
#endif | ||
#ifndef Tcl_SetBooleanObj | ||
#define Tcl_SetBooleanObj \ | ||
(tclStubsPtr->tcl_SetBooleanObj) /* 57 */ | ||
#endif | ||
#ifndef Tcl_SetByteArrayLength | ||
#define Tcl_SetByteArrayLength \ | ||
(tclStubsPtr->tcl_SetByteArrayLength) /* 58 */ | ||
#endif | ||
#ifndef Tcl_SetByteArrayObj | ||
#define Tcl_SetByteArrayObj \ | ||
(tclStubsPtr->tcl_SetByteArrayObj) /* 59 */ | ||
#endif | ||
#ifndef Tcl_SetDoubleObj | ||
#define Tcl_SetDoubleObj \ | ||
(tclStubsPtr->tcl_SetDoubleObj) /* 60 */ | ||
#endif | ||
#ifndef Tcl_SetIntObj | ||
#define Tcl_SetIntObj \ | ||
(tclStubsPtr->tcl_SetIntObj) /* 61 */ | ||
#endif | ||
#ifndef Tcl_SetListObj | ||
#define Tcl_SetListObj \ | ||
(tclStubsPtr->tcl_SetListObj) /* 62 */ | ||
#endif | ||
#ifndef Tcl_SetLongObj | ||
#define Tcl_SetLongObj \ | ||
(tclStubsPtr->tcl_SetLongObj) /* 63 */ | ||
#endif | ||
#ifndef Tcl_SetObjLength | ||
#define Tcl_SetObjLength \ | ||
(tclStubsPtr->tcl_SetObjLength) /* 64 */ | ||
#endif | ||
#ifndef Tcl_SetStringObj | ||
#define Tcl_SetStringObj \ | ||
(tclStubsPtr->tcl_SetStringObj) /* 65 */ | ||
#endif | ||
#ifndef Tcl_AddErrorInfo | ||
#define Tcl_AddErrorInfo \ | ||
(tclStubsPtr->tcl_AddErrorInfo) /* 66 */ | ||
#endif | ||
#ifndef Tcl_AddObjErrorInfo | ||
#define Tcl_AddObjErrorInfo \ | ||
(tclStubsPtr->tcl_AddObjErrorInfo) /* 67 */ | ||
#endif | ||
#ifndef Tcl_AllowExceptions | ||
#define Tcl_AllowExceptions \ | ||
(tclStubsPtr->tcl_AllowExceptions) /* 68 */ | ||
#endif | ||
#ifndef Tcl_AppendElement | ||
#define Tcl_AppendElement \ | ||
(tclStubsPtr->tcl_AppendElement) /* 69 */ | ||
#endif | ||
#ifndef Tcl_AppendResult | ||
#define Tcl_AppendResult \ | ||
(tclStubsPtr->tcl_AppendResult) /* 70 */ | ||
#endif | ||
#ifndef Tcl_AsyncCreate | ||
#define Tcl_AsyncCreate \ | ||
(tclStubsPtr->tcl_AsyncCreate) /* 71 */ | ||
#endif | ||
#ifndef Tcl_AsyncDelete | ||
#define Tcl_AsyncDelete \ | ||
(tclStubsPtr->tcl_AsyncDelete) /* 72 */ | ||
#endif | ||
#ifndef Tcl_AsyncInvoke | ||
#define Tcl_AsyncInvoke \ | ||
(tclStubsPtr->tcl_AsyncInvoke) /* 73 */ | ||
#endif | ||
#ifndef Tcl_AsyncMark | ||
#define Tcl_AsyncMark \ | ||
(tclStubsPtr->tcl_AsyncMark) /* 74 */ | ||
#endif | ||
#ifndef Tcl_AsyncReady | ||
#define Tcl_AsyncReady \ | ||
(tclStubsPtr->tcl_AsyncReady) /* 75 */ | ||
#endif | ||
#ifndef Tcl_BackgroundError | ||
#define Tcl_BackgroundError \ | ||
(tclStubsPtr->tcl_BackgroundError) /* 76 */ | ||
#endif | ||
#ifndef Tcl_Backslash | ||
#define Tcl_Backslash \ | ||
(tclStubsPtr->tcl_Backslash) /* 77 */ | ||
#endif | ||
#ifndef Tcl_BadChannelOption | ||
#define Tcl_BadChannelOption \ | ||
(tclStubsPtr->tcl_BadChannelOption) /* 78 */ | ||
#endif | ||
#ifndef Tcl_CallWhenDeleted | ||
#define Tcl_CallWhenDeleted \ | ||
(tclStubsPtr->tcl_CallWhenDeleted) /* 79 */ | ||
#endif | ||
#ifndef Tcl_CancelIdleCall | ||
#define Tcl_CancelIdleCall \ | ||
(tclStubsPtr->tcl_CancelIdleCall) /* 80 */ | ||
#endif | ||
#ifndef Tcl_Close | ||
#define Tcl_Close \ | ||
(tclStubsPtr->tcl_Close) /* 81 */ | ||
#endif | ||
#ifndef Tcl_CommandComplete | ||
#define Tcl_CommandComplete \ | ||
(tclStubsPtr->tcl_CommandComplete) /* 82 */ | ||
#endif | ||
#ifndef Tcl_Concat | ||
#define Tcl_Concat \ | ||
(tclStubsPtr->tcl_Concat) /* 83 */ | ||
#endif | ||
#ifndef Tcl_ConvertElement | ||
#define Tcl_ConvertElement \ | ||
(tclStubsPtr->tcl_ConvertElement) /* 84 */ | ||
#endif | ||
#ifndef Tcl_ConvertCountedElement | ||
#define Tcl_ConvertCountedElement \ | ||
(tclStubsPtr->tcl_ConvertCountedElement) /* 85 */ | ||
#endif | ||
#ifndef Tcl_CreateAlias | ||
#define Tcl_CreateAlias \ | ||
(tclStubsPtr->tcl_CreateAlias) /* 86 */ | ||
#endif | ||
#ifndef Tcl_CreateAliasObj | ||
#define Tcl_CreateAliasObj \ | ||
(tclStubsPtr->tcl_CreateAliasObj) /* 87 */ | ||
#endif | ||
#ifndef Tcl_CreateChannel | ||
#define Tcl_CreateChannel \ | ||
(tclStubsPtr->tcl_CreateChannel) /* 88 */ | ||
#endif | ||
#ifndef Tcl_CreateChannelHandler | ||
#define Tcl_CreateChannelHandler \ | ||
(tclStubsPtr->tcl_CreateChannelHandler) /* 89 */ | ||
#endif | ||
#ifndef Tcl_CreateCloseHandler | ||
#define Tcl_CreateCloseHandler \ | ||
(tclStubsPtr->tcl_CreateCloseHandler) /* 90 */ | ||
#endif | ||
#ifndef Tcl_CreateCommand | ||
#define Tcl_CreateCommand \ | ||
(tclStubsPtr->tcl_CreateCommand) /* 91 */ | ||
#endif | ||
#ifndef Tcl_CreateEventSource | ||
#define Tcl_CreateEventSource \ | ||
(tclStubsPtr->tcl_CreateEventSource) /* 92 */ | ||
#endif | ||
#ifndef Tcl_CreateExitHandler | ||
#define Tcl_CreateExitHandler \ | ||
(tclStubsPtr->tcl_CreateExitHandler) /* 93 */ | ||
#endif | ||
#ifndef Tcl_CreateInterp | ||
#define Tcl_CreateInterp \ | ||
(tclStubsPtr->tcl_CreateInterp) /* 94 */ | ||
#endif | ||
#ifndef Tcl_CreateMathFunc | ||
#define Tcl_CreateMathFunc \ | ||
(tclStubsPtr->tcl_CreateMathFunc) /* 95 */ | ||
#endif | ||
#ifndef Tcl_CreateObjCommand | ||
#define Tcl_CreateObjCommand \ | ||
(tclStubsPtr->tcl_CreateObjCommand) /* 96 */ | ||
#endif | ||
#ifndef Tcl_CreateSlave | ||
#define Tcl_CreateSlave \ | ||
(tclStubsPtr->tcl_CreateSlave) /* 97 */ | ||
#endif | ||
#ifndef Tcl_CreateTimerHandler | ||
#define Tcl_CreateTimerHandler \ | ||
(tclStubsPtr->tcl_CreateTimerHandler) /* 98 */ | ||
#endif | ||
#ifndef Tcl_CreateTrace | ||
#define Tcl_CreateTrace \ | ||
(tclStubsPtr->tcl_CreateTrace) /* 99 */ | ||
#endif | ||
#ifndef Tcl_DeleteAssocData | ||
#define Tcl_DeleteAssocData \ | ||
(tclStubsPtr->tcl_DeleteAssocData) /* 100 */ | ||
#endif | ||
#ifndef Tcl_DeleteChannelHandler | ||
#define Tcl_DeleteChannelHandler \ | ||
(tclStubsPtr->tcl_DeleteChannelHandler) /* 101 */ | ||
#endif | ||
#ifndef Tcl_DeleteCloseHandler | ||
#define Tcl_DeleteCloseHandler \ | ||
(tclStubsPtr->tcl_DeleteCloseHandler) /* 102 */ | ||
#endif | ||
#ifndef Tcl_DeleteCommand | ||
#define Tcl_DeleteCommand \ | ||
(tclStubsPtr->tcl_DeleteCommand) /* 103 */ | ||
#endif | ||
#ifndef Tcl_DeleteCommandFromToken | ||
#define Tcl_DeleteCommandFromToken \ | ||
(tclStubsPtr->tcl_DeleteCommandFromToken) /* 104 */ | ||
#endif | ||
#ifndef Tcl_DeleteEvents | ||
#define Tcl_DeleteEvents \ | ||
(tclStubsPtr->tcl_DeleteEvents) /* 105 */ | ||
#endif | ||
#ifndef Tcl_DeleteEventSource | ||
#define Tcl_DeleteEventSource \ | ||
(tclStubsPtr->tcl_DeleteEventSource) /* 106 */ | ||
#endif | ||
#ifndef Tcl_DeleteExitHandler | ||
#define Tcl_DeleteExitHandler \ | ||
(tclStubsPtr->tcl_DeleteExitHandler) /* 107 */ | ||
#endif | ||
#ifndef Tcl_DeleteHashEntry | ||
#define Tcl_DeleteHashEntry \ | ||
(tclStubsPtr->tcl_DeleteHashEntry) /* 108 */ | ||
#endif | ||
#ifndef Tcl_DeleteHashTable | ||
#define Tcl_DeleteHashTable \ | ||
(tclStubsPtr->tcl_DeleteHashTable) /* 109 */ | ||
#endif | ||
#ifndef Tcl_DeleteInterp | ||
#define Tcl_DeleteInterp \ | ||
(tclStubsPtr->tcl_DeleteInterp) /* 110 */ | ||
#endif | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
#ifndef Tcl_DetachPids | ||
#define Tcl_DetachPids \ | ||
(tclStubsPtr->tcl_DetachPids) /* 111 */ | ||
#endif | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
#ifndef Tcl_DetachPids | ||
#define Tcl_DetachPids \ | ||
(tclStubsPtr->tcl_DetachPids) /* 111 */ | ||
#endif | ||
#endif /* __WIN32__ */ | ||
#ifndef Tcl_DeleteTimerHandler | ||
#define Tcl_DeleteTimerHandler \ | ||
(tclStubsPtr->tcl_DeleteTimerHandler) /* 112 */ | ||
#endif | ||
#ifndef Tcl_DeleteTrace | ||
#define Tcl_DeleteTrace \ | ||
(tclStubsPtr->tcl_DeleteTrace) /* 113 */ | ||
#endif | ||
#ifndef Tcl_DontCallWhenDeleted | ||
#define Tcl_DontCallWhenDeleted \ | ||
(tclStubsPtr->tcl_DontCallWhenDeleted) /* 114 */ | ||
#endif | ||
#ifndef Tcl_DoOneEvent | ||
#define Tcl_DoOneEvent \ | ||
(tclStubsPtr->tcl_DoOneEvent) /* 115 */ | ||
#endif | ||
#ifndef Tcl_DoWhenIdle | ||
#define Tcl_DoWhenIdle \ | ||
(tclStubsPtr->tcl_DoWhenIdle) /* 116 */ | ||
#endif | ||
#ifndef Tcl_DStringAppend | ||
#define Tcl_DStringAppend \ | ||
(tclStubsPtr->tcl_DStringAppend) /* 117 */ | ||
#endif | ||
#ifndef Tcl_DStringAppendElement | ||
#define Tcl_DStringAppendElement \ | ||
(tclStubsPtr->tcl_DStringAppendElement) /* 118 */ | ||
#endif | ||
#ifndef Tcl_DStringEndSublist | ||
#define Tcl_DStringEndSublist \ | ||
(tclStubsPtr->tcl_DStringEndSublist) /* 119 */ | ||
#endif | ||
#ifndef Tcl_DStringFree | ||
#define Tcl_DStringFree \ | ||
(tclStubsPtr->tcl_DStringFree) /* 120 */ | ||
#endif | ||
#ifndef Tcl_DStringGetResult | ||
#define Tcl_DStringGetResult \ | ||
(tclStubsPtr->tcl_DStringGetResult) /* 121 */ | ||
#endif | ||
#ifndef Tcl_DStringInit | ||
#define Tcl_DStringInit \ | ||
(tclStubsPtr->tcl_DStringInit) /* 122 */ | ||
#endif | ||
#ifndef Tcl_DStringResult | ||
#define Tcl_DStringResult \ | ||
(tclStubsPtr->tcl_DStringResult) /* 123 */ | ||
#endif | ||
#ifndef Tcl_DStringSetLength | ||
#define Tcl_DStringSetLength \ | ||
(tclStubsPtr->tcl_DStringSetLength) /* 124 */ | ||
#endif | ||
#ifndef Tcl_DStringStartSublist | ||
#define Tcl_DStringStartSublist \ | ||
(tclStubsPtr->tcl_DStringStartSublist) /* 125 */ | ||
#endif | ||
#ifndef Tcl_Eof | ||
#define Tcl_Eof \ | ||
(tclStubsPtr->tcl_Eof) /* 126 */ | ||
#endif | ||
#ifndef Tcl_ErrnoId | ||
#define Tcl_ErrnoId \ | ||
(tclStubsPtr->tcl_ErrnoId) /* 127 */ | ||
#endif | ||
#ifndef Tcl_ErrnoMsg | ||
#define Tcl_ErrnoMsg \ | ||
(tclStubsPtr->tcl_ErrnoMsg) /* 128 */ | ||
#endif | ||
#ifndef Tcl_Eval | ||
#define Tcl_Eval \ | ||
(tclStubsPtr->tcl_Eval) /* 129 */ | ||
#endif | ||
#ifndef Tcl_EvalFile | ||
#define Tcl_EvalFile \ | ||
(tclStubsPtr->tcl_EvalFile) /* 130 */ | ||
#endif | ||
#ifndef Tcl_EvalObj | ||
#define Tcl_EvalObj \ | ||
(tclStubsPtr->tcl_EvalObj) /* 131 */ | ||
#endif | ||
#ifndef Tcl_EventuallyFree | ||
#define Tcl_EventuallyFree \ | ||
(tclStubsPtr->tcl_EventuallyFree) /* 132 */ | ||
#endif | ||
#ifndef Tcl_Exit | ||
#define Tcl_Exit \ | ||
(tclStubsPtr->tcl_Exit) /* 133 */ | ||
#endif | ||
#ifndef Tcl_ExposeCommand | ||
#define Tcl_ExposeCommand \ | ||
(tclStubsPtr->tcl_ExposeCommand) /* 134 */ | ||
#endif | ||
#ifndef Tcl_ExprBoolean | ||
#define Tcl_ExprBoolean \ | ||
(tclStubsPtr->tcl_ExprBoolean) /* 135 */ | ||
#endif | ||
#ifndef Tcl_ExprBooleanObj | ||
#define Tcl_ExprBooleanObj \ | ||
(tclStubsPtr->tcl_ExprBooleanObj) /* 136 */ | ||
#endif | ||
#ifndef Tcl_ExprDouble | ||
#define Tcl_ExprDouble \ | ||
(tclStubsPtr->tcl_ExprDouble) /* 137 */ | ||
#endif | ||
#ifndef Tcl_ExprDoubleObj | ||
#define Tcl_ExprDoubleObj \ | ||
(tclStubsPtr->tcl_ExprDoubleObj) /* 138 */ | ||
#endif | ||
#ifndef Tcl_ExprLong | ||
#define Tcl_ExprLong \ | ||
(tclStubsPtr->tcl_ExprLong) /* 139 */ | ||
#endif | ||
#ifndef Tcl_ExprLongObj | ||
#define Tcl_ExprLongObj \ | ||
(tclStubsPtr->tcl_ExprLongObj) /* 140 */ | ||
#endif | ||
#ifndef Tcl_ExprObj | ||
#define Tcl_ExprObj \ | ||
(tclStubsPtr->tcl_ExprObj) /* 141 */ | ||
#endif | ||
#ifndef Tcl_ExprString | ||
#define Tcl_ExprString \ | ||
(tclStubsPtr->tcl_ExprString) /* 142 */ | ||
#endif | ||
#ifndef Tcl_Finalize | ||
#define Tcl_Finalize \ | ||
(tclStubsPtr->tcl_Finalize) /* 143 */ | ||
#endif | ||
#ifndef Tcl_FindExecutable | ||
#define Tcl_FindExecutable \ | ||
(tclStubsPtr->tcl_FindExecutable) /* 144 */ | ||
#endif | ||
#ifndef Tcl_FirstHashEntry | ||
#define Tcl_FirstHashEntry \ | ||
(tclStubsPtr->tcl_FirstHashEntry) /* 145 */ | ||
#endif | ||
#ifndef Tcl_Flush | ||
#define Tcl_Flush \ | ||
(tclStubsPtr->tcl_Flush) /* 146 */ | ||
#endif | ||
#ifndef Tcl_FreeResult | ||
#define Tcl_FreeResult \ | ||
(tclStubsPtr->tcl_FreeResult) /* 147 */ | ||
#endif | ||
#ifndef Tcl_GetAlias | ||
#define Tcl_GetAlias \ | ||
(tclStubsPtr->tcl_GetAlias) /* 148 */ | ||
#endif | ||
#ifndef Tcl_GetAliasObj | ||
#define Tcl_GetAliasObj \ | ||
(tclStubsPtr->tcl_GetAliasObj) /* 149 */ | ||
#endif | ||
#ifndef Tcl_GetAssocData | ||
#define Tcl_GetAssocData \ | ||
(tclStubsPtr->tcl_GetAssocData) /* 150 */ | ||
#endif | ||
#ifndef Tcl_GetChannel | ||
#define Tcl_GetChannel \ | ||
(tclStubsPtr->tcl_GetChannel) /* 151 */ | ||
#endif | ||
#ifndef Tcl_GetChannelBufferSize | ||
#define Tcl_GetChannelBufferSize \ | ||
(tclStubsPtr->tcl_GetChannelBufferSize) /* 152 */ | ||
#endif | ||
#ifndef Tcl_GetChannelHandle | ||
#define Tcl_GetChannelHandle \ | ||
(tclStubsPtr->tcl_GetChannelHandle) /* 153 */ | ||
#endif | ||
#ifndef Tcl_GetChannelInstanceData | ||
#define Tcl_GetChannelInstanceData \ | ||
(tclStubsPtr->tcl_GetChannelInstanceData) /* 154 */ | ||
#endif | ||
#ifndef Tcl_GetChannelMode | ||
#define Tcl_GetChannelMode \ | ||
(tclStubsPtr->tcl_GetChannelMode) /* 155 */ | ||
#endif | ||
#ifndef Tcl_GetChannelName | ||
#define Tcl_GetChannelName \ | ||
(tclStubsPtr->tcl_GetChannelName) /* 156 */ | ||
#endif | ||
#ifndef Tcl_GetChannelOption | ||
#define Tcl_GetChannelOption \ | ||
(tclStubsPtr->tcl_GetChannelOption) /* 157 */ | ||
#endif | ||
#ifndef Tcl_GetChannelType | ||
#define Tcl_GetChannelType \ | ||
(tclStubsPtr->tcl_GetChannelType) /* 158 */ | ||
#endif | ||
#ifndef Tcl_GetCommandInfo | ||
#define Tcl_GetCommandInfo \ | ||
(tclStubsPtr->tcl_GetCommandInfo) /* 159 */ | ||
#endif | ||
#ifndef Tcl_GetCommandName | ||
#define Tcl_GetCommandName \ | ||
(tclStubsPtr->tcl_GetCommandName) /* 160 */ | ||
#endif | ||
#ifndef Tcl_GetErrno | ||
#define Tcl_GetErrno \ | ||
(tclStubsPtr->tcl_GetErrno) /* 161 */ | ||
#endif | ||
#ifndef Tcl_GetHostName | ||
#define Tcl_GetHostName \ | ||
(tclStubsPtr->tcl_GetHostName) /* 162 */ | ||
#endif | ||
#ifndef Tcl_GetInterpPath | ||
#define Tcl_GetInterpPath \ | ||
(tclStubsPtr->tcl_GetInterpPath) /* 163 */ | ||
#endif | ||
#ifndef Tcl_GetMaster | ||
#define Tcl_GetMaster \ | ||
(tclStubsPtr->tcl_GetMaster) /* 164 */ | ||
#endif | ||
#ifndef Tcl_GetNameOfExecutable | ||
#define Tcl_GetNameOfExecutable \ | ||
(tclStubsPtr->tcl_GetNameOfExecutable) /* 165 */ | ||
#endif | ||
#ifndef Tcl_GetObjResult | ||
#define Tcl_GetObjResult \ | ||
(tclStubsPtr->tcl_GetObjResult) /* 166 */ | ||
#endif | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
#ifndef Tcl_GetOpenFile | ||
#define Tcl_GetOpenFile \ | ||
(tclStubsPtr->tcl_GetOpenFile) /* 167 */ | ||
#endif | ||
#endif /* UNIX */ | ||
#ifndef Tcl_GetPathType | ||
#define Tcl_GetPathType \ | ||
(tclStubsPtr->tcl_GetPathType) /* 168 */ | ||
#endif | ||
#ifndef Tcl_Gets | ||
#define Tcl_Gets \ | ||
(tclStubsPtr->tcl_Gets) /* 169 */ | ||
#endif | ||
#ifndef Tcl_GetsObj | ||
#define Tcl_GetsObj \ | ||
(tclStubsPtr->tcl_GetsObj) /* 170 */ | ||
#endif | ||
#ifndef Tcl_GetServiceMode | ||
#define Tcl_GetServiceMode \ | ||
(tclStubsPtr->tcl_GetServiceMode) /* 171 */ | ||
#endif | ||
#ifndef Tcl_GetSlave | ||
#define Tcl_GetSlave \ | ||
(tclStubsPtr->tcl_GetSlave) /* 172 */ | ||
#endif | ||
#ifndef Tcl_GetStdChannel | ||
#define Tcl_GetStdChannel \ | ||
(tclStubsPtr->tcl_GetStdChannel) /* 173 */ | ||
#endif | ||
#ifndef Tcl_GetStringResult | ||
#define Tcl_GetStringResult \ | ||
(tclStubsPtr->tcl_GetStringResult) /* 174 */ | ||
#endif | ||
#ifndef Tcl_GetVar | ||
#define Tcl_GetVar \ | ||
(tclStubsPtr->tcl_GetVar) /* 175 */ | ||
#endif | ||
#ifndef Tcl_GetVar2 | ||
#define Tcl_GetVar2 \ | ||
(tclStubsPtr->tcl_GetVar2) /* 176 */ | ||
#endif | ||
#ifndef Tcl_GlobalEval | ||
#define Tcl_GlobalEval \ | ||
(tclStubsPtr->tcl_GlobalEval) /* 177 */ | ||
#endif | ||
#ifndef Tcl_GlobalEvalObj | ||
#define Tcl_GlobalEvalObj \ | ||
(tclStubsPtr->tcl_GlobalEvalObj) /* 178 */ | ||
#endif | ||
#ifndef Tcl_HideCommand | ||
#define Tcl_HideCommand \ | ||
(tclStubsPtr->tcl_HideCommand) /* 179 */ | ||
#endif | ||
#ifndef Tcl_Init | ||
#define Tcl_Init \ | ||
(tclStubsPtr->tcl_Init) /* 180 */ | ||
#endif | ||
#ifndef Tcl_InitHashTable | ||
#define Tcl_InitHashTable \ | ||
(tclStubsPtr->tcl_InitHashTable) /* 181 */ | ||
#endif | ||
#ifndef Tcl_InputBlocked | ||
#define Tcl_InputBlocked \ | ||
(tclStubsPtr->tcl_InputBlocked) /* 182 */ | ||
#endif | ||
#ifndef Tcl_InputBuffered | ||
#define Tcl_InputBuffered \ | ||
(tclStubsPtr->tcl_InputBuffered) /* 183 */ | ||
#endif | ||
#ifndef Tcl_InterpDeleted | ||
#define Tcl_InterpDeleted \ | ||
(tclStubsPtr->tcl_InterpDeleted) /* 184 */ | ||
#endif | ||
#ifndef Tcl_IsSafe | ||
#define Tcl_IsSafe \ | ||
(tclStubsPtr->tcl_IsSafe) /* 185 */ | ||
#endif | ||
#ifndef Tcl_JoinPath | ||
#define Tcl_JoinPath \ | ||
(tclStubsPtr->tcl_JoinPath) /* 186 */ | ||
#endif | ||
#ifndef Tcl_LinkVar | ||
#define Tcl_LinkVar \ | ||
(tclStubsPtr->tcl_LinkVar) /* 187 */ | ||
#endif | ||
/* Slot 188 is reserved */ | ||
#ifndef Tcl_MakeFileChannel | ||
#define Tcl_MakeFileChannel \ | ||
(tclStubsPtr->tcl_MakeFileChannel) /* 189 */ | ||
#endif | ||
#ifndef Tcl_MakeSafe | ||
#define Tcl_MakeSafe \ | ||
(tclStubsPtr->tcl_MakeSafe) /* 190 */ | ||
#endif | ||
#ifndef Tcl_MakeTcpClientChannel | ||
#define Tcl_MakeTcpClientChannel \ | ||
(tclStubsPtr->tcl_MakeTcpClientChannel) /* 191 */ | ||
#endif | ||
#ifndef Tcl_Merge | ||
#define Tcl_Merge \ | ||
(tclStubsPtr->tcl_Merge) /* 192 */ | ||
#endif | ||
#ifndef Tcl_NextHashEntry | ||
#define Tcl_NextHashEntry \ | ||
(tclStubsPtr->tcl_NextHashEntry) /* 193 */ | ||
#endif | ||
#ifndef Tcl_NotifyChannel | ||
#define Tcl_NotifyChannel \ | ||
(tclStubsPtr->tcl_NotifyChannel) /* 194 */ | ||
#endif | ||
#ifndef Tcl_ObjGetVar2 | ||
#define Tcl_ObjGetVar2 \ | ||
(tclStubsPtr->tcl_ObjGetVar2) /* 195 */ | ||
#endif | ||
#ifndef Tcl_ObjSetVar2 | ||
#define Tcl_ObjSetVar2 \ | ||
(tclStubsPtr->tcl_ObjSetVar2) /* 196 */ | ||
#endif | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
#ifndef Tcl_OpenCommandChannel | ||
#define Tcl_OpenCommandChannel \ | ||
(tclStubsPtr->tcl_OpenCommandChannel) /* 197 */ | ||
#endif | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
#ifndef Tcl_OpenCommandChannel | ||
#define Tcl_OpenCommandChannel \ | ||
(tclStubsPtr->tcl_OpenCommandChannel) /* 197 */ | ||
#endif | ||
#endif /* __WIN32__ */ | ||
#ifndef Tcl_OpenFileChannel | ||
#define Tcl_OpenFileChannel \ | ||
(tclStubsPtr->tcl_OpenFileChannel) /* 198 */ | ||
#endif | ||
#ifndef Tcl_OpenTcpClient | ||
#define Tcl_OpenTcpClient \ | ||
(tclStubsPtr->tcl_OpenTcpClient) /* 199 */ | ||
#endif | ||
#ifndef Tcl_OpenTcpServer | ||
#define Tcl_OpenTcpServer \ | ||
(tclStubsPtr->tcl_OpenTcpServer) /* 200 */ | ||
#endif | ||
#ifndef Tcl_Preserve | ||
#define Tcl_Preserve \ | ||
(tclStubsPtr->tcl_Preserve) /* 201 */ | ||
#endif | ||
#ifndef Tcl_PrintDouble | ||
#define Tcl_PrintDouble \ | ||
(tclStubsPtr->tcl_PrintDouble) /* 202 */ | ||
#endif | ||
#ifndef Tcl_PutEnv | ||
#define Tcl_PutEnv \ | ||
(tclStubsPtr->tcl_PutEnv) /* 203 */ | ||
#endif | ||
#ifndef Tcl_PosixError | ||
#define Tcl_PosixError \ | ||
(tclStubsPtr->tcl_PosixError) /* 204 */ | ||
#endif | ||
#ifndef Tcl_QueueEvent | ||
#define Tcl_QueueEvent \ | ||
(tclStubsPtr->tcl_QueueEvent) /* 205 */ | ||
#endif | ||
#ifndef Tcl_Read | ||
#define Tcl_Read \ | ||
(tclStubsPtr->tcl_Read) /* 206 */ | ||
#endif | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
#ifndef Tcl_ReapDetachedProcs | ||
#define Tcl_ReapDetachedProcs \ | ||
(tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */ | ||
#endif | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
#ifndef Tcl_ReapDetachedProcs | ||
#define Tcl_ReapDetachedProcs \ | ||
(tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */ | ||
#endif | ||
#endif /* __WIN32__ */ | ||
#ifndef Tcl_RecordAndEval | ||
#define Tcl_RecordAndEval \ | ||
(tclStubsPtr->tcl_RecordAndEval) /* 208 */ | ||
#endif | ||
#ifndef Tcl_RecordAndEvalObj | ||
#define Tcl_RecordAndEvalObj \ | ||
(tclStubsPtr->tcl_RecordAndEvalObj) /* 209 */ | ||
#endif | ||
#ifndef Tcl_RegisterChannel | ||
#define Tcl_RegisterChannel \ | ||
(tclStubsPtr->tcl_RegisterChannel) /* 210 */ | ||
#endif | ||
#ifndef Tcl_RegisterObjType | ||
#define Tcl_RegisterObjType \ | ||
(tclStubsPtr->tcl_RegisterObjType) /* 211 */ | ||
#endif | ||
#ifndef Tcl_RegExpCompile | ||
#define Tcl_RegExpCompile \ | ||
(tclStubsPtr->tcl_RegExpCompile) /* 212 */ | ||
#endif | ||
#ifndef Tcl_RegExpExec | ||
#define Tcl_RegExpExec \ | ||
(tclStubsPtr->tcl_RegExpExec) /* 213 */ | ||
#endif | ||
#ifndef Tcl_RegExpMatch | ||
#define Tcl_RegExpMatch \ | ||
(tclStubsPtr->tcl_RegExpMatch) /* 214 */ | ||
#endif | ||
#ifndef Tcl_RegExpRange | ||
#define Tcl_RegExpRange \ | ||
(tclStubsPtr->tcl_RegExpRange) /* 215 */ | ||
#endif | ||
#ifndef Tcl_Release | ||
#define Tcl_Release \ | ||
(tclStubsPtr->tcl_Release) /* 216 */ | ||
#endif | ||
#ifndef Tcl_ResetResult | ||
#define Tcl_ResetResult \ | ||
(tclStubsPtr->tcl_ResetResult) /* 217 */ | ||
#endif | ||
#ifndef Tcl_ScanElement | ||
#define Tcl_ScanElement \ | ||
(tclStubsPtr->tcl_ScanElement) /* 218 */ | ||
#endif | ||
#ifndef Tcl_ScanCountedElement | ||
#define Tcl_ScanCountedElement \ | ||
(tclStubsPtr->tcl_ScanCountedElement) /* 219 */ | ||
#endif | ||
#ifndef Tcl_Seek | ||
#define Tcl_Seek \ | ||
(tclStubsPtr->tcl_Seek) /* 220 */ | ||
#endif | ||
#ifndef Tcl_ServiceAll | ||
#define Tcl_ServiceAll \ | ||
(tclStubsPtr->tcl_ServiceAll) /* 221 */ | ||
#endif | ||
#ifndef Tcl_ServiceEvent | ||
#define Tcl_ServiceEvent \ | ||
(tclStubsPtr->tcl_ServiceEvent) /* 222 */ | ||
#endif | ||
#ifndef Tcl_SetAssocData | ||
#define Tcl_SetAssocData \ | ||
(tclStubsPtr->tcl_SetAssocData) /* 223 */ | ||
#endif | ||
#ifndef Tcl_SetChannelBufferSize | ||
#define Tcl_SetChannelBufferSize \ | ||
(tclStubsPtr->tcl_SetChannelBufferSize) /* 224 */ | ||
#endif | ||
#ifndef Tcl_SetChannelOption | ||
#define Tcl_SetChannelOption \ | ||
(tclStubsPtr->tcl_SetChannelOption) /* 225 */ | ||
#endif | ||
#ifndef Tcl_SetCommandInfo | ||
#define Tcl_SetCommandInfo \ | ||
(tclStubsPtr->tcl_SetCommandInfo) /* 226 */ | ||
#endif | ||
#ifndef Tcl_SetErrno | ||
#define Tcl_SetErrno \ | ||
(tclStubsPtr->tcl_SetErrno) /* 227 */ | ||
#endif | ||
#ifndef Tcl_SetErrorCode | ||
#define Tcl_SetErrorCode \ | ||
(tclStubsPtr->tcl_SetErrorCode) /* 228 */ | ||
#endif | ||
#ifndef Tcl_SetMaxBlockTime | ||
#define Tcl_SetMaxBlockTime \ | ||
(tclStubsPtr->tcl_SetMaxBlockTime) /* 229 */ | ||
#endif | ||
#ifndef Tcl_SetPanicProc | ||
#define Tcl_SetPanicProc \ | ||
(tclStubsPtr->tcl_SetPanicProc) /* 230 */ | ||
#endif | ||
#ifndef Tcl_SetRecursionLimit | ||
#define Tcl_SetRecursionLimit \ | ||
(tclStubsPtr->tcl_SetRecursionLimit) /* 231 */ | ||
#endif | ||
#ifndef Tcl_SetResult | ||
#define Tcl_SetResult \ | ||
(tclStubsPtr->tcl_SetResult) /* 232 */ | ||
#endif | ||
#ifndef Tcl_SetServiceMode | ||
#define Tcl_SetServiceMode \ | ||
(tclStubsPtr->tcl_SetServiceMode) /* 233 */ | ||
#endif | ||
#ifndef Tcl_SetObjErrorCode | ||
#define Tcl_SetObjErrorCode \ | ||
(tclStubsPtr->tcl_SetObjErrorCode) /* 234 */ | ||
#endif | ||
#ifndef Tcl_SetObjResult | ||
#define Tcl_SetObjResult \ | ||
(tclStubsPtr->tcl_SetObjResult) /* 235 */ | ||
#endif | ||
#ifndef Tcl_SetStdChannel | ||
#define Tcl_SetStdChannel \ | ||
(tclStubsPtr->tcl_SetStdChannel) /* 236 */ | ||
#endif | ||
#ifndef Tcl_SetVar | ||
#define Tcl_SetVar \ | ||
(tclStubsPtr->tcl_SetVar) /* 237 */ | ||
#endif | ||
#ifndef Tcl_SetVar2 | ||
#define Tcl_SetVar2 \ | ||
(tclStubsPtr->tcl_SetVar2) /* 238 */ | ||
#endif | ||
#ifndef Tcl_SignalId | ||
#define Tcl_SignalId \ | ||
(tclStubsPtr->tcl_SignalId) /* 239 */ | ||
#endif | ||
#ifndef Tcl_SignalMsg | ||
#define Tcl_SignalMsg \ | ||
(tclStubsPtr->tcl_SignalMsg) /* 240 */ | ||
#endif | ||
#ifndef Tcl_SourceRCFile | ||
#define Tcl_SourceRCFile \ | ||
(tclStubsPtr->tcl_SourceRCFile) /* 241 */ | ||
#endif | ||
#ifndef Tcl_SplitList | ||
#define Tcl_SplitList \ | ||
(tclStubsPtr->tcl_SplitList) /* 242 */ | ||
#endif | ||
#ifndef Tcl_SplitPath | ||
#define Tcl_SplitPath \ | ||
(tclStubsPtr->tcl_SplitPath) /* 243 */ | ||
#endif | ||
#ifndef Tcl_StaticPackage | ||
#define Tcl_StaticPackage \ | ||
(tclStubsPtr->tcl_StaticPackage) /* 244 */ | ||
#endif | ||
#ifndef Tcl_StringMatch | ||
#define Tcl_StringMatch \ | ||
(tclStubsPtr->tcl_StringMatch) /* 245 */ | ||
#endif | ||
#ifndef Tcl_Tell | ||
#define Tcl_Tell \ | ||
(tclStubsPtr->tcl_Tell) /* 246 */ | ||
#endif | ||
#ifndef Tcl_TraceVar | ||
#define Tcl_TraceVar \ | ||
(tclStubsPtr->tcl_TraceVar) /* 247 */ | ||
#endif | ||
#ifndef Tcl_TraceVar2 | ||
#define Tcl_TraceVar2 \ | ||
(tclStubsPtr->tcl_TraceVar2) /* 248 */ | ||
#endif | ||
#ifndef Tcl_TranslateFileName | ||
#define Tcl_TranslateFileName \ | ||
(tclStubsPtr->tcl_TranslateFileName) /* 249 */ | ||
#endif | ||
#ifndef Tcl_Ungets | ||
#define Tcl_Ungets \ | ||
(tclStubsPtr->tcl_Ungets) /* 250 */ | ||
#endif | ||
#ifndef Tcl_UnlinkVar | ||
#define Tcl_UnlinkVar \ | ||
(tclStubsPtr->tcl_UnlinkVar) /* 251 */ | ||
#endif | ||
#ifndef Tcl_UnregisterChannel | ||
#define Tcl_UnregisterChannel \ | ||
(tclStubsPtr->tcl_UnregisterChannel) /* 252 */ | ||
#endif | ||
#ifndef Tcl_UnsetVar | ||
#define Tcl_UnsetVar \ | ||
(tclStubsPtr->tcl_UnsetVar) /* 253 */ | ||
#endif | ||
#ifndef Tcl_UnsetVar2 | ||
#define Tcl_UnsetVar2 \ | ||
(tclStubsPtr->tcl_UnsetVar2) /* 254 */ | ||
#endif | ||
#ifndef Tcl_UntraceVar | ||
#define Tcl_UntraceVar \ | ||
(tclStubsPtr->tcl_UntraceVar) /* 255 */ | ||
#endif | ||
#ifndef Tcl_UntraceVar2 | ||
#define Tcl_UntraceVar2 \ | ||
(tclStubsPtr->tcl_UntraceVar2) /* 256 */ | ||
#endif | ||
#ifndef Tcl_UpdateLinkedVar | ||
#define Tcl_UpdateLinkedVar \ | ||
(tclStubsPtr->tcl_UpdateLinkedVar) /* 257 */ | ||
#endif | ||
#ifndef Tcl_UpVar | ||
#define Tcl_UpVar \ | ||
(tclStubsPtr->tcl_UpVar) /* 258 */ | ||
#endif | ||
#ifndef Tcl_UpVar2 | ||
#define Tcl_UpVar2 \ | ||
(tclStubsPtr->tcl_UpVar2) /* 259 */ | ||
#endif | ||
#ifndef Tcl_VarEval | ||
#define Tcl_VarEval \ | ||
(tclStubsPtr->tcl_VarEval) /* 260 */ | ||
#endif | ||
#ifndef Tcl_VarTraceInfo | ||
#define Tcl_VarTraceInfo \ | ||
(tclStubsPtr->tcl_VarTraceInfo) /* 261 */ | ||
#endif | ||
#ifndef Tcl_VarTraceInfo2 | ||
#define Tcl_VarTraceInfo2 \ | ||
(tclStubsPtr->tcl_VarTraceInfo2) /* 262 */ | ||
#endif | ||
#ifndef Tcl_Write | ||
#define Tcl_Write \ | ||
(tclStubsPtr->tcl_Write) /* 263 */ | ||
#endif | ||
#ifndef Tcl_WrongNumArgs | ||
#define Tcl_WrongNumArgs \ | ||
(tclStubsPtr->tcl_WrongNumArgs) /* 264 */ | ||
#endif | ||
#ifndef Tcl_DumpActiveMemory | ||
#define Tcl_DumpActiveMemory \ | ||
(tclStubsPtr->tcl_DumpActiveMemory) /* 265 */ | ||
#endif | ||
#ifndef Tcl_ValidateAllMemory | ||
#define Tcl_ValidateAllMemory \ | ||
(tclStubsPtr->tcl_ValidateAllMemory) /* 266 */ | ||
#endif | ||
#ifndef Tcl_AppendResultVA | ||
#define Tcl_AppendResultVA \ | ||
(tclStubsPtr->tcl_AppendResultVA) /* 267 */ | ||
#endif | ||
#ifndef Tcl_AppendStringsToObjVA | ||
#define Tcl_AppendStringsToObjVA \ | ||
(tclStubsPtr->tcl_AppendStringsToObjVA) /* 268 */ | ||
#endif | ||
#ifndef Tcl_HashStats | ||
#define Tcl_HashStats \ | ||
(tclStubsPtr->tcl_HashStats) /* 269 */ | ||
#endif | ||
#ifndef Tcl_ParseVar | ||
#define Tcl_ParseVar \ | ||
(tclStubsPtr->tcl_ParseVar) /* 270 */ | ||
#endif | ||
#ifndef Tcl_PkgPresent | ||
#define Tcl_PkgPresent \ | ||
(tclStubsPtr->tcl_PkgPresent) /* 271 */ | ||
#endif | ||
#ifndef Tcl_PkgPresentEx | ||
#define Tcl_PkgPresentEx \ | ||
(tclStubsPtr->tcl_PkgPresentEx) /* 272 */ | ||
#endif | ||
#ifndef Tcl_PkgProvide | ||
#define Tcl_PkgProvide \ | ||
(tclStubsPtr->tcl_PkgProvide) /* 273 */ | ||
#endif | ||
#ifndef Tcl_PkgRequire | ||
#define Tcl_PkgRequire \ | ||
(tclStubsPtr->tcl_PkgRequire) /* 274 */ | ||
#endif | ||
#ifndef Tcl_SetErrorCodeVA | ||
#define Tcl_SetErrorCodeVA \ | ||
(tclStubsPtr->tcl_SetErrorCodeVA) /* 275 */ | ||
#endif | ||
#ifndef Tcl_VarEvalVA | ||
#define Tcl_VarEvalVA \ | ||
(tclStubsPtr->tcl_VarEvalVA) /* 276 */ | ||
#endif | ||
#ifndef Tcl_WaitPid | ||
#define Tcl_WaitPid \ | ||
(tclStubsPtr->tcl_WaitPid) /* 277 */ | ||
#endif | ||
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | ||
#ifndef Tcl_PanicVA | ||
#define Tcl_PanicVA \ | ||
(tclStubsPtr->tcl_PanicVA) /* 278 */ | ||
#endif | ||
#endif /* UNIX */ | ||
#ifdef __WIN32__ | ||
#ifndef Tcl_PanicVA | ||
#define Tcl_PanicVA \ | ||
(tclStubsPtr->tcl_PanicVA) /* 278 */ | ||
#endif | ||
#endif /* __WIN32__ */ | ||
#ifndef Tcl_GetVersion | ||
#define Tcl_GetVersion \ | ||
(tclStubsPtr->tcl_GetVersion) /* 279 */ | ||
#endif | ||
#ifndef Tcl_InitMemory | ||
#define Tcl_InitMemory \ | ||
(tclStubsPtr->tcl_InitMemory) /* 280 */ | ||
#endif | ||
#ifndef Tcl_StackChannel | ||
#define Tcl_StackChannel \ | ||
(tclStubsPtr->tcl_StackChannel) /* 281 */ | ||
#endif | ||
#ifndef Tcl_UnstackChannel | ||
#define Tcl_UnstackChannel \ | ||
(tclStubsPtr->tcl_UnstackChannel) /* 282 */ | ||
#endif | ||
#ifndef Tcl_GetStackedChannel | ||
#define Tcl_GetStackedChannel \ | ||
(tclStubsPtr->tcl_GetStackedChannel) /* 283 */ | ||
#endif | ||
/* Slot 284 is reserved */ | ||
/* Slot 285 is reserved */ | ||
#ifndef Tcl_AppendObjToObj | ||
#define Tcl_AppendObjToObj \ | ||
(tclStubsPtr->tcl_AppendObjToObj) /* 286 */ | ||
#endif | ||
#ifndef Tcl_CreateEncoding | ||
#define Tcl_CreateEncoding \ | ||
(tclStubsPtr->tcl_CreateEncoding) /* 287 */ | ||
#endif | ||
#ifndef Tcl_CreateThreadExitHandler | ||
#define Tcl_CreateThreadExitHandler \ | ||
(tclStubsPtr->tcl_CreateThreadExitHandler) /* 288 */ | ||
#endif | ||
#ifndef Tcl_DeleteThreadExitHandler | ||
#define Tcl_DeleteThreadExitHandler \ | ||
(tclStubsPtr->tcl_DeleteThreadExitHandler) /* 289 */ | ||
#endif | ||
#ifndef Tcl_DiscardResult | ||
#define Tcl_DiscardResult \ | ||
(tclStubsPtr->tcl_DiscardResult) /* 290 */ | ||
#endif | ||
#ifndef Tcl_EvalEx | ||
#define Tcl_EvalEx \ | ||
(tclStubsPtr->tcl_EvalEx) /* 291 */ | ||
#endif | ||
#ifndef Tcl_EvalObjv | ||
#define Tcl_EvalObjv \ | ||
(tclStubsPtr->tcl_EvalObjv) /* 292 */ | ||
#endif | ||
#ifndef Tcl_EvalObjEx | ||
#define Tcl_EvalObjEx \ | ||
(tclStubsPtr->tcl_EvalObjEx) /* 293 */ | ||
#endif | ||
#ifndef Tcl_ExitThread | ||
#define Tcl_ExitThread \ | ||
(tclStubsPtr->tcl_ExitThread) /* 294 */ | ||
#endif | ||
#ifndef Tcl_ExternalToUtf | ||
#define Tcl_ExternalToUtf \ | ||
(tclStubsPtr->tcl_ExternalToUtf) /* 295 */ | ||
#endif | ||
#ifndef Tcl_ExternalToUtfDString | ||
#define Tcl_ExternalToUtfDString \ | ||
(tclStubsPtr->tcl_ExternalToUtfDString) /* 296 */ | ||
#endif | ||
#ifndef Tcl_FinalizeThread | ||
#define Tcl_FinalizeThread \ | ||
(tclStubsPtr->tcl_FinalizeThread) /* 297 */ | ||
#endif | ||
#ifndef Tcl_FinalizeNotifier | ||
#define Tcl_FinalizeNotifier \ | ||
(tclStubsPtr->tcl_FinalizeNotifier) /* 298 */ | ||
#endif | ||
#ifndef Tcl_FreeEncoding | ||
#define Tcl_FreeEncoding \ | ||
(tclStubsPtr->tcl_FreeEncoding) /* 299 */ | ||
#endif | ||
#ifndef Tcl_GetCurrentThread | ||
#define Tcl_GetCurrentThread \ | ||
(tclStubsPtr->tcl_GetCurrentThread) /* 300 */ | ||
#endif | ||
#ifndef Tcl_GetEncoding | ||
#define Tcl_GetEncoding \ | ||
(tclStubsPtr->tcl_GetEncoding) /* 301 */ | ||
#endif | ||
#ifndef Tcl_GetEncodingName | ||
#define Tcl_GetEncodingName \ | ||
(tclStubsPtr->tcl_GetEncodingName) /* 302 */ | ||
#endif | ||
#ifndef Tcl_GetEncodingNames | ||
#define Tcl_GetEncodingNames \ | ||
(tclStubsPtr->tcl_GetEncodingNames) /* 303 */ | ||
#endif | ||
#ifndef Tcl_GetIndexFromObjStruct | ||
#define Tcl_GetIndexFromObjStruct \ | ||
(tclStubsPtr->tcl_GetIndexFromObjStruct) /* 304 */ | ||
#endif | ||
#ifndef Tcl_GetThreadData | ||
#define Tcl_GetThreadData \ | ||
(tclStubsPtr->tcl_GetThreadData) /* 305 */ | ||
#endif | ||
#ifndef Tcl_GetVar2Ex | ||
#define Tcl_GetVar2Ex \ | ||
(tclStubsPtr->tcl_GetVar2Ex) /* 306 */ | ||
#endif | ||
#ifndef Tcl_InitNotifier | ||
#define Tcl_InitNotifier \ | ||
(tclStubsPtr->tcl_InitNotifier) /* 307 */ | ||
#endif | ||
#ifndef Tcl_MutexLock | ||
#define Tcl_MutexLock \ | ||
(tclStubsPtr->tcl_MutexLock) /* 308 */ | ||
#endif | ||
#ifndef Tcl_MutexUnlock | ||
#define Tcl_MutexUnlock \ | ||
(tclStubsPtr->tcl_MutexUnlock) /* 309 */ | ||
#endif | ||
#ifndef Tcl_ConditionNotify | ||
#define Tcl_ConditionNotify \ | ||
(tclStubsPtr->tcl_ConditionNotify) /* 310 */ | ||
#endif | ||
#ifndef Tcl_ConditionWait | ||
#define Tcl_ConditionWait \ | ||
(tclStubsPtr->tcl_ConditionWait) /* 311 */ | ||
#endif | ||
#ifndef Tcl_NumUtfChars | ||
#define Tcl_NumUtfChars \ | ||
(tclStubsPtr->tcl_NumUtfChars) /* 312 */ | ||
#endif | ||
#ifndef Tcl_ReadChars | ||
#define Tcl_ReadChars \ | ||
(tclStubsPtr->tcl_ReadChars) /* 313 */ | ||
#endif | ||
#ifndef Tcl_RestoreResult | ||
#define Tcl_RestoreResult \ | ||
(tclStubsPtr->tcl_RestoreResult) /* 314 */ | ||
#endif | ||
#ifndef Tcl_SaveResult | ||
#define Tcl_SaveResult \ | ||
(tclStubsPtr->tcl_SaveResult) /* 315 */ | ||
#endif | ||
#ifndef Tcl_SetSystemEncoding | ||
#define Tcl_SetSystemEncoding \ | ||
(tclStubsPtr->tcl_SetSystemEncoding) /* 316 */ | ||
#endif | ||
#ifndef Tcl_SetVar2Ex | ||
#define Tcl_SetVar2Ex \ | ||
(tclStubsPtr->tcl_SetVar2Ex) /* 317 */ | ||
#endif | ||
#ifndef Tcl_ThreadAlert | ||
#define Tcl_ThreadAlert \ | ||
(tclStubsPtr->tcl_ThreadAlert) /* 318 */ | ||
#endif | ||
#ifndef Tcl_ThreadQueueEvent | ||
#define Tcl_ThreadQueueEvent \ | ||
(tclStubsPtr->tcl_ThreadQueueEvent) /* 319 */ | ||
#endif | ||
#ifndef Tcl_UniCharAtIndex | ||
#define Tcl_UniCharAtIndex \ | ||
(tclStubsPtr->tcl_UniCharAtIndex) /* 320 */ | ||
#endif | ||
#ifndef Tcl_UniCharToLower | ||
#define Tcl_UniCharToLower \ | ||
(tclStubsPtr->tcl_UniCharToLower) /* 321 */ | ||
#endif | ||
#ifndef Tcl_UniCharToTitle | ||
#define Tcl_UniCharToTitle \ | ||
(tclStubsPtr->tcl_UniCharToTitle) /* 322 */ | ||
#endif | ||
#ifndef Tcl_UniCharToUpper | ||
#define Tcl_UniCharToUpper \ | ||
(tclStubsPtr->tcl_UniCharToUpper) /* 323 */ | ||
#endif | ||
#ifndef Tcl_UniCharToUtf | ||
#define Tcl_UniCharToUtf \ | ||
(tclStubsPtr->tcl_UniCharToUtf) /* 324 */ | ||
#endif | ||
#ifndef Tcl_UtfAtIndex | ||
#define Tcl_UtfAtIndex \ | ||
(tclStubsPtr->tcl_UtfAtIndex) /* 325 */ | ||
#endif | ||
#ifndef Tcl_UtfCharComplete | ||
#define Tcl_UtfCharComplete \ | ||
(tclStubsPtr->tcl_UtfCharComplete) /* 326 */ | ||
#endif | ||
#ifndef Tcl_UtfBackslash | ||
#define Tcl_UtfBackslash \ | ||
(tclStubsPtr->tcl_UtfBackslash) /* 327 */ | ||
#endif | ||
#ifndef Tcl_UtfFindFirst | ||
#define Tcl_UtfFindFirst \ | ||
(tclStubsPtr->tcl_UtfFindFirst) /* 328 */ | ||
#endif | ||
#ifndef Tcl_UtfFindLast | ||
#define Tcl_UtfFindLast \ | ||
(tclStubsPtr->tcl_UtfFindLast) /* 329 */ | ||
#endif | ||
#ifndef Tcl_UtfNext | ||
#define Tcl_UtfNext \ | ||
(tclStubsPtr->tcl_UtfNext) /* 330 */ | ||
#endif | ||
#ifndef Tcl_UtfPrev | ||
#define Tcl_UtfPrev \ | ||
(tclStubsPtr->tcl_UtfPrev) /* 331 */ | ||
#endif | ||
#ifndef Tcl_UtfToExternal | ||
#define Tcl_UtfToExternal \ | ||
(tclStubsPtr->tcl_UtfToExternal) /* 332 */ | ||
#endif | ||
#ifndef Tcl_UtfToExternalDString | ||
#define Tcl_UtfToExternalDString \ | ||
(tclStubsPtr->tcl_UtfToExternalDString) /* 333 */ | ||
#endif | ||
#ifndef Tcl_UtfToLower | ||
#define Tcl_UtfToLower \ | ||
(tclStubsPtr->tcl_UtfToLower) /* 334 */ | ||
#endif | ||
#ifndef Tcl_UtfToTitle | ||
#define Tcl_UtfToTitle \ | ||
(tclStubsPtr->tcl_UtfToTitle) /* 335 */ | ||
#endif | ||
#ifndef Tcl_UtfToUniChar | ||
#define Tcl_UtfToUniChar \ | ||
(tclStubsPtr->tcl_UtfToUniChar) /* 336 */ | ||
#endif | ||
#ifndef Tcl_UtfToUpper | ||
#define Tcl_UtfToUpper \ | ||
(tclStubsPtr->tcl_UtfToUpper) /* 337 */ | ||
#endif | ||
#ifndef Tcl_WriteChars | ||
#define Tcl_WriteChars \ | ||
(tclStubsPtr->tcl_WriteChars) /* 338 */ | ||
#endif | ||
#ifndef Tcl_WriteObj | ||
#define Tcl_WriteObj \ | ||
(tclStubsPtr->tcl_WriteObj) /* 339 */ | ||
#endif | ||
#ifndef Tcl_GetString | ||
#define Tcl_GetString \ | ||
(tclStubsPtr->tcl_GetString) /* 340 */ | ||
#endif | ||
#ifndef Tcl_GetDefaultEncodingDir | ||
#define Tcl_GetDefaultEncodingDir \ | ||
(tclStubsPtr->tcl_GetDefaultEncodingDir) /* 341 */ | ||
#endif | ||
#ifndef Tcl_SetDefaultEncodingDir | ||
#define Tcl_SetDefaultEncodingDir \ | ||
(tclStubsPtr->tcl_SetDefaultEncodingDir) /* 342 */ | ||
#endif | ||
#ifndef Tcl_AlertNotifier | ||
#define Tcl_AlertNotifier \ | ||
(tclStubsPtr->tcl_AlertNotifier) /* 343 */ | ||
#endif | ||
#ifndef Tcl_ServiceModeHook | ||
#define Tcl_ServiceModeHook \ | ||
(tclStubsPtr->tcl_ServiceModeHook) /* 344 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsAlnum | ||
#define Tcl_UniCharIsAlnum \ | ||
(tclStubsPtr->tcl_UniCharIsAlnum) /* 345 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsAlpha | ||
#define Tcl_UniCharIsAlpha \ | ||
(tclStubsPtr->tcl_UniCharIsAlpha) /* 346 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsDigit | ||
#define Tcl_UniCharIsDigit \ | ||
(tclStubsPtr->tcl_UniCharIsDigit) /* 347 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsLower | ||
#define Tcl_UniCharIsLower \ | ||
(tclStubsPtr->tcl_UniCharIsLower) /* 348 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsSpace | ||
#define Tcl_UniCharIsSpace \ | ||
(tclStubsPtr->tcl_UniCharIsSpace) /* 349 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsUpper | ||
#define Tcl_UniCharIsUpper \ | ||
(tclStubsPtr->tcl_UniCharIsUpper) /* 350 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsWordChar | ||
#define Tcl_UniCharIsWordChar \ | ||
(tclStubsPtr->tcl_UniCharIsWordChar) /* 351 */ | ||
#endif | ||
#ifndef Tcl_UniCharLen | ||
#define Tcl_UniCharLen \ | ||
(tclStubsPtr->tcl_UniCharLen) /* 352 */ | ||
#endif | ||
#ifndef Tcl_UniCharNcmp | ||
#define Tcl_UniCharNcmp \ | ||
(tclStubsPtr->tcl_UniCharNcmp) /* 353 */ | ||
#endif | ||
#ifndef Tcl_UniCharToUtfDString | ||
#define Tcl_UniCharToUtfDString \ | ||
(tclStubsPtr->tcl_UniCharToUtfDString) /* 354 */ | ||
#endif | ||
#ifndef Tcl_UtfToUniCharDString | ||
#define Tcl_UtfToUniCharDString \ | ||
(tclStubsPtr->tcl_UtfToUniCharDString) /* 355 */ | ||
#endif | ||
#ifndef Tcl_GetRegExpFromObj | ||
#define Tcl_GetRegExpFromObj \ | ||
(tclStubsPtr->tcl_GetRegExpFromObj) /* 356 */ | ||
#endif | ||
#ifndef Tcl_EvalTokens | ||
#define Tcl_EvalTokens \ | ||
(tclStubsPtr->tcl_EvalTokens) /* 357 */ | ||
#endif | ||
#ifndef Tcl_FreeParse | ||
#define Tcl_FreeParse \ | ||
(tclStubsPtr->tcl_FreeParse) /* 358 */ | ||
#endif | ||
#ifndef Tcl_LogCommandInfo | ||
#define Tcl_LogCommandInfo \ | ||
(tclStubsPtr->tcl_LogCommandInfo) /* 359 */ | ||
#endif | ||
#ifndef Tcl_ParseBraces | ||
#define Tcl_ParseBraces \ | ||
(tclStubsPtr->tcl_ParseBraces) /* 360 */ | ||
#endif | ||
#ifndef Tcl_ParseCommand | ||
#define Tcl_ParseCommand \ | ||
(tclStubsPtr->tcl_ParseCommand) /* 361 */ | ||
#endif | ||
#ifndef Tcl_ParseExpr | ||
#define Tcl_ParseExpr \ | ||
(tclStubsPtr->tcl_ParseExpr) /* 362 */ | ||
#endif | ||
#ifndef Tcl_ParseQuotedString | ||
#define Tcl_ParseQuotedString \ | ||
(tclStubsPtr->tcl_ParseQuotedString) /* 363 */ | ||
#endif | ||
#ifndef Tcl_ParseVarName | ||
#define Tcl_ParseVarName \ | ||
(tclStubsPtr->tcl_ParseVarName) /* 364 */ | ||
#endif | ||
#ifndef Tcl_GetCwd | ||
#define Tcl_GetCwd \ | ||
(tclStubsPtr->tcl_GetCwd) /* 365 */ | ||
#endif | ||
#ifndef Tcl_Chdir | ||
#define Tcl_Chdir \ | ||
(tclStubsPtr->tcl_Chdir) /* 366 */ | ||
#endif | ||
#ifndef Tcl_Access | ||
#define Tcl_Access \ | ||
(tclStubsPtr->tcl_Access) /* 367 */ | ||
#endif | ||
#ifndef Tcl_Stat | ||
#define Tcl_Stat \ | ||
(tclStubsPtr->tcl_Stat) /* 368 */ | ||
#endif | ||
#ifndef Tcl_UtfNcmp | ||
#define Tcl_UtfNcmp \ | ||
(tclStubsPtr->tcl_UtfNcmp) /* 369 */ | ||
#endif | ||
#ifndef Tcl_UtfNcasecmp | ||
#define Tcl_UtfNcasecmp \ | ||
(tclStubsPtr->tcl_UtfNcasecmp) /* 370 */ | ||
#endif | ||
#ifndef Tcl_StringCaseMatch | ||
#define Tcl_StringCaseMatch \ | ||
(tclStubsPtr->tcl_StringCaseMatch) /* 371 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsControl | ||
#define Tcl_UniCharIsControl \ | ||
(tclStubsPtr->tcl_UniCharIsControl) /* 372 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsGraph | ||
#define Tcl_UniCharIsGraph \ | ||
(tclStubsPtr->tcl_UniCharIsGraph) /* 373 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsPrint | ||
#define Tcl_UniCharIsPrint \ | ||
(tclStubsPtr->tcl_UniCharIsPrint) /* 374 */ | ||
#endif | ||
#ifndef Tcl_UniCharIsPunct | ||
#define Tcl_UniCharIsPunct \ | ||
(tclStubsPtr->tcl_UniCharIsPunct) /* 375 */ | ||
#endif | ||
#ifndef Tcl_RegExpExecObj | ||
#define Tcl_RegExpExecObj \ | ||
(tclStubsPtr->tcl_RegExpExecObj) /* 376 */ | ||
#endif | ||
#ifndef Tcl_RegExpGetInfo | ||
#define Tcl_RegExpGetInfo \ | ||
(tclStubsPtr->tcl_RegExpGetInfo) /* 377 */ | ||
#endif | ||
#ifndef Tcl_NewUnicodeObj | ||
#define Tcl_NewUnicodeObj \ | ||
(tclStubsPtr->tcl_NewUnicodeObj) /* 378 */ | ||
#endif | ||
#ifndef Tcl_SetUnicodeObj | ||
#define Tcl_SetUnicodeObj \ | ||
(tclStubsPtr->tcl_SetUnicodeObj) /* 379 */ | ||
#endif | ||
#ifndef Tcl_GetCharLength | ||
#define Tcl_GetCharLength \ | ||
(tclStubsPtr->tcl_GetCharLength) /* 380 */ | ||
#endif | ||
#ifndef Tcl_GetUniChar | ||
#define Tcl_GetUniChar \ | ||
(tclStubsPtr->tcl_GetUniChar) /* 381 */ | ||
#endif | ||
#ifndef Tcl_GetUnicode | ||
#define Tcl_GetUnicode \ | ||
(tclStubsPtr->tcl_GetUnicode) /* 382 */ | ||
#endif | ||
#ifndef Tcl_GetRange | ||
#define Tcl_GetRange \ | ||
(tclStubsPtr->tcl_GetRange) /* 383 */ | ||
#endif | ||
#ifndef Tcl_AppendUnicodeToObj | ||
#define Tcl_AppendUnicodeToObj \ | ||
(tclStubsPtr->tcl_AppendUnicodeToObj) /* 384 */ | ||
#endif | ||
#ifndef Tcl_RegExpMatchObj | ||
#define Tcl_RegExpMatchObj \ | ||
(tclStubsPtr->tcl_RegExpMatchObj) /* 385 */ | ||
#endif | ||
#ifndef Tcl_SetNotifier | ||
#define Tcl_SetNotifier \ | ||
(tclStubsPtr->tcl_SetNotifier) /* 386 */ | ||
#endif | ||
#ifndef Tcl_GetAllocMutex | ||
#define Tcl_GetAllocMutex \ | ||
(tclStubsPtr->tcl_GetAllocMutex) /* 387 */ | ||
#endif | ||
#ifndef Tcl_GetChannelNames | ||
#define Tcl_GetChannelNames \ | ||
(tclStubsPtr->tcl_GetChannelNames) /* 388 */ | ||
#endif | ||
#ifndef Tcl_GetChannelNamesEx | ||
#define Tcl_GetChannelNamesEx \ | ||
(tclStubsPtr->tcl_GetChannelNamesEx) /* 389 */ | ||
#endif | ||
#ifndef Tcl_ProcObjCmd | ||
#define Tcl_ProcObjCmd \ | ||
(tclStubsPtr->tcl_ProcObjCmd) /* 390 */ | ||
#endif | ||
#ifndef Tcl_ConditionFinalize | ||
#define Tcl_ConditionFinalize \ | ||
(tclStubsPtr->tcl_ConditionFinalize) /* 391 */ | ||
#endif | ||
#ifndef Tcl_MutexFinalize | ||
#define Tcl_MutexFinalize \ | ||
(tclStubsPtr->tcl_MutexFinalize) /* 392 */ | ||
#endif | ||
#ifndef Tcl_CreateThread | ||
#define Tcl_CreateThread \ | ||
(tclStubsPtr->tcl_CreateThread) /* 393 */ | ||
#endif | ||
#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */ | ||
/* !END!: Do not edit above this line. */ | ||
#endif /* _TCLDECLS */ | ||
/* $History: tcldecls.h $ | ||
* | ||
* ***************** Version 1 ***************** | ||
* User: Dtashley Date: 1/02/01 Time: 1:27a | ||
* Created in $/IjuScripter, IjuConsole/Source/Tcl Base | ||
* Initial check-in. | ||
*/ | ||
/* End of TCLDECLS.H */ | ||
1 | /* $Header$ */ | |
2 | /* | |
3 | * tclDecls.h -- | |
4 | * | |
5 | * Declarations of functions in the platform independent public Tcl API. | |
6 | * | |
7 | * Copyright (c) 1998-1999 by Scriptics Corporation. | |
8 | * | |
9 | * See the file "license.terms" for information on usage and redistribution | |
10 | * of this file, and for a DISCLAIMER OF ALL WARRANTIES. | |
11 | * | |
12 | * RCS: @(#) $Id: tcldecls.h,v 1.1.1.1 2001/06/13 04:37:26 dtashley Exp $ | |
13 | */ | |
14 | ||
15 | #ifndef _TCLDECLS | |
16 | #define _TCLDECLS | |
17 | ||
18 | /* | |
19 | * WARNING: This file is automatically generated by the tools/genStubs.tcl | |
20 | * script. Any modifications to the function declarations below should be made | |
21 | * in the generic/tcl.decls script. | |
22 | */ | |
23 | ||
24 | /* !BEGIN!: Do not edit below this line. */ | |
25 | ||
26 | /* | |
27 | * Exported function declarations: | |
28 | */ | |
29 | ||
30 | /* 0 */ | |
31 | EXTERN int Tcl_PkgProvideEx _ANSI_ARGS_((Tcl_Interp * interp, | |
32 | char * name, char * version, | |
33 | ClientData clientData)); | |
34 | /* 1 */ | |
35 | EXTERN char * Tcl_PkgRequireEx _ANSI_ARGS_((Tcl_Interp * interp, | |
36 | char * name, char * version, int exact, | |
37 | ClientData * clientDataPtr)); | |
38 | /* 2 */ | |
39 | EXTERN void Tcl_Panic _ANSI_ARGS_(TCL_VARARGS(char *,format)); | |
40 | /* 3 */ | |
41 | EXTERN char * Tcl_Alloc _ANSI_ARGS_((unsigned int size)); | |
42 | /* 4 */ | |
43 | EXTERN void Tcl_Free _ANSI_ARGS_((char * ptr)); | |
44 | /* 5 */ | |
45 | EXTERN char * Tcl_Realloc _ANSI_ARGS_((char * ptr, | |
46 | unsigned int size)); | |
47 | /* 6 */ | |
48 | EXTERN char * Tcl_DbCkalloc _ANSI_ARGS_((unsigned int size, | |
49 | char * file, int line)); | |
50 | /* 7 */ | |
51 | EXTERN int Tcl_DbCkfree _ANSI_ARGS_((char * ptr, char * file, | |
52 | int line)); | |
53 | /* 8 */ | |
54 | EXTERN char * Tcl_DbCkrealloc _ANSI_ARGS_((char * ptr, | |
55 | unsigned int size, char * file, int line)); | |
56 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
57 | /* 9 */ | |
58 | EXTERN void Tcl_CreateFileHandler _ANSI_ARGS_((int fd, int mask, | |
59 | Tcl_FileProc * proc, ClientData clientData)); | |
60 | #endif /* UNIX */ | |
61 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
62 | /* 10 */ | |
63 | EXTERN void Tcl_DeleteFileHandler _ANSI_ARGS_((int fd)); | |
64 | #endif /* UNIX */ | |
65 | /* 11 */ | |
66 | EXTERN void Tcl_SetTimer _ANSI_ARGS_((Tcl_Time * timePtr)); | |
67 | /* 12 */ | |
68 | EXTERN void Tcl_Sleep _ANSI_ARGS_((int ms)); | |
69 | /* 13 */ | |
70 | EXTERN int Tcl_WaitForEvent _ANSI_ARGS_((Tcl_Time * timePtr)); | |
71 | /* 14 */ | |
72 | EXTERN int Tcl_AppendAllObjTypes _ANSI_ARGS_(( | |
73 | Tcl_Interp * interp, Tcl_Obj * objPtr)); | |
74 | /* 15 */ | |
75 | EXTERN void Tcl_AppendStringsToObj _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr)); | |
76 | /* 16 */ | |
77 | EXTERN void Tcl_AppendToObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
78 | char * bytes, int length)); | |
79 | /* 17 */ | |
80 | EXTERN Tcl_Obj * Tcl_ConcatObj _ANSI_ARGS_((int objc, | |
81 | Tcl_Obj *CONST objv[])); | |
82 | /* 18 */ | |
83 | EXTERN int Tcl_ConvertToType _ANSI_ARGS_((Tcl_Interp * interp, | |
84 | Tcl_Obj * objPtr, Tcl_ObjType * typePtr)); | |
85 | /* 19 */ | |
86 | EXTERN void Tcl_DbDecrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr, | |
87 | char * file, int line)); | |
88 | /* 20 */ | |
89 | EXTERN void Tcl_DbIncrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr, | |
90 | char * file, int line)); | |
91 | /* 21 */ | |
92 | EXTERN int Tcl_DbIsShared _ANSI_ARGS_((Tcl_Obj * objPtr, | |
93 | char * file, int line)); | |
94 | /* 22 */ | |
95 | EXTERN Tcl_Obj * Tcl_DbNewBooleanObj _ANSI_ARGS_((int boolValue, | |
96 | char * file, int line)); | |
97 | /* 23 */ | |
98 | EXTERN Tcl_Obj * Tcl_DbNewByteArrayObj _ANSI_ARGS_(( | |
99 | unsigned char * bytes, int length, | |
100 | char * file, int line)); | |
101 | /* 24 */ | |
102 | EXTERN Tcl_Obj * Tcl_DbNewDoubleObj _ANSI_ARGS_((double doubleValue, | |
103 | char * file, int line)); | |
104 | /* 25 */ | |
105 | EXTERN Tcl_Obj * Tcl_DbNewListObj _ANSI_ARGS_((int objc, | |
106 | Tcl_Obj *CONST objv[], char * file, int line)); | |
107 | /* 26 */ | |
108 | EXTERN Tcl_Obj * Tcl_DbNewLongObj _ANSI_ARGS_((long longValue, | |
109 | char * file, int line)); | |
110 | /* 27 */ | |
111 | EXTERN Tcl_Obj * Tcl_DbNewObj _ANSI_ARGS_((char * file, int line)); | |
112 | /* 28 */ | |
113 | EXTERN Tcl_Obj * Tcl_DbNewStringObj _ANSI_ARGS_((CONST char * bytes, | |
114 | int length, char * file, int line)); | |
115 | /* 29 */ | |
116 | EXTERN Tcl_Obj * Tcl_DuplicateObj _ANSI_ARGS_((Tcl_Obj * objPtr)); | |
117 | /* 30 */ | |
118 | EXTERN void TclFreeObj _ANSI_ARGS_((Tcl_Obj * objPtr)); | |
119 | /* 31 */ | |
120 | EXTERN int Tcl_GetBoolean _ANSI_ARGS_((Tcl_Interp * interp, | |
121 | char * str, int * boolPtr)); | |
122 | /* 32 */ | |
123 | EXTERN int Tcl_GetBooleanFromObj _ANSI_ARGS_(( | |
124 | Tcl_Interp * interp, Tcl_Obj * objPtr, | |
125 | int * boolPtr)); | |
126 | /* 33 */ | |
127 | EXTERN unsigned char * Tcl_GetByteArrayFromObj _ANSI_ARGS_(( | |
128 | Tcl_Obj * objPtr, int * lengthPtr)); | |
129 | /* 34 */ | |
130 | EXTERN int Tcl_GetDouble _ANSI_ARGS_((Tcl_Interp * interp, | |
131 | char * str, double * doublePtr)); | |
132 | /* 35 */ | |
133 | EXTERN int Tcl_GetDoubleFromObj _ANSI_ARGS_(( | |
134 | Tcl_Interp * interp, Tcl_Obj * objPtr, | |
135 | double * doublePtr)); | |
136 | /* 36 */ | |
137 | EXTERN int Tcl_GetIndexFromObj _ANSI_ARGS_((Tcl_Interp * interp, | |
138 | Tcl_Obj * objPtr, char ** tablePtr, | |
139 | char * msg, int flags, int * indexPtr)); | |
140 | /* 37 */ | |
141 | EXTERN int Tcl_GetInt _ANSI_ARGS_((Tcl_Interp * interp, | |
142 | char * str, int * intPtr)); | |
143 | /* 38 */ | |
144 | EXTERN int Tcl_GetIntFromObj _ANSI_ARGS_((Tcl_Interp * interp, | |
145 | Tcl_Obj * objPtr, int * intPtr)); | |
146 | /* 39 */ | |
147 | EXTERN int Tcl_GetLongFromObj _ANSI_ARGS_((Tcl_Interp * interp, | |
148 | Tcl_Obj * objPtr, long * longPtr)); | |
149 | /* 40 */ | |
150 | EXTERN Tcl_ObjType * Tcl_GetObjType _ANSI_ARGS_((char * typeName)); | |
151 | /* 41 */ | |
152 | EXTERN char * Tcl_GetStringFromObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
153 | int * lengthPtr)); | |
154 | /* 42 */ | |
155 | EXTERN void Tcl_InvalidateStringRep _ANSI_ARGS_(( | |
156 | Tcl_Obj * objPtr)); | |
157 | /* 43 */ | |
158 | EXTERN int Tcl_ListObjAppendList _ANSI_ARGS_(( | |
159 | Tcl_Interp * interp, Tcl_Obj * listPtr, | |
160 | Tcl_Obj * elemListPtr)); | |
161 | /* 44 */ | |
162 | EXTERN int Tcl_ListObjAppendElement _ANSI_ARGS_(( | |
163 | Tcl_Interp * interp, Tcl_Obj * listPtr, | |
164 | Tcl_Obj * objPtr)); | |
165 | /* 45 */ | |
166 | EXTERN int Tcl_ListObjGetElements _ANSI_ARGS_(( | |
167 | Tcl_Interp * interp, Tcl_Obj * listPtr, | |
168 | int * objcPtr, Tcl_Obj *** objvPtr)); | |
169 | /* 46 */ | |
170 | EXTERN int Tcl_ListObjIndex _ANSI_ARGS_((Tcl_Interp * interp, | |
171 | Tcl_Obj * listPtr, int index, | |
172 | Tcl_Obj ** objPtrPtr)); | |
173 | /* 47 */ | |
174 | EXTERN int Tcl_ListObjLength _ANSI_ARGS_((Tcl_Interp * interp, | |
175 | Tcl_Obj * listPtr, int * intPtr)); | |
176 | /* 48 */ | |
177 | EXTERN int Tcl_ListObjReplace _ANSI_ARGS_((Tcl_Interp * interp, | |
178 | Tcl_Obj * listPtr, int first, int count, | |
179 | int objc, Tcl_Obj *CONST objv[])); | |
180 | /* 49 */ | |
181 | EXTERN Tcl_Obj * Tcl_NewBooleanObj _ANSI_ARGS_((int boolValue)); | |
182 | /* 50 */ | |
183 | EXTERN Tcl_Obj * Tcl_NewByteArrayObj _ANSI_ARGS_(( | |
184 | unsigned char * bytes, int length)); | |
185 | /* 51 */ | |
186 | EXTERN Tcl_Obj * Tcl_NewDoubleObj _ANSI_ARGS_((double doubleValue)); | |
187 | /* 52 */ | |
188 | EXTERN Tcl_Obj * Tcl_NewIntObj _ANSI_ARGS_((int intValue)); | |
189 | /* 53 */ | |
190 | EXTERN Tcl_Obj * Tcl_NewListObj _ANSI_ARGS_((int objc, | |
191 | Tcl_Obj *CONST objv[])); | |
192 | /* 54 */ | |
193 | EXTERN Tcl_Obj * Tcl_NewLongObj _ANSI_ARGS_((long longValue)); | |
194 | /* 55 */ | |
195 | EXTERN Tcl_Obj * Tcl_NewObj _ANSI_ARGS_((void)); | |
196 | /* 56 */ | |
197 | EXTERN Tcl_Obj * Tcl_NewStringObj _ANSI_ARGS_((CONST char * bytes, | |
198 | int length)); | |
199 | /* 57 */ | |
200 | EXTERN void Tcl_SetBooleanObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
201 | int boolValue)); | |
202 | /* 58 */ | |
203 | EXTERN unsigned char * Tcl_SetByteArrayLength _ANSI_ARGS_((Tcl_Obj * objPtr, | |
204 | int length)); | |
205 | /* 59 */ | |
206 | EXTERN void Tcl_SetByteArrayObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
207 | unsigned char * bytes, int length)); | |
208 | /* 60 */ | |
209 | EXTERN void Tcl_SetDoubleObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
210 | double doubleValue)); | |
211 | /* 61 */ | |
212 | EXTERN void Tcl_SetIntObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
213 | int intValue)); | |
214 | /* 62 */ | |
215 | EXTERN void Tcl_SetListObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
216 | int objc, Tcl_Obj *CONST objv[])); | |
217 | /* 63 */ | |
218 | EXTERN void Tcl_SetLongObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
219 | long longValue)); | |
220 | /* 64 */ | |
221 | EXTERN void Tcl_SetObjLength _ANSI_ARGS_((Tcl_Obj * objPtr, | |
222 | int length)); | |
223 | /* 65 */ | |
224 | EXTERN void Tcl_SetStringObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
225 | char * bytes, int length)); | |
226 | /* 66 */ | |
227 | EXTERN void Tcl_AddErrorInfo _ANSI_ARGS_((Tcl_Interp * interp, | |
228 | CONST char * message)); | |
229 | /* 67 */ | |
230 | EXTERN void Tcl_AddObjErrorInfo _ANSI_ARGS_((Tcl_Interp * interp, | |
231 | CONST char * message, int length)); | |
232 | /* 68 */ | |
233 | EXTERN void Tcl_AllowExceptions _ANSI_ARGS_((Tcl_Interp * interp)); | |
234 | /* 69 */ | |
235 | EXTERN void Tcl_AppendElement _ANSI_ARGS_((Tcl_Interp * interp, | |
236 | CONST char * string)); | |
237 | /* 70 */ | |
238 | EXTERN void Tcl_AppendResult _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); | |
239 | /* 71 */ | |
240 | EXTERN Tcl_AsyncHandler Tcl_AsyncCreate _ANSI_ARGS_((Tcl_AsyncProc * proc, | |
241 | ClientData clientData)); | |
242 | /* 72 */ | |
243 | EXTERN void Tcl_AsyncDelete _ANSI_ARGS_((Tcl_AsyncHandler async)); | |
244 | /* 73 */ | |
245 | EXTERN int Tcl_AsyncInvoke _ANSI_ARGS_((Tcl_Interp * interp, | |
246 | int code)); | |
247 | /* 74 */ | |
248 | EXTERN void Tcl_AsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async)); | |
249 | /* 75 */ | |
250 | EXTERN int Tcl_AsyncReady _ANSI_ARGS_((void)); | |
251 | /* 76 */ | |
252 | EXTERN void Tcl_BackgroundError _ANSI_ARGS_((Tcl_Interp * interp)); | |
253 | /* 77 */ | |
254 | EXTERN char Tcl_Backslash _ANSI_ARGS_((CONST char * src, | |
255 | int * readPtr)); | |
256 | /* 78 */ | |
257 | EXTERN int Tcl_BadChannelOption _ANSI_ARGS_(( | |
258 | Tcl_Interp * interp, char * optionName, | |
259 | char * optionList)); | |
260 | /* 79 */ | |
261 | EXTERN void Tcl_CallWhenDeleted _ANSI_ARGS_((Tcl_Interp * interp, | |
262 | Tcl_InterpDeleteProc * proc, | |
263 | ClientData clientData)); | |
264 | /* 80 */ | |
265 | EXTERN void Tcl_CancelIdleCall _ANSI_ARGS_(( | |
266 | Tcl_IdleProc * idleProc, | |
267 | ClientData clientData)); | |
268 | /* 81 */ | |
269 | EXTERN int Tcl_Close _ANSI_ARGS_((Tcl_Interp * interp, | |
270 | Tcl_Channel chan)); | |
271 | /* 82 */ | |
272 | EXTERN int Tcl_CommandComplete _ANSI_ARGS_((char * cmd)); | |
273 | /* 83 */ | |
274 | EXTERN char * Tcl_Concat _ANSI_ARGS_((int argc, char ** argv)); | |
275 | /* 84 */ | |
276 | EXTERN int Tcl_ConvertElement _ANSI_ARGS_((CONST char * src, | |
277 | char * dst, int flags)); | |
278 | /* 85 */ | |
279 | EXTERN int Tcl_ConvertCountedElement _ANSI_ARGS_(( | |
280 | CONST char * src, int length, char * dst, | |
281 | int flags)); | |
282 | /* 86 */ | |
283 | EXTERN int Tcl_CreateAlias _ANSI_ARGS_((Tcl_Interp * slave, | |
284 | char * slaveCmd, Tcl_Interp * target, | |
285 | char * targetCmd, int argc, char ** argv)); | |
286 | /* 87 */ | |
287 | EXTERN int Tcl_CreateAliasObj _ANSI_ARGS_((Tcl_Interp * slave, | |
288 | char * slaveCmd, Tcl_Interp * target, | |
289 | char * targetCmd, int objc, | |
290 | Tcl_Obj *CONST objv[])); | |
291 | /* 88 */ | |
292 | EXTERN Tcl_Channel Tcl_CreateChannel _ANSI_ARGS_(( | |
293 | Tcl_ChannelType * typePtr, char * chanName, | |
294 | ClientData instanceData, int mask)); | |
295 | /* 89 */ | |
296 | EXTERN void Tcl_CreateChannelHandler _ANSI_ARGS_(( | |
297 | Tcl_Channel chan, int mask, | |
298 | Tcl_ChannelProc * proc, | |
299 | ClientData clientData)); | |
300 | /* 90 */ | |
301 | EXTERN void Tcl_CreateCloseHandler _ANSI_ARGS_((Tcl_Channel chan, | |
302 | Tcl_CloseProc * proc, ClientData clientData)); | |
303 | /* 91 */ | |
304 | EXTERN Tcl_Command Tcl_CreateCommand _ANSI_ARGS_((Tcl_Interp * interp, | |
305 | char * cmdName, Tcl_CmdProc * proc, | |
306 | ClientData clientData, | |
307 | Tcl_CmdDeleteProc * deleteProc)); | |
308 | /* 92 */ | |
309 | EXTERN void Tcl_CreateEventSource _ANSI_ARGS_(( | |
310 | Tcl_EventSetupProc * setupProc, | |
311 | Tcl_EventCheckProc * checkProc, | |
312 | ClientData clientData)); | |
313 | /* 93 */ | |
314 | EXTERN void Tcl_CreateExitHandler _ANSI_ARGS_(( | |
315 | Tcl_ExitProc * proc, ClientData clientData)); | |
316 | /* 94 */ | |
317 | EXTERN Tcl_Interp * Tcl_CreateInterp _ANSI_ARGS_((void)); | |
318 | /* 95 */ | |
319 | EXTERN void Tcl_CreateMathFunc _ANSI_ARGS_((Tcl_Interp * interp, | |
320 | char * name, int numArgs, | |
321 | Tcl_ValueType * argTypes, | |
322 | Tcl_MathProc * proc, ClientData clientData)); | |
323 | /* 96 */ | |
324 | EXTERN Tcl_Command Tcl_CreateObjCommand _ANSI_ARGS_(( | |
325 | Tcl_Interp * interp, char * cmdName, | |
326 | Tcl_ObjCmdProc * proc, ClientData clientData, | |
327 | Tcl_CmdDeleteProc * deleteProc)); | |
328 | /* 97 */ | |
329 | EXTERN Tcl_Interp * Tcl_CreateSlave _ANSI_ARGS_((Tcl_Interp * interp, | |
330 | char * slaveName, int isSafe)); | |
331 | /* 98 */ | |
332 | EXTERN Tcl_TimerToken Tcl_CreateTimerHandler _ANSI_ARGS_((int milliseconds, | |
333 | Tcl_TimerProc * proc, ClientData clientData)); | |
334 | /* 99 */ | |
335 | EXTERN Tcl_Trace Tcl_CreateTrace _ANSI_ARGS_((Tcl_Interp * interp, | |
336 | int level, Tcl_CmdTraceProc * proc, | |
337 | ClientData clientData)); | |
338 | /* 100 */ | |
339 | EXTERN void Tcl_DeleteAssocData _ANSI_ARGS_((Tcl_Interp * interp, | |
340 | char * name)); | |
341 | /* 101 */ | |
342 | EXTERN void Tcl_DeleteChannelHandler _ANSI_ARGS_(( | |
343 | Tcl_Channel chan, Tcl_ChannelProc * proc, | |
344 | ClientData clientData)); | |
345 | /* 102 */ | |
346 | EXTERN void Tcl_DeleteCloseHandler _ANSI_ARGS_((Tcl_Channel chan, | |
347 | Tcl_CloseProc * proc, ClientData clientData)); | |
348 | /* 103 */ | |
349 | EXTERN int Tcl_DeleteCommand _ANSI_ARGS_((Tcl_Interp * interp, | |
350 | char * cmdName)); | |
351 | /* 104 */ | |
352 | EXTERN int Tcl_DeleteCommandFromToken _ANSI_ARGS_(( | |
353 | Tcl_Interp * interp, Tcl_Command command)); | |
354 | /* 105 */ | |
355 | EXTERN void Tcl_DeleteEvents _ANSI_ARGS_(( | |
356 | Tcl_EventDeleteProc * proc, | |
357 | ClientData clientData)); | |
358 | /* 106 */ | |
359 | EXTERN void Tcl_DeleteEventSource _ANSI_ARGS_(( | |
360 | Tcl_EventSetupProc * setupProc, | |
361 | Tcl_EventCheckProc * checkProc, | |
362 | ClientData clientData)); | |
363 | /* 107 */ | |
364 | EXTERN void Tcl_DeleteExitHandler _ANSI_ARGS_(( | |
365 | Tcl_ExitProc * proc, ClientData clientData)); | |
366 | /* 108 */ | |
367 | EXTERN void Tcl_DeleteHashEntry _ANSI_ARGS_(( | |
368 | Tcl_HashEntry * entryPtr)); | |
369 | /* 109 */ | |
370 | EXTERN void Tcl_DeleteHashTable _ANSI_ARGS_(( | |
371 | Tcl_HashTable * tablePtr)); | |
372 | /* 110 */ | |
373 | EXTERN void Tcl_DeleteInterp _ANSI_ARGS_((Tcl_Interp * interp)); | |
374 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
375 | /* 111 */ | |
376 | EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids, | |
377 | Tcl_Pid * pidPtr)); | |
378 | #endif /* UNIX */ | |
379 | #ifdef __WIN32__ | |
380 | /* 111 */ | |
381 | EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids, | |
382 | Tcl_Pid * pidPtr)); | |
383 | #endif /* __WIN32__ */ | |
384 | /* 112 */ | |
385 | EXTERN void Tcl_DeleteTimerHandler _ANSI_ARGS_(( | |
386 | Tcl_TimerToken token)); | |
387 | /* 113 */ | |
388 | EXTERN void Tcl_DeleteTrace _ANSI_ARGS_((Tcl_Interp * interp, | |
389 | Tcl_Trace trace)); | |
390 | /* 114 */ | |
391 | EXTERN void Tcl_DontCallWhenDeleted _ANSI_ARGS_(( | |
392 | Tcl_Interp * interp, | |
393 | Tcl_InterpDeleteProc * proc, | |
394 | ClientData clientData)); | |
395 | /* 115 */ | |
396 | EXTERN int Tcl_DoOneEvent _ANSI_ARGS_((int flags)); | |
397 | /* 116 */ | |
398 | EXTERN void Tcl_DoWhenIdle _ANSI_ARGS_((Tcl_IdleProc * proc, | |
399 | ClientData clientData)); | |
400 | /* 117 */ | |
401 | EXTERN char * Tcl_DStringAppend _ANSI_ARGS_((Tcl_DString * dsPtr, | |
402 | CONST char * str, int length)); | |
403 | /* 118 */ | |
404 | EXTERN char * Tcl_DStringAppendElement _ANSI_ARGS_(( | |
405 | Tcl_DString * dsPtr, CONST char * string)); | |
406 | /* 119 */ | |
407 | EXTERN void Tcl_DStringEndSublist _ANSI_ARGS_(( | |
408 | Tcl_DString * dsPtr)); | |
409 | /* 120 */ | |
410 | EXTERN void Tcl_DStringFree _ANSI_ARGS_((Tcl_DString * dsPtr)); | |
411 | /* 121 */ | |
412 | EXTERN void Tcl_DStringGetResult _ANSI_ARGS_(( | |
413 | Tcl_Interp * interp, Tcl_DString * dsPtr)); | |
414 | /* 122 */ | |
415 | EXTERN void Tcl_DStringInit _ANSI_ARGS_((Tcl_DString * dsPtr)); | |
416 | /* 123 */ | |
417 | EXTERN void Tcl_DStringResult _ANSI_ARGS_((Tcl_Interp * interp, | |
418 | Tcl_DString * dsPtr)); | |
419 | /* 124 */ | |
420 | EXTERN void Tcl_DStringSetLength _ANSI_ARGS_(( | |
421 | Tcl_DString * dsPtr, int length)); | |
422 | /* 125 */ | |
423 | EXTERN void Tcl_DStringStartSublist _ANSI_ARGS_(( | |
424 | Tcl_DString * dsPtr)); | |
425 | /* 126 */ | |
426 | EXTERN int Tcl_Eof _ANSI_ARGS_((Tcl_Channel chan)); | |
427 | /* 127 */ | |
428 | EXTERN char * Tcl_ErrnoId _ANSI_ARGS_((void)); | |
429 | /* 128 */ | |
430 | EXTERN char * Tcl_ErrnoMsg _ANSI_ARGS_((int err)); | |
431 | /* 129 */ | |
432 | EXTERN int Tcl_Eval _ANSI_ARGS_((Tcl_Interp * interp, | |
433 | char * string)); | |
434 | /* 130 */ | |
435 | EXTERN int Tcl_EvalFile _ANSI_ARGS_((Tcl_Interp * interp, | |
436 | char * fileName)); | |
437 | /* 131 */ | |
438 | EXTERN int Tcl_EvalObj _ANSI_ARGS_((Tcl_Interp * interp, | |
439 | Tcl_Obj * objPtr)); | |
440 | /* 132 */ | |
441 | EXTERN void Tcl_EventuallyFree _ANSI_ARGS_(( | |
442 | ClientData clientData, | |
443 | Tcl_FreeProc * freeProc)); | |
444 | /* 133 */ | |
445 | EXTERN void Tcl_Exit _ANSI_ARGS_((int status)); | |
446 | /* 134 */ | |
447 | EXTERN int Tcl_ExposeCommand _ANSI_ARGS_((Tcl_Interp * interp, | |
448 | char * hiddenCmdToken, char * cmdName)); | |
449 | /* 135 */ | |
450 | EXTERN int Tcl_ExprBoolean _ANSI_ARGS_((Tcl_Interp * interp, | |
451 | char * str, int * ptr)); | |
452 | /* 136 */ | |
453 | EXTERN int Tcl_ExprBooleanObj _ANSI_ARGS_((Tcl_Interp * interp, | |
454 | Tcl_Obj * objPtr, int * ptr)); | |
455 | /* 137 */ | |
456 | EXTERN int Tcl_ExprDouble _ANSI_ARGS_((Tcl_Interp * interp, | |
457 | char * str, double * ptr)); | |
458 | /* 138 */ | |
459 | EXTERN int Tcl_ExprDoubleObj _ANSI_ARGS_((Tcl_Interp * interp, | |
460 | Tcl_Obj * objPtr, double * ptr)); | |
461 | /* 139 */ | |
462 | EXTERN int Tcl_ExprLong _ANSI_ARGS_((Tcl_Interp * interp, | |
463 | char * str, long * ptr)); | |
464 | /* 140 */ | |
465 | EXTERN int Tcl_ExprLongObj _ANSI_ARGS_((Tcl_Interp * interp, | |
466 | Tcl_Obj * objPtr, long * ptr)); | |
467 | /* 141 */ | |
468 | EXTERN int Tcl_ExprObj _ANSI_ARGS_((Tcl_Interp * interp, | |
469 | Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr)); | |
470 | /* 142 */ | |
471 | EXTERN int Tcl_ExprString _ANSI_ARGS_((Tcl_Interp * interp, | |
472 | char * string)); | |
473 | /* 143 */ | |
474 | EXTERN void Tcl_Finalize _ANSI_ARGS_((void)); | |
475 | /* 144 */ | |
476 | EXTERN void Tcl_FindExecutable _ANSI_ARGS_((CONST char * argv0)); | |
477 | /* 145 */ | |
478 | EXTERN Tcl_HashEntry * Tcl_FirstHashEntry _ANSI_ARGS_(( | |
479 | Tcl_HashTable * tablePtr, | |
480 | Tcl_HashSearch * searchPtr)); | |
481 | /* 146 */ | |
482 | EXTERN int Tcl_Flush _ANSI_ARGS_((Tcl_Channel chan)); | |
483 | /* 147 */ | |
484 | EXTERN void Tcl_FreeResult _ANSI_ARGS_((Tcl_Interp * interp)); | |
485 | /* 148 */ | |
486 | EXTERN int Tcl_GetAlias _ANSI_ARGS_((Tcl_Interp * interp, | |
487 | char * slaveCmd, | |
488 | Tcl_Interp ** targetInterpPtr, | |
489 | char ** targetCmdPtr, int * argcPtr, | |
490 | char *** argvPtr)); | |
491 | /* 149 */ | |
492 | EXTERN int Tcl_GetAliasObj _ANSI_ARGS_((Tcl_Interp * interp, | |
493 | char * slaveCmd, | |
494 | Tcl_Interp ** targetInterpPtr, | |
495 | char ** targetCmdPtr, int * objcPtr, | |
496 | Tcl_Obj *** objv)); | |
497 | /* 150 */ | |
498 | EXTERN ClientData Tcl_GetAssocData _ANSI_ARGS_((Tcl_Interp * interp, | |
499 | char * name, Tcl_InterpDeleteProc ** procPtr)); | |
500 | /* 151 */ | |
501 | EXTERN Tcl_Channel Tcl_GetChannel _ANSI_ARGS_((Tcl_Interp * interp, | |
502 | char * chanName, int * modePtr)); | |
503 | /* 152 */ | |
504 | EXTERN int Tcl_GetChannelBufferSize _ANSI_ARGS_(( | |
505 | Tcl_Channel chan)); | |
506 | /* 153 */ | |
507 | EXTERN int Tcl_GetChannelHandle _ANSI_ARGS_((Tcl_Channel chan, | |
508 | int direction, ClientData * handlePtr)); | |
509 | /* 154 */ | |
510 | EXTERN ClientData Tcl_GetChannelInstanceData _ANSI_ARGS_(( | |
511 | Tcl_Channel chan)); | |
512 | /* 155 */ | |
513 | EXTERN int Tcl_GetChannelMode _ANSI_ARGS_((Tcl_Channel chan)); | |
514 | /* 156 */ | |
515 | EXTERN char * Tcl_GetChannelName _ANSI_ARGS_((Tcl_Channel chan)); | |
516 | /* 157 */ | |
517 | EXTERN int Tcl_GetChannelOption _ANSI_ARGS_(( | |
518 | Tcl_Interp * interp, Tcl_Channel chan, | |
519 | char * optionName, Tcl_DString * dsPtr)); | |
520 | /* 158 */ | |
521 | EXTERN Tcl_ChannelType * Tcl_GetChannelType _ANSI_ARGS_((Tcl_Channel chan)); | |
522 | /* 159 */ | |
523 | EXTERN int Tcl_GetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, | |
524 | char * cmdName, Tcl_CmdInfo * infoPtr)); | |
525 | /* 160 */ | |
526 | EXTERN char * Tcl_GetCommandName _ANSI_ARGS_((Tcl_Interp * interp, | |
527 | Tcl_Command command)); | |
528 | /* 161 */ | |
529 | EXTERN int Tcl_GetErrno _ANSI_ARGS_((void)); | |
530 | /* 162 */ | |
531 | EXTERN char * Tcl_GetHostName _ANSI_ARGS_((void)); | |
532 | /* 163 */ | |
533 | EXTERN int Tcl_GetInterpPath _ANSI_ARGS_(( | |
534 | Tcl_Interp * askInterp, | |
535 | Tcl_Interp * slaveInterp)); | |
536 | /* 164 */ | |
537 | EXTERN Tcl_Interp * Tcl_GetMaster _ANSI_ARGS_((Tcl_Interp * interp)); | |
538 | /* 165 */ | |
539 | EXTERN CONST char * Tcl_GetNameOfExecutable _ANSI_ARGS_((void)); | |
540 | /* 166 */ | |
541 | EXTERN Tcl_Obj * Tcl_GetObjResult _ANSI_ARGS_((Tcl_Interp * interp)); | |
542 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
543 | /* 167 */ | |
544 | EXTERN int Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp, | |
545 | char * str, int forWriting, int checkUsage, | |
546 | ClientData * filePtr)); | |
547 | #endif /* UNIX */ | |
548 | /* 168 */ | |
549 | EXTERN Tcl_PathType Tcl_GetPathType _ANSI_ARGS_((char * path)); | |
550 | /* 169 */ | |
551 | EXTERN int Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan, | |
552 | Tcl_DString * dsPtr)); | |
553 | /* 170 */ | |
554 | EXTERN int Tcl_GetsObj _ANSI_ARGS_((Tcl_Channel chan, | |
555 | Tcl_Obj * objPtr)); | |
556 | /* 171 */ | |
557 | EXTERN int Tcl_GetServiceMode _ANSI_ARGS_((void)); | |
558 | /* 172 */ | |
559 | EXTERN Tcl_Interp * Tcl_GetSlave _ANSI_ARGS_((Tcl_Interp * interp, | |
560 | char * slaveName)); | |
561 | /* 173 */ | |
562 | EXTERN Tcl_Channel Tcl_GetStdChannel _ANSI_ARGS_((int type)); | |
563 | /* 174 */ | |
564 | EXTERN char * Tcl_GetStringResult _ANSI_ARGS_((Tcl_Interp * interp)); | |
565 | /* 175 */ | |
566 | EXTERN char * Tcl_GetVar _ANSI_ARGS_((Tcl_Interp * interp, | |
567 | char * varName, int flags)); | |
568 | /* 176 */ | |
569 | EXTERN char * Tcl_GetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
570 | char * part1, char * part2, int flags)); | |
571 | /* 177 */ | |
572 | EXTERN int Tcl_GlobalEval _ANSI_ARGS_((Tcl_Interp * interp, | |
573 | char * command)); | |
574 | /* 178 */ | |
575 | EXTERN int Tcl_GlobalEvalObj _ANSI_ARGS_((Tcl_Interp * interp, | |
576 | Tcl_Obj * objPtr)); | |
577 | /* 179 */ | |
578 | EXTERN int Tcl_HideCommand _ANSI_ARGS_((Tcl_Interp * interp, | |
579 | char * cmdName, char * hiddenCmdToken)); | |
580 | /* 180 */ | |
581 | EXTERN int Tcl_Init _ANSI_ARGS_((Tcl_Interp * interp)); | |
582 | /* 181 */ | |
583 | EXTERN void Tcl_InitHashTable _ANSI_ARGS_(( | |
584 | Tcl_HashTable * tablePtr, int keyType)); | |
585 | /* 182 */ | |
586 | EXTERN int Tcl_InputBlocked _ANSI_ARGS_((Tcl_Channel chan)); | |
587 | /* 183 */ | |
588 | EXTERN int Tcl_InputBuffered _ANSI_ARGS_((Tcl_Channel chan)); | |
589 | /* 184 */ | |
590 | EXTERN int Tcl_InterpDeleted _ANSI_ARGS_((Tcl_Interp * interp)); | |
591 | /* 185 */ | |
592 | EXTERN int Tcl_IsSafe _ANSI_ARGS_((Tcl_Interp * interp)); | |
593 | /* 186 */ | |
594 | EXTERN char * Tcl_JoinPath _ANSI_ARGS_((int argc, char ** argv, | |
595 | Tcl_DString * resultPtr)); | |
596 | /* 187 */ | |
597 | EXTERN int Tcl_LinkVar _ANSI_ARGS_((Tcl_Interp * interp, | |
598 | char * varName, char * addr, int type)); | |
599 | /* Slot 188 is reserved */ | |
600 | /* 189 */ | |
601 | EXTERN Tcl_Channel Tcl_MakeFileChannel _ANSI_ARGS_((ClientData handle, | |
602 | int mode)); | |
603 | /* 190 */ | |
604 | EXTERN int Tcl_MakeSafe _ANSI_ARGS_((Tcl_Interp * interp)); | |
605 | /* 191 */ | |
606 | EXTERN Tcl_Channel Tcl_MakeTcpClientChannel _ANSI_ARGS_(( | |
607 | ClientData tcpSocket)); | |
608 | /* 192 */ | |
609 | EXTERN char * Tcl_Merge _ANSI_ARGS_((int argc, char ** argv)); | |
610 | /* 193 */ | |
611 | EXTERN Tcl_HashEntry * Tcl_NextHashEntry _ANSI_ARGS_(( | |
612 | Tcl_HashSearch * searchPtr)); | |
613 | /* 194 */ | |
614 | EXTERN void Tcl_NotifyChannel _ANSI_ARGS_((Tcl_Channel channel, | |
615 | int mask)); | |
616 | /* 195 */ | |
617 | EXTERN Tcl_Obj * Tcl_ObjGetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
618 | Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, | |
619 | int flags)); | |
620 | /* 196 */ | |
621 | EXTERN Tcl_Obj * Tcl_ObjSetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
622 | Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, | |
623 | Tcl_Obj * newValuePtr, int flags)); | |
624 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
625 | /* 197 */ | |
626 | EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_(( | |
627 | Tcl_Interp * interp, int argc, char ** argv, | |
628 | int flags)); | |
629 | #endif /* UNIX */ | |
630 | #ifdef __WIN32__ | |
631 | /* 197 */ | |
632 | EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_(( | |
633 | Tcl_Interp * interp, int argc, char ** argv, | |
634 | int flags)); | |
635 | #endif /* __WIN32__ */ | |
636 | /* 198 */ | |
637 | EXTERN Tcl_Channel Tcl_OpenFileChannel _ANSI_ARGS_((Tcl_Interp * interp, | |
638 | char * fileName, char * modeString, | |
639 | int permissions)); | |
640 | /* 199 */ | |
641 | EXTERN Tcl_Channel Tcl_OpenTcpClient _ANSI_ARGS_((Tcl_Interp * interp, | |
642 | int port, char * address, char * myaddr, | |
643 | int myport, int async)); | |
644 | /* 200 */ | |
645 | EXTERN Tcl_Channel Tcl_OpenTcpServer _ANSI_ARGS_((Tcl_Interp * interp, | |
646 | int port, char * host, | |
647 | Tcl_TcpAcceptProc * acceptProc, | |
648 | ClientData callbackData)); | |
649 | /* 201 */ | |
650 | EXTERN void Tcl_Preserve _ANSI_ARGS_((ClientData data)); | |
651 | /* 202 */ | |
652 | EXTERN void Tcl_PrintDouble _ANSI_ARGS_((Tcl_Interp * interp, | |
653 | double value, char * dst)); | |
654 | /* 203 */ | |
655 | EXTERN int Tcl_PutEnv _ANSI_ARGS_((CONST char * string)); | |
656 | /* 204 */ | |
657 | EXTERN char * Tcl_PosixError _ANSI_ARGS_((Tcl_Interp * interp)); | |
658 | /* 205 */ | |
659 | EXTERN void Tcl_QueueEvent _ANSI_ARGS_((Tcl_Event * evPtr, | |
660 | Tcl_QueuePosition position)); | |
661 | /* 206 */ | |
662 | EXTERN int Tcl_Read _ANSI_ARGS_((Tcl_Channel chan, | |
663 | char * bufPtr, int toRead)); | |
664 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
665 | /* 207 */ | |
666 | EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void)); | |
667 | #endif /* UNIX */ | |
668 | #ifdef __WIN32__ | |
669 | /* 207 */ | |
670 | EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void)); | |
671 | #endif /* __WIN32__ */ | |
672 | /* 208 */ | |
673 | EXTERN int Tcl_RecordAndEval _ANSI_ARGS_((Tcl_Interp * interp, | |
674 | char * cmd, int flags)); | |
675 | /* 209 */ | |
676 | EXTERN int Tcl_RecordAndEvalObj _ANSI_ARGS_(( | |
677 | Tcl_Interp * interp, Tcl_Obj * cmdPtr, | |
678 | int flags)); | |
679 | /* 210 */ | |
680 | EXTERN void Tcl_RegisterChannel _ANSI_ARGS_((Tcl_Interp * interp, | |
681 | Tcl_Channel chan)); | |
682 | /* 211 */ | |
683 | EXTERN void Tcl_RegisterObjType _ANSI_ARGS_(( | |
684 | Tcl_ObjType * typePtr)); | |
685 | /* 212 */ | |
686 | EXTERN Tcl_RegExp Tcl_RegExpCompile _ANSI_ARGS_((Tcl_Interp * interp, | |
687 | char * string)); | |
688 | /* 213 */ | |
689 | EXTERN int Tcl_RegExpExec _ANSI_ARGS_((Tcl_Interp * interp, | |
690 | Tcl_RegExp regexp, CONST char * str, | |
691 | CONST char * start)); | |
692 | /* 214 */ | |
693 | EXTERN int Tcl_RegExpMatch _ANSI_ARGS_((Tcl_Interp * interp, | |
694 | char * str, char * pattern)); | |
695 | /* 215 */ | |
696 | EXTERN void Tcl_RegExpRange _ANSI_ARGS_((Tcl_RegExp regexp, | |
697 | int index, char ** startPtr, char ** endPtr)); | |
698 | /* 216 */ | |
699 | EXTERN void Tcl_Release _ANSI_ARGS_((ClientData clientData)); | |
700 | /* 217 */ | |
701 | EXTERN void Tcl_ResetResult _ANSI_ARGS_((Tcl_Interp * interp)); | |
702 | /* 218 */ | |
703 | EXTERN int Tcl_ScanElement _ANSI_ARGS_((CONST char * str, | |
704 | int * flagPtr)); | |
705 | /* 219 */ | |
706 | EXTERN int Tcl_ScanCountedElement _ANSI_ARGS_((CONST char * str, | |
707 | int length, int * flagPtr)); | |
708 | /* 220 */ | |
709 | EXTERN int Tcl_Seek _ANSI_ARGS_((Tcl_Channel chan, int offset, | |
710 | int mode)); | |
711 | /* 221 */ | |
712 | EXTERN int Tcl_ServiceAll _ANSI_ARGS_((void)); | |
713 | /* 222 */ | |
714 | EXTERN int Tcl_ServiceEvent _ANSI_ARGS_((int flags)); | |
715 | /* 223 */ | |
716 | EXTERN void Tcl_SetAssocData _ANSI_ARGS_((Tcl_Interp * interp, | |
717 | char * name, Tcl_InterpDeleteProc * proc, | |
718 | ClientData clientData)); | |
719 | /* 224 */ | |
720 | EXTERN void Tcl_SetChannelBufferSize _ANSI_ARGS_(( | |
721 | Tcl_Channel chan, int sz)); | |
722 | /* 225 */ | |
723 | EXTERN int Tcl_SetChannelOption _ANSI_ARGS_(( | |
724 | Tcl_Interp * interp, Tcl_Channel chan, | |
725 | char * optionName, char * newValue)); | |
726 | /* 226 */ | |
727 | EXTERN int Tcl_SetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, | |
728 | char * cmdName, Tcl_CmdInfo * infoPtr)); | |
729 | /* 227 */ | |
730 | EXTERN void Tcl_SetErrno _ANSI_ARGS_((int err)); | |
731 | /* 228 */ | |
732 | EXTERN void Tcl_SetErrorCode _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); | |
733 | /* 229 */ | |
734 | EXTERN void Tcl_SetMaxBlockTime _ANSI_ARGS_((Tcl_Time * timePtr)); | |
735 | /* 230 */ | |
736 | EXTERN void Tcl_SetPanicProc _ANSI_ARGS_(( | |
737 | Tcl_PanicProc * panicProc)); | |
738 | /* 231 */ | |
739 | EXTERN int Tcl_SetRecursionLimit _ANSI_ARGS_(( | |
740 | Tcl_Interp * interp, int depth)); | |
741 | /* 232 */ | |
742 | EXTERN void Tcl_SetResult _ANSI_ARGS_((Tcl_Interp * interp, | |
743 | char * str, Tcl_FreeProc * freeProc)); | |
744 | /* 233 */ | |
745 | EXTERN int Tcl_SetServiceMode _ANSI_ARGS_((int mode)); | |
746 | /* 234 */ | |
747 | EXTERN void Tcl_SetObjErrorCode _ANSI_ARGS_((Tcl_Interp * interp, | |
748 | Tcl_Obj * errorObjPtr)); | |
749 | /* 235 */ | |
750 | EXTERN void Tcl_SetObjResult _ANSI_ARGS_((Tcl_Interp * interp, | |
751 | Tcl_Obj * resultObjPtr)); | |
752 | /* 236 */ | |
753 | EXTERN void Tcl_SetStdChannel _ANSI_ARGS_((Tcl_Channel channel, | |
754 | int type)); | |
755 | /* 237 */ | |
756 | EXTERN char * Tcl_SetVar _ANSI_ARGS_((Tcl_Interp * interp, | |
757 | char * varName, char * newValue, int flags)); | |
758 | /* 238 */ | |
759 | EXTERN char * Tcl_SetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
760 | char * part1, char * part2, char * newValue, | |
761 | int flags)); | |
762 | /* 239 */ | |
763 | EXTERN char * Tcl_SignalId _ANSI_ARGS_((int sig)); | |
764 | /* 240 */ | |
765 | EXTERN char * Tcl_SignalMsg _ANSI_ARGS_((int sig)); | |
766 | /* 241 */ | |
767 | EXTERN void Tcl_SourceRCFile _ANSI_ARGS_((Tcl_Interp * interp)); | |
768 | /* 242 */ | |
769 | EXTERN int Tcl_SplitList _ANSI_ARGS_((Tcl_Interp * interp, | |
770 | CONST char * listStr, int * argcPtr, | |
771 | char *** argvPtr)); | |
772 | /* 243 */ | |
773 | EXTERN void Tcl_SplitPath _ANSI_ARGS_((CONST char * path, | |
774 | int * argcPtr, char *** argvPtr)); | |
775 | /* 244 */ | |
776 | EXTERN void Tcl_StaticPackage _ANSI_ARGS_((Tcl_Interp * interp, | |
777 | char * pkgName, | |
778 | Tcl_PackageInitProc * initProc, | |
779 | Tcl_PackageInitProc * safeInitProc)); | |
780 | /* 245 */ | |
781 | EXTERN int Tcl_StringMatch _ANSI_ARGS_((CONST char * str, | |
782 | CONST char * pattern)); | |
783 | /* 246 */ | |
784 | EXTERN int Tcl_Tell _ANSI_ARGS_((Tcl_Channel chan)); | |
785 | /* 247 */ | |
786 | EXTERN int Tcl_TraceVar _ANSI_ARGS_((Tcl_Interp * interp, | |
787 | char * varName, int flags, | |
788 | Tcl_VarTraceProc * proc, | |
789 | ClientData clientData)); | |
790 | /* 248 */ | |
791 | EXTERN int Tcl_TraceVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
792 | char * part1, char * part2, int flags, | |
793 | Tcl_VarTraceProc * proc, | |
794 | ClientData clientData)); | |
795 | /* 249 */ | |
796 | EXTERN char * Tcl_TranslateFileName _ANSI_ARGS_(( | |
797 | Tcl_Interp * interp, char * name, | |
798 | Tcl_DString * bufferPtr)); | |
799 | /* 250 */ | |
800 | EXTERN int Tcl_Ungets _ANSI_ARGS_((Tcl_Channel chan, char * str, | |
801 | int len, int atHead)); | |
802 | /* 251 */ | |
803 | EXTERN void Tcl_UnlinkVar _ANSI_ARGS_((Tcl_Interp * interp, | |
804 | char * varName)); | |
805 | /* 252 */ | |
806 | EXTERN int Tcl_UnregisterChannel _ANSI_ARGS_(( | |
807 | Tcl_Interp * interp, Tcl_Channel chan)); | |
808 | /* 253 */ | |
809 | EXTERN int Tcl_UnsetVar _ANSI_ARGS_((Tcl_Interp * interp, | |
810 | char * varName, int flags)); | |
811 | /* 254 */ | |
812 | EXTERN int Tcl_UnsetVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
813 | char * part1, char * part2, int flags)); | |
814 | /* 255 */ | |
815 | EXTERN void Tcl_UntraceVar _ANSI_ARGS_((Tcl_Interp * interp, | |
816 | char * varName, int flags, | |
817 | Tcl_VarTraceProc * proc, | |
818 | ClientData clientData)); | |
819 | /* 256 */ | |
820 | EXTERN void Tcl_UntraceVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
821 | char * part1, char * part2, int flags, | |
822 | Tcl_VarTraceProc * proc, | |
823 | ClientData clientData)); | |
824 | /* 257 */ | |
825 | EXTERN void Tcl_UpdateLinkedVar _ANSI_ARGS_((Tcl_Interp * interp, | |
826 | char * varName)); | |
827 | /* 258 */ | |
828 | EXTERN int Tcl_UpVar _ANSI_ARGS_((Tcl_Interp * interp, | |
829 | char * frameName, char * varName, | |
830 | char * localName, int flags)); | |
831 | /* 259 */ | |
832 | EXTERN int Tcl_UpVar2 _ANSI_ARGS_((Tcl_Interp * interp, | |
833 | char * frameName, char * part1, char * part2, | |
834 | char * localName, int flags)); | |
835 | /* 260 */ | |
836 | EXTERN int Tcl_VarEval _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); | |
837 | /* 261 */ | |
838 | EXTERN ClientData Tcl_VarTraceInfo _ANSI_ARGS_((Tcl_Interp * interp, | |
839 | char * varName, int flags, | |
840 | Tcl_VarTraceProc * procPtr, | |
841 | ClientData prevClientData)); | |
842 | /* 262 */ | |
843 | EXTERN ClientData Tcl_VarTraceInfo2 _ANSI_ARGS_((Tcl_Interp * interp, | |
844 | char * part1, char * part2, int flags, | |
845 | Tcl_VarTraceProc * procPtr, | |
846 | ClientData prevClientData)); | |
847 | /* 263 */ | |
848 | EXTERN int Tcl_Write _ANSI_ARGS_((Tcl_Channel chan, char * s, | |
849 | int slen)); | |
850 | /* 264 */ | |
851 | EXTERN void Tcl_WrongNumArgs _ANSI_ARGS_((Tcl_Interp * interp, | |
852 | int objc, Tcl_Obj *CONST objv[], | |
853 | char * message)); | |
854 | /* 265 */ | |
855 | EXTERN int Tcl_DumpActiveMemory _ANSI_ARGS_((char * fileName)); | |
856 | /* 266 */ | |
857 | EXTERN void Tcl_ValidateAllMemory _ANSI_ARGS_((char * file, | |
858 | int line)); | |
859 | /* 267 */ | |
860 | EXTERN void Tcl_AppendResultVA _ANSI_ARGS_((Tcl_Interp * interp, | |
861 | va_list argList)); | |
862 | /* 268 */ | |
863 | EXTERN void Tcl_AppendStringsToObjVA _ANSI_ARGS_(( | |
864 | Tcl_Obj * objPtr, va_list argList)); | |
865 | /* 269 */ | |
866 | EXTERN char * Tcl_HashStats _ANSI_ARGS_((Tcl_HashTable * tablePtr)); | |
867 | /* 270 */ | |
868 | EXTERN char * Tcl_ParseVar _ANSI_ARGS_((Tcl_Interp * interp, | |
869 | char * str, char ** termPtr)); | |
870 | /* 271 */ | |
871 | EXTERN char * Tcl_PkgPresent _ANSI_ARGS_((Tcl_Interp * interp, | |
872 | char * name, char * version, int exact)); | |
873 | /* 272 */ | |
874 | EXTERN char * Tcl_PkgPresentEx _ANSI_ARGS_((Tcl_Interp * interp, | |
875 | char * name, char * version, int exact, | |
876 | ClientData * clientDataPtr)); | |
877 | /* 273 */ | |
878 | EXTERN int Tcl_PkgProvide _ANSI_ARGS_((Tcl_Interp * interp, | |
879 | char * name, char * version)); | |
880 | /* 274 */ | |
881 | EXTERN char * Tcl_PkgRequire _ANSI_ARGS_((Tcl_Interp * interp, | |
882 | char * name, char * version, int exact)); | |
883 | /* 275 */ | |
884 | EXTERN void Tcl_SetErrorCodeVA _ANSI_ARGS_((Tcl_Interp * interp, | |
885 | va_list argList)); | |
886 | /* 276 */ | |
887 | EXTERN int Tcl_VarEvalVA _ANSI_ARGS_((Tcl_Interp * interp, | |
888 | va_list argList)); | |
889 | /* 277 */ | |
890 | EXTERN Tcl_Pid Tcl_WaitPid _ANSI_ARGS_((Tcl_Pid pid, int * statPtr, | |
891 | int options)); | |
892 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
893 | /* 278 */ | |
894 | EXTERN void Tcl_PanicVA _ANSI_ARGS_((char * format, | |
895 | va_list argList)); | |
896 | #endif /* UNIX */ | |
897 | #ifdef __WIN32__ | |
898 | /* 278 */ | |
899 | EXTERN void Tcl_PanicVA _ANSI_ARGS_((char * format, | |
900 | va_list argList)); | |
901 | #endif /* __WIN32__ */ | |
902 | /* 279 */ | |
903 | EXTERN void Tcl_GetVersion _ANSI_ARGS_((int * major, int * minor, | |
904 | int * patchLevel, int * type)); | |
905 | /* 280 */ | |
906 | EXTERN void Tcl_InitMemory _ANSI_ARGS_((Tcl_Interp * interp)); | |
907 | /* 281 */ | |
908 | EXTERN Tcl_Channel Tcl_StackChannel _ANSI_ARGS_((Tcl_Interp * interp, | |
909 | Tcl_ChannelType * typePtr, | |
910 | ClientData instanceData, int mask, | |
911 | Tcl_Channel prevChan)); | |
912 | /* 282 */ | |
913 | EXTERN void Tcl_UnstackChannel _ANSI_ARGS_((Tcl_Interp * interp, | |
914 | Tcl_Channel chan)); | |
915 | /* 283 */ | |
916 | EXTERN Tcl_Channel Tcl_GetStackedChannel _ANSI_ARGS_((Tcl_Channel chan)); | |
917 | /* Slot 284 is reserved */ | |
918 | /* Slot 285 is reserved */ | |
919 | /* 286 */ | |
920 | EXTERN void Tcl_AppendObjToObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
921 | Tcl_Obj * appendObjPtr)); | |
922 | /* 287 */ | |
923 | EXTERN Tcl_Encoding Tcl_CreateEncoding _ANSI_ARGS_(( | |
924 | Tcl_EncodingType * typePtr)); | |
925 | /* 288 */ | |
926 | EXTERN void Tcl_CreateThreadExitHandler _ANSI_ARGS_(( | |
927 | Tcl_ExitProc * proc, ClientData clientData)); | |
928 | /* 289 */ | |
929 | EXTERN void Tcl_DeleteThreadExitHandler _ANSI_ARGS_(( | |
930 | Tcl_ExitProc * proc, ClientData clientData)); | |
931 | /* 290 */ | |
932 | EXTERN void Tcl_DiscardResult _ANSI_ARGS_(( | |
933 | Tcl_SavedResult * statePtr)); | |
934 | /* 291 */ | |
935 | EXTERN int Tcl_EvalEx _ANSI_ARGS_((Tcl_Interp * interp, | |
936 | char * script, int numBytes, int flags)); | |
937 | /* 292 */ | |
938 | EXTERN int Tcl_EvalObjv _ANSI_ARGS_((Tcl_Interp * interp, | |
939 | int objc, Tcl_Obj *CONST objv[], int flags)); | |
940 | /* 293 */ | |
941 | EXTERN int Tcl_EvalObjEx _ANSI_ARGS_((Tcl_Interp * interp, | |
942 | Tcl_Obj * objPtr, int flags)); | |
943 | /* 294 */ | |
944 | EXTERN void Tcl_ExitThread _ANSI_ARGS_((int status)); | |
945 | /* 295 */ | |
946 | EXTERN int Tcl_ExternalToUtf _ANSI_ARGS_((Tcl_Interp * interp, | |
947 | Tcl_Encoding encoding, CONST char * src, | |
948 | int srcLen, int flags, | |
949 | Tcl_EncodingState * statePtr, char * dst, | |
950 | int dstLen, int * srcReadPtr, | |
951 | int * dstWrotePtr, int * dstCharsPtr)); | |
952 | /* 296 */ | |
953 | EXTERN char * Tcl_ExternalToUtfDString _ANSI_ARGS_(( | |
954 | Tcl_Encoding encoding, CONST char * src, | |
955 | int srcLen, Tcl_DString * dsPtr)); | |
956 | /* 297 */ | |
957 | EXTERN void Tcl_FinalizeThread _ANSI_ARGS_((void)); | |
958 | /* 298 */ | |
959 | EXTERN void Tcl_FinalizeNotifier _ANSI_ARGS_(( | |
960 | ClientData clientData)); | |
961 | /* 299 */ | |
962 | EXTERN void Tcl_FreeEncoding _ANSI_ARGS_((Tcl_Encoding encoding)); | |
963 | /* 300 */ | |
964 | EXTERN Tcl_ThreadId Tcl_GetCurrentThread _ANSI_ARGS_((void)); | |
965 | /* 301 */ | |
966 | EXTERN Tcl_Encoding Tcl_GetEncoding _ANSI_ARGS_((Tcl_Interp * interp, | |
967 | CONST char * name)); | |
968 | /* 302 */ | |
969 | EXTERN char * Tcl_GetEncodingName _ANSI_ARGS_(( | |
970 | Tcl_Encoding encoding)); | |
971 | /* 303 */ | |
972 | EXTERN void Tcl_GetEncodingNames _ANSI_ARGS_(( | |
973 | Tcl_Interp * interp)); | |
974 | /* 304 */ | |
975 | EXTERN int Tcl_GetIndexFromObjStruct _ANSI_ARGS_(( | |
976 | Tcl_Interp * interp, Tcl_Obj * objPtr, | |
977 | char ** tablePtr, int offset, char * msg, | |
978 | int flags, int * indexPtr)); | |
979 | /* 305 */ | |
980 | EXTERN VOID * Tcl_GetThreadData _ANSI_ARGS_(( | |
981 | Tcl_ThreadDataKey * keyPtr, int size)); | |
982 | /* 306 */ | |
983 | EXTERN Tcl_Obj * Tcl_GetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp, | |
984 | char * part1, char * part2, int flags)); | |
985 | /* 307 */ | |
986 | EXTERN ClientData Tcl_InitNotifier _ANSI_ARGS_((void)); | |
987 | /* 308 */ | |
988 | EXTERN void Tcl_MutexLock _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); | |
989 | /* 309 */ | |
990 | EXTERN void Tcl_MutexUnlock _ANSI_ARGS_((Tcl_Mutex * mutexPtr)); | |
991 | /* 310 */ | |
992 | EXTERN void Tcl_ConditionNotify _ANSI_ARGS_(( | |
993 | Tcl_Condition * condPtr)); | |
994 | /* 311 */ | |
995 | EXTERN void Tcl_ConditionWait _ANSI_ARGS_(( | |
996 | Tcl_Condition * condPtr, | |
997 | Tcl_Mutex * mutexPtr, Tcl_Time * timePtr)); | |
998 | /* 312 */ | |
999 | EXTERN int Tcl_NumUtfChars _ANSI_ARGS_((CONST char * src, | |
1000 | int len)); | |
1001 | /* 313 */ | |
1002 | EXTERN int Tcl_ReadChars _ANSI_ARGS_((Tcl_Channel channel, | |
1003 | Tcl_Obj * objPtr, int charsToRead, | |
1004 | int appendFlag)); | |
1005 | /* 314 */ | |
1006 | EXTERN void Tcl_RestoreResult _ANSI_ARGS_((Tcl_Interp * interp, | |
1007 | Tcl_SavedResult * statePtr)); | |
1008 | /* 315 */ | |
1009 | EXTERN void Tcl_SaveResult _ANSI_ARGS_((Tcl_Interp * interp, | |
1010 | Tcl_SavedResult * statePtr)); | |
1011 | /* 316 */ | |
1012 | EXTERN int Tcl_SetSystemEncoding _ANSI_ARGS_(( | |
1013 | Tcl_Interp * interp, CONST char * name)); | |
1014 | /* 317 */ | |
1015 | EXTERN Tcl_Obj * Tcl_SetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp, | |
1016 | char * part1, char * part2, | |
1017 | Tcl_Obj * newValuePtr, int flags)); | |
1018 | /* 318 */ | |
1019 | EXTERN void Tcl_ThreadAlert _ANSI_ARGS_((Tcl_ThreadId threadId)); | |
1020 | /* 319 */ | |
1021 | EXTERN void Tcl_ThreadQueueEvent _ANSI_ARGS_(( | |
1022 | Tcl_ThreadId threadId, Tcl_Event* evPtr, | |
1023 | Tcl_QueuePosition position)); | |
1024 | /* 320 */ | |
1025 | EXTERN Tcl_UniChar Tcl_UniCharAtIndex _ANSI_ARGS_((CONST char * src, | |
1026 | int index)); | |
1027 | /* 321 */ | |
1028 | EXTERN Tcl_UniChar Tcl_UniCharToLower _ANSI_ARGS_((int ch)); | |
1029 | /* 322 */ | |
1030 | EXTERN Tcl_UniChar Tcl_UniCharToTitle _ANSI_ARGS_((int ch)); | |
1031 | /* 323 */ | |
1032 | EXTERN Tcl_UniChar Tcl_UniCharToUpper _ANSI_ARGS_((int ch)); | |
1033 | /* 324 */ | |
1034 | EXTERN int Tcl_UniCharToUtf _ANSI_ARGS_((int ch, char * buf)); | |
1035 | /* 325 */ | |
1036 | EXTERN char * Tcl_UtfAtIndex _ANSI_ARGS_((CONST char * src, | |
1037 | int index)); | |
1038 | /* 326 */ | |
1039 | EXTERN int Tcl_UtfCharComplete _ANSI_ARGS_((CONST char * src, | |
1040 | int len)); | |
1041 | /* 327 */ | |
1042 | EXTERN int Tcl_UtfBackslash _ANSI_ARGS_((CONST char * src, | |
1043 | int * readPtr, char * dst)); | |
1044 | /* 328 */ | |
1045 | EXTERN char * Tcl_UtfFindFirst _ANSI_ARGS_((CONST char * src, | |
1046 | int ch)); | |
1047 | /* 329 */ | |
1048 | EXTERN char * Tcl_UtfFindLast _ANSI_ARGS_((CONST char * src, | |
1049 | int ch)); | |
1050 | /* 330 */ | |
1051 | EXTERN char * Tcl_UtfNext _ANSI_ARGS_((CONST char * src)); | |
1052 | /* 331 */ | |
1053 | EXTERN char * Tcl_UtfPrev _ANSI_ARGS_((CONST char * src, | |
1054 | CONST char * start)); | |
1055 | /* 332 */ | |
1056 | EXTERN int Tcl_UtfToExternal _ANSI_ARGS_((Tcl_Interp * interp, | |
1057 | Tcl_Encoding encoding, CONST char * src, | |
1058 | int srcLen, int flags, | |
1059 | Tcl_EncodingState * statePtr, char * dst, | |
1060 | int dstLen, int * srcReadPtr, | |
1061 | int * dstWrotePtr, int * dstCharsPtr)); | |
1062 | /* 333 */ | |
1063 | EXTERN char * Tcl_UtfToExternalDString _ANSI_ARGS_(( | |
1064 | Tcl_Encoding encoding, CONST char * src, | |
1065 | int srcLen, Tcl_DString * dsPtr)); | |
1066 | /* 334 */ | |
1067 | EXTERN int Tcl_UtfToLower _ANSI_ARGS_((char * src)); | |
1068 | /* 335 */ | |
1069 | EXTERN int Tcl_UtfToTitle _ANSI_ARGS_((char * src)); | |
1070 | /* 336 */ | |
1071 | EXTERN int Tcl_UtfToUniChar _ANSI_ARGS_((CONST char * src, | |
1072 | Tcl_UniChar * chPtr)); | |
1073 | /* 337 */ | |
1074 | EXTERN int Tcl_UtfToUpper _ANSI_ARGS_((char * src)); | |
1075 | /* 338 */ | |
1076 | EXTERN int Tcl_WriteChars _ANSI_ARGS_((Tcl_Channel chan, | |
1077 | CONST char * src, int srcLen)); | |
1078 | /* 339 */ | |
1079 | EXTERN int Tcl_WriteObj _ANSI_ARGS_((Tcl_Channel chan, | |
1080 | Tcl_Obj * objPtr)); | |
1081 | /* 340 */ | |
1082 | EXTERN char * Tcl_GetString _ANSI_ARGS_((Tcl_Obj * objPtr)); | |
1083 | /* 341 */ | |
1084 | EXTERN char * Tcl_GetDefaultEncodingDir _ANSI_ARGS_((void)); | |
1085 | /* 342 */ | |
1086 | EXTERN void Tcl_SetDefaultEncodingDir _ANSI_ARGS_((char * path)); | |
1087 | /* 343 */ | |
1088 | EXTERN void Tcl_AlertNotifier _ANSI_ARGS_((ClientData clientData)); | |
1089 | /* 344 */ | |
1090 | EXTERN void Tcl_ServiceModeHook _ANSI_ARGS_((int mode)); | |
1091 | /* 345 */ | |
1092 | EXTERN int Tcl_UniCharIsAlnum _ANSI_ARGS_((int ch)); | |
1093 | /* 346 */ | |
1094 | EXTERN int Tcl_UniCharIsAlpha _ANSI_ARGS_((int ch)); | |
1095 | /* 347 */ | |
1096 | EXTERN int Tcl_UniCharIsDigit _ANSI_ARGS_((int ch)); | |
1097 | /* 348 */ | |
1098 | EXTERN int Tcl_UniCharIsLower _ANSI_ARGS_((int ch)); | |
1099 | /* 349 */ | |
1100 | EXTERN int Tcl_UniCharIsSpace _ANSI_ARGS_((int ch)); | |
1101 | /* 350 */ | |
1102 | EXTERN int Tcl_UniCharIsUpper _ANSI_ARGS_((int ch)); | |
1103 | /* 351 */ | |
1104 | EXTERN int Tcl_UniCharIsWordChar _ANSI_ARGS_((int ch)); | |
1105 | /* 352 */ | |
1106 | EXTERN int Tcl_UniCharLen _ANSI_ARGS_((Tcl_UniChar * str)); | |
1107 | /* 353 */ | |
1108 | EXTERN int Tcl_UniCharNcmp _ANSI_ARGS_((CONST Tcl_UniChar * cs, | |
1109 | CONST Tcl_UniChar * ct, unsigned long n)); | |
1110 | /* 354 */ | |
1111 | EXTERN char * Tcl_UniCharToUtfDString _ANSI_ARGS_(( | |
1112 | CONST Tcl_UniChar * string, int numChars, | |
1113 | Tcl_DString * dsPtr)); | |
1114 | /* 355 */ | |
1115 | EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString _ANSI_ARGS_(( | |
1116 | CONST char * string, int length, | |
1117 | Tcl_DString * dsPtr)); | |
1118 | /* 356 */ | |
1119 | EXTERN Tcl_RegExp Tcl_GetRegExpFromObj _ANSI_ARGS_(( | |
1120 | Tcl_Interp * interp, Tcl_Obj * patObj, | |
1121 | int flags)); | |
1122 | /* 357 */ | |
1123 | EXTERN Tcl_Obj * Tcl_EvalTokens _ANSI_ARGS_((Tcl_Interp * interp, | |
1124 | Tcl_Token * tokenPtr, int count)); | |
1125 | /* 358 */ | |
1126 | EXTERN void Tcl_FreeParse _ANSI_ARGS_((Tcl_Parse * parsePtr)); | |
1127 | /* 359 */ | |
1128 | EXTERN void Tcl_LogCommandInfo _ANSI_ARGS_((Tcl_Interp * interp, | |
1129 | char * script, char * command, int length)); | |
1130 | /* 360 */ | |
1131 | EXTERN int Tcl_ParseBraces _ANSI_ARGS_((Tcl_Interp * interp, | |
1132 | char * string, int numBytes, | |
1133 | Tcl_Parse * parsePtr, int append, | |
1134 | char ** termPtr)); | |
1135 | /* 361 */ | |
1136 | EXTERN int Tcl_ParseCommand _ANSI_ARGS_((Tcl_Interp * interp, | |
1137 | char * string, int numBytes, int nested, | |
1138 | Tcl_Parse * parsePtr)); | |
1139 | /* 362 */ | |
1140 | EXTERN int Tcl_ParseExpr _ANSI_ARGS_((Tcl_Interp * interp, | |
1141 | char * string, int numBytes, | |
1142 | Tcl_Parse * parsePtr)); | |
1143 | /* 363 */ | |
1144 | EXTERN int Tcl_ParseQuotedString _ANSI_ARGS_(( | |
1145 | Tcl_Interp * interp, char * string, | |
1146 | int numBytes, Tcl_Parse * parsePtr, | |
1147 | int append, char ** termPtr)); | |
1148 | /* 364 */ | |
1149 | EXTERN int Tcl_ParseVarName _ANSI_ARGS_((Tcl_Interp * interp, | |
1150 | char * string, int numBytes, | |
1151 | Tcl_Parse * parsePtr, int append)); | |
1152 | /* 365 */ | |
1153 | EXTERN char * Tcl_GetCwd _ANSI_ARGS_((Tcl_Interp * interp, | |
1154 | Tcl_DString * cwdPtr)); | |
1155 | /* 366 */ | |
1156 | EXTERN int Tcl_Chdir _ANSI_ARGS_((CONST char * dirName)); | |
1157 | /* 367 */ | |
1158 | EXTERN int Tcl_Access _ANSI_ARGS_((CONST char * path, int mode)); | |
1159 | /* 368 */ | |
1160 | EXTERN int Tcl_Stat _ANSI_ARGS_((CONST char * path, | |
1161 | struct stat * bufPtr)); | |
1162 | /* 369 */ | |
1163 | EXTERN int Tcl_UtfNcmp _ANSI_ARGS_((CONST char * s1, | |
1164 | CONST char * s2, unsigned long n)); | |
1165 | /* 370 */ | |
1166 | EXTERN int Tcl_UtfNcasecmp _ANSI_ARGS_((CONST char * s1, | |
1167 | CONST char * s2, unsigned long n)); | |
1168 | /* 371 */ | |
1169 | EXTERN int Tcl_StringCaseMatch _ANSI_ARGS_((CONST char * str, | |
1170 | CONST char * pattern, int nocase)); | |
1171 | /* 372 */ | |
1172 | EXTERN int Tcl_UniCharIsControl _ANSI_ARGS_((int ch)); | |
1173 | /* 373 */ | |
1174 | EXTERN int Tcl_UniCharIsGraph _ANSI_ARGS_((int ch)); | |
1175 | /* 374 */ | |
1176 | EXTERN int Tcl_UniCharIsPrint _ANSI_ARGS_((int ch)); | |
1177 | /* 375 */ | |
1178 | EXTERN int Tcl_UniCharIsPunct _ANSI_ARGS_((int ch)); | |
1179 | /* 376 */ | |
1180 | EXTERN int Tcl_RegExpExecObj _ANSI_ARGS_((Tcl_Interp * interp, | |
1181 | Tcl_RegExp regexp, Tcl_Obj * objPtr, | |
1182 | int offset, int nmatches, int flags)); | |
1183 | /* 377 */ | |
1184 | EXTERN void Tcl_RegExpGetInfo _ANSI_ARGS_((Tcl_RegExp regexp, | |
1185 | Tcl_RegExpInfo * infoPtr)); | |
1186 | /* 378 */ | |
1187 | EXTERN Tcl_Obj * Tcl_NewUnicodeObj _ANSI_ARGS_((Tcl_UniChar * unicode, | |
1188 | int numChars)); | |
1189 | /* 379 */ | |
1190 | EXTERN void Tcl_SetUnicodeObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
1191 | Tcl_UniChar * unicode, int numChars)); | |
1192 | /* 380 */ | |
1193 | EXTERN int Tcl_GetCharLength _ANSI_ARGS_((Tcl_Obj * objPtr)); | |
1194 | /* 381 */ | |
1195 | EXTERN Tcl_UniChar Tcl_GetUniChar _ANSI_ARGS_((Tcl_Obj * objPtr, | |
1196 | int index)); | |
1197 | /* 382 */ | |
1198 | EXTERN Tcl_UniChar * Tcl_GetUnicode _ANSI_ARGS_((Tcl_Obj * objPtr)); | |
1199 | /* 383 */ | |
1200 | EXTERN Tcl_Obj * Tcl_GetRange _ANSI_ARGS_((Tcl_Obj * objPtr, | |
1201 | int first, int last)); | |
1202 | /* 384 */ | |
1203 | EXTERN void Tcl_AppendUnicodeToObj _ANSI_ARGS_((Tcl_Obj * objPtr, | |
1204 | Tcl_UniChar * unicode, int length)); | |
1205 | /* 385 */ | |
1206 | EXTERN int Tcl_RegExpMatchObj _ANSI_ARGS_((Tcl_Interp * interp, | |
1207 | Tcl_Obj * stringObj, Tcl_Obj * patternObj)); | |
1208 | /* 386 */ | |
1209 | EXTERN void Tcl_SetNotifier _ANSI_ARGS_(( | |
1210 | Tcl_NotifierProcs * notifierProcPtr)); | |
1211 | /* 387 */ | |
1212 | EXTERN Tcl_Mutex * Tcl_GetAllocMutex _ANSI_ARGS_((void)); | |
1213 | /* 388 */ | |
1214 | EXTERN int Tcl_GetChannelNames _ANSI_ARGS_((Tcl_Interp * interp)); | |
1215 | /* 389 */ | |
1216 | EXTERN int Tcl_GetChannelNamesEx _ANSI_ARGS_(( | |
1217 | Tcl_Interp * interp, char * pattern)); | |
1218 | /* 390 */ | |
1219 | EXTERN int Tcl_ProcObjCmd _ANSI_ARGS_((ClientData clientData, | |
1220 | Tcl_Interp * interp, int objc, | |
1221 | Tcl_Obj *CONST objv[])); | |
1222 | /* 391 */ | |
1223 | EXTERN void Tcl_ConditionFinalize _ANSI_ARGS_(( | |
1224 | Tcl_Condition * condPtr)); | |
1225 | /* 392 */ | |
1226 | EXTERN void Tcl_MutexFinalize _ANSI_ARGS_((Tcl_Mutex * mutex)); | |
1227 | /* 393 */ | |
1228 | EXTERN int Tcl_CreateThread _ANSI_ARGS_((Tcl_ThreadId * idPtr, | |
1229 | Tcl_ThreadCreateProc proc, | |
1230 | ClientData clientData, int stackSize, | |
1231 | int flags)); | |
1232 | ||
1233 | typedef struct TclStubHooks { | |
1234 | struct TclPlatStubs *tclPlatStubs; | |
1235 | struct TclIntStubs *tclIntStubs; | |
1236 | struct TclIntPlatStubs *tclIntPlatStubs; | |
1237 | } TclStubHooks; | |
1238 | ||
1239 | typedef struct TclStubs { | |
1240 | int magic; | |
1241 | struct TclStubHooks *hooks; | |
1242 | ||
1243 | int (*tcl_PkgProvideEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, ClientData clientData)); /* 0 */ | |
1244 | char * (*tcl_PkgRequireEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 1 */ | |
1245 | void (*tcl_Panic) _ANSI_ARGS_(TCL_VARARGS(char *,format)); /* 2 */ | |
1246 | char * (*tcl_Alloc) _ANSI_ARGS_((unsigned int size)); /* 3 */ | |
1247 | void (*tcl_Free) _ANSI_ARGS_((char * ptr)); /* 4 */ | |
1248 | char * (*tcl_Realloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 5 */ | |
1249 | char * (*tcl_DbCkalloc) _ANSI_ARGS_((unsigned int size, char * file, int line)); /* 6 */ | |
1250 | int (*tcl_DbCkfree) _ANSI_ARGS_((char * ptr, char * file, int line)); /* 7 */ | |
1251 | char * (*tcl_DbCkrealloc) _ANSI_ARGS_((char * ptr, unsigned int size, char * file, int line)); /* 8 */ | |
1252 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
1253 | void (*tcl_CreateFileHandler) _ANSI_ARGS_((int fd, int mask, Tcl_FileProc * proc, ClientData clientData)); /* 9 */ | |
1254 | #endif /* UNIX */ | |
1255 | #ifdef __WIN32__ | |
1256 | void *reserved9; | |
1257 | #endif /* __WIN32__ */ | |
1258 | #ifdef MAC_TCL | |
1259 | void *reserved9; | |
1260 | #endif /* MAC_TCL */ | |
1261 | #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ | |
1262 | void (*tcl_DeleteFileHandler) _ANSI_ARGS_((int fd)); /* 10 */ | |
1263 | #endif /* UNIX */ | |
1264 | #ifdef __WIN32__ | |
1265 | void *reserved10; | |
1266 | #endif /* __WIN32__ */ | |
1267 | #ifdef MAC_TCL | |
1268 | void *reserved10; | |
1269 | #endif /* MAC_TCL */ | |
1270 | void (*tcl_SetTimer) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 11 */ | |
1271 | void (*tcl_Sleep) _ANSI_ARGS_((int ms)); /* 12 */ | |
1272 | int (*tcl_WaitForEvent) _ANSI_ARGS_((Tcl_Time * timePtr)); /* 13 */ | |
1273 | int (*tcl_AppendAllObjTypes) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 14 */ | |
1274 | void (*tcl_AppendStringsToObj) _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr)); /* 15 */ | |
1275 | void (*tcl_AppendToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 16 */ | |
1276 | Tcl_Obj * (*tcl_ConcatObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 17 */ | |
1277 | int (*tcl_ConvertToType) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_ObjType * typePtr)); /* 18 */ | |
1278 | void (*tcl_DbDecrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 19 */ | |
1279 | void (*tcl_DbIncrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 20 */ | |
1280 | int (*tcl_DbIsShared) _ANSI_ARGS_((Tcl_Obj * objPtr, char * file, int line)); /* 21 */ | |
1281 | Tcl_Obj * (*tcl_DbNewBooleanObj) _ANSI_ARGS_((int boolValue, char * file, int line)); /* 22 */ | |
1282 | Tcl_Obj * (*tcl_DbNewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length, char * file, int line)); /* 23 */ | |
1283 | Tcl_Obj * (*tcl_DbNewDoubleObj) _ANSI_ARGS_((double doubleValue, char * file, int line)); /* 24 */ | |
1284 | Tcl_Obj * (*tcl_DbNewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[], char * file, int line)); /* 25 */ | |
1285 | Tcl_Obj * (*tcl_DbNewLongObj) _ANSI_ARGS_((long longValue, char * file, int line)); /* 26 */ | |
1286 | Tcl_Obj * (*tcl_DbNewObj) _ANSI_ARGS_((char * file, int line)); /* 27 */ | |
1287 | Tcl_Obj * (*tcl_DbNewStringObj) _ANSI_ARGS_((CONST char * bytes, int length, char * file, int line)); /* 28 */ | |
1288 | Tcl_Obj * (*tcl_DuplicateObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 29 */ | |
1289 | void (*tclFreeObj) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 30 */ | |
1290 | int (*tcl_GetBoolean) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * boolPtr)); /* 31 */ | |
1291 | int (*tcl_GetBooleanFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * boolPtr)); /* 32 */ | |
1292 | unsigned char * (*tcl_GetByteArrayFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 33 */ | |
1293 | int (*tcl_GetDouble) _ANSI_ARGS_((Tcl_Interp * interp, char * str, double * doublePtr)); /* 34 */ | |
1294 | int (*tcl_GetDoubleFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * doublePtr)); /* 35 */ | |
1295 | int (*tcl_GetIndexFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, char ** tablePtr, char * msg, int flags, int * indexPtr)); /* 36 */ | |
1296 | int (*tcl_GetInt) _ANSI_ARGS_((Tcl_Interp * interp, char * str, int * intPtr)); /* 37 */ | |
1297 | int (*tcl_GetIntFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * intPtr)); /* 38 */ | |
1298 | int (*tcl_GetLongFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * longPtr)); /* 39 */ | |
1299 | Tcl_ObjType * (*tcl_GetObjType) _ANSI_ARGS_((char * typeName)); /* 40 */ | |
1300 | char * (*tcl_GetStringFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr)); /* 41 */ | |
1301 | void (*tcl_InvalidateStringRep) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 42 */ | |
1302 | int (*tcl_ListObjAppendList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * elemListPtr)); /* 43 */ | |
1303 | int (*tcl_ListObjAppendElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * objPtr)); /* 44 */ | |
1304 | int (*tcl_ListObjGetElements) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * objcPtr, Tcl_Obj *** objvPtr)); /* 45 */ | |
1305 | int (*tcl_ListObjIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj ** objPtrPtr)); /* 46 */ | |
1306 | int (*tcl_ListObjLength) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * intPtr)); /* 47 */ | |
1307 | int (*tcl_ListObjReplace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[])); /* 48 */ | |
1308 | Tcl_Obj * (*tcl_NewBooleanObj) _ANSI_ARGS_((int boolValue)); /* 49 */ | |
1309 | Tcl_Obj * (*tcl_NewByteArrayObj) _ANSI_ARGS_((unsigned char * bytes, int length)); /* 50 */ | |
1310 | Tcl_Obj * (*tcl_NewDoubleObj) _ANSI_ARGS_((double doubleValue)); /* 51 */ | |
1311 | Tcl_Obj * (*tcl_NewIntObj) _ANSI_ARGS_((int intValue)); /* 52 */ | |
1312 | Tcl_Obj * (*tcl_NewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[])); /* 53 */ | |
1313 | Tcl_Obj * (*tcl_NewLongObj) _ANSI_ARGS_((long longValue)); /* 54 */ | |
1314 | Tcl_Obj * (*tcl_NewObj) _ANSI_ARGS_((void)); /* 55 */ | |
1315 | Tcl_Obj * (*tcl_NewStringObj) _ANSI_ARGS_((CONST char * bytes, int length)); /* 56 */ | |
1316 | void (*tcl_SetBooleanObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int boolValue)); /* 57 */ | |
1317 | unsigned char * (*tcl_SetByteArrayLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 58 */ | |
1318 | void (*tcl_SetByteArrayObj) _ANSI_ARGS_((Tcl_Obj * objPtr, unsigned char * bytes, int length)); /* 59 */ | |
1319 | void (*tcl_SetDoubleObj) _ANSI_ARGS_((Tcl_Obj * objPtr, double doubleValue)); /* 60 */ | |
1320 | void (*tcl_SetIntObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int intValue)); /* 61 */ | |
1321 | void (*tcl_SetListObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int objc, Tcl_Obj *CONST objv[])); /* 62 */ | |
1322 | void (*tcl_SetLongObj) _ANSI_ARGS_((Tcl_Obj * objPtr, long longValue)); /* 63 */ | |
1323 | void (*tcl_SetObjLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length)); /* 64 */ | |
1324 | void (*tcl_SetStringObj) _ANSI_ARGS_((Tcl_Obj * objPtr, char * bytes, int length)); /* 65 */ | |
1325 | void (*tcl_AddErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message)); /* 66 */ | |
1326 | void (*tcl_AddObjErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message, int length)); /* 67 */ | |
1327 | void (*tcl_AllowExceptions) _ANSI_ARGS_((Tcl_Interp * interp)); /* 68 */ | |
1328 | void (*tcl_AppendElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string)); /* 69 */ | |
1329 | void (*tcl_AppendResult) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp)); /* 70 */ | |
1330 | Tcl_AsyncHandler (*tcl_AsyncCreate) _ANSI_ARGS_((Tcl_AsyncProc * proc, ClientData clientData)); /* 71 */ | |
1331 | void (*tcl_AsyncDelete) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 72 */ | |
1332 | int (*tcl_AsyncInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int code)); /* 73 */ | |
1333 | void (*tcl_AsyncMark) _ANSI_ARGS_((Tcl_AsyncHandler async)); /* 74 */ | |
1334 | int (*tcl_AsyncReady) _ANSI_ARGS_((void)); /* 75 */ | |
1335 | void (*tcl_BackgroundError) _ANSI_ARGS_((Tcl_Interp * interp)); /* 76 */ | |
1336 | char (*tcl_Backslash) _ANSI_ARGS_((CONST char * src, int * readPtr)); /* 77 */ | |
1337 | int (*tcl_BadChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, char * optionName, char * optionList)); /* 78 */ | |
1338 | void (*tcl_CallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData)); /* 79 */ | |
1339 | void (*tcl_CancelIdleCall) _ANSI_ARGS_((Tcl_IdleProc * idleProc, ClientData clientData)); /* 80 */ | |
1340 | int (*tcl_Close) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan)); /* 81 */ | |
1341 | int (*tcl_CommandComplete) _ANSI_ARGS_((char * cmd)); /* 82 */ | |
1342 | char * (*tcl_Concat) _ANSI_ARGS_((int argc, char ** argv)); /* 83 */ | |
1343 | int (*tcl_ConvertElement) _ANSI_ARGS_((CONST char * src, char * dst, int flags)); /* 84 */ | |
1344 | int (*tcl_ConvertCountedElement) _ANSI_ARGS_((CONST char * src, int length, char * dst, int flags)); /* 85 */ | |
1345 | int (*tcl_CreateAlias) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int argc, char ** argv)); /* 86 */ | |
1346 | int (*tcl_CreateAliasObj) _ANSI_ARGS_((Tcl_Interp * slave, char * slaveCmd, Tcl_Interp * target, char * targetCmd, int objc, Tcl_Obj *CONST objv[])); /* 87 */ | |
1347 | Tcl_Channel (*tcl_CreateChannel) _ANSI_ARGS_((Tcl_ChannelType * typePtr, char * chanName, ClientData instanceData, int mask)); /* 88 */ | |
1348 | void (*tcl_CreateChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, int mask, Tcl_ChannelProc * proc, ClientData clientData)); /* 89 */ | |
1349 | void (*tcl_CreateCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData)); /* 90 */ | |
1350 | Tcl_Command (*tcl_CreateCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_CmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 91 */ | |
1351 | void (*tcl_CreateEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData)); /* 92 */ | |
1352 | void (*tcl_CreateExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 93 */ | |
1353 | Tcl_Interp * (*tcl_CreateInterp) _ANSI_ARGS_((void)); /* 94 */ | |
1354 | void (*tcl_CreateMathFunc) _ANSI_ARGS_((Tcl_Interp * interp, char * name, int numArgs, Tcl_ValueType * argTypes, Tcl_MathProc * proc, ClientData clientData)); /* 95 */ | |
1355 | Tcl_Command (*tcl_CreateObjCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdName, Tcl_ObjCmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc)); /* 96 */ | |
1356 | Tcl_Interp * (*tcl_CreateSlave) _ANSI_ARGS_((Tcl_Interp * interp, char * slaveName, int isSafe)); /* 97 */ | |