codekingpro/portable-devtools
114k
1/*2 * tclDecls.h --3 *4 * Declarations of functions in the platform independent public Tcl API.5 *6 * Copyright (c) 1998-1999 by Scriptics Corporation.7 *8 * See the file "license.terms" for information on usage and redistribution9 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.10 */11 12#ifndef _TCLDECLS13#define _TCLDECLS14 15#undef TCL_STORAGE_CLASS16#ifdef BUILD_tcl17# define TCL_STORAGE_CLASS DLLEXPORT18#else19# ifdef USE_TCL_STUBS20# define TCL_STORAGE_CLASS21# else22# define TCL_STORAGE_CLASS DLLIMPORT23# endif24#endif25 26/*27 * WARNING: This file is automatically generated by the tools/genStubs.tcl28 * script. Any modifications to the function declarations below should be made29 * in the generic/tcl.decls script.30 */31 32/* !BEGIN!: Do not edit below this line. */33 34#ifdef __cplusplus35extern "C" {36#endif37 38/*39 * Exported function declarations:40 */41 42/* 0 */43EXTERN int Tcl_PkgProvideEx(Tcl_Interp *interp,44 const char *name, const char *version,45 const void *clientData);46/* 1 */47EXTERN CONST84_RETURN char * Tcl_PkgRequireEx(Tcl_Interp *interp,48 const char *name, const char *version,49 int exact, void *clientDataPtr);50/* 2 */51EXTERN TCL_NORETURN void Tcl_Panic(const char *format, ...) TCL_FORMAT_PRINTF(1, 2);52/* 3 */53EXTERN char * Tcl_Alloc(unsigned int size);54/* 4 */55EXTERN void Tcl_Free(char *ptr);56/* 5 */57EXTERN char * Tcl_Realloc(char *ptr, unsigned int size);58/* 6 */59EXTERN char * Tcl_DbCkalloc(unsigned int size, const char *file,60 int line);61/* 7 */62EXTERN void Tcl_DbCkfree(char *ptr, const char *file, int line);63/* 8 */64EXTERN char * Tcl_DbCkrealloc(char *ptr, unsigned int size,65 const char *file, int line);66#if !defined(_WIN32) && !defined(MAC_OSX_TCL) /* UNIX */67/* 9 */68EXTERN void Tcl_CreateFileHandler(int fd, int mask,69 Tcl_FileProc *proc, ClientData clientData);70#endif /* UNIX */71#ifdef MAC_OSX_TCL /* MACOSX */72/* 9 */73EXTERN void Tcl_CreateFileHandler(int fd, int mask,74 Tcl_FileProc *proc, ClientData clientData);75#endif /* MACOSX */76#if !defined(_WIN32) && !defined(MAC_OSX_TCL) /* UNIX */77/* 10 */78EXTERN void Tcl_DeleteFileHandler(int fd);79#endif /* UNIX */80#ifdef MAC_OSX_TCL /* MACOSX */81/* 10 */82EXTERN void Tcl_DeleteFileHandler(int fd);83#endif /* MACOSX */84/* 11 */85EXTERN void Tcl_SetTimer(const Tcl_Time *timePtr);86/* 12 */87EXTERN void Tcl_Sleep(int ms);88/* 13 */89EXTERN int Tcl_WaitForEvent(const Tcl_Time *timePtr);90/* 14 */91EXTERN int Tcl_AppendAllObjTypes(Tcl_Interp *interp,92 Tcl_Obj *objPtr);93/* 15 */94EXTERN void Tcl_AppendStringsToObj(Tcl_Obj *objPtr, ...);95/* 16 */96EXTERN void Tcl_AppendToObj(Tcl_Obj *objPtr, const char *bytes,97 int length);98/* 17 */99EXTERN Tcl_Obj * Tcl_ConcatObj(int objc, Tcl_Obj *const objv[]);100/* 18 */101EXTERN int Tcl_ConvertToType(Tcl_Interp *interp,102 Tcl_Obj *objPtr, const Tcl_ObjType *typePtr);103/* 19 */104EXTERN void Tcl_DbDecrRefCount(Tcl_Obj *objPtr, const char *file,105 int line);106/* 20 */107EXTERN void Tcl_DbIncrRefCount(Tcl_Obj *objPtr, const char *file,108 int line);109/* 21 */110EXTERN int Tcl_DbIsShared(Tcl_Obj *objPtr, const char *file,111 int line);112/* 22 */113EXTERN Tcl_Obj * Tcl_DbNewBooleanObj(int intValue, const char *file,114 int line);115/* 23 */116EXTERN Tcl_Obj * Tcl_DbNewByteArrayObj(const unsigned char *bytes,117 int length, const char *file, int line);118/* 24 */119EXTERN Tcl_Obj * Tcl_DbNewDoubleObj(double doubleValue,120 const char *file, int line);121/* 25 */122EXTERN Tcl_Obj * Tcl_DbNewListObj(int objc, Tcl_Obj *const *objv,123 const char *file, int line);124/* 26 */125EXTERN Tcl_Obj * Tcl_DbNewLongObj(long longValue, const char *file,126 int line);127/* 27 */128EXTERN Tcl_Obj * Tcl_DbNewObj(const char *file, int line);129/* 28 */130EXTERN Tcl_Obj * Tcl_DbNewStringObj(const char *bytes, int length,131 const char *file, int line);132/* 29 */133EXTERN Tcl_Obj * Tcl_DuplicateObj(Tcl_Obj *objPtr);134/* 30 */135EXTERN void TclFreeObj(Tcl_Obj *objPtr);136/* 31 */137EXTERN int Tcl_GetBoolean(Tcl_Interp *interp, const char *src,138 int *intPtr);139/* 32 */140EXTERN int Tcl_GetBooleanFromObj(Tcl_Interp *interp,141 Tcl_Obj *objPtr, int *intPtr);142/* 33 */143EXTERN unsigned char * Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr,144 int *lengthPtr);145/* 34 */146EXTERN int Tcl_GetDouble(Tcl_Interp *interp, const char *src,147 double *doublePtr);148/* 35 */149EXTERN int Tcl_GetDoubleFromObj(Tcl_Interp *interp,150 Tcl_Obj *objPtr, double *doublePtr);151/* 36 */152EXTERN int Tcl_GetIndexFromObj(Tcl_Interp *interp,153 Tcl_Obj *objPtr,154 CONST84 char *const *tablePtr,155 const char *msg, int flags, int *indexPtr);156/* 37 */157EXTERN int Tcl_GetInt(Tcl_Interp *interp, const char *src,158 int *intPtr);159/* 38 */160EXTERN int Tcl_GetIntFromObj(Tcl_Interp *interp,161 Tcl_Obj *objPtr, int *intPtr);162/* 39 */163EXTERN int Tcl_GetLongFromObj(Tcl_Interp *interp,164 Tcl_Obj *objPtr, long *longPtr);165/* 40 */166EXTERN CONST86 Tcl_ObjType * Tcl_GetObjType(const char *typeName);167/* 41 */168EXTERN char * Tcl_GetStringFromObj(Tcl_Obj *objPtr, int *lengthPtr);169/* 42 */170EXTERN void Tcl_InvalidateStringRep(Tcl_Obj *objPtr);171/* 43 */172EXTERN int Tcl_ListObjAppendList(Tcl_Interp *interp,173 Tcl_Obj *listPtr, Tcl_Obj *elemListPtr);174/* 44 */175EXTERN int Tcl_ListObjAppendElement(Tcl_Interp *interp,176 Tcl_Obj *listPtr, Tcl_Obj *objPtr);177/* 45 */178EXTERN int Tcl_ListObjGetElements(Tcl_Interp *interp,179 Tcl_Obj *listPtr, int *objcPtr,180 Tcl_Obj ***objvPtr);181/* 46 */182EXTERN int Tcl_ListObjIndex(Tcl_Interp *interp,183 Tcl_Obj *listPtr, int index,184 Tcl_Obj **objPtrPtr);185/* 47 */186EXTERN int Tcl_ListObjLength(Tcl_Interp *interp,187 Tcl_Obj *listPtr, int *lengthPtr);188/* 48 */189EXTERN int Tcl_ListObjReplace(Tcl_Interp *interp,190 Tcl_Obj *listPtr, int first, int count,191 int objc, Tcl_Obj *const objv[]);192/* 49 */193EXTERN Tcl_Obj * Tcl_NewBooleanObj(int intValue);194/* 50 */195EXTERN Tcl_Obj * Tcl_NewByteArrayObj(const unsigned char *bytes,196 int length);197/* 51 */198EXTERN Tcl_Obj * Tcl_NewDoubleObj(double doubleValue);199/* 52 */200EXTERN Tcl_Obj * Tcl_NewIntObj(int intValue);201/* 53 */202EXTERN Tcl_Obj * Tcl_NewListObj(int objc, Tcl_Obj *const objv[]);203/* 54 */204EXTERN Tcl_Obj * Tcl_NewLongObj(long longValue);205/* 55 */206EXTERN Tcl_Obj * Tcl_NewObj(void);207/* 56 */208EXTERN Tcl_Obj * Tcl_NewStringObj(const char *bytes, int length);209/* 57 */210EXTERN void Tcl_SetBooleanObj(Tcl_Obj *objPtr, int intValue);211/* 58 */212EXTERN unsigned char * Tcl_SetByteArrayLength(Tcl_Obj *objPtr, int numBytes);213/* 59 */214EXTERN void Tcl_SetByteArrayObj(Tcl_Obj *objPtr,215 const unsigned char *bytes, int numBytes);216/* 60 */217EXTERN void Tcl_SetDoubleObj(Tcl_Obj *objPtr, double doubleValue);218/* 61 */219EXTERN void Tcl_SetIntObj(Tcl_Obj *objPtr, int intValue);220/* 62 */221EXTERN void Tcl_SetListObj(Tcl_Obj *objPtr, int objc,222 Tcl_Obj *const objv[]);223/* 63 */224EXTERN void Tcl_SetLongObj(Tcl_Obj *objPtr, long longValue);225/* 64 */226EXTERN void Tcl_SetObjLength(Tcl_Obj *objPtr, int length);227/* 65 */228EXTERN void Tcl_SetStringObj(Tcl_Obj *objPtr, const char *bytes,229 int length);230/* 66 */231EXTERN void Tcl_AddErrorInfo(Tcl_Interp *interp,232 const char *message);233/* 67 */234EXTERN void Tcl_AddObjErrorInfo(Tcl_Interp *interp,235 const char *message, int length);236/* 68 */237EXTERN void Tcl_AllowExceptions(Tcl_Interp *interp);238/* 69 */239EXTERN void Tcl_AppendElement(Tcl_Interp *interp,240 const char *element);241/* 70 */242EXTERN void Tcl_AppendResult(Tcl_Interp *interp, ...);243/* 71 */244EXTERN Tcl_AsyncHandler Tcl_AsyncCreate(Tcl_AsyncProc *proc,245 ClientData clientData);246/* 72 */247EXTERN void Tcl_AsyncDelete(Tcl_AsyncHandler async);248/* 73 */249EXTERN int Tcl_AsyncInvoke(Tcl_Interp *interp, int code);250/* 74 */251EXTERN void Tcl_AsyncMark(Tcl_AsyncHandler async);252/* 75 */253EXTERN int Tcl_AsyncReady(void);254/* 76 */255EXTERN void Tcl_BackgroundError(Tcl_Interp *interp);256/* 77 */257EXTERN char Tcl_Backslash(const char *src, int *readPtr);258/* 78 */259EXTERN int Tcl_BadChannelOption(Tcl_Interp *interp,260 const char *optionName,261 const char *optionList);262/* 79 */263EXTERN void Tcl_CallWhenDeleted(Tcl_Interp *interp,264 Tcl_InterpDeleteProc *proc,265 ClientData clientData);266/* 80 */267EXTERN void Tcl_CancelIdleCall(Tcl_IdleProc *idleProc,268 ClientData clientData);269/* 81 */270EXTERN int Tcl_Close(Tcl_Interp *interp, Tcl_Channel chan);271/* 82 */272EXTERN int Tcl_CommandComplete(const char *cmd);273/* 83 */274EXTERN char * Tcl_Concat(int argc, CONST84 char *const *argv);275/* 84 */276EXTERN int Tcl_ConvertElement(const char *src, char *dst,277 int flags);278/* 85 */279EXTERN int Tcl_ConvertCountedElement(const char *src,280 int length, char *dst, int flags);281/* 86 */282EXTERN int Tcl_CreateAlias(Tcl_Interp *childInterp,283 const char *childCmd, Tcl_Interp *target,284 const char *targetCmd, int argc,285 CONST84 char *const *argv);286/* 87 */287EXTERN int Tcl_CreateAliasObj(Tcl_Interp *childInterp,288 const char *childCmd, Tcl_Interp *target,289 const char *targetCmd, int objc,290 Tcl_Obj *const objv[]);291/* 88 */292EXTERN Tcl_Channel Tcl_CreateChannel(const Tcl_ChannelType *typePtr,293 const char *chanName,294 ClientData instanceData, int mask);295/* 89 */296EXTERN void Tcl_CreateChannelHandler(Tcl_Channel chan, int mask,297 Tcl_ChannelProc *proc, ClientData clientData);298/* 90 */299EXTERN void Tcl_CreateCloseHandler(Tcl_Channel chan,300 Tcl_CloseProc *proc, ClientData clientData);301/* 91 */302EXTERN Tcl_Command Tcl_CreateCommand(Tcl_Interp *interp,303 const char *cmdName, Tcl_CmdProc *proc,304 ClientData clientData,305 Tcl_CmdDeleteProc *deleteProc);306/* 92 */307EXTERN void Tcl_CreateEventSource(Tcl_EventSetupProc *setupProc,308 Tcl_EventCheckProc *checkProc,309 ClientData clientData);310/* 93 */311EXTERN void Tcl_CreateExitHandler(Tcl_ExitProc *proc,312 ClientData clientData);313/* 94 */314EXTERN Tcl_Interp * Tcl_CreateInterp(void);315/* 95 */316EXTERN void Tcl_CreateMathFunc(Tcl_Interp *interp,317 const char *name, int numArgs,318 Tcl_ValueType *argTypes, Tcl_MathProc *proc,319 ClientData clientData);320/* 96 */321EXTERN Tcl_Command Tcl_CreateObjCommand(Tcl_Interp *interp,322 const char *cmdName, Tcl_ObjCmdProc *proc,323 ClientData clientData,324 Tcl_CmdDeleteProc *deleteProc);325/* 97 */326EXTERN Tcl_Interp * Tcl_CreateSlave(Tcl_Interp *interp, const char *name,327 int isSafe);328/* 98 */329EXTERN Tcl_TimerToken Tcl_CreateTimerHandler(int milliseconds,330 Tcl_TimerProc *proc, ClientData clientData);331/* 99 */332EXTERN Tcl_Trace Tcl_CreateTrace(Tcl_Interp *interp, int level,333 Tcl_CmdTraceProc *proc,334 ClientData clientData);335/* 100 */336EXTERN void Tcl_DeleteAssocData(Tcl_Interp *interp,337 const char *name);338/* 101 */339EXTERN void Tcl_DeleteChannelHandler(Tcl_Channel chan,340 Tcl_ChannelProc *proc, ClientData clientData);341/* 102 */342EXTERN void Tcl_DeleteCloseHandler(Tcl_Channel chan,343 Tcl_CloseProc *proc, ClientData clientData);344/* 103 */345EXTERN int Tcl_DeleteCommand(Tcl_Interp *interp,346 const char *cmdName);347/* 104 */348EXTERN int Tcl_DeleteCommandFromToken(Tcl_Interp *interp,349 Tcl_Command command);350/* 105 */351EXTERN void Tcl_DeleteEvents(Tcl_EventDeleteProc *proc,352 ClientData clientData);353/* 106 */354EXTERN void Tcl_DeleteEventSource(Tcl_EventSetupProc *setupProc,355 Tcl_EventCheckProc *checkProc,356 ClientData clientData);357/* 107 */358EXTERN void Tcl_DeleteExitHandler(Tcl_ExitProc *proc,359 ClientData clientData);360/* 108 */361EXTERN void Tcl_DeleteHashEntry(Tcl_HashEntry *entryPtr);362/* 109 */363EXTERN void Tcl_DeleteHashTable(Tcl_HashTable *tablePtr);364/* 110 */365EXTERN void Tcl_DeleteInterp(Tcl_Interp *interp);366/* 111 */367EXTERN void Tcl_DetachPids(int numPids, Tcl_Pid *pidPtr);368/* 112 */369EXTERN void Tcl_DeleteTimerHandler(Tcl_TimerToken token);370/* 113 */371EXTERN void Tcl_DeleteTrace(Tcl_Interp *interp, Tcl_Trace trace);372/* 114 */373EXTERN void Tcl_DontCallWhenDeleted(Tcl_Interp *interp,374 Tcl_InterpDeleteProc *proc,375 ClientData clientData);376/* 115 */377EXTERN int Tcl_DoOneEvent(int flags);378/* 116 */379EXTERN void Tcl_DoWhenIdle(Tcl_IdleProc *proc,380 ClientData clientData);381/* 117 */382EXTERN char * Tcl_DStringAppend(Tcl_DString *dsPtr,383 const char *bytes, int length);384/* 118 */385EXTERN char * Tcl_DStringAppendElement(Tcl_DString *dsPtr,386 const char *element);387/* 119 */388EXTERN void Tcl_DStringEndSublist(Tcl_DString *dsPtr);389/* 120 */390EXTERN void Tcl_DStringFree(Tcl_DString *dsPtr);391/* 121 */392EXTERN void Tcl_DStringGetResult(Tcl_Interp *interp,393 Tcl_DString *dsPtr);394/* 122 */395EXTERN void Tcl_DStringInit(Tcl_DString *dsPtr);396/* 123 */397EXTERN void Tcl_DStringResult(Tcl_Interp *interp,398 Tcl_DString *dsPtr);399/* 124 */400EXTERN void Tcl_DStringSetLength(Tcl_DString *dsPtr, int length);401/* 125 */402EXTERN void Tcl_DStringStartSublist(Tcl_DString *dsPtr);403/* 126 */404EXTERN int Tcl_Eof(Tcl_Channel chan);405/* 127 */406EXTERN CONST84_RETURN char * Tcl_ErrnoId(void);407/* 128 */408EXTERN CONST84_RETURN char * Tcl_ErrnoMsg(int err);409/* 129 */410EXTERN int Tcl_Eval(Tcl_Interp *interp, const char *script);411/* 130 */412EXTERN int Tcl_EvalFile(Tcl_Interp *interp,413 const char *fileName);414/* 131 */415EXTERN int Tcl_EvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr);416/* 132 */417EXTERN void Tcl_EventuallyFree(ClientData clientData,418 Tcl_FreeProc *freeProc);419/* 133 */420EXTERN TCL_NORETURN void Tcl_Exit(int status);421/* 134 */422EXTERN int Tcl_ExposeCommand(Tcl_Interp *interp,423 const char *hiddenCmdToken,424 const char *cmdName);425/* 135 */426EXTERN int Tcl_ExprBoolean(Tcl_Interp *interp, const char *expr,427 int *ptr);428/* 136 */429EXTERN int Tcl_ExprBooleanObj(Tcl_Interp *interp,430 Tcl_Obj *objPtr, int *ptr);431/* 137 */432EXTERN int Tcl_ExprDouble(Tcl_Interp *interp, const char *expr,433 double *ptr);434/* 138 */435EXTERN int Tcl_ExprDoubleObj(Tcl_Interp *interp,436 Tcl_Obj *objPtr, double *ptr);437/* 139 */438EXTERN int Tcl_ExprLong(Tcl_Interp *interp, const char *expr,439 long *ptr);440/* 140 */441EXTERN int Tcl_ExprLongObj(Tcl_Interp *interp, Tcl_Obj *objPtr,442 long *ptr);443/* 141 */444EXTERN int Tcl_ExprObj(Tcl_Interp *interp, Tcl_Obj *objPtr,445 Tcl_Obj **resultPtrPtr);446/* 142 */447EXTERN int Tcl_ExprString(Tcl_Interp *interp, const char *expr);448/* 143 */449EXTERN void Tcl_Finalize(void);450/* 144 */451EXTERN void Tcl_FindExecutable(const char *argv0);452/* 145 */453EXTERN Tcl_HashEntry * Tcl_FirstHashEntry(Tcl_HashTable *tablePtr,454 Tcl_HashSearch *searchPtr);455/* 146 */456EXTERN int Tcl_Flush(Tcl_Channel chan);457/* 147 */458EXTERN void Tcl_FreeResult(Tcl_Interp *interp);459/* 148 */460EXTERN int Tcl_GetAlias(Tcl_Interp *interp,461 const char *childCmd,462 Tcl_Interp **targetInterpPtr,463 CONST84 char **targetCmdPtr, int *argcPtr,464 CONST84 char ***argvPtr);465/* 149 */466EXTERN int Tcl_GetAliasObj(Tcl_Interp *interp,467 const char *childCmd,468 Tcl_Interp **targetInterpPtr,469 CONST84 char **targetCmdPtr, int *objcPtr,470 Tcl_Obj ***objv);471/* 150 */472EXTERN ClientData Tcl_GetAssocData(Tcl_Interp *interp,473 const char *name,474 Tcl_InterpDeleteProc **procPtr);475/* 151 */476EXTERN Tcl_Channel Tcl_GetChannel(Tcl_Interp *interp,477 const char *chanName, int *modePtr);478/* 152 */479EXTERN int Tcl_GetChannelBufferSize(Tcl_Channel chan);480/* 153 */481EXTERN int Tcl_GetChannelHandle(Tcl_Channel chan, int direction,482 ClientData *handlePtr);483/* 154 */484EXTERN ClientData Tcl_GetChannelInstanceData(Tcl_Channel chan);485/* 155 */486EXTERN int Tcl_GetChannelMode(Tcl_Channel chan);487/* 156 */488EXTERN CONST84_RETURN char * Tcl_GetChannelName(Tcl_Channel chan);489/* 157 */490EXTERN int Tcl_GetChannelOption(Tcl_Interp *interp,491 Tcl_Channel chan, const char *optionName,492 Tcl_DString *dsPtr);493/* 158 */494EXTERN CONST86 Tcl_ChannelType * Tcl_GetChannelType(Tcl_Channel chan);495/* 159 */496EXTERN int Tcl_GetCommandInfo(Tcl_Interp *interp,497 const char *cmdName, Tcl_CmdInfo *infoPtr);498/* 160 */499EXTERN CONST84_RETURN char * Tcl_GetCommandName(Tcl_Interp *interp,500 Tcl_Command command);501/* 161 */502EXTERN int Tcl_GetErrno(void);503/* 162 */504EXTERN CONST84_RETURN char * Tcl_GetHostName(void);505/* 163 */506EXTERN int Tcl_GetInterpPath(Tcl_Interp *interp,507 Tcl_Interp *childInterp);508/* 164 */509EXTERN Tcl_Interp * Tcl_GetMaster(Tcl_Interp *interp);510/* 165 */511EXTERN const char * Tcl_GetNameOfExecutable(void);512/* 166 */513EXTERN Tcl_Obj * Tcl_GetObjResult(Tcl_Interp *interp);514#if !defined(_WIN32) && !defined(MAC_OSX_TCL) /* UNIX */515/* 167 */516EXTERN int Tcl_GetOpenFile(Tcl_Interp *interp,517 const char *chanID, int forWriting,518 int checkUsage, ClientData *filePtr);519#endif /* UNIX */520#ifdef MAC_OSX_TCL /* MACOSX */521/* 167 */522EXTERN int Tcl_GetOpenFile(Tcl_Interp *interp,523 const char *chanID, int forWriting,524 int checkUsage, ClientData *filePtr);525#endif /* MACOSX */526/* 168 */527EXTERN Tcl_PathType Tcl_GetPathType(const char *path);528/* 169 */529EXTERN int Tcl_Gets(Tcl_Channel chan, Tcl_DString *dsPtr);530/* 170 */531EXTERN int Tcl_GetsObj(Tcl_Channel chan, Tcl_Obj *objPtr);532/* 171 */533EXTERN int Tcl_GetServiceMode(void);534/* 172 */535EXTERN Tcl_Interp * Tcl_GetSlave(Tcl_Interp *interp, const char *name);536/* 173 */537EXTERN Tcl_Channel Tcl_GetStdChannel(int type);538/* 174 */539EXTERN CONST84_RETURN char * Tcl_GetStringResult(Tcl_Interp *interp);540/* 175 */541EXTERN CONST84_RETURN char * Tcl_GetVar(Tcl_Interp *interp,542 const char *varName, int flags);543/* 176 */544EXTERN CONST84_RETURN char * Tcl_GetVar2(Tcl_Interp *interp,545 const char *part1, const char *part2,546 int flags);547/* 177 */548EXTERN int Tcl_GlobalEval(Tcl_Interp *interp,549 const char *command);550/* 178 */551EXTERN int Tcl_GlobalEvalObj(Tcl_Interp *interp,552 Tcl_Obj *objPtr);553/* 179 */554EXTERN int Tcl_HideCommand(Tcl_Interp *interp,555 const char *cmdName,556 const char *hiddenCmdToken);557/* 180 */558EXTERN int Tcl_Init(Tcl_Interp *interp);559/* 181 */560EXTERN void Tcl_InitHashTable(Tcl_HashTable *tablePtr,561 int keyType);562/* 182 */563EXTERN int Tcl_InputBlocked(Tcl_Channel chan);564/* 183 */565EXTERN int Tcl_InputBuffered(Tcl_Channel chan);566/* 184 */567EXTERN int Tcl_InterpDeleted(Tcl_Interp *interp);568/* 185 */569EXTERN int Tcl_IsSafe(Tcl_Interp *interp);570/* 186 */571EXTERN char * Tcl_JoinPath(int argc, CONST84 char *const *argv,572 Tcl_DString *resultPtr);573/* 187 */574EXTERN int Tcl_LinkVar(Tcl_Interp *interp, const char *varName,575 char *addr, int type);576/* Slot 188 is reserved */577/* 189 */578EXTERN Tcl_Channel Tcl_MakeFileChannel(ClientData handle, int mode);579/* 190 */580EXTERN int Tcl_MakeSafe(Tcl_Interp *interp);581/* 191 */582EXTERN Tcl_Channel Tcl_MakeTcpClientChannel(ClientData tcpSocket);583/* 192 */584EXTERN char * Tcl_Merge(int argc, CONST84 char *const *argv);585/* 193 */586EXTERN Tcl_HashEntry * Tcl_NextHashEntry(Tcl_HashSearch *searchPtr);587/* 194 */588EXTERN void Tcl_NotifyChannel(Tcl_Channel channel, int mask);589/* 195 */590EXTERN Tcl_Obj * Tcl_ObjGetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr,591 Tcl_Obj *part2Ptr, int flags);592/* 196 */593EXTERN Tcl_Obj * Tcl_ObjSetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr,594 Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr,595 int flags);596/* 197 */597EXTERN Tcl_Channel Tcl_OpenCommandChannel(Tcl_Interp *interp, int argc,598 CONST84 char **argv, int flags);599/* 198 */600EXTERN Tcl_Channel Tcl_OpenFileChannel(Tcl_Interp *interp,601 const char *fileName, const char *modeString,602 int permissions);603/* 199 */604EXTERN Tcl_Channel Tcl_OpenTcpClient(Tcl_Interp *interp, int port,605 const char *address, const char *myaddr,606 int myport, int flags);607/* 200 */608EXTERN Tcl_Channel Tcl_OpenTcpServer(Tcl_Interp *interp, int port,609 const char *host,610 Tcl_TcpAcceptProc *acceptProc,611 ClientData callbackData);612/* 201 */613EXTERN void Tcl_Preserve(ClientData data);614/* 202 */615EXTERN void Tcl_PrintDouble(Tcl_Interp *interp, double value,616 char *dst);617/* 203 */618EXTERN int Tcl_PutEnv(const char *assignment);619/* 204 */620EXTERN CONST84_RETURN char * Tcl_PosixError(Tcl_Interp *interp);621/* 205 */622EXTERN void Tcl_QueueEvent(Tcl_Event *evPtr,623 Tcl_QueuePosition position);624/* 206 */625EXTERN int Tcl_Read(Tcl_Channel chan, char *bufPtr, int toRead);626/* 207 */627EXTERN void Tcl_ReapDetachedProcs(void);628/* 208 */629EXTERN int Tcl_RecordAndEval(Tcl_Interp *interp,630 const char *cmd, int flags);631/* 209 */632EXTERN int Tcl_RecordAndEvalObj(Tcl_Interp *interp,633 Tcl_Obj *cmdPtr, int flags);634/* 210 */635EXTERN void Tcl_RegisterChannel(Tcl_Interp *interp,636 Tcl_Channel chan);637/* 211 */638EXTERN void Tcl_RegisterObjType(const Tcl_ObjType *typePtr);639/* 212 */640EXTERN Tcl_RegExp Tcl_RegExpCompile(Tcl_Interp *interp,641 const char *pattern);642/* 213 */643EXTERN int Tcl_RegExpExec(Tcl_Interp *interp, Tcl_RegExp regexp,644 const char *text, const char *start);645/* 214 */646EXTERN int Tcl_RegExpMatch(Tcl_Interp *interp, const char *text,647 const char *pattern);648/* 215 */649EXTERN void Tcl_RegExpRange(Tcl_RegExp regexp, int index,650 CONST84 char **startPtr,651 CONST84 char **endPtr);652/* 216 */653EXTERN void Tcl_Release(ClientData clientData);654/* 217 */655EXTERN void Tcl_ResetResult(Tcl_Interp *interp);656/* 218 */657EXTERN int Tcl_ScanElement(const char *src, int *flagPtr);658/* 219 */659EXTERN int Tcl_ScanCountedElement(const char *src, int length,660 int *flagPtr);661/* 220 */662EXTERN int Tcl_SeekOld(Tcl_Channel chan, int offset, int mode);663/* 221 */664EXTERN int Tcl_ServiceAll(void);665/* 222 */666EXTERN int Tcl_ServiceEvent(int flags);667/* 223 */668EXTERN void Tcl_SetAssocData(Tcl_Interp *interp,669 const char *name, Tcl_InterpDeleteProc *proc,670 ClientData clientData);671/* 224 */672EXTERN void Tcl_SetChannelBufferSize(Tcl_Channel chan, int sz);673/* 225 */674EXTERN int Tcl_SetChannelOption(Tcl_Interp *interp,675 Tcl_Channel chan, const char *optionName,676 const char *newValue);677/* 226 */678EXTERN int Tcl_SetCommandInfo(Tcl_Interp *interp,679 const char *cmdName,680 const Tcl_CmdInfo *infoPtr);681/* 227 */682EXTERN void Tcl_SetErrno(int err);683/* 228 */684EXTERN void Tcl_SetErrorCode(Tcl_Interp *interp, ...);685/* 229 */686EXTERN void Tcl_SetMaxBlockTime(const Tcl_Time *timePtr);687/* 230 */688EXTERN void Tcl_SetPanicProc(689 TCL_NORETURN1 Tcl_PanicProc *panicProc);690/* 231 */691EXTERN int Tcl_SetRecursionLimit(Tcl_Interp *interp, int depth);692/* 232 */693EXTERN void Tcl_SetResult(Tcl_Interp *interp, char *result,694 Tcl_FreeProc *freeProc);695/* 233 */696EXTERN int Tcl_SetServiceMode(int mode);697/* 234 */698EXTERN void Tcl_SetObjErrorCode(Tcl_Interp *interp,699 Tcl_Obj *errorObjPtr);700/* 235 */701EXTERN void Tcl_SetObjResult(Tcl_Interp *interp,702 Tcl_Obj *resultObjPtr);703/* 236 */704EXTERN void Tcl_SetStdChannel(Tcl_Channel channel, int type);705/* 237 */706EXTERN CONST84_RETURN char * Tcl_SetVar(Tcl_Interp *interp,707 const char *varName, const char *newValue,708 int flags);709/* 238 */710EXTERN CONST84_RETURN char * Tcl_SetVar2(Tcl_Interp *interp,711 const char *part1, const char *part2,712 const char *newValue, int flags);713/* 239 */714EXTERN CONST84_RETURN char * Tcl_SignalId(int sig);715/* 240 */716EXTERN CONST84_RETURN char * Tcl_SignalMsg(int sig);717/* 241 */718EXTERN void Tcl_SourceRCFile(Tcl_Interp *interp);719/* 242 */720EXTERN int Tcl_SplitList(Tcl_Interp *interp,721 const char *listStr, int *argcPtr,722 CONST84 char ***argvPtr);723/* 243 */724EXTERN void Tcl_SplitPath(const char *path, int *argcPtr,725 CONST84 char ***argvPtr);726/* 244 */727EXTERN void Tcl_StaticPackage(Tcl_Interp *interp,728 const char *prefix,729 Tcl_PackageInitProc *initProc,730 Tcl_PackageInitProc *safeInitProc);731/* 245 */732EXTERN int Tcl_StringMatch(const char *str, const char *pattern);733/* 246 */734EXTERN int Tcl_TellOld(Tcl_Channel chan);735/* 247 */736EXTERN int Tcl_TraceVar(Tcl_Interp *interp, const char *varName,737 int flags, Tcl_VarTraceProc *proc,738 ClientData clientData);739/* 248 */740EXTERN int Tcl_TraceVar2(Tcl_Interp *interp, const char *part1,741 const char *part2, int flags,742 Tcl_VarTraceProc *proc,743 ClientData clientData);744/* 249 */745EXTERN char * Tcl_TranslateFileName(Tcl_Interp *interp,746 const char *name, Tcl_DString *bufferPtr);747/* 250 */748EXTERN int Tcl_Ungets(Tcl_Channel chan, const char *str,749 int len, int atHead);750/* 251 */751EXTERN void Tcl_UnlinkVar(Tcl_Interp *interp,752 const char *varName);753/* 252 */754EXTERN int Tcl_UnregisterChannel(Tcl_Interp *interp,755 Tcl_Channel chan);756/* 253 */757EXTERN int Tcl_UnsetVar(Tcl_Interp *interp, const char *varName,758 int flags);759/* 254 */760EXTERN int Tcl_UnsetVar2(Tcl_Interp *interp, const char *part1,761 const char *part2, int flags);762/* 255 */763EXTERN void Tcl_UntraceVar(Tcl_Interp *interp,764 const char *varName, int flags,765 Tcl_VarTraceProc *proc,766 ClientData clientData);767/* 256 */768EXTERN void Tcl_UntraceVar2(Tcl_Interp *interp,769 const char *part1, const char *part2,770 int flags, Tcl_VarTraceProc *proc,771 ClientData clientData);772/* 257 */773EXTERN void Tcl_UpdateLinkedVar(Tcl_Interp *interp,774 const char *varName);775/* 258 */776EXTERN int Tcl_UpVar(Tcl_Interp *interp, const char *frameName,777 const char *varName, const char *localName,778 int flags);779/* 259 */780EXTERN int Tcl_UpVar2(Tcl_Interp *interp, const char *frameName,781 const char *part1, const char *part2,782 const char *localName, int flags);783/* 260 */784EXTERN int Tcl_VarEval(Tcl_Interp *interp, ...);785/* 261 */786EXTERN ClientData Tcl_VarTraceInfo(Tcl_Interp *interp,787 const char *varName, int flags,788 Tcl_VarTraceProc *procPtr,789 ClientData prevClientData);790/* 262 */791EXTERN ClientData Tcl_VarTraceInfo2(Tcl_Interp *interp,792 const char *part1, const char *part2,793 int flags, Tcl_VarTraceProc *procPtr,794 ClientData prevClientData);795/* 263 */796EXTERN int Tcl_Write(Tcl_Channel chan, const char *s, int slen);797/* 264 */798EXTERN void Tcl_WrongNumArgs(Tcl_Interp *interp, int objc,799 Tcl_Obj *const objv[], const char *message);800/* 265 */801EXTERN int Tcl_DumpActiveMemory(const char *fileName);802/* 266 */803EXTERN void Tcl_ValidateAllMemory(const char *file, int line);804/* 267 */805EXTERN void Tcl_AppendResultVA(Tcl_Interp *interp,806 va_list argList);807/* 268 */808EXTERN void Tcl_AppendStringsToObjVA(Tcl_Obj *objPtr,809 va_list argList);810/* 269 */811EXTERN char * Tcl_HashStats(Tcl_HashTable *tablePtr);812/* 270 */813EXTERN CONST84_RETURN char * Tcl_ParseVar(Tcl_Interp *interp,814 const char *start, CONST84 char **termPtr);815/* 271 */816EXTERN CONST84_RETURN char * Tcl_PkgPresent(Tcl_Interp *interp,817 const char *name, const char *version,818 int exact);819/* 272 */820EXTERN CONST84_RETURN char * Tcl_PkgPresentEx(Tcl_Interp *interp,821 const char *name, const char *version,822 int exact, void *clientDataPtr);823/* 273 */824EXTERN int Tcl_PkgProvide(Tcl_Interp *interp, const char *name,825 const char *version);826/* 274 */827EXTERN CONST84_RETURN char * Tcl_PkgRequire(Tcl_Interp *interp,828 const char *name, const char *version,829 int exact);830/* 275 */831EXTERN void Tcl_SetErrorCodeVA(Tcl_Interp *interp,832 va_list argList);833/* 276 */834EXTERN int Tcl_VarEvalVA(Tcl_Interp *interp, va_list argList);835/* 277 */836EXTERN Tcl_Pid Tcl_WaitPid(Tcl_Pid pid, int *statPtr, int options);837/* 278 */838EXTERN TCL_NORETURN void Tcl_PanicVA(const char *format, va_list argList);839/* 279 */840EXTERN void Tcl_GetVersion(int *major, int *minor,841 int *patchLevel, int *type);842/* 280 */843EXTERN void Tcl_InitMemory(Tcl_Interp *interp);844/* 281 */845EXTERN Tcl_Channel Tcl_StackChannel(Tcl_Interp *interp,846 const Tcl_ChannelType *typePtr,847 ClientData instanceData, int mask,848 Tcl_Channel prevChan);849/* 282 */850EXTERN int Tcl_UnstackChannel(Tcl_Interp *interp,851 Tcl_Channel chan);852/* 283 */853EXTERN Tcl_Channel Tcl_GetStackedChannel(Tcl_Channel chan);854/* 284 */855EXTERN void Tcl_SetMainLoop(Tcl_MainLoopProc *proc);856/* Slot 285 is reserved */857/* 286 */858EXTERN void Tcl_AppendObjToObj(Tcl_Obj *objPtr,859 Tcl_Obj *appendObjPtr);860/* 287 */861EXTERN Tcl_Encoding Tcl_CreateEncoding(const Tcl_EncodingType *typePtr);862/* 288 */863EXTERN void Tcl_CreateThreadExitHandler(Tcl_ExitProc *proc,864 ClientData clientData);865/* 289 */866EXTERN void Tcl_DeleteThreadExitHandler(Tcl_ExitProc *proc,867 ClientData clientData);868/* 290 */869EXTERN void Tcl_DiscardResult(Tcl_SavedResult *statePtr);870/* 291 */871EXTERN int Tcl_EvalEx(Tcl_Interp *interp, const char *script,872 int numBytes, int flags);873/* 292 */874EXTERN int Tcl_EvalObjv(Tcl_Interp *interp, int objc,875 Tcl_Obj *const objv[], int flags);876/* 293 */877EXTERN int Tcl_EvalObjEx(Tcl_Interp *interp, Tcl_Obj *objPtr,878 int flags);879/* 294 */880EXTERN void Tcl_ExitThread(int status);881/* 295 */882EXTERN int Tcl_ExternalToUtf(Tcl_Interp *interp,883 Tcl_Encoding encoding, const char *src,884 int srcLen, int flags,885 Tcl_EncodingState *statePtr, char *dst,886 int dstLen, int *srcReadPtr,887 int *dstWrotePtr, int *dstCharsPtr);888/* 296 */889EXTERN char * Tcl_ExternalToUtfDString(Tcl_Encoding encoding,890 const char *src, int srcLen,891 Tcl_DString *dsPtr);892/* 297 */893EXTERN void Tcl_FinalizeThread(void);894/* 298 */895EXTERN void Tcl_FinalizeNotifier(ClientData clientData);896/* 299 */897EXTERN void Tcl_FreeEncoding(Tcl_Encoding encoding);898/* 300 */899EXTERN Tcl_ThreadId Tcl_GetCurrentThread(void);900/* 301 */901EXTERN Tcl_Encoding Tcl_GetEncoding(Tcl_Interp *interp, const char *name);902/* 302 */903EXTERN CONST84_RETURN char * Tcl_GetEncodingName(Tcl_Encoding encoding);904/* 303 */905EXTERN void Tcl_GetEncodingNames(Tcl_Interp *interp);906/* 304 */907EXTERN int Tcl_GetIndexFromObjStruct(Tcl_Interp *interp,908 Tcl_Obj *objPtr, const void *tablePtr,909 int offset, const char *msg, int flags,910 int *indexPtr);911/* 305 */912EXTERN void * Tcl_GetThreadData(Tcl_ThreadDataKey *keyPtr,913 int size);914/* 306 */915EXTERN Tcl_Obj * Tcl_GetVar2Ex(Tcl_Interp *interp, const char *part1,916 const char *part2, int flags);917/* 307 */918EXTERN ClientData Tcl_InitNotifier(void);919/* 308 */920EXTERN void Tcl_MutexLock(Tcl_Mutex *mutexPtr);921/* 309 */922EXTERN void Tcl_MutexUnlock(Tcl_Mutex *mutexPtr);923/* 310 */924EXTERN void Tcl_ConditionNotify(Tcl_Condition *condPtr);925/* 311 */926EXTERN void Tcl_ConditionWait(Tcl_Condition *condPtr,927 Tcl_Mutex *mutexPtr, const Tcl_Time *timePtr);928/* 312 */929EXTERN int Tcl_NumUtfChars(const char *src, int length);930/* 313 */931EXTERN int Tcl_ReadChars(Tcl_Channel channel, Tcl_Obj *objPtr,932 int charsToRead, int appendFlag);933/* 314 */934EXTERN void Tcl_RestoreResult(Tcl_Interp *interp,935 Tcl_SavedResult *statePtr);936/* 315 */937EXTERN void Tcl_SaveResult(Tcl_Interp *interp,938 Tcl_SavedResult *statePtr);939/* 316 */940EXTERN int Tcl_SetSystemEncoding(Tcl_Interp *interp,941 const char *name);942/* 317 */943EXTERN Tcl_Obj * Tcl_SetVar2Ex(Tcl_Interp *interp, const char *part1,944 const char *part2, Tcl_Obj *newValuePtr,945 int flags);946/* 318 */947EXTERN void Tcl_ThreadAlert(Tcl_ThreadId threadId);948/* 319 */949EXTERN void Tcl_ThreadQueueEvent(Tcl_ThreadId threadId,950 Tcl_Event *evPtr, Tcl_QueuePosition position);951/* 320 */952EXTERN Tcl_UniChar Tcl_UniCharAtIndex(const char *src, int index);953/* 321 */954EXTERN Tcl_UniChar Tcl_UniCharToLower(int ch);955/* 322 */956EXTERN Tcl_UniChar Tcl_UniCharToTitle(int ch);957/* 323 */958EXTERN Tcl_UniChar Tcl_UniCharToUpper(int ch);959/* 324 */960EXTERN int Tcl_UniCharToUtf(int ch, char *buf);961/* 325 */962EXTERN CONST84_RETURN char * Tcl_UtfAtIndex(const char *src, int index);963/* 326 */964EXTERN int Tcl_UtfCharComplete(const char *src, int length);965/* 327 */966EXTERN int Tcl_UtfBackslash(const char *src, int *readPtr,967 char *dst);968/* 328 */969EXTERN CONST84_RETURN char * Tcl_UtfFindFirst(const char *src, int ch);970/* 329 */971EXTERN CONST84_RETURN char * Tcl_UtfFindLast(const char *src, int ch);972/* 330 */973EXTERN CONST84_RETURN char * Tcl_UtfNext(const char *src);974/* 331 */975EXTERN CONST84_RETURN char * Tcl_UtfPrev(const char *src, const char *start);976/* 332 */977EXTERN int Tcl_UtfToExternal(Tcl_Interp *interp,978 Tcl_Encoding encoding, const char *src,979 int srcLen, int flags,980 Tcl_EncodingState *statePtr, char *dst,981 int dstLen, int *srcReadPtr,982 int *dstWrotePtr, int *dstCharsPtr);983/* 333 */984EXTERN char * Tcl_UtfToExternalDString(Tcl_Encoding encoding,985 const char *src, int srcLen,986 Tcl_DString *dsPtr);987/* 334 */988EXTERN int Tcl_UtfToLower(char *src);989/* 335 */990EXTERN int Tcl_UtfToTitle(char *src);991/* 336 */992EXTERN int Tcl_UtfToUniChar(const char *src, Tcl_UniChar *chPtr);993/* 337 */994EXTERN int Tcl_UtfToUpper(char *src);995/* 338 */996EXTERN int Tcl_WriteChars(Tcl_Channel chan, const char *src,997 int srcLen);998/* 339 */999EXTERN int Tcl_WriteObj(Tcl_Channel chan, Tcl_Obj *objPtr);1000/* 340 */1001EXTERN char * Tcl_GetString(Tcl_Obj *objPtr);1002/* 341 */1003EXTERN CONST84_RETURN char * Tcl_GetDefaultEncodingDir(void);1004/* 342 */1005EXTERN void Tcl_SetDefaultEncodingDir(const char *path);1006/* 343 */1007EXTERN void Tcl_AlertNotifier(ClientData clientData);1008/* 344 */1009EXTERN void Tcl_ServiceModeHook(int mode);1010/* 345 */1011EXTERN int Tcl_UniCharIsAlnum(int ch);1012/* 346 */1013EXTERN int Tcl_UniCharIsAlpha(int ch);1014/* 347 */1015EXTERN int Tcl_UniCharIsDigit(int ch);1016/* 348 */1017EXTERN int Tcl_UniCharIsLower(int ch);1018/* 349 */1019EXTERN int Tcl_UniCharIsSpace(int ch);1020/* 350 */1021EXTERN int Tcl_UniCharIsUpper(int ch);1022/* 351 */1023EXTERN int Tcl_UniCharIsWordChar(int ch);1024/* 352 */1025EXTERN int Tcl_UniCharLen(const Tcl_UniChar *uniStr);1026/* 353 */1027EXTERN int Tcl_UniCharNcmp(const Tcl_UniChar *ucs,1028 const Tcl_UniChar *uct,1029 unsigned long numChars);1030/* 354 */1031EXTERN char * Tcl_UniCharToUtfDString(const Tcl_UniChar *uniStr,1032 int uniLength, Tcl_DString *dsPtr);1033/* 355 */1034EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString(const char *src, int length,1035 Tcl_DString *dsPtr);1036/* 356 */1037EXTERN Tcl_RegExp Tcl_GetRegExpFromObj(Tcl_Interp *interp,1038 Tcl_Obj *patObj, int flags);1039/* 357 */1040EXTERN Tcl_Obj * Tcl_EvalTokens(Tcl_Interp *interp,1041 Tcl_Token *tokenPtr, int count);1042/* 358 */1043EXTERN void Tcl_FreeParse(Tcl_Parse *parsePtr);1044/* 359 */1045EXTERN void Tcl_LogCommandInfo(Tcl_Interp *interp,1046 const char *script, const char *command,1047 int length);1048/* 360 */1049EXTERN int Tcl_ParseBraces(Tcl_Interp *interp,1050 const char *start, int numBytes,1051 Tcl_Parse *parsePtr, int append,1052 CONST84 char **termPtr);1053/* 361 */1054EXTERN int Tcl_ParseCommand(Tcl_Interp *interp,1055 const char *start, int numBytes, int nested,1056 Tcl_Parse *parsePtr);1057/* 362 */1058EXTERN int Tcl_ParseExpr(Tcl_Interp *interp, const char *start,1059 int numBytes, Tcl_Parse *parsePtr);1060/* 363 */1061EXTERN int Tcl_ParseQuotedString(Tcl_Interp *interp,1062 const char *start, int numBytes,1063 Tcl_Parse *parsePtr, int append,1064 CONST84 char **termPtr);1065/* 364 */1066EXTERN int Tcl_ParseVarName(Tcl_Interp *interp,1067 const char *start, int numBytes,1068 Tcl_Parse *parsePtr, int append);1069/* 365 */1070EXTERN char * Tcl_GetCwd(Tcl_Interp *interp, Tcl_DString *cwdPtr);1071/* 366 */1072EXTERN int Tcl_Chdir(const char *dirName);1073/* 367 */1074EXTERN int Tcl_Access(const char *path, int mode);1075/* 368 */1076EXTERN int Tcl_Stat(const char *path, struct stat *bufPtr);1077/* 369 */1078EXTERN int Tcl_UtfNcmp(const char *s1, const char *s2,1079 unsigned long n);1080/* 370 */1081EXTERN int Tcl_UtfNcasecmp(const char *s1, const char *s2,1082 unsigned long n);1083/* 371 */1084EXTERN int Tcl_StringCaseMatch(const char *str,1085 const char *pattern, int nocase);1086/* 372 */1087EXTERN int Tcl_UniCharIsControl(int ch);1088/* 373 */1089EXTERN int Tcl_UniCharIsGraph(int ch);1090/* 374 */1091EXTERN int Tcl_UniCharIsPrint(int ch);1092/* 375 */1093EXTERN int Tcl_UniCharIsPunct(int ch);1094/* 376 */1095EXTERN int Tcl_RegExpExecObj(Tcl_Interp *interp,1096 Tcl_RegExp regexp, Tcl_Obj *textObj,1097 int offset, int nmatches, int flags);1098/* 377 */1099EXTERN void Tcl_RegExpGetInfo(Tcl_RegExp regexp,1100 Tcl_RegExpInfo *infoPtr);1101/* 378 */1102EXTERN Tcl_Obj * Tcl_NewUnicodeObj(const Tcl_UniChar *unicode,1103 int numChars);1104/* 379 */1105EXTERN void Tcl_SetUnicodeObj(Tcl_Obj *objPtr,1106 const Tcl_UniChar *unicode, int numChars);1107/* 380 */1108EXTERN int Tcl_GetCharLength(Tcl_Obj *objPtr);1109/* 381 */1110EXTERN Tcl_UniChar Tcl_GetUniChar(Tcl_Obj *objPtr, int index);1111/* 382 */1112EXTERN Tcl_UniChar * Tcl_GetUnicode(Tcl_Obj *objPtr);1113/* 383 */1114EXTERN Tcl_Obj * Tcl_GetRange(Tcl_Obj *objPtr, int first, int last);1115/* 384 */1116EXTERN void Tcl_AppendUnicodeToObj(Tcl_Obj *objPtr,1117 const Tcl_UniChar *unicode, int length);1118/* 385 */1119EXTERN int Tcl_RegExpMatchObj(Tcl_Interp *interp,1120 Tcl_Obj *textObj, Tcl_Obj *patternObj);1121/* 386 */1122EXTERN void Tcl_SetNotifier(Tcl_NotifierProcs *notifierProcPtr);1123/* 387 */1124EXTERN Tcl_Mutex * Tcl_GetAllocMutex(void);1125/* 388 */1126EXTERN int Tcl_GetChannelNames(Tcl_Interp *interp);1127/* 389 */1128EXTERN int Tcl_GetChannelNamesEx(Tcl_Interp *interp,1129 const char *pattern);1130/* 390 */1131EXTERN int Tcl_ProcObjCmd(ClientData clientData,1132 Tcl_Interp *interp, int objc,1133 Tcl_Obj *const objv[]);1134/* 391 */1135EXTERN void Tcl_ConditionFinalize(Tcl_Condition *condPtr);1136/* 392 */1137EXTERN void Tcl_MutexFinalize(Tcl_Mutex *mutex);1138/* 393 */1139EXTERN int Tcl_CreateThread(Tcl_ThreadId *idPtr,1140 Tcl_ThreadCreateProc *proc,1141 ClientData clientData, int stackSize,1142 int flags);1143/* 394 */1144EXTERN int Tcl_ReadRaw(Tcl_Channel chan, char *dst,1145 int bytesToRead);1146/* 395 */1147EXTERN int Tcl_WriteRaw(Tcl_Channel chan, const char *src,1148 int srcLen);1149/* 396 */1150EXTERN Tcl_Channel Tcl_GetTopChannel(Tcl_Channel chan);1151/* 397 */1152EXTERN int Tcl_ChannelBuffered(Tcl_Channel chan);1153/* 398 */1154EXTERN CONST84_RETURN char * Tcl_ChannelName(1155 const Tcl_ChannelType *chanTypePtr);1156/* 399 */1157EXTERN Tcl_ChannelTypeVersion Tcl_ChannelVersion(1158 const Tcl_ChannelType *chanTypePtr);1159/* 400 */1160EXTERN Tcl_DriverBlockModeProc * Tcl_ChannelBlockModeProc(1161 const Tcl_ChannelType *chanTypePtr);1162/* 401 */1163EXTERN Tcl_DriverCloseProc * Tcl_ChannelCloseProc(1164 const Tcl_ChannelType *chanTypePtr);1165/* 402 */1166EXTERN Tcl_DriverClose2Proc * Tcl_ChannelClose2Proc(1167 const Tcl_ChannelType *chanTypePtr);1168/* 403 */1169EXTERN Tcl_DriverInputProc * Tcl_ChannelInputProc(1170 const Tcl_ChannelType *chanTypePtr);1171/* 404 */1172EXTERN Tcl_DriverOutputProc * Tcl_ChannelOutputProc(1173 const Tcl_ChannelType *chanTypePtr);1174/* 405 */1175EXTERN Tcl_DriverSeekProc * Tcl_ChannelSeekProc(1176 const Tcl_ChannelType *chanTypePtr);1177/* 406 */1178EXTERN Tcl_DriverSetOptionProc * Tcl_ChannelSetOptionProc(1179 const Tcl_ChannelType *chanTypePtr);1180/* 407 */1181EXTERN Tcl_DriverGetOptionProc * Tcl_ChannelGetOptionProc(1182 const Tcl_ChannelType *chanTypePtr);1183/* 408 */1184EXTERN Tcl_DriverWatchProc * Tcl_ChannelWatchProc(1185 const Tcl_ChannelType *chanTypePtr);1186/* 409 */1187EXTERN Tcl_DriverGetHandleProc * Tcl_ChannelGetHandleProc(1188 const Tcl_ChannelType *chanTypePtr);1189/* 410 */1190EXTERN Tcl_DriverFlushProc * Tcl_ChannelFlushProc(1191 const Tcl_ChannelType *chanTypePtr);1192/* 411 */1193EXTERN Tcl_DriverHandlerProc * Tcl_ChannelHandlerProc(1194 const Tcl_ChannelType *chanTypePtr);1195/* 412 */1196EXTERN int Tcl_JoinThread(Tcl_ThreadId threadId, int *result);1197/* 413 */1198EXTERN int Tcl_IsChannelShared(Tcl_Channel channel);1199/* 414 */1200EXTERN int Tcl_IsChannelRegistered(Tcl_Interp *interp,