00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014 #ifndef _TCLDECLS
00015 #define _TCLDECLS
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030 EXTERN int Tcl_PkgProvideEx _ANSI_ARGS_((Tcl_Interp* interp,
00031 CONST char* name, CONST char* version,
00032 ClientData clientData));
00033
00034 EXTERN CONST84_RETURN char * Tcl_PkgRequireEx _ANSI_ARGS_((
00035 Tcl_Interp * interp, CONST char * name,
00036 CONST char * version, int exact,
00037 ClientData * clientDataPtr));
00038
00039 EXTERN void Tcl_Panic _ANSI_ARGS_(TCL_VARARGS(CONST char *,format));
00040
00041 EXTERN char * Tcl_Alloc _ANSI_ARGS_((unsigned int size));
00042
00043 EXTERN void Tcl_Free _ANSI_ARGS_((char * ptr));
00044
00045 EXTERN char * Tcl_Realloc _ANSI_ARGS_((char * ptr,
00046 unsigned int size));
00047
00048 EXTERN char * Tcl_DbCkalloc _ANSI_ARGS_((unsigned int size,
00049 CONST char * file, int line));
00050
00051 EXTERN int Tcl_DbCkfree _ANSI_ARGS_((char * ptr,
00052 CONST char * file, int line));
00053
00054 EXTERN char * Tcl_DbCkrealloc _ANSI_ARGS_((char * ptr,
00055 unsigned int size, CONST char * file,
00056 int line));
00057 #if !defined(__WIN32__) && !defined(MAC_TCL)
00058
00059 EXTERN void Tcl_CreateFileHandler _ANSI_ARGS_((int fd, int mask,
00060 Tcl_FileProc * proc, ClientData clientData));
00061 #endif
00062 #if !defined(__WIN32__) && !defined(MAC_TCL)
00063
00064 EXTERN void Tcl_DeleteFileHandler _ANSI_ARGS_((int fd));
00065 #endif
00066
00067 EXTERN void Tcl_SetTimer _ANSI_ARGS_((Tcl_Time * timePtr));
00068
00069 EXTERN void Tcl_Sleep _ANSI_ARGS_((int ms));
00070
00071 EXTERN int Tcl_WaitForEvent _ANSI_ARGS_((Tcl_Time * timePtr));
00072
00073 EXTERN int Tcl_AppendAllObjTypes _ANSI_ARGS_((
00074 Tcl_Interp * interp, Tcl_Obj * objPtr));
00075
00076 EXTERN void Tcl_AppendStringsToObj _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr));
00077
00078 EXTERN void Tcl_AppendToObj _ANSI_ARGS_((Tcl_Obj* objPtr,
00079 CONST char* bytes, int length));
00080
00081 EXTERN Tcl_Obj * Tcl_ConcatObj _ANSI_ARGS_((int objc,
00082 Tcl_Obj *CONST objv[]));
00083
00084 EXTERN int Tcl_ConvertToType _ANSI_ARGS_((Tcl_Interp * interp,
00085 Tcl_Obj * objPtr, Tcl_ObjType * typePtr));
00086
00087 EXTERN void Tcl_DbDecrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr,
00088 CONST char * file, int line));
00089
00090 EXTERN void Tcl_DbIncrRefCount _ANSI_ARGS_((Tcl_Obj * objPtr,
00091 CONST char * file, int line));
00092
00093 EXTERN int Tcl_DbIsShared _ANSI_ARGS_((Tcl_Obj * objPtr,
00094 CONST char * file, int line));
00095
00096 EXTERN Tcl_Obj * Tcl_DbNewBooleanObj _ANSI_ARGS_((int boolValue,
00097 CONST char * file, int line));
00098
00099 EXTERN Tcl_Obj * Tcl_DbNewByteArrayObj _ANSI_ARGS_((
00100 CONST unsigned char * bytes, int length,
00101 CONST char * file, int line));
00102
00103 EXTERN Tcl_Obj * Tcl_DbNewDoubleObj _ANSI_ARGS_((double doubleValue,
00104 CONST char * file, int line));
00105
00106 EXTERN Tcl_Obj * Tcl_DbNewListObj _ANSI_ARGS_((int objc,
00107 Tcl_Obj *CONST * objv, CONST char * file,
00108 int line));
00109
00110 EXTERN Tcl_Obj * Tcl_DbNewLongObj _ANSI_ARGS_((long longValue,
00111 CONST char * file, int line));
00112
00113 EXTERN Tcl_Obj * Tcl_DbNewObj _ANSI_ARGS_((CONST char * file,
00114 int line));
00115
00116 EXTERN Tcl_Obj * Tcl_DbNewStringObj _ANSI_ARGS_((CONST char * bytes,
00117 int length, CONST char * file, int line));
00118
00119 EXTERN Tcl_Obj * Tcl_DuplicateObj _ANSI_ARGS_((Tcl_Obj * objPtr));
00120
00121 EXTERN void TclFreeObj _ANSI_ARGS_((Tcl_Obj * objPtr));
00122
00123 EXTERN int Tcl_GetBoolean _ANSI_ARGS_((Tcl_Interp * interp,
00124 CONST char * str, int * boolPtr));
00125
00126 EXTERN int Tcl_GetBooleanFromObj _ANSI_ARGS_((
00127 Tcl_Interp * interp, Tcl_Obj * objPtr,
00128 int * boolPtr));
00129
00130 EXTERN unsigned char * Tcl_GetByteArrayFromObj _ANSI_ARGS_((
00131 Tcl_Obj * objPtr, int * lengthPtr));
00132
00133 EXTERN int Tcl_GetDouble _ANSI_ARGS_((Tcl_Interp * interp,
00134 CONST char * str, double * doublePtr));
00135
00136 EXTERN int Tcl_GetDoubleFromObj _ANSI_ARGS_((
00137 Tcl_Interp * interp, Tcl_Obj * objPtr,
00138 double * doublePtr));
00139
00140 EXTERN int Tcl_GetIndexFromObj _ANSI_ARGS_((Tcl_Interp * interp,
00141 Tcl_Obj * objPtr, CONST84 char ** tablePtr,
00142 CONST char * msg, int flags, int * indexPtr));
00143
00144 EXTERN int Tcl_GetInt _ANSI_ARGS_((Tcl_Interp * interp,
00145 CONST char * str, int * intPtr));
00146
00147 EXTERN int Tcl_GetIntFromObj _ANSI_ARGS_((Tcl_Interp * interp,
00148 Tcl_Obj * objPtr, int * intPtr));
00149
00150 EXTERN int Tcl_GetLongFromObj _ANSI_ARGS_((Tcl_Interp * interp,
00151 Tcl_Obj * objPtr, long * longPtr));
00152
00153 EXTERN Tcl_ObjType * Tcl_GetObjType _ANSI_ARGS_((CONST char * typeName));
00154
00155 EXTERN char * Tcl_GetStringFromObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00156 int * lengthPtr));
00157
00158 EXTERN void Tcl_InvalidateStringRep _ANSI_ARGS_((
00159 Tcl_Obj * objPtr));
00160
00161 EXTERN int Tcl_ListObjAppendList _ANSI_ARGS_((
00162 Tcl_Interp * interp, Tcl_Obj * listPtr,
00163 Tcl_Obj * elemListPtr));
00164
00165 EXTERN int Tcl_ListObjAppendElement _ANSI_ARGS_((
00166 Tcl_Interp * interp, Tcl_Obj * listPtr,
00167 Tcl_Obj * objPtr));
00168
00169 EXTERN int Tcl_ListObjGetElements _ANSI_ARGS_((
00170 Tcl_Interp * interp, Tcl_Obj * listPtr,
00171 int * objcPtr, Tcl_Obj *** objvPtr));
00172
00173 EXTERN int Tcl_ListObjIndex _ANSI_ARGS_((Tcl_Interp * interp,
00174 Tcl_Obj * listPtr, int index,
00175 Tcl_Obj ** objPtrPtr));
00176
00177 EXTERN int Tcl_ListObjLength _ANSI_ARGS_((Tcl_Interp * interp,
00178 Tcl_Obj * listPtr, int * lengthPtr));
00179
00180 EXTERN int Tcl_ListObjReplace _ANSI_ARGS_((Tcl_Interp * interp,
00181 Tcl_Obj * listPtr, int first, int count,
00182 int objc, Tcl_Obj *CONST objv[]));
00183
00184 EXTERN Tcl_Obj * Tcl_NewBooleanObj _ANSI_ARGS_((int boolValue));
00185
00186 EXTERN Tcl_Obj * Tcl_NewByteArrayObj _ANSI_ARGS_((
00187 CONST unsigned char* bytes, int length));
00188
00189 EXTERN Tcl_Obj * Tcl_NewDoubleObj _ANSI_ARGS_((double doubleValue));
00190
00191 EXTERN Tcl_Obj * Tcl_NewIntObj _ANSI_ARGS_((int intValue));
00192
00193 EXTERN Tcl_Obj * Tcl_NewListObj _ANSI_ARGS_((int objc,
00194 Tcl_Obj *CONST objv[]));
00195
00196 EXTERN Tcl_Obj * Tcl_NewLongObj _ANSI_ARGS_((long longValue));
00197
00198 EXTERN Tcl_Obj * Tcl_NewObj _ANSI_ARGS_((void));
00199
00200 EXTERN Tcl_Obj * Tcl_NewStringObj _ANSI_ARGS_((CONST char * bytes,
00201 int length));
00202
00203 EXTERN void Tcl_SetBooleanObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00204 int boolValue));
00205
00206 EXTERN unsigned char * Tcl_SetByteArrayLength _ANSI_ARGS_((Tcl_Obj * objPtr,
00207 int length));
00208
00209 EXTERN void Tcl_SetByteArrayObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00210 CONST unsigned char * bytes, int length));
00211
00212 EXTERN void Tcl_SetDoubleObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00213 double doubleValue));
00214
00215 EXTERN void Tcl_SetIntObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00216 int intValue));
00217
00218 EXTERN void Tcl_SetListObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00219 int objc, Tcl_Obj *CONST objv[]));
00220
00221 EXTERN void Tcl_SetLongObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00222 long longValue));
00223
00224 EXTERN void Tcl_SetObjLength _ANSI_ARGS_((Tcl_Obj * objPtr,
00225 int length));
00226
00227 EXTERN void Tcl_SetStringObj _ANSI_ARGS_((Tcl_Obj* objPtr,
00228 CONST char* bytes, int length));
00229
00230 EXTERN void Tcl_AddErrorInfo _ANSI_ARGS_((Tcl_Interp * interp,
00231 CONST char * message));
00232
00233 EXTERN void Tcl_AddObjErrorInfo _ANSI_ARGS_((Tcl_Interp * interp,
00234 CONST char * message, int length));
00235
00236 EXTERN void Tcl_AllowExceptions _ANSI_ARGS_((Tcl_Interp * interp));
00237
00238 EXTERN void Tcl_AppendElement _ANSI_ARGS_((Tcl_Interp * interp,
00239 CONST char * string));
00240
00241 EXTERN void Tcl_AppendResult _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
00242
00243 EXTERN Tcl_AsyncHandler Tcl_AsyncCreate _ANSI_ARGS_((Tcl_AsyncProc * proc,
00244 ClientData clientData));
00245
00246 EXTERN void Tcl_AsyncDelete _ANSI_ARGS_((Tcl_AsyncHandler async));
00247
00248 EXTERN int Tcl_AsyncInvoke _ANSI_ARGS_((Tcl_Interp * interp,
00249 int code));
00250
00251 EXTERN void Tcl_AsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async));
00252
00253 EXTERN int Tcl_AsyncReady _ANSI_ARGS_((void));
00254
00255 EXTERN void Tcl_BackgroundError _ANSI_ARGS_((Tcl_Interp * interp));
00256
00257 EXTERN char Tcl_Backslash _ANSI_ARGS_((CONST char * src,
00258 int * readPtr));
00259
00260 EXTERN int Tcl_BadChannelOption _ANSI_ARGS_((
00261 Tcl_Interp * interp, CONST char * optionName,
00262 CONST char * optionList));
00263
00264 EXTERN void Tcl_CallWhenDeleted _ANSI_ARGS_((Tcl_Interp * interp,
00265 Tcl_InterpDeleteProc * proc,
00266 ClientData clientData));
00267
00268 EXTERN void Tcl_CancelIdleCall _ANSI_ARGS_((
00269 Tcl_IdleProc * idleProc,
00270 ClientData clientData));
00271
00272 EXTERN int Tcl_Close _ANSI_ARGS_((Tcl_Interp * interp,
00273 Tcl_Channel chan));
00274
00275 EXTERN int Tcl_CommandComplete _ANSI_ARGS_((CONST char * cmd));
00276
00277 EXTERN char * Tcl_Concat _ANSI_ARGS_((int argc,
00278 CONST84 char * CONST * argv));
00279
00280 EXTERN int Tcl_ConvertElement _ANSI_ARGS_((CONST char * src,
00281 char * dst, int flags));
00282
00283 EXTERN int Tcl_ConvertCountedElement _ANSI_ARGS_((
00284 CONST char * src, int length, char * dst,
00285 int flags));
00286
00287 EXTERN int Tcl_CreateAlias _ANSI_ARGS_((Tcl_Interp * slave,
00288 CONST char * slaveCmd, Tcl_Interp * target,
00289 CONST char * targetCmd, int argc,
00290 CONST84 char * CONST * argv));
00291
00292 EXTERN int Tcl_CreateAliasObj _ANSI_ARGS_((Tcl_Interp * slave,
00293 CONST char * slaveCmd, Tcl_Interp * target,
00294 CONST char * targetCmd, int objc,
00295 Tcl_Obj *CONST objv[]));
00296
00297 EXTERN Tcl_Channel Tcl_CreateChannel _ANSI_ARGS_((
00298 Tcl_ChannelType * typePtr,
00299 CONST char * chanName,
00300 ClientData instanceData, int mask));
00301
00302 EXTERN void Tcl_CreateChannelHandler _ANSI_ARGS_((
00303 Tcl_Channel chan, int mask,
00304 Tcl_ChannelProc * proc,
00305 ClientData clientData));
00306
00307 EXTERN void Tcl_CreateCloseHandler _ANSI_ARGS_((Tcl_Channel chan,
00308 Tcl_CloseProc * proc, ClientData clientData));
00309
00310 EXTERN Tcl_Command Tcl_CreateCommand _ANSI_ARGS_((Tcl_Interp * interp,
00311 CONST char * cmdName, Tcl_CmdProc * proc,
00312 ClientData clientData,
00313 Tcl_CmdDeleteProc * deleteProc));
00314
00315 EXTERN void Tcl_CreateEventSource _ANSI_ARGS_((
00316 Tcl_EventSetupProc * setupProc,
00317 Tcl_EventCheckProc * checkProc,
00318 ClientData clientData));
00319
00320 EXTERN void Tcl_CreateExitHandler _ANSI_ARGS_((
00321 Tcl_ExitProc * proc, ClientData clientData));
00322
00323 EXTERN Tcl_Interp * Tcl_CreateInterp _ANSI_ARGS_((void));
00324
00325 EXTERN void Tcl_CreateMathFunc _ANSI_ARGS_((Tcl_Interp * interp,
00326 CONST char * name, int numArgs,
00327 Tcl_ValueType * argTypes,
00328 Tcl_MathProc * proc, ClientData clientData));
00329
00330 EXTERN Tcl_Command Tcl_CreateObjCommand _ANSI_ARGS_((
00331 Tcl_Interp * interp, CONST char * cmdName,
00332 Tcl_ObjCmdProc * proc, ClientData clientData,
00333 Tcl_CmdDeleteProc * deleteProc));
00334
00335 EXTERN Tcl_Interp * Tcl_CreateSlave _ANSI_ARGS_((Tcl_Interp * interp,
00336 CONST char * slaveName, int isSafe));
00337
00338 EXTERN Tcl_TimerToken Tcl_CreateTimerHandler _ANSI_ARGS_((int milliseconds,
00339 Tcl_TimerProc * proc, ClientData clientData));
00340
00341 EXTERN Tcl_Trace Tcl_CreateTrace _ANSI_ARGS_((Tcl_Interp * interp,
00342 int level, Tcl_CmdTraceProc * proc,
00343 ClientData clientData));
00344
00345 EXTERN void Tcl_DeleteAssocData _ANSI_ARGS_((Tcl_Interp * interp,
00346 CONST char * name));
00347
00348 EXTERN void Tcl_DeleteChannelHandler _ANSI_ARGS_((
00349 Tcl_Channel chan, Tcl_ChannelProc * proc,
00350 ClientData clientData));
00351
00352 EXTERN void Tcl_DeleteCloseHandler _ANSI_ARGS_((Tcl_Channel chan,
00353 Tcl_CloseProc * proc, ClientData clientData));
00354
00355 EXTERN int Tcl_DeleteCommand _ANSI_ARGS_((Tcl_Interp * interp,
00356 CONST char * cmdName));
00357
00358 EXTERN int Tcl_DeleteCommandFromToken _ANSI_ARGS_((
00359 Tcl_Interp * interp, Tcl_Command command));
00360
00361 EXTERN void Tcl_DeleteEvents _ANSI_ARGS_((
00362 Tcl_EventDeleteProc * proc,
00363 ClientData clientData));
00364
00365 EXTERN void Tcl_DeleteEventSource _ANSI_ARGS_((
00366 Tcl_EventSetupProc * setupProc,
00367 Tcl_EventCheckProc * checkProc,
00368 ClientData clientData));
00369
00370 EXTERN void Tcl_DeleteExitHandler _ANSI_ARGS_((
00371 Tcl_ExitProc * proc, ClientData clientData));
00372
00373 EXTERN void Tcl_DeleteHashEntry _ANSI_ARGS_((
00374 Tcl_HashEntry * entryPtr));
00375
00376 EXTERN void Tcl_DeleteHashTable _ANSI_ARGS_((
00377 Tcl_HashTable * tablePtr));
00378
00379 EXTERN void Tcl_DeleteInterp _ANSI_ARGS_((Tcl_Interp * interp));
00380 #if !defined(__WIN32__) && !defined(MAC_TCL)
00381
00382 EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids,
00383 Tcl_Pid * pidPtr));
00384 #endif
00385 #ifdef __WIN32__
00386
00387 EXTERN void Tcl_DetachPids _ANSI_ARGS_((int numPids,
00388 Tcl_Pid * pidPtr));
00389 #endif
00390
00391 EXTERN void Tcl_DeleteTimerHandler _ANSI_ARGS_((
00392 Tcl_TimerToken token));
00393
00394 EXTERN void Tcl_DeleteTrace _ANSI_ARGS_((Tcl_Interp * interp,
00395 Tcl_Trace trace));
00396
00397 EXTERN void Tcl_DontCallWhenDeleted _ANSI_ARGS_((
00398 Tcl_Interp * interp,
00399 Tcl_InterpDeleteProc * proc,
00400 ClientData clientData));
00401
00402 EXTERN int Tcl_DoOneEvent _ANSI_ARGS_((int flags));
00403
00404 EXTERN void Tcl_DoWhenIdle _ANSI_ARGS_((Tcl_IdleProc * proc,
00405 ClientData clientData));
00406
00407 EXTERN char * Tcl_DStringAppend _ANSI_ARGS_((Tcl_DString * dsPtr,
00408 CONST char * str, int length));
00409
00410 EXTERN char * Tcl_DStringAppendElement _ANSI_ARGS_((
00411 Tcl_DString * dsPtr, CONST char * string));
00412
00413 EXTERN void Tcl_DStringEndSublist _ANSI_ARGS_((
00414 Tcl_DString * dsPtr));
00415
00416 EXTERN void Tcl_DStringFree _ANSI_ARGS_((Tcl_DString * dsPtr));
00417
00418 EXTERN void Tcl_DStringGetResult _ANSI_ARGS_((
00419 Tcl_Interp * interp, Tcl_DString * dsPtr));
00420
00421 EXTERN void Tcl_DStringInit _ANSI_ARGS_((Tcl_DString * dsPtr));
00422
00423 EXTERN void Tcl_DStringResult _ANSI_ARGS_((Tcl_Interp * interp,
00424 Tcl_DString * dsPtr));
00425
00426 EXTERN void Tcl_DStringSetLength _ANSI_ARGS_((
00427 Tcl_DString * dsPtr, int length));
00428
00429 EXTERN void Tcl_DStringStartSublist _ANSI_ARGS_((
00430 Tcl_DString * dsPtr));
00431
00432 EXTERN int Tcl_Eof _ANSI_ARGS_((Tcl_Channel chan));
00433
00434 EXTERN CONST84_RETURN char * Tcl_ErrnoId _ANSI_ARGS_((void));
00435
00436 EXTERN CONST84_RETURN char * Tcl_ErrnoMsg _ANSI_ARGS_((int err));
00437
00438 EXTERN int Tcl_Eval _ANSI_ARGS_((Tcl_Interp * interp,
00439 CONST char * string));
00440
00441 EXTERN int Tcl_EvalFile _ANSI_ARGS_((Tcl_Interp * interp,
00442 CONST char * fileName));
00443
00444 EXTERN int Tcl_EvalObj _ANSI_ARGS_((Tcl_Interp * interp,
00445 Tcl_Obj * objPtr));
00446
00447 EXTERN void Tcl_EventuallyFree _ANSI_ARGS_((
00448 ClientData clientData,
00449 Tcl_FreeProc * freeProc));
00450
00451 EXTERN void Tcl_Exit _ANSI_ARGS_((int status));
00452
00453 EXTERN int Tcl_ExposeCommand _ANSI_ARGS_((Tcl_Interp * interp,
00454 CONST char * hiddenCmdToken,
00455 CONST char * cmdName));
00456
00457 EXTERN int Tcl_ExprBoolean _ANSI_ARGS_((Tcl_Interp * interp,
00458 CONST char * str, int * ptr));
00459
00460 EXTERN int Tcl_ExprBooleanObj _ANSI_ARGS_((Tcl_Interp * interp,
00461 Tcl_Obj * objPtr, int * ptr));
00462
00463 EXTERN int Tcl_ExprDouble _ANSI_ARGS_((Tcl_Interp * interp,
00464 CONST char * str, double * ptr));
00465
00466 EXTERN int Tcl_ExprDoubleObj _ANSI_ARGS_((Tcl_Interp * interp,
00467 Tcl_Obj * objPtr, double * ptr));
00468
00469 EXTERN int Tcl_ExprLong _ANSI_ARGS_((Tcl_Interp * interp,
00470 CONST char * str, long * ptr));
00471
00472 EXTERN int Tcl_ExprLongObj _ANSI_ARGS_((Tcl_Interp * interp,
00473 Tcl_Obj * objPtr, long * ptr));
00474
00475 EXTERN int Tcl_ExprObj _ANSI_ARGS_((Tcl_Interp * interp,
00476 Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr));
00477
00478 EXTERN int Tcl_ExprString _ANSI_ARGS_((Tcl_Interp * interp,
00479 CONST char * string));
00480
00481 EXTERN void Tcl_Finalize _ANSI_ARGS_((void));
00482
00483 EXTERN void Tcl_FindExecutable _ANSI_ARGS_((CONST char * argv0));
00484
00485 EXTERN Tcl_HashEntry * Tcl_FirstHashEntry _ANSI_ARGS_((
00486 Tcl_HashTable * tablePtr,
00487 Tcl_HashSearch * searchPtr));
00488
00489 EXTERN int Tcl_Flush _ANSI_ARGS_((Tcl_Channel chan));
00490
00491 EXTERN void Tcl_FreeResult _ANSI_ARGS_((Tcl_Interp * interp));
00492
00493 EXTERN int Tcl_GetAlias _ANSI_ARGS_((Tcl_Interp * interp,
00494 CONST char * slaveCmd,
00495 Tcl_Interp ** targetInterpPtr,
00496 CONST84 char ** targetCmdPtr, int * argcPtr,
00497 CONST84 char *** argvPtr));
00498
00499 EXTERN int Tcl_GetAliasObj _ANSI_ARGS_((Tcl_Interp * interp,
00500 CONST char * slaveCmd,
00501 Tcl_Interp ** targetInterpPtr,
00502 CONST84 char ** targetCmdPtr, int * objcPtr,
00503 Tcl_Obj *** objv));
00504
00505 EXTERN ClientData Tcl_GetAssocData _ANSI_ARGS_((Tcl_Interp * interp,
00506 CONST char * name,
00507 Tcl_InterpDeleteProc ** procPtr));
00508
00509 EXTERN Tcl_Channel Tcl_GetChannel _ANSI_ARGS_((Tcl_Interp * interp,
00510 CONST char * chanName, int * modePtr));
00511
00512 EXTERN int Tcl_GetChannelBufferSize _ANSI_ARGS_((
00513 Tcl_Channel chan));
00514
00515 EXTERN int Tcl_GetChannelHandle _ANSI_ARGS_((Tcl_Channel chan,
00516 int direction, ClientData * handlePtr));
00517
00518 EXTERN ClientData Tcl_GetChannelInstanceData _ANSI_ARGS_((
00519 Tcl_Channel chan));
00520
00521 EXTERN int Tcl_GetChannelMode _ANSI_ARGS_((Tcl_Channel chan));
00522
00523 EXTERN CONST84_RETURN char * Tcl_GetChannelName _ANSI_ARGS_((
00524 Tcl_Channel chan));
00525
00526 EXTERN int Tcl_GetChannelOption _ANSI_ARGS_((
00527 Tcl_Interp * interp, Tcl_Channel chan,
00528 CONST char * optionName, Tcl_DString * dsPtr));
00529
00530 EXTERN Tcl_ChannelType * Tcl_GetChannelType _ANSI_ARGS_((Tcl_Channel chan));
00531
00532 EXTERN int Tcl_GetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp,
00533 CONST char * cmdName, Tcl_CmdInfo * infoPtr));
00534
00535 EXTERN CONST84_RETURN char * Tcl_GetCommandName _ANSI_ARGS_((
00536 Tcl_Interp * interp, Tcl_Command command));
00537
00538 EXTERN int Tcl_GetErrno _ANSI_ARGS_((void));
00539
00540 EXTERN CONST84_RETURN char * Tcl_GetHostName _ANSI_ARGS_((void));
00541
00542 EXTERN int Tcl_GetInterpPath _ANSI_ARGS_((
00543 Tcl_Interp * askInterp,
00544 Tcl_Interp * slaveInterp));
00545
00546 EXTERN Tcl_Interp * Tcl_GetMaster _ANSI_ARGS_((Tcl_Interp * interp));
00547
00548 EXTERN CONST char * Tcl_GetNameOfExecutable _ANSI_ARGS_((void));
00549
00550 EXTERN Tcl_Obj * Tcl_GetObjResult _ANSI_ARGS_((Tcl_Interp * interp));
00551 #if !defined(__WIN32__) && !defined(MAC_TCL)
00552
00553 EXTERN int Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp,
00554 CONST char * str, int forWriting,
00555 int checkUsage, ClientData * filePtr));
00556 #endif
00557
00558 EXTERN Tcl_PathType Tcl_GetPathType _ANSI_ARGS_((CONST char * path));
00559
00560 EXTERN int Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan,
00561 Tcl_DString * dsPtr));
00562
00563 EXTERN int Tcl_GetsObj _ANSI_ARGS_((Tcl_Channel chan,
00564 Tcl_Obj * objPtr));
00565
00566 EXTERN int Tcl_GetServiceMode _ANSI_ARGS_((void));
00567
00568 EXTERN Tcl_Interp * Tcl_GetSlave _ANSI_ARGS_((Tcl_Interp * interp,
00569 CONST char * slaveName));
00570
00571 EXTERN Tcl_Channel Tcl_GetStdChannel _ANSI_ARGS_((int type));
00572
00573 EXTERN CONST84_RETURN char * Tcl_GetStringResult _ANSI_ARGS_((
00574 Tcl_Interp * interp));
00575
00576 EXTERN CONST84_RETURN char * Tcl_GetVar _ANSI_ARGS_((Tcl_Interp * interp,
00577 CONST char * varName, int flags));
00578
00579 EXTERN CONST84_RETURN char * Tcl_GetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00580 CONST char * part1, CONST char * part2,
00581 int flags));
00582
00583 EXTERN int Tcl_GlobalEval _ANSI_ARGS_((Tcl_Interp * interp,
00584 CONST char * command));
00585
00586 EXTERN int Tcl_GlobalEvalObj _ANSI_ARGS_((Tcl_Interp * interp,
00587 Tcl_Obj * objPtr));
00588
00589 EXTERN int Tcl_HideCommand _ANSI_ARGS_((Tcl_Interp * interp,
00590 CONST char * cmdName,
00591 CONST char * hiddenCmdToken));
00592
00593 EXTERN int Tcl_Init _ANSI_ARGS_((Tcl_Interp * interp));
00594
00595 EXTERN void Tcl_InitHashTable _ANSI_ARGS_((
00596 Tcl_HashTable * tablePtr, int keyType));
00597
00598 EXTERN int Tcl_InputBlocked _ANSI_ARGS_((Tcl_Channel chan));
00599
00600 EXTERN int Tcl_InputBuffered _ANSI_ARGS_((Tcl_Channel chan));
00601
00602 EXTERN int Tcl_InterpDeleted _ANSI_ARGS_((Tcl_Interp * interp));
00603
00604 EXTERN int Tcl_IsSafe _ANSI_ARGS_((Tcl_Interp * interp));
00605
00606 EXTERN char * Tcl_JoinPath _ANSI_ARGS_((int argc,
00607 CONST84 char * CONST * argv,
00608 Tcl_DString * resultPtr));
00609
00610 EXTERN int Tcl_LinkVar _ANSI_ARGS_((Tcl_Interp * interp,
00611 CONST char * varName, char * addr, int type));
00612
00613
00614 EXTERN Tcl_Channel Tcl_MakeFileChannel _ANSI_ARGS_((ClientData handle,
00615 int mode));
00616
00617 EXTERN int Tcl_MakeSafe _ANSI_ARGS_((Tcl_Interp * interp));
00618
00619 EXTERN Tcl_Channel Tcl_MakeTcpClientChannel _ANSI_ARGS_((
00620 ClientData tcpSocket));
00621
00622 EXTERN char * Tcl_Merge _ANSI_ARGS_((int argc,
00623 CONST84 char * CONST * argv));
00624
00625 EXTERN Tcl_HashEntry * Tcl_NextHashEntry _ANSI_ARGS_((
00626 Tcl_HashSearch * searchPtr));
00627
00628 EXTERN void Tcl_NotifyChannel _ANSI_ARGS_((Tcl_Channel channel,
00629 int mask));
00630
00631 EXTERN Tcl_Obj * Tcl_ObjGetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00632 Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr,
00633 int flags));
00634
00635 EXTERN Tcl_Obj * Tcl_ObjSetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00636 Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr,
00637 Tcl_Obj * newValuePtr, int flags));
00638 #if !defined(__WIN32__) && !defined(MAC_TCL)
00639
00640 EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_((
00641 Tcl_Interp * interp, int argc,
00642 CONST84 char ** argv, int flags));
00643 #endif
00644 #ifdef __WIN32__
00645
00646 EXTERN Tcl_Channel Tcl_OpenCommandChannel _ANSI_ARGS_((
00647 Tcl_Interp * interp, int argc,
00648 CONST84 char ** argv, int flags));
00649 #endif
00650
00651 EXTERN Tcl_Channel Tcl_OpenFileChannel _ANSI_ARGS_((Tcl_Interp * interp,
00652 CONST char * fileName,
00653 CONST char * modeString, int permissions));
00654
00655 EXTERN Tcl_Channel Tcl_OpenTcpClient _ANSI_ARGS_((Tcl_Interp * interp,
00656 int port, CONST char * address,
00657 CONST char * myaddr, int myport, int async));
00658
00659 EXTERN Tcl_Channel Tcl_OpenTcpServer _ANSI_ARGS_((Tcl_Interp * interp,
00660 int port, CONST char * host,
00661 Tcl_TcpAcceptProc * acceptProc,
00662 ClientData callbackData));
00663
00664 EXTERN void Tcl_Preserve _ANSI_ARGS_((ClientData data));
00665
00666 EXTERN void Tcl_PrintDouble _ANSI_ARGS_((Tcl_Interp * interp,
00667 double value, char * dst));
00668
00669 EXTERN int Tcl_PutEnv _ANSI_ARGS_((CONST char * string));
00670
00671 EXTERN CONST84_RETURN char * Tcl_PosixError _ANSI_ARGS_((Tcl_Interp * interp));
00672
00673 EXTERN void Tcl_QueueEvent _ANSI_ARGS_((Tcl_Event * evPtr,
00674 Tcl_QueuePosition position));
00675
00676 EXTERN int Tcl_Read _ANSI_ARGS_((Tcl_Channel chan,
00677 char * bufPtr, int toRead));
00678 #if !defined(__WIN32__) && !defined(MAC_TCL)
00679
00680 EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void));
00681 #endif
00682 #ifdef __WIN32__
00683
00684 EXTERN void Tcl_ReapDetachedProcs _ANSI_ARGS_((void));
00685 #endif
00686
00687 EXTERN int Tcl_RecordAndEval _ANSI_ARGS_((Tcl_Interp * interp,
00688 CONST char * cmd, int flags));
00689
00690 EXTERN int Tcl_RecordAndEvalObj _ANSI_ARGS_((
00691 Tcl_Interp * interp, Tcl_Obj * cmdPtr,
00692 int flags));
00693
00694 EXTERN void Tcl_RegisterChannel _ANSI_ARGS_((Tcl_Interp * interp,
00695 Tcl_Channel chan));
00696
00697 EXTERN void Tcl_RegisterObjType _ANSI_ARGS_((
00698 Tcl_ObjType * typePtr));
00699
00700 EXTERN Tcl_RegExp Tcl_RegExpCompile _ANSI_ARGS_((Tcl_Interp * interp,
00701 CONST char * string));
00702
00703 EXTERN int Tcl_RegExpExec _ANSI_ARGS_((Tcl_Interp * interp,
00704 Tcl_RegExp regexp, CONST char * str,
00705 CONST char * start));
00706
00707 EXTERN int Tcl_RegExpMatch _ANSI_ARGS_((Tcl_Interp * interp,
00708 CONST char * str, CONST char * pattern));
00709
00710 EXTERN void Tcl_RegExpRange _ANSI_ARGS_((Tcl_RegExp regexp,
00711 int index, CONST84 char ** startPtr,
00712 CONST84 char ** endPtr));
00713
00714 EXTERN void Tcl_Release _ANSI_ARGS_((ClientData clientData));
00715
00716 EXTERN void Tcl_ResetResult _ANSI_ARGS_((Tcl_Interp * interp));
00717
00718 EXTERN int Tcl_ScanElement _ANSI_ARGS_((CONST char * str,
00719 int * flagPtr));
00720
00721 EXTERN int Tcl_ScanCountedElement _ANSI_ARGS_((CONST char * str,
00722 int length, int * flagPtr));
00723
00724 EXTERN int Tcl_SeekOld _ANSI_ARGS_((Tcl_Channel chan,
00725 int offset, int mode));
00726
00727 EXTERN int Tcl_ServiceAll _ANSI_ARGS_((void));
00728
00729 EXTERN int Tcl_ServiceEvent _ANSI_ARGS_((int flags));
00730
00731 EXTERN void Tcl_SetAssocData _ANSI_ARGS_((Tcl_Interp * interp,
00732 CONST char * name,
00733 Tcl_InterpDeleteProc * proc,
00734 ClientData clientData));
00735
00736 EXTERN void Tcl_SetChannelBufferSize _ANSI_ARGS_((
00737 Tcl_Channel chan, int sz));
00738
00739 EXTERN int Tcl_SetChannelOption _ANSI_ARGS_((
00740 Tcl_Interp * interp, Tcl_Channel chan,
00741 CONST char * optionName,
00742 CONST char * newValue));
00743
00744 EXTERN int Tcl_SetCommandInfo _ANSI_ARGS_((Tcl_Interp * interp,
00745 CONST char * cmdName,
00746 CONST Tcl_CmdInfo * infoPtr));
00747
00748 EXTERN void Tcl_SetErrno _ANSI_ARGS_((int err));
00749
00750 EXTERN void Tcl_SetErrorCode _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
00751
00752 EXTERN void Tcl_SetMaxBlockTime _ANSI_ARGS_((Tcl_Time * timePtr));
00753
00754 EXTERN void Tcl_SetPanicProc _ANSI_ARGS_((
00755 Tcl_PanicProc * panicProc));
00756
00757 EXTERN int Tcl_SetRecursionLimit _ANSI_ARGS_((
00758 Tcl_Interp * interp, int depth));
00759
00760 EXTERN void Tcl_SetResult _ANSI_ARGS_((Tcl_Interp * interp,
00761 char * str, Tcl_FreeProc * freeProc));
00762
00763 EXTERN int Tcl_SetServiceMode _ANSI_ARGS_((int mode));
00764
00765 EXTERN void Tcl_SetObjErrorCode _ANSI_ARGS_((Tcl_Interp * interp,
00766 Tcl_Obj * errorObjPtr));
00767
00768 EXTERN void Tcl_SetObjResult _ANSI_ARGS_((Tcl_Interp * interp,
00769 Tcl_Obj * resultObjPtr));
00770
00771 EXTERN void Tcl_SetStdChannel _ANSI_ARGS_((Tcl_Channel channel,
00772 int type));
00773
00774 EXTERN CONST84_RETURN char * Tcl_SetVar _ANSI_ARGS_((Tcl_Interp * interp,
00775 CONST char * varName, CONST char * newValue,
00776 int flags));
00777
00778 EXTERN CONST84_RETURN char * Tcl_SetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00779 CONST char * part1, CONST char * part2,
00780 CONST char * newValue, int flags));
00781
00782 EXTERN CONST84_RETURN char * Tcl_SignalId _ANSI_ARGS_((int sig));
00783
00784 EXTERN CONST84_RETURN char * Tcl_SignalMsg _ANSI_ARGS_((int sig));
00785
00786 EXTERN void Tcl_SourceRCFile _ANSI_ARGS_((Tcl_Interp * interp));
00787
00788 EXTERN int Tcl_SplitList _ANSI_ARGS_((Tcl_Interp * interp,
00789 CONST char * listStr, int * argcPtr,
00790 CONST84 char *** argvPtr));
00791
00792 EXTERN void Tcl_SplitPath _ANSI_ARGS_((CONST char * path,
00793 int * argcPtr, CONST84 char *** argvPtr));
00794
00795 EXTERN void Tcl_StaticPackage _ANSI_ARGS_((Tcl_Interp * interp,
00796 CONST char * pkgName,
00797 Tcl_PackageInitProc * initProc,
00798 Tcl_PackageInitProc * safeInitProc));
00799
00800 EXTERN int Tcl_StringMatch _ANSI_ARGS_((CONST char * str,
00801 CONST char * pattern));
00802
00803 EXTERN int Tcl_TellOld _ANSI_ARGS_((Tcl_Channel chan));
00804
00805 EXTERN int Tcl_TraceVar _ANSI_ARGS_((Tcl_Interp * interp,
00806 CONST char * varName, int flags,
00807 Tcl_VarTraceProc * proc,
00808 ClientData clientData));
00809
00810 EXTERN int Tcl_TraceVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00811 CONST char * part1, CONST char * part2,
00812 int flags, Tcl_VarTraceProc * proc,
00813 ClientData clientData));
00814
00815 EXTERN char * Tcl_TranslateFileName _ANSI_ARGS_((
00816 Tcl_Interp * interp, CONST char * name,
00817 Tcl_DString * bufferPtr));
00818
00819 EXTERN int Tcl_Ungets _ANSI_ARGS_((Tcl_Channel chan,
00820 CONST char * str, int len, int atHead));
00821
00822 EXTERN void Tcl_UnlinkVar _ANSI_ARGS_((Tcl_Interp * interp,
00823 CONST char * varName));
00824
00825 EXTERN int Tcl_UnregisterChannel _ANSI_ARGS_((
00826 Tcl_Interp * interp, Tcl_Channel chan));
00827
00828 EXTERN int Tcl_UnsetVar _ANSI_ARGS_((Tcl_Interp * interp,
00829 CONST char * varName, int flags));
00830
00831 EXTERN int Tcl_UnsetVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00832 CONST char * part1, CONST char * part2,
00833 int flags));
00834
00835 EXTERN void Tcl_UntraceVar _ANSI_ARGS_((Tcl_Interp * interp,
00836 CONST char * varName, int flags,
00837 Tcl_VarTraceProc * proc,
00838 ClientData clientData));
00839
00840 EXTERN void Tcl_UntraceVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00841 CONST char * part1, CONST char * part2,
00842 int flags, Tcl_VarTraceProc * proc,
00843 ClientData clientData));
00844
00845 EXTERN void Tcl_UpdateLinkedVar _ANSI_ARGS_((Tcl_Interp * interp,
00846 CONST char * varName));
00847
00848 EXTERN int Tcl_UpVar _ANSI_ARGS_((Tcl_Interp * interp,
00849 CONST char * frameName, CONST char * varName,
00850 CONST char * localName, int flags));
00851
00852 EXTERN int Tcl_UpVar2 _ANSI_ARGS_((Tcl_Interp * interp,
00853 CONST char * frameName, CONST char * part1,
00854 CONST char * part2, CONST char * localName,
00855 int flags));
00856
00857 EXTERN int Tcl_VarEval _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
00858
00859 EXTERN ClientData Tcl_VarTraceInfo _ANSI_ARGS_((Tcl_Interp * interp,
00860 CONST char * varName, int flags,
00861 Tcl_VarTraceProc * procPtr,
00862 ClientData prevClientData));
00863
00864 EXTERN ClientData Tcl_VarTraceInfo2 _ANSI_ARGS_((Tcl_Interp * interp,
00865 CONST char * part1, CONST char * part2,
00866 int flags, Tcl_VarTraceProc * procPtr,
00867 ClientData prevClientData));
00868
00869 EXTERN int Tcl_Write _ANSI_ARGS_((Tcl_Channel chan,
00870 CONST char * s, int slen));
00871
00872 EXTERN void Tcl_WrongNumArgs _ANSI_ARGS_((Tcl_Interp * interp,
00873 int objc, Tcl_Obj *CONST objv[],
00874 CONST char * message));
00875
00876 EXTERN int Tcl_DumpActiveMemory _ANSI_ARGS_((
00877 CONST char * fileName));
00878
00879 EXTERN void Tcl_ValidateAllMemory _ANSI_ARGS_((CONST char * file,
00880 int line));
00881
00882 EXTERN void Tcl_AppendResultVA _ANSI_ARGS_((Tcl_Interp * interp,
00883 va_list argList));
00884
00885 EXTERN void Tcl_AppendStringsToObjVA _ANSI_ARGS_((
00886 Tcl_Obj * objPtr, va_list argList));
00887
00888 EXTERN CONST84_RETURN char * Tcl_HashStats _ANSI_ARGS_((
00889 Tcl_HashTable * tablePtr));
00890
00891 EXTERN CONST84_RETURN char * Tcl_ParseVar _ANSI_ARGS_((Tcl_Interp * interp,
00892 CONST char * str, CONST84 char ** termPtr));
00893
00894 EXTERN CONST84_RETURN char * Tcl_PkgPresent _ANSI_ARGS_((Tcl_Interp * interp,
00895 CONST char * name, CONST char * version,
00896 int exact));
00897
00898 EXTERN CONST84_RETURN char * Tcl_PkgPresentEx _ANSI_ARGS_((
00899 Tcl_Interp * interp, CONST char * name,
00900 CONST char * version, int exact,
00901 ClientData * clientDataPtr));
00902
00903 EXTERN int Tcl_PkgProvide _ANSI_ARGS_((Tcl_Interp * interp,
00904 CONST char * name, CONST char * version));
00905
00906 EXTERN CONST84_RETURN char * Tcl_PkgRequire _ANSI_ARGS_((Tcl_Interp * interp,
00907 CONST char * name, CONST char * version,
00908 int exact));
00909
00910 EXTERN void Tcl_SetErrorCodeVA _ANSI_ARGS_((Tcl_Interp * interp,
00911 va_list argList));
00912
00913 EXTERN int Tcl_VarEvalVA _ANSI_ARGS_((Tcl_Interp * interp,
00914 va_list argList));
00915
00916 EXTERN Tcl_Pid Tcl_WaitPid _ANSI_ARGS_((Tcl_Pid pid, int * statPtr,
00917 int options));
00918
00919 EXTERN void Tcl_PanicVA _ANSI_ARGS_((CONST char * format,
00920 va_list argList));
00921
00922 EXTERN void Tcl_GetVersion _ANSI_ARGS_((int * major, int * minor,
00923 int * patchLevel, int * type));
00924
00925 EXTERN void Tcl_InitMemory _ANSI_ARGS_((Tcl_Interp * interp));
00926
00927 EXTERN Tcl_Channel Tcl_StackChannel _ANSI_ARGS_((Tcl_Interp * interp,
00928 Tcl_ChannelType * typePtr,
00929 ClientData instanceData, int mask,
00930 Tcl_Channel prevChan));
00931
00932 EXTERN int Tcl_UnstackChannel _ANSI_ARGS_((Tcl_Interp * interp,
00933 Tcl_Channel chan));
00934
00935 EXTERN Tcl_Channel Tcl_GetStackedChannel _ANSI_ARGS_((Tcl_Channel chan));
00936
00937 EXTERN void Tcl_SetMainLoop _ANSI_ARGS_((Tcl_MainLoopProc * proc));
00938
00939
00940 EXTERN void Tcl_AppendObjToObj _ANSI_ARGS_((Tcl_Obj * objPtr,
00941 Tcl_Obj * appendObjPtr));
00942
00943 EXTERN Tcl_Encoding Tcl_CreateEncoding _ANSI_ARGS_((
00944 Tcl_EncodingType * typePtr));
00945
00946 EXTERN void Tcl_CreateThreadExitHandler _ANSI_ARGS_((
00947 Tcl_ExitProc * proc, ClientData clientData));
00948
00949 EXTERN void Tcl_DeleteThreadExitHandler _ANSI_ARGS_((
00950 Tcl_ExitProc * proc, ClientData clientData));
00951
00952 EXTERN void Tcl_DiscardResult _ANSI_ARGS_((
00953 Tcl_SavedResult * statePtr));
00954
00955 EXTERN int Tcl_EvalEx _ANSI_ARGS_((Tcl_Interp * interp,
00956 CONST char * script, int numBytes, int flags));
00957
00958 EXTERN int Tcl_EvalObjv _ANSI_ARGS_((Tcl_Interp * interp,
00959 int objc, Tcl_Obj *CONST objv[], int flags));
00960
00961 EXTERN int Tcl_EvalObjEx _ANSI_ARGS_((Tcl_Interp * interp,
00962 Tcl_Obj * objPtr, int flags));
00963
00964 EXTERN void Tcl_ExitThread _ANSI_ARGS_((int status));
00965
00966 EXTERN int Tcl_ExternalToUtf _ANSI_ARGS_((Tcl_Interp * interp,
00967 Tcl_Encoding encoding, CONST char * src,
00968 int srcLen, int flags,
00969 Tcl_EncodingState * statePtr, char * dst,
00970 int dstLen, int * srcReadPtr,
00971 int * dstWrotePtr, int * dstCharsPtr));
00972
00973 EXTERN char * Tcl_ExternalToUtfDString _ANSI_ARGS_((
00974 Tcl_Encoding encoding, CONST char * src,
00975 int srcLen, Tcl_DString * dsPtr));
00976
00977 EXTERN void Tcl_FinalizeThread _ANSI_ARGS_((void));
00978
00979 EXTERN void Tcl_FinalizeNotifier _ANSI_ARGS_((
00980 ClientData clientData));
00981
00982 EXTERN void Tcl_FreeEncoding _ANSI_ARGS_((Tcl_Encoding encoding));
00983
00984 EXTERN Tcl_ThreadId Tcl_GetCurrentThread _ANSI_ARGS_((void));
00985
00986 EXTERN Tcl_Encoding Tcl_GetEncoding _ANSI_ARGS_((Tcl_Interp * interp,
00987 CONST char * name));
00988
00989 EXTERN CONST84_RETURN char * Tcl_GetEncodingName _ANSI_ARGS_((
00990 Tcl_Encoding encoding));
00991
00992 EXTERN void Tcl_GetEncodingNames _ANSI_ARGS_((
00993 Tcl_Interp * interp));
00994
00995 EXTERN int Tcl_GetIndexFromObjStruct _ANSI_ARGS_((
00996 Tcl_Interp * interp, Tcl_Obj * objPtr,
00997 CONST VOID * tablePtr, int offset,
00998 CONST char * msg, int flags, int * indexPtr));
00999
01000 EXTERN VOID * Tcl_GetThreadData _ANSI_ARGS_((
01001 Tcl_ThreadDataKey * keyPtr, int size));
01002
01003 EXTERN Tcl_Obj * Tcl_GetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp,
01004 CONST char * part1, CONST char * part2,
01005 int flags));
01006
01007 EXTERN ClientData Tcl_InitNotifier _ANSI_ARGS_((void));
01008
01009 EXTERN void Tcl_MutexLock _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
01010
01011 EXTERN void Tcl_MutexUnlock _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
01012
01013 EXTERN void Tcl_ConditionNotify _ANSI_ARGS_((
01014 Tcl_Condition * condPtr));
01015
01016 EXTERN void Tcl_ConditionWait _ANSI_ARGS_((
01017 Tcl_Condition * condPtr,
01018 Tcl_Mutex * mutexPtr, Tcl_Time * timePtr));
01019
01020 EXTERN int Tcl_NumUtfChars _ANSI_ARGS_((CONST char * src,
01021 int len));
01022
01023 EXTERN int Tcl_ReadChars _ANSI_ARGS_((Tcl_Channel channel,
01024 Tcl_Obj * objPtr, int charsToRead,
01025 int appendFlag));
01026
01027 EXTERN void Tcl_RestoreResult _ANSI_ARGS_((Tcl_Interp * interp,
01028 Tcl_SavedResult * statePtr));
01029
01030 EXTERN void Tcl_SaveResult _ANSI_ARGS_((Tcl_Interp * interp,
01031 Tcl_SavedResult * statePtr));
01032
01033 EXTERN int Tcl_SetSystemEncoding _ANSI_ARGS_((
01034 Tcl_Interp * interp, CONST char * name));
01035
01036 EXTERN Tcl_Obj * Tcl_SetVar2Ex _ANSI_ARGS_((Tcl_Interp * interp,
01037 CONST char * part1, CONST char * part2,
01038 Tcl_Obj * newValuePtr, int flags));
01039
01040 EXTERN void Tcl_ThreadAlert _ANSI_ARGS_((Tcl_ThreadId threadId));
01041
01042 EXTERN void Tcl_ThreadQueueEvent _ANSI_ARGS_((
01043 Tcl_ThreadId threadId, Tcl_Event* evPtr,
01044 Tcl_QueuePosition position));
01045
01046 EXTERN Tcl_UniChar Tcl_UniCharAtIndex _ANSI_ARGS_((CONST char * src,
01047 int index));
01048
01049 EXTERN Tcl_UniChar Tcl_UniCharToLower _ANSI_ARGS_((int ch));
01050
01051 EXTERN Tcl_UniChar Tcl_UniCharToTitle _ANSI_ARGS_((int ch));
01052
01053 EXTERN Tcl_UniChar Tcl_UniCharToUpper _ANSI_ARGS_((int ch));
01054
01055 EXTERN int Tcl_UniCharToUtf _ANSI_ARGS_((int ch, char * buf));
01056
01057 EXTERN CONST84_RETURN char * Tcl_UtfAtIndex _ANSI_ARGS_((CONST char * src,
01058 int index));
01059
01060 EXTERN int Tcl_UtfCharComplete _ANSI_ARGS_((CONST char * src,
01061 int len));
01062
01063 EXTERN int Tcl_UtfBackslash _ANSI_ARGS_((CONST char * src,
01064 int * readPtr, char * dst));
01065
01066 EXTERN CONST84_RETURN char * Tcl_UtfFindFirst _ANSI_ARGS_((CONST char * src,
01067 int ch));
01068
01069 EXTERN CONST84_RETURN char * Tcl_UtfFindLast _ANSI_ARGS_((CONST char * src,
01070 int ch));
01071
01072 EXTERN CONST84_RETURN char * Tcl_UtfNext _ANSI_ARGS_((CONST char * src));
01073
01074 EXTERN CONST84_RETURN char * Tcl_UtfPrev _ANSI_ARGS_((CONST char * src,
01075 CONST char * start));
01076
01077 EXTERN int Tcl_UtfToExternal _ANSI_ARGS_((Tcl_Interp * interp,
01078 Tcl_Encoding encoding, CONST char * src,
01079 int srcLen, int flags,
01080 Tcl_EncodingState * statePtr, char * dst,
01081 int dstLen, int * srcReadPtr,
01082 int * dstWrotePtr, int * dstCharsPtr));
01083
01084 EXTERN char * Tcl_UtfToExternalDString _ANSI_ARGS_((
01085 Tcl_Encoding encoding, CONST char * src,
01086 int srcLen, Tcl_DString * dsPtr));
01087
01088 EXTERN int Tcl_UtfToLower _ANSI_ARGS_((char * src));
01089
01090 EXTERN int Tcl_UtfToTitle _ANSI_ARGS_((char * src));
01091
01092 EXTERN int Tcl_UtfToUniChar _ANSI_ARGS_((CONST char * src,
01093 Tcl_UniChar * chPtr));
01094
01095 EXTERN int Tcl_UtfToUpper _ANSI_ARGS_((char * src));
01096
01097 EXTERN int Tcl_WriteChars _ANSI_ARGS_((Tcl_Channel chan,
01098 CONST char * src, int srcLen));
01099
01100 EXTERN int Tcl_WriteObj _ANSI_ARGS_((Tcl_Channel chan,
01101 Tcl_Obj * objPtr));
01102
01103 EXTERN char * Tcl_GetString _ANSI_ARGS_((Tcl_Obj * objPtr));
01104
01105 EXTERN CONST84_RETURN char * Tcl_GetDefaultEncodingDir _ANSI_ARGS_((void));
01106
01107 EXTERN void Tcl_SetDefaultEncodingDir _ANSI_ARGS_((
01108 CONST char * path));
01109
01110 EXTERN void Tcl_AlertNotifier _ANSI_ARGS_((ClientData clientData));
01111
01112 EXTERN void Tcl_ServiceModeHook _ANSI_ARGS_((int mode));
01113
01114 EXTERN int Tcl_UniCharIsAlnum _ANSI_ARGS_((int ch));
01115
01116 EXTERN int Tcl_UniCharIsAlpha _ANSI_ARGS_((int ch));
01117
01118 EXTERN int Tcl_UniCharIsDigit _ANSI_ARGS_((int ch));
01119
01120 EXTERN int Tcl_UniCharIsLower _ANSI_ARGS_((int ch));
01121
01122 EXTERN int Tcl_UniCharIsSpace _ANSI_ARGS_((int ch));
01123
01124 EXTERN int Tcl_UniCharIsUpper _ANSI_ARGS_((int ch));
01125
01126 EXTERN int Tcl_UniCharIsWordChar _ANSI_ARGS_((int ch));
01127
01128 EXTERN int Tcl_UniCharLen _ANSI_ARGS_((CONST Tcl_UniChar * str));
01129
01130 EXTERN int Tcl_UniCharNcmp _ANSI_ARGS_((CONST Tcl_UniChar * cs,
01131 CONST Tcl_UniChar * ct, unsigned long n));
01132
01133 EXTERN char * Tcl_UniCharToUtfDString _ANSI_ARGS_((
01134 CONST Tcl_UniChar * string, int numChars,
01135 Tcl_DString * dsPtr));
01136
01137 EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString _ANSI_ARGS_((
01138 CONST char * string, int length,
01139 Tcl_DString * dsPtr));
01140
01141 EXTERN Tcl_RegExp Tcl_GetRegExpFromObj _ANSI_ARGS_((
01142 Tcl_Interp * interp, Tcl_Obj * patObj,
01143 int flags));
01144
01145 EXTERN Tcl_Obj * Tcl_EvalTokens _ANSI_ARGS_((Tcl_Interp * interp,
01146 Tcl_Token * tokenPtr, int count));
01147
01148 EXTERN void Tcl_FreeParse _ANSI_ARGS_((Tcl_Parse * parsePtr));
01149
01150 EXTERN void Tcl_LogCommandInfo _ANSI_ARGS_((Tcl_Interp * interp,
01151 CONST char * script, CONST char * command,
01152 int length));
01153
01154 EXTERN int Tcl_ParseBraces _ANSI_ARGS_((Tcl_Interp * interp,
01155 CONST char * string, int numBytes,
01156 Tcl_Parse * parsePtr, int append,
01157 CONST84 char ** termPtr));
01158
01159 EXTERN int Tcl_ParseCommand _ANSI_ARGS_((Tcl_Interp * interp,
01160 CONST char * string, int numBytes,
01161 int nested, Tcl_Parse * parsePtr));
01162
01163 EXTERN int Tcl_ParseExpr _ANSI_ARGS_((Tcl_Interp * interp,
01164 CONST char * string, int numBytes,
01165 Tcl_Parse * parsePtr));
01166
01167 EXTERN int Tcl_ParseQuotedString _ANSI_ARGS_((
01168 Tcl_Interp * interp, CONST char * string,
01169 int numBytes, Tcl_Parse * parsePtr,
01170 int append, CONST84 char ** termPtr));
01171
01172 EXTERN int Tcl_ParseVarName _ANSI_ARGS_((Tcl_Interp * interp,
01173 CONST char * string, int numBytes,
01174 Tcl_Parse * parsePtr, int append));
01175
01176 EXTERN char * Tcl_GetCwd _ANSI_ARGS_((Tcl_Interp * interp,
01177 Tcl_DString * cwdPtr));
01178
01179 EXTERN int Tcl_Chdir _ANSI_ARGS_((CONST char * dirName));
01180
01181 EXTERN int Tcl_Access _ANSI_ARGS_((CONST char * path, int mode));
01182
01183 EXTERN int Tcl_Stat _ANSI_ARGS_((CONST char * path,
01184 struct stat * bufPtr));
01185
01186 EXTERN int Tcl_UtfNcmp _ANSI_ARGS_((CONST char * s1,
01187 CONST char * s2, unsigned long n));
01188
01189 EXTERN int Tcl_UtfNcasecmp _ANSI_ARGS_((CONST char * s1,
01190 CONST char * s2, unsigned long n));
01191
01192 EXTERN int Tcl_StringCaseMatch _ANSI_ARGS_((CONST char * str,
01193 CONST char * pattern, int nocase));
01194
01195 EXTERN int Tcl_UniCharIsControl _ANSI_ARGS_((int ch));
01196
01197 EXTERN int Tcl_UniCharIsGraph _ANSI_ARGS_((int ch));
01198
01199 EXTERN int Tcl_UniCharIsPrint _ANSI_ARGS_((int ch));
01200
01201 EXTERN int Tcl_UniCharIsPunct _ANSI_ARGS_((int ch));
01202
01203 EXTERN int Tcl_RegExpExecObj _ANSI_ARGS_((Tcl_Interp * interp,
01204 Tcl_RegExp regexp, Tcl_Obj * objPtr,
01205 int offset, int nmatches, int flags));
01206
01207 EXTERN void Tcl_RegExpGetInfo _ANSI_ARGS_((Tcl_RegExp regexp,
01208 Tcl_RegExpInfo * infoPtr));
01209
01210 EXTERN Tcl_Obj * Tcl_NewUnicodeObj _ANSI_ARGS_((
01211 CONST Tcl_UniChar * unicode, int numChars));
01212
01213 EXTERN void Tcl_SetUnicodeObj _ANSI_ARGS_((Tcl_Obj * objPtr,
01214 CONST Tcl_UniChar * unicode, int numChars));
01215
01216 EXTERN int Tcl_GetCharLength _ANSI_ARGS_((Tcl_Obj * objPtr));
01217
01218 EXTERN Tcl_UniChar Tcl_GetUniChar _ANSI_ARGS_((Tcl_Obj * objPtr,
01219 int index));
01220
01221 EXTERN Tcl_UniChar * Tcl_GetUnicode _ANSI_ARGS_((Tcl_Obj * objPtr));
01222
01223 EXTERN Tcl_Obj * Tcl_GetRange _ANSI_ARGS_((Tcl_Obj * objPtr,
01224 int first, int last));
01225
01226 EXTERN void Tcl_AppendUnicodeToObj _ANSI_ARGS_((Tcl_Obj * objPtr,
01227 CONST Tcl_UniChar * unicode, int length));
01228
01229 EXTERN int Tcl_RegExpMatchObj _ANSI_ARGS_((Tcl_Interp * interp,
01230 Tcl_Obj * stringObj, Tcl_Obj * patternObj));
01231
01232 EXTERN void Tcl_SetNotifier _ANSI_ARGS_((
01233 Tcl_NotifierProcs * notifierProcPtr));
01234
01235 EXTERN Tcl_Mutex * Tcl_GetAllocMutex _ANSI_ARGS_((void));
01236
01237 EXTERN int Tcl_GetChannelNames _ANSI_ARGS_((Tcl_Interp * interp));
01238
01239 EXTERN int Tcl_GetChannelNamesEx _ANSI_ARGS_((
01240 Tcl_Interp * interp, CONST char * pattern));
01241
01242 EXTERN int Tcl_ProcObjCmd _ANSI_ARGS_((ClientData clientData,
01243 Tcl_Interp * interp, int objc,
01244 Tcl_Obj *CONST objv[]));
01245
01246 EXTERN void Tcl_ConditionFinalize _ANSI_ARGS_((
01247 Tcl_Condition * condPtr));
01248
01249 EXTERN void Tcl_MutexFinalize _ANSI_ARGS_((Tcl_Mutex * mutex));
01250
01251 EXTERN int Tcl_CreateThread _ANSI_ARGS_((Tcl_ThreadId * idPtr,
01252 Tcl_ThreadCreateProc proc,
01253 ClientData clientData, int stackSize,
01254 int flags));
01255
01256 EXTERN int Tcl_ReadRaw _ANSI_ARGS_((Tcl_Channel chan,
01257 char * dst, int bytesToRead));
01258
01259 EXTERN int Tcl_WriteRaw _ANSI_ARGS_((Tcl_Channel chan,
01260 CONST char * src, int srcLen));
01261
01262 EXTERN Tcl_Channel Tcl_GetTopChannel _ANSI_ARGS_((Tcl_Channel chan));
01263
01264 EXTERN int Tcl_ChannelBuffered _ANSI_ARGS_((Tcl_Channel chan));
01265
01266 EXTERN CONST84_RETURN char * Tcl_ChannelName _ANSI_ARGS_((
01267 Tcl_ChannelType * chanTypePtr));
01268
01269 EXTERN Tcl_ChannelTypeVersion Tcl_ChannelVersion _ANSI_ARGS_((
01270 Tcl_ChannelType * chanTypePtr));
01271
01272 EXTERN Tcl_DriverBlockModeProc * Tcl_ChannelBlockModeProc _ANSI_ARGS_((
01273 Tcl_ChannelType * chanTypePtr));
01274
01275 EXTERN Tcl_DriverCloseProc * Tcl_ChannelCloseProc _ANSI_ARGS_((
01276 Tcl_ChannelType * chanTypePtr));
01277
01278 EXTERN Tcl_DriverClose2Proc * Tcl_ChannelClose2Proc _ANSI_ARGS_((
01279 Tcl_ChannelType * chanTypePtr));
01280
01281 EXTERN Tcl_DriverInputProc * Tcl_ChannelInputProc _ANSI_ARGS_((
01282 Tcl_ChannelType * chanTypePtr));
01283
01284 EXTERN Tcl_DriverOutputProc * Tcl_ChannelOutputProc _ANSI_ARGS_((
01285 Tcl_ChannelType * chanTypePtr));
01286
01287 EXTERN Tcl_DriverSeekProc * Tcl_ChannelSeekProc _ANSI_ARGS_((
01288 Tcl_ChannelType * chanTypePtr));
01289
01290 EXTERN Tcl_DriverSetOptionProc * Tcl_ChannelSetOptionProc _ANSI_ARGS_((
01291 Tcl_ChannelType * chanTypePtr));
01292
01293 EXTERN Tcl_DriverGetOptionProc * Tcl_ChannelGetOptionProc _ANSI_ARGS_((
01294 Tcl_ChannelType * chanTypePtr));
01295
01296 EXTERN Tcl_DriverWatchProc * Tcl_ChannelWatchProc _ANSI_ARGS_((
01297 Tcl_ChannelType * chanTypePtr));
01298
01299 EXTERN Tcl_DriverGetHandleProc * Tcl_ChannelGetHandleProc _ANSI_ARGS_((
01300 Tcl_ChannelType * chanTypePtr));
01301
01302 EXTERN Tcl_DriverFlushProc * Tcl_ChannelFlushProc _ANSI_ARGS_((
01303 Tcl_ChannelType * chanTypePtr));
01304
01305 EXTERN Tcl_DriverHandlerProc * Tcl_ChannelHandlerProc _ANSI_ARGS_((
01306 Tcl_ChannelType * chanTypePtr));
01307
01308 EXTERN int Tcl_JoinThread _ANSI_ARGS_((Tcl_ThreadId threadId,
01309 int* result));
01310
01311 EXTERN int Tcl_IsChannelShared _ANSI_ARGS_((Tcl_Channel channel));
01312
01313 EXTERN int Tcl_IsChannelRegistered _ANSI_ARGS_((
01314 Tcl_Interp* interp, Tcl_Channel channel));
01315
01316 EXTERN void Tcl_CutChannel _ANSI_ARGS_((Tcl_Channel channel));
01317
01318 EXTERN void Tcl_SpliceChannel _ANSI_ARGS_((Tcl_Channel channel));
01319
01320 EXTERN void Tcl_ClearChannelHandlers _ANSI_ARGS_((
01321 Tcl_Channel channel));
01322
01323 EXTERN int Tcl_IsChannelExisting _ANSI_ARGS_((
01324 CONST char* channelName));
01325
01326 EXTERN int Tcl_UniCharNcasecmp _ANSI_ARGS_((
01327 CONST Tcl_UniChar * cs,
01328 CONST Tcl_UniChar * ct, unsigned long n));
01329
01330 EXTERN int Tcl_UniCharCaseMatch _ANSI_ARGS_((
01331 CONST Tcl_UniChar * ustr,
01332 CONST Tcl_UniChar * pattern, int nocase));
01333
01334 EXTERN Tcl_HashEntry * Tcl_FindHashEntry _ANSI_ARGS_((
01335 Tcl_HashTable * tablePtr, CONST char * key));
01336
01337 EXTERN Tcl_HashEntry * Tcl_CreateHashEntry _ANSI_ARGS_((
01338 Tcl_HashTable * tablePtr, CONST char * key,
01339 int * newPtr));
01340
01341 EXTERN void Tcl_InitCustomHashTable _ANSI_ARGS_((
01342 Tcl_HashTable * tablePtr, int keyType,
01343 Tcl_HashKeyType * typePtr));
01344
01345 EXTERN void Tcl_InitObjHashTable _ANSI_ARGS_((
01346 Tcl_HashTable * tablePtr));
01347
01348 EXTERN ClientData Tcl_CommandTraceInfo _ANSI_ARGS_((
01349 Tcl_Interp * interp, CONST char * varName,
01350 int flags, Tcl_CommandTraceProc * procPtr,
01351 ClientData prevClientData));
01352
01353 EXTERN int Tcl_TraceCommand _ANSI_ARGS_((Tcl_Interp * interp,
01354 CONST char * varName, int flags,
01355 Tcl_CommandTraceProc * proc,
01356 ClientData clientData));
01357
01358 EXTERN void Tcl_UntraceCommand _ANSI_ARGS_((Tcl_Interp * interp,
01359 CONST char * varName, int flags,
01360 Tcl_CommandTraceProc * proc,
01361 ClientData clientData));
01362
01363 EXTERN char * Tcl_AttemptAlloc _ANSI_ARGS_((unsigned int size));
01364
01365 EXTERN char * Tcl_AttemptDbCkalloc _ANSI_ARGS_((unsigned int size,
01366 CONST char * file, int line));
01367
01368 EXTERN char * Tcl_AttemptRealloc _ANSI_ARGS_((char * ptr,
01369 unsigned int size));
01370
01371 EXTERN char * Tcl_AttemptDbCkrealloc _ANSI_ARGS_((char * ptr,
01372 unsigned int size, CONST char * file,
01373 int line));
01374
01375 EXTERN int Tcl_AttemptSetObjLength _ANSI_ARGS_((
01376 Tcl_Obj * objPtr, int length));
01377
01378 EXTERN Tcl_ThreadId Tcl_GetChannelThread _ANSI_ARGS_((
01379 Tcl_Channel channel));
01380
01381 EXTERN Tcl_UniChar * Tcl_GetUnicodeFromObj _ANSI_ARGS_((Tcl_Obj * objPtr,
01382 int * lengthPtr));
01383
01384 EXTERN int Tcl_GetMathFuncInfo _ANSI_ARGS_((Tcl_Interp * interp,
01385 CONST char * name, int * numArgsPtr,
01386 Tcl_ValueType ** argTypesPtr,
01387 Tcl_MathProc ** procPtr,
01388 ClientData * clientDataPtr));
01389
01390 EXTERN Tcl_Obj * Tcl_ListMathFuncs _ANSI_ARGS_((Tcl_Interp * interp,
01391 CONST char * pattern));
01392
01393 EXTERN Tcl_Obj * Tcl_SubstObj _ANSI_ARGS_((Tcl_Interp * interp,
01394 Tcl_Obj * objPtr, int flags));
01395
01396 EXTERN int Tcl_DetachChannel _ANSI_ARGS_((Tcl_Interp* interp,
01397 Tcl_Channel channel));
01398
01399 EXTERN int Tcl_IsStandardChannel _ANSI_ARGS_((
01400 Tcl_Channel channel));
01401
01402 EXTERN int Tcl_FSCopyFile _ANSI_ARGS_((Tcl_Obj * srcPathPtr,
01403 Tcl_Obj * destPathPtr));
01404
01405 EXTERN int Tcl_FSCopyDirectory _ANSI_ARGS_((
01406 Tcl_Obj * srcPathPtr, Tcl_Obj * destPathPtr,
01407 Tcl_Obj ** errorPtr));
01408
01409 EXTERN int Tcl_FSCreateDirectory _ANSI_ARGS_((Tcl_Obj * pathPtr));
01410
01411 EXTERN int Tcl_FSDeleteFile _ANSI_ARGS_((Tcl_Obj * pathPtr));
01412
01413 EXTERN int Tcl_FSLoadFile _ANSI_ARGS_((Tcl_Interp * interp,
01414 Tcl_Obj * pathPtr, CONST char * sym1,
01415 CONST char * sym2,
01416 Tcl_PackageInitProc ** proc1Ptr,
01417 Tcl_PackageInitProc ** proc2Ptr,
01418 Tcl_LoadHandle * handlePtr,
01419 Tcl_FSUnloadFileProc ** unloadProcPtr));
01420
01421 EXTERN int Tcl_FSMatchInDirectory _ANSI_ARGS_((
01422 Tcl_Interp * interp, Tcl_Obj * result,
01423 Tcl_Obj * pathPtr, CONST char * pattern,
01424 Tcl_GlobTypeData * types));
01425
01426 EXTERN Tcl_Obj * Tcl_FSLink _ANSI_ARGS_((Tcl_Obj * pathPtr,
01427 Tcl_Obj * toPtr, int linkAction));
01428
01429 EXTERN int Tcl_FSRemoveDirectory _ANSI_ARGS_((Tcl_Obj * pathPtr,
01430 int recursive, Tcl_Obj ** errorPtr));
01431
01432 EXTERN int Tcl_FSRenameFile _ANSI_ARGS_((Tcl_Obj * srcPathPtr,
01433 Tcl_Obj * destPathPtr));
01434
01435 EXTERN int Tcl_FSLstat _ANSI_ARGS_((Tcl_Obj * pathPtr,
01436 Tcl_StatBuf * buf));
01437
01438 EXTERN int Tcl_FSUtime _ANSI_ARGS_((Tcl_Obj * pathPtr,
01439 struct utimbuf * tval));
01440
01441 EXTERN int Tcl_FSFileAttrsGet _ANSI_ARGS_((Tcl_Interp * interp,
01442 int index, Tcl_Obj * pathPtr,
01443 Tcl_Obj ** objPtrRef));
01444
01445 EXTERN int Tcl_FSFileAttrsSet _ANSI_ARGS_((Tcl_Interp * interp,
01446 int index, Tcl_Obj * pathPtr,
01447 Tcl_Obj * objPtr));
01448
01449 EXTERN CONST char ** Tcl_FSFileAttrStrings _ANSI_ARGS_((Tcl_Obj * pathPtr,
01450 Tcl_Obj ** objPtrRef));
01451
01452 EXTERN int Tcl_FSStat _ANSI_ARGS_((Tcl_Obj * pathPtr,
01453 Tcl_StatBuf * buf));
01454
01455 EXTERN int Tcl_FSAccess _ANSI_ARGS_((Tcl_Obj * pathPtr,
01456 int mode));
01457
01458 EXTERN Tcl_Channel Tcl_FSOpenFileChannel _ANSI_ARGS_((
01459 Tcl_Interp * interp, Tcl_Obj * pathPtr,
01460 CONST char * modeString, int permissions));
01461
01462 EXTERN Tcl_Obj* Tcl_FSGetCwd _ANSI_ARGS_((Tcl_Interp * interp));
01463
01464 EXTERN int Tcl_FSChdir _ANSI_ARGS_((Tcl_Obj * pathPtr));
01465
01466 EXTERN int Tcl_FSConvertToPathType _ANSI_ARGS_((
01467 Tcl_Interp * interp, Tcl_Obj * pathPtr));
01468
01469 EXTERN Tcl_Obj* Tcl_FSJoinPath _ANSI_ARGS_((Tcl_Obj * listObj,
01470 int elements));
01471
01472 EXTERN Tcl_Obj* Tcl_FSSplitPath _ANSI_ARGS_((Tcl_Obj* pathPtr,
01473 int * lenPtr));
01474
01475 EXTERN int Tcl_FSEqualPaths _ANSI_ARGS_((Tcl_Obj* firstPtr,
01476 Tcl_Obj* secondPtr));
01477
01478 EXTERN Tcl_Obj* Tcl_FSGetNormalizedPath _ANSI_ARGS_((
01479 Tcl_Interp * interp, Tcl_Obj* pathObjPtr));
01480
01481 EXTERN Tcl_Obj* Tcl_FSJoinToPath _ANSI_ARGS_((Tcl_Obj * basePtr,
01482 int objc, Tcl_Obj *CONST objv[]));
01483
01484 EXTERN ClientData Tcl_FSGetInternalRep _ANSI_ARGS_((
01485 Tcl_Obj* pathObjPtr, Tcl_Filesystem * fsPtr));
01486
01487 EXTERN Tcl_Obj* Tcl_FSGetTranslatedPath _ANSI_ARGS_((
01488 Tcl_Interp * interp, Tcl_Obj* pathPtr));
01489
01490 EXTERN int Tcl_FSEvalFile _ANSI_ARGS_((Tcl_Interp * interp,
01491 Tcl_Obj * fileName));
01492
01493 EXTERN Tcl_Obj* Tcl_FSNewNativePath _ANSI_ARGS_((
01494 Tcl_Filesystem* fromFilesystem,
01495 ClientData clientData));
01496
01497 EXTERN CONST char* Tcl_FSGetNativePath _ANSI_ARGS_((Tcl_Obj* pathObjPtr));
01498
01499 EXTERN Tcl_Obj* Tcl_FSFileSystemInfo _ANSI_ARGS_((
01500 Tcl_Obj* pathObjPtr));
01501
01502 EXTERN Tcl_Obj* Tcl_FSPathSeparator _ANSI_ARGS_((Tcl_Obj* pathObjPtr));
01503
01504 EXTERN Tcl_Obj* Tcl_FSListVolumes _ANSI_ARGS_((void));
01505
01506 EXTERN int Tcl_FSRegister _ANSI_ARGS_((ClientData clientData,
01507 Tcl_Filesystem * fsPtr));
01508
01509 EXTERN int Tcl_FSUnregister _ANSI_ARGS_((Tcl_Filesystem * fsPtr));
01510
01511 EXTERN ClientData Tcl_FSData _ANSI_ARGS_((Tcl_Filesystem * fsPtr));
01512
01513 EXTERN CONST char* Tcl_FSGetTranslatedStringPath _ANSI_ARGS_((
01514 Tcl_Interp * interp, Tcl_Obj* pathPtr));
01515
01516 EXTERN Tcl_Filesystem* Tcl_FSGetFileSystemForPath _ANSI_ARGS_((
01517 Tcl_Obj* pathObjPtr));
01518
01519 EXTERN Tcl_PathType Tcl_FSGetPathType _ANSI_ARGS_((Tcl_Obj * pathObjPtr));
01520
01521 EXTERN int Tcl_OutputBuffered _ANSI_ARGS_((Tcl_Channel chan));
01522
01523 EXTERN void Tcl_FSMountsChanged _ANSI_ARGS_((
01524 Tcl_Filesystem * fsPtr));
01525
01526 EXTERN int Tcl_EvalTokensStandard _ANSI_ARGS_((
01527 Tcl_Interp * interp, Tcl_Token * tokenPtr,
01528 int count));
01529
01530 EXTERN void Tcl_GetTime _ANSI_ARGS_((Tcl_Time* timeBuf));
01531
01532 EXTERN Tcl_Trace Tcl_CreateObjTrace _ANSI_ARGS_((Tcl_Interp* interp,
01533 int level, int flags,
01534 Tcl_CmdObjTraceProc* objProc,
01535 ClientData clientData,
01536 Tcl_CmdObjTraceDeleteProc* delProc));
01537
01538 EXTERN int Tcl_GetCommandInfoFromToken _ANSI_ARGS_((
01539 Tcl_Command token, Tcl_CmdInfo* infoPtr));
01540
01541 EXTERN int Tcl_SetCommandInfoFromToken _ANSI_ARGS_((
01542 Tcl_Command token,
01543 CONST Tcl_CmdInfo* infoPtr));
01544
01545 EXTERN Tcl_Obj * Tcl_DbNewWideIntObj _ANSI_ARGS_((
01546 Tcl_WideInt wideValue, CONST char * file,
01547 int line));
01548
01549 EXTERN int Tcl_GetWideIntFromObj _ANSI_ARGS_((
01550 Tcl_Interp * interp, Tcl_Obj * objPtr,
01551 Tcl_WideInt * widePtr));
01552
01553 EXTERN Tcl_Obj * Tcl_NewWideIntObj _ANSI_ARGS_((Tcl_WideInt wideValue));
01554
01555 EXTERN void Tcl_SetWideIntObj _ANSI_ARGS_((Tcl_Obj * objPtr,
01556 Tcl_WideInt wideValue));
01557
01558 EXTERN Tcl_StatBuf * Tcl_AllocStatBuf _ANSI_ARGS_((void));
01559
01560 EXTERN Tcl_WideInt Tcl_Seek _ANSI_ARGS_((Tcl_Channel chan,
01561 Tcl_WideInt offset, int mode));
01562
01563 EXTERN Tcl_WideInt Tcl_Tell _ANSI_ARGS_((Tcl_Channel chan));
01564
01565 EXTERN Tcl_DriverWideSeekProc * Tcl_ChannelWideSeekProc _ANSI_ARGS_((
01566 Tcl_ChannelType * chanTypePtr));
01567
01568 typedef struct TclStubHooks {
01569 struct TclPlatStubs *tclPlatStubs;
01570 struct TclIntStubs *tclIntStubs;
01571 struct TclIntPlatStubs *tclIntPlatStubs;
01572 } TclStubHooks;
01573
01574 typedef struct TclStubs {
01575 int magic;
01576 struct TclStubHooks *hooks;
01577
01578 int (*tcl_PkgProvideEx) _ANSI_ARGS_((Tcl_Interp* interp, CONST char* name, CONST char* version, ClientData clientData));
01579 CONST84_RETURN char * (*tcl_PkgRequireEx) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, CONST char * version, int exact, ClientData * clientDataPtr));
01580 void (*tcl_Panic) _ANSI_ARGS_(TCL_VARARGS(CONST char *,format));
01581 char * (*tcl_Alloc) _ANSI_ARGS_((unsigned int size));
01582 void (*tcl_Free) _ANSI_ARGS_((char * ptr));
01583 char * (*tcl_Realloc) _ANSI_ARGS_((char * ptr, unsigned int size));
01584 char * (*tcl_DbCkalloc) _ANSI_ARGS_((unsigned int size, CONST char * file, int line));
01585 int (*tcl_DbCkfree) _ANSI_ARGS_((char * ptr, CONST char * file, int line));
01586 char * (*tcl_DbCkrealloc) _ANSI_ARGS_((char * ptr, unsigned int size, CONST char * file, int line));
01587 #if !defined(__WIN32__) && !defined(MAC_TCL)
01588 void (*tcl_CreateFileHandler) _ANSI_ARGS_((int fd, int mask, Tcl_FileProc * proc, ClientData clientData));
01589 #endif
01590 #ifdef __WIN32__
01591 void *reserved9;
01592 #endif
01593 #ifdef MAC_TCL
01594 void *reserved9;
01595 #endif
01596 #if !defined(__WIN32__) && !defined(MAC_TCL)
01597 void (*tcl_DeleteFileHandler) _ANSI_ARGS_((int fd));
01598 #endif
01599 #ifdef __WIN32__
01600 void *reserved10;
01601 #endif
01602 #ifdef MAC_TCL
01603 void *reserved10;
01604 #endif
01605 void (*tcl_SetTimer) _ANSI_ARGS_((Tcl_Time * timePtr));
01606 void (*tcl_Sleep) _ANSI_ARGS_((int ms));
01607 int (*tcl_WaitForEvent) _ANSI_ARGS_((Tcl_Time * timePtr));
01608 int (*tcl_AppendAllObjTypes) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr));
01609 void (*tcl_AppendStringsToObj) _ANSI_ARGS_(TCL_VARARGS(Tcl_Obj *,objPtr));
01610 void (*tcl_AppendToObj) _ANSI_ARGS_((Tcl_Obj* objPtr, CONST char* bytes, int length));
01611 Tcl_Obj * (*tcl_ConcatObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[]));
01612 int (*tcl_ConvertToType) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_ObjType * typePtr));
01613 void (*tcl_DbDecrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, CONST char * file, int line));
01614 void (*tcl_DbIncrRefCount) _ANSI_ARGS_((Tcl_Obj * objPtr, CONST char * file, int line));
01615 int (*tcl_DbIsShared) _ANSI_ARGS_((Tcl_Obj * objPtr, CONST char * file, int line));
01616 Tcl_Obj * (*tcl_DbNewBooleanObj) _ANSI_ARGS_((int boolValue, CONST char * file, int line));
01617 Tcl_Obj * (*tcl_DbNewByteArrayObj) _ANSI_ARGS_((CONST unsigned char * bytes, int length, CONST char * file, int line));
01618 Tcl_Obj * (*tcl_DbNewDoubleObj) _ANSI_ARGS_((double doubleValue, CONST char * file, int line));
01619 Tcl_Obj * (*tcl_DbNewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST * objv, CONST char * file, int line));
01620 Tcl_Obj * (*tcl_DbNewLongObj) _ANSI_ARGS_((long longValue, CONST char * file, int line));
01621 Tcl_Obj * (*tcl_DbNewObj) _ANSI_ARGS_((CONST char * file, int line));
01622 Tcl_Obj * (*tcl_DbNewStringObj) _ANSI_ARGS_((CONST char * bytes, int length, CONST char * file, int line));
01623 Tcl_Obj * (*tcl_DuplicateObj) _ANSI_ARGS_((Tcl_Obj * objPtr));
01624 void (*tclFreeObj) _ANSI_ARGS_((Tcl_Obj * objPtr));
01625 int (*tcl_GetBoolean) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, int * boolPtr));
01626 int (*tcl_GetBooleanFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * boolPtr));
01627 unsigned char * (*tcl_GetByteArrayFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr));
01628 int (*tcl_GetDouble) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, double * doublePtr));
01629 int (*tcl_GetDoubleFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * doublePtr));
01630 int (*tcl_GetIndexFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CONST84 char ** tablePtr, CONST char * msg, int flags, int * indexPtr));
01631 int (*tcl_GetInt) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, int * intPtr));
01632 int (*tcl_GetIntFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * intPtr));
01633 int (*tcl_GetLongFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * longPtr));
01634 Tcl_ObjType * (*tcl_GetObjType) _ANSI_ARGS_((CONST char * typeName));
01635 char * (*tcl_GetStringFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr));
01636 void (*tcl_InvalidateStringRep) _ANSI_ARGS_((Tcl_Obj * objPtr));
01637 int (*tcl_ListObjAppendList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * elemListPtr));
01638 int (*tcl_ListObjAppendElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * objPtr));
01639 int (*tcl_ListObjGetElements) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * objcPtr, Tcl_Obj *** objvPtr));
01640 int (*tcl_ListObjIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj ** objPtrPtr));
01641 int (*tcl_ListObjLength) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int * lengthPtr));
01642 int (*tcl_ListObjReplace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[]));
01643 Tcl_Obj * (*tcl_NewBooleanObj) _ANSI_ARGS_((int boolValue));
01644 Tcl_Obj * (*tcl_NewByteArrayObj) _ANSI_ARGS_((CONST unsigned char* bytes, int length));
01645 Tcl_Obj * (*tcl_NewDoubleObj) _ANSI_ARGS_((double doubleValue));
01646 Tcl_Obj * (*tcl_NewIntObj) _ANSI_ARGS_((int intValue));
01647 Tcl_Obj * (*tcl_NewListObj) _ANSI_ARGS_((int objc, Tcl_Obj *CONST objv[]));
01648 Tcl_Obj * (*tcl_NewLongObj) _ANSI_ARGS_((long longValue));
01649 Tcl_Obj * (*tcl_NewObj) _ANSI_ARGS_((void));
01650 Tcl_Obj * (*tcl_NewStringObj) _ANSI_ARGS_((CONST char * bytes, int length));
01651 void (*tcl_SetBooleanObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int boolValue));
01652 unsigned char * (*tcl_SetByteArrayLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length));
01653 void (*tcl_SetByteArrayObj) _ANSI_ARGS_((Tcl_Obj * objPtr, CONST unsigned char * bytes, int length));
01654 void (*tcl_SetDoubleObj) _ANSI_ARGS_((Tcl_Obj * objPtr, double doubleValue));
01655 void (*tcl_SetIntObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int intValue));
01656 void (*tcl_SetListObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int objc, Tcl_Obj *CONST objv[]));
01657 void (*tcl_SetLongObj) _ANSI_ARGS_((Tcl_Obj * objPtr, long longValue));
01658 void (*tcl_SetObjLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length));
01659 void (*tcl_SetStringObj) _ANSI_ARGS_((Tcl_Obj* objPtr, CONST char* bytes, int length));
01660 void (*tcl_AddErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message));
01661 void (*tcl_AddObjErrorInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * message, int length));
01662 void (*tcl_AllowExceptions) _ANSI_ARGS_((Tcl_Interp * interp));
01663 void (*tcl_AppendElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string));
01664 void (*tcl_AppendResult) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
01665 Tcl_AsyncHandler (*tcl_AsyncCreate) _ANSI_ARGS_((Tcl_AsyncProc * proc, ClientData clientData));
01666 void (*tcl_AsyncDelete) _ANSI_ARGS_((Tcl_AsyncHandler async));
01667 int (*tcl_AsyncInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int code));
01668 void (*tcl_AsyncMark) _ANSI_ARGS_((Tcl_AsyncHandler async));
01669 int (*tcl_AsyncReady) _ANSI_ARGS_((void));
01670 void (*tcl_BackgroundError) _ANSI_ARGS_((Tcl_Interp * interp));
01671 char (*tcl_Backslash) _ANSI_ARGS_((CONST char * src, int * readPtr));
01672 int (*tcl_BadChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * optionName, CONST char * optionList));
01673 void (*tcl_CallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData));
01674 void (*tcl_CancelIdleCall) _ANSI_ARGS_((Tcl_IdleProc * idleProc, ClientData clientData));
01675 int (*tcl_Close) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan));
01676 int (*tcl_CommandComplete) _ANSI_ARGS_((CONST char * cmd));
01677 char * (*tcl_Concat) _ANSI_ARGS_((int argc, CONST84 char * CONST * argv));
01678 int (*tcl_ConvertElement) _ANSI_ARGS_((CONST char * src, char * dst, int flags));
01679 int (*tcl_ConvertCountedElement) _ANSI_ARGS_((CONST char * src, int length, char * dst, int flags));
01680 int (*tcl_CreateAlias) _ANSI_ARGS_((Tcl_Interp * slave, CONST char * slaveCmd, Tcl_Interp * target, CONST char * targetCmd, int argc, CONST84 char * CONST * argv));
01681 int (*tcl_CreateAliasObj) _ANSI_ARGS_((Tcl_Interp * slave, CONST char * slaveCmd, Tcl_Interp * target, CONST char * targetCmd, int objc, Tcl_Obj *CONST objv[]));
01682 Tcl_Channel (*tcl_CreateChannel) _ANSI_ARGS_((Tcl_ChannelType * typePtr, CONST char * chanName, ClientData instanceData, int mask));
01683 void (*tcl_CreateChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, int mask, Tcl_ChannelProc * proc, ClientData clientData));
01684 void (*tcl_CreateCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData));
01685 Tcl_Command (*tcl_CreateCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * cmdName, Tcl_CmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc));
01686 void (*tcl_CreateEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData));
01687 void (*tcl_CreateExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData));
01688 Tcl_Interp * (*tcl_CreateInterp) _ANSI_ARGS_((void));
01689 void (*tcl_CreateMathFunc) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, int numArgs, Tcl_ValueType * argTypes, Tcl_MathProc * proc, ClientData clientData));
01690 Tcl_Command (*tcl_CreateObjCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * cmdName, Tcl_ObjCmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc));
01691 Tcl_Interp * (*tcl_CreateSlave) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * slaveName, int isSafe));
01692 Tcl_TimerToken (*tcl_CreateTimerHandler) _ANSI_ARGS_((int milliseconds, Tcl_TimerProc * proc, ClientData clientData));
01693 Tcl_Trace (*tcl_CreateTrace) _ANSI_ARGS_((Tcl_Interp * interp, int level, Tcl_CmdTraceProc * proc, ClientData clientData));
01694 void (*tcl_DeleteAssocData) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name));
01695 void (*tcl_DeleteChannelHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_ChannelProc * proc, ClientData clientData));
01696 void (*tcl_DeleteCloseHandler) _ANSI_ARGS_((Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData));
01697 int (*tcl_DeleteCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * cmdName));
01698 int (*tcl_DeleteCommandFromToken) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command));
01699 void (*tcl_DeleteEvents) _ANSI_ARGS_((Tcl_EventDeleteProc * proc, ClientData clientData));
01700 void (*tcl_DeleteEventSource) _ANSI_ARGS_((Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData));
01701 void (*tcl_DeleteExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData));
01702 void (*tcl_DeleteHashEntry) _ANSI_ARGS_((Tcl_HashEntry * entryPtr));
01703 void (*tcl_DeleteHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr));
01704 void (*tcl_DeleteInterp) _ANSI_ARGS_((Tcl_Interp * interp));
01705 #if !defined(__WIN32__) && !defined(MAC_TCL)
01706 void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr));
01707 #endif
01708 #ifdef __WIN32__
01709 void (*tcl_DetachPids) _ANSI_ARGS_((int numPids, Tcl_Pid * pidPtr));
01710 #endif
01711 #ifdef MAC_TCL
01712 void *reserved111;
01713 #endif
01714 void (*tcl_DeleteTimerHandler) _ANSI_ARGS_((Tcl_TimerToken token));
01715 void (*tcl_DeleteTrace) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Trace trace));
01716 void (*tcl_DontCallWhenDeleted) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData));
01717 int (*tcl_DoOneEvent) _ANSI_ARGS_((int flags));
01718 void (*tcl_DoWhenIdle) _ANSI_ARGS_((Tcl_IdleProc * proc, ClientData clientData));
01719 char * (*tcl_DStringAppend) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * str, int length));
01720 char * (*tcl_DStringAppendElement) _ANSI_ARGS_((Tcl_DString * dsPtr, CONST char * string));
01721 void (*tcl_DStringEndSublist) _ANSI_ARGS_((Tcl_DString * dsPtr));
01722 void (*tcl_DStringFree) _ANSI_ARGS_((Tcl_DString * dsPtr));
01723 void (*tcl_DStringGetResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr));
01724 void (*tcl_DStringInit) _ANSI_ARGS_((Tcl_DString * dsPtr));
01725 void (*tcl_DStringResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * dsPtr));
01726 void (*tcl_DStringSetLength) _ANSI_ARGS_((Tcl_DString * dsPtr, int length));
01727 void (*tcl_DStringStartSublist) _ANSI_ARGS_((Tcl_DString * dsPtr));
01728 int (*tcl_Eof) _ANSI_ARGS_((Tcl_Channel chan));
01729 CONST84_RETURN char * (*tcl_ErrnoId) _ANSI_ARGS_((void));
01730 CONST84_RETURN char * (*tcl_ErrnoMsg) _ANSI_ARGS_((int err));
01731 int (*tcl_Eval) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string));
01732 int (*tcl_EvalFile) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * fileName));
01733 int (*tcl_EvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr));
01734 void (*tcl_EventuallyFree) _ANSI_ARGS_((ClientData clientData, Tcl_FreeProc * freeProc));
01735 void (*tcl_Exit) _ANSI_ARGS_((int status));
01736 int (*tcl_ExposeCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * hiddenCmdToken, CONST char * cmdName));
01737 int (*tcl_ExprBoolean) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, int * ptr));
01738 int (*tcl_ExprBooleanObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int * ptr));
01739 int (*tcl_ExprDouble) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, double * ptr));
01740 int (*tcl_ExprDoubleObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, double * ptr));
01741 int (*tcl_ExprLong) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, long * ptr));
01742 int (*tcl_ExprLongObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, long * ptr));
01743 int (*tcl_ExprObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr));
01744 int (*tcl_ExprString) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string));
01745 void (*tcl_Finalize) _ANSI_ARGS_((void));
01746 void (*tcl_FindExecutable) _ANSI_ARGS_((CONST char * argv0));
01747 Tcl_HashEntry * (*tcl_FirstHashEntry) _ANSI_ARGS_((Tcl_HashTable * tablePtr, Tcl_HashSearch * searchPtr));
01748 int (*tcl_Flush) _ANSI_ARGS_((Tcl_Channel chan));
01749 void (*tcl_FreeResult) _ANSI_ARGS_((Tcl_Interp * interp));
01750 int (*tcl_GetAlias) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * slaveCmd, Tcl_Interp ** targetInterpPtr, CONST84 char ** targetCmdPtr, int * argcPtr, CONST84 char *** argvPtr));
01751 int (*tcl_GetAliasObj) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * slaveCmd, Tcl_Interp ** targetInterpPtr, CONST84 char ** targetCmdPtr, int * objcPtr, Tcl_Obj *** objv));
01752 ClientData (*tcl_GetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_InterpDeleteProc ** procPtr));
01753 Tcl_Channel (*tcl_GetChannel) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * chanName, int * modePtr));
01754 int (*tcl_GetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan));
01755 int (*tcl_GetChannelHandle) _ANSI_ARGS_((Tcl_Channel chan, int direction, ClientData * handlePtr));
01756 ClientData (*tcl_GetChannelInstanceData) _ANSI_ARGS_((Tcl_Channel chan));
01757 int (*tcl_GetChannelMode) _ANSI_ARGS_((Tcl_Channel chan));
01758 CONST84_RETURN char * (*tcl_GetChannelName) _ANSI_ARGS_((Tcl_Channel chan));
01759 int (*tcl_GetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, CONST char * optionName, Tcl_DString * dsPtr));
01760 Tcl_ChannelType * (*tcl_GetChannelType) _ANSI_ARGS_((Tcl_Channel chan));
01761 int (*tcl_GetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * cmdName, Tcl_CmdInfo * infoPtr));
01762 CONST84_RETURN char * (*tcl_GetCommandName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command));
01763 int (*tcl_GetErrno) _ANSI_ARGS_((void));
01764 CONST84_RETURN char * (*tcl_GetHostName) _ANSI_ARGS_((void));
01765 int (*tcl_GetInterpPath) _ANSI_ARGS_((Tcl_Interp * askInterp, Tcl_Interp * slaveInterp));
01766 Tcl_Interp * (*tcl_GetMaster) _ANSI_ARGS_((Tcl_Interp * interp));
01767 CONST char * (*tcl_GetNameOfExecutable) _ANSI_ARGS_((void));
01768 Tcl_Obj * (*tcl_GetObjResult) _ANSI_ARGS_((Tcl_Interp * interp));
01769 #if !defined(__WIN32__) && !defined(MAC_TCL)
01770 int (*tcl_GetOpenFile) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, int forWriting, int checkUsage, ClientData * filePtr));
01771 #endif
01772 #ifdef __WIN32__
01773 void *reserved167;
01774 #endif
01775 #ifdef MAC_TCL
01776 void *reserved167;
01777 #endif
01778 Tcl_PathType (*tcl_GetPathType) _ANSI_ARGS_((CONST char * path));
01779 int (*tcl_Gets) _ANSI_ARGS_((Tcl_Channel chan, Tcl_DString * dsPtr));
01780 int (*tcl_GetsObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr));
01781 int (*tcl_GetServiceMode) _ANSI_ARGS_((void));
01782 Tcl_Interp * (*tcl_GetSlave) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * slaveName));
01783 Tcl_Channel (*tcl_GetStdChannel) _ANSI_ARGS_((int type));
01784 CONST84_RETURN char * (*tcl_GetStringResult) _ANSI_ARGS_((Tcl_Interp * interp));
01785 CONST84_RETURN char * (*tcl_GetVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags));
01786 CONST84_RETURN char * (*tcl_GetVar2) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags));
01787 int (*tcl_GlobalEval) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * command));
01788 int (*tcl_GlobalEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr));
01789 int (*tcl_HideCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * cmdName, CONST char * hiddenCmdToken));
01790 int (*tcl_Init) _ANSI_ARGS_((Tcl_Interp * interp));
01791 void (*tcl_InitHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr, int keyType));
01792 int (*tcl_InputBlocked) _ANSI_ARGS_((Tcl_Channel chan));
01793 int (*tcl_InputBuffered) _ANSI_ARGS_((Tcl_Channel chan));
01794 int (*tcl_InterpDeleted) _ANSI_ARGS_((Tcl_Interp * interp));
01795 int (*tcl_IsSafe) _ANSI_ARGS_((Tcl_Interp * interp));
01796 char * (*tcl_JoinPath) _ANSI_ARGS_((int argc, CONST84 char * CONST * argv, Tcl_DString * resultPtr));
01797 int (*tcl_LinkVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, char * addr, int type));
01798 void *reserved188;
01799 Tcl_Channel (*tcl_MakeFileChannel) _ANSI_ARGS_((ClientData handle, int mode));
01800 int (*tcl_MakeSafe) _ANSI_ARGS_((Tcl_Interp * interp));
01801 Tcl_Channel (*tcl_MakeTcpClientChannel) _ANSI_ARGS_((ClientData tcpSocket));
01802 char * (*tcl_Merge) _ANSI_ARGS_((int argc, CONST84 char * CONST * argv));
01803 Tcl_HashEntry * (*tcl_NextHashEntry) _ANSI_ARGS_((Tcl_HashSearch * searchPtr));
01804 void (*tcl_NotifyChannel) _ANSI_ARGS_((Tcl_Channel channel, int mask));
01805 Tcl_Obj * (*tcl_ObjGetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, int flags));
01806 Tcl_Obj * (*tcl_ObjSetVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, Tcl_Obj * newValuePtr, int flags));
01807 #if !defined(__WIN32__) && !defined(MAC_TCL)
01808 Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags));
01809 #endif
01810 #ifdef __WIN32__
01811 Tcl_Channel (*tcl_OpenCommandChannel) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags));
01812 #endif
01813 #ifdef MAC_TCL
01814 void *reserved197;
01815 #endif
01816 Tcl_Channel (*tcl_OpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * fileName, CONST char * modeString, int permissions));
01817 Tcl_Channel (*tcl_OpenTcpClient) _ANSI_ARGS_((Tcl_Interp * interp, int port, CONST char * address, CONST char * myaddr, int myport, int async));
01818 Tcl_Channel (*tcl_OpenTcpServer) _ANSI_ARGS_((Tcl_Interp * interp, int port, CONST char * host, Tcl_TcpAcceptProc * acceptProc, ClientData callbackData));
01819 void (*tcl_Preserve) _ANSI_ARGS_((ClientData data));
01820 void (*tcl_PrintDouble) _ANSI_ARGS_((Tcl_Interp * interp, double value, char * dst));
01821 int (*tcl_PutEnv) _ANSI_ARGS_((CONST char * string));
01822 CONST84_RETURN char * (*tcl_PosixError) _ANSI_ARGS_((Tcl_Interp * interp));
01823 void (*tcl_QueueEvent) _ANSI_ARGS_((Tcl_Event * evPtr, Tcl_QueuePosition position));
01824 int (*tcl_Read) _ANSI_ARGS_((Tcl_Channel chan, char * bufPtr, int toRead));
01825 #if !defined(__WIN32__) && !defined(MAC_TCL)
01826 void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void));
01827 #endif
01828 #ifdef __WIN32__
01829 void (*tcl_ReapDetachedProcs) _ANSI_ARGS_((void));
01830 #endif
01831 #ifdef MAC_TCL
01832 void *reserved207;
01833 #endif
01834 int (*tcl_RecordAndEval) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * cmd, int flags));
01835 int (*tcl_RecordAndEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * cmdPtr, int flags));
01836 void (*tcl_RegisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan));
01837 void (*tcl_RegisterObjType) _ANSI_ARGS_((Tcl_ObjType * typePtr));
01838 Tcl_RegExp (*tcl_RegExpCompile) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string));
01839 int (*tcl_RegExpExec) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp regexp, CONST char * str, CONST char * start));
01840 int (*tcl_RegExpMatch) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, CONST char * pattern));
01841 void (*tcl_RegExpRange) _ANSI_ARGS_((Tcl_RegExp regexp, int index, CONST84 char ** startPtr, CONST84 char ** endPtr));
01842 void (*tcl_Release) _ANSI_ARGS_((ClientData clientData));
01843 void (*tcl_ResetResult) _ANSI_ARGS_((Tcl_Interp * interp));
01844 int (*tcl_ScanElement) _ANSI_ARGS_((CONST char * str, int * flagPtr));
01845 int (*tcl_ScanCountedElement) _ANSI_ARGS_((CONST char * str, int length, int * flagPtr));
01846 int (*tcl_SeekOld) _ANSI_ARGS_((Tcl_Channel chan, int offset, int mode));
01847 int (*tcl_ServiceAll) _ANSI_ARGS_((void));
01848 int (*tcl_ServiceEvent) _ANSI_ARGS_((int flags));
01849 void (*tcl_SetAssocData) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_InterpDeleteProc * proc, ClientData clientData));
01850 void (*tcl_SetChannelBufferSize) _ANSI_ARGS_((Tcl_Channel chan, int sz));
01851 int (*tcl_SetChannelOption) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, CONST char * optionName, CONST char * newValue));
01852 int (*tcl_SetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * cmdName, CONST Tcl_CmdInfo * infoPtr));
01853 void (*tcl_SetErrno) _ANSI_ARGS_((int err));
01854 void (*tcl_SetErrorCode) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
01855 void (*tcl_SetMaxBlockTime) _ANSI_ARGS_((Tcl_Time * timePtr));
01856 void (*tcl_SetPanicProc) _ANSI_ARGS_((Tcl_PanicProc * panicProc));
01857 int (*tcl_SetRecursionLimit) _ANSI_ARGS_((Tcl_Interp * interp, int depth));
01858 void (*tcl_SetResult) _ANSI_ARGS_((Tcl_Interp * interp, char * str, Tcl_FreeProc * freeProc));
01859 int (*tcl_SetServiceMode) _ANSI_ARGS_((int mode));
01860 void (*tcl_SetObjErrorCode) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * errorObjPtr));
01861 void (*tcl_SetObjResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * resultObjPtr));
01862 void (*tcl_SetStdChannel) _ANSI_ARGS_((Tcl_Channel channel, int type));
01863 CONST84_RETURN char * (*tcl_SetVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, CONST char * newValue, int flags));
01864 CONST84_RETURN char * (*tcl_SetVar2) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, CONST char * newValue, int flags));
01865 CONST84_RETURN char * (*tcl_SignalId) _ANSI_ARGS_((int sig));
01866 CONST84_RETURN char * (*tcl_SignalMsg) _ANSI_ARGS_((int sig));
01867 void (*tcl_SourceRCFile) _ANSI_ARGS_((Tcl_Interp * interp));
01868 int (*tcl_SplitList) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int * argcPtr, CONST84 char *** argvPtr));
01869 void (*tcl_SplitPath) _ANSI_ARGS_((CONST char * path, int * argcPtr, CONST84 char *** argvPtr));
01870 void (*tcl_StaticPackage) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc));
01871 int (*tcl_StringMatch) _ANSI_ARGS_((CONST char * str, CONST char * pattern));
01872 int (*tcl_TellOld) _ANSI_ARGS_((Tcl_Channel chan));
01873 int (*tcl_TraceVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData));
01874 int (*tcl_TraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData));
01875 char * (*tcl_TranslateFileName) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_DString * bufferPtr));
01876 int (*tcl_Ungets) _ANSI_ARGS_((Tcl_Channel chan, CONST char * str, int len, int atHead));
01877 void (*tcl_UnlinkVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName));
01878 int (*tcl_UnregisterChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan));
01879 int (*tcl_UnsetVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags));
01880 int (*tcl_UnsetVar2) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags));
01881 void (*tcl_UntraceVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData));
01882 void (*tcl_UntraceVar2) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData));
01883 void (*tcl_UpdateLinkedVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName));
01884 int (*tcl_UpVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * frameName, CONST char * varName, CONST char * localName, int flags));
01885 int (*tcl_UpVar2) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * frameName, CONST char * part1, CONST char * part2, CONST char * localName, int flags));
01886 int (*tcl_VarEval) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,interp));
01887 ClientData (*tcl_VarTraceInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData));
01888 ClientData (*tcl_VarTraceInfo2) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData));
01889 int (*tcl_Write) _ANSI_ARGS_((Tcl_Channel chan, CONST char * s, int slen));
01890 void (*tcl_WrongNumArgs) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], CONST char * message));
01891 int (*tcl_DumpActiveMemory) _ANSI_ARGS_((CONST char * fileName));
01892 void (*tcl_ValidateAllMemory) _ANSI_ARGS_((CONST char * file, int line));
01893 void (*tcl_AppendResultVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList));
01894 void (*tcl_AppendStringsToObjVA) _ANSI_ARGS_((Tcl_Obj * objPtr, va_list argList));
01895 CONST84_RETURN char * (*tcl_HashStats) _ANSI_ARGS_((Tcl_HashTable * tablePtr));
01896 CONST84_RETURN char * (*tcl_ParseVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, CONST84 char ** termPtr));
01897 CONST84_RETURN char * (*tcl_PkgPresent) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, CONST char * version, int exact));
01898 CONST84_RETURN char * (*tcl_PkgPresentEx) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, CONST char * version, int exact, ClientData * clientDataPtr));
01899 int (*tcl_PkgProvide) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, CONST char * version));
01900 CONST84_RETURN char * (*tcl_PkgRequire) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, CONST char * version, int exact));
01901 void (*tcl_SetErrorCodeVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList));
01902 int (*tcl_VarEvalVA) _ANSI_ARGS_((Tcl_Interp * interp, va_list argList));
01903 Tcl_Pid (*tcl_WaitPid) _ANSI_ARGS_((Tcl_Pid pid, int * statPtr, int options));
01904 void (*tcl_PanicVA) _ANSI_ARGS_((CONST char * format, va_list argList));
01905 void (*tcl_GetVersion) _ANSI_ARGS_((int * major, int * minor, int * patchLevel, int * type));
01906 void (*tcl_InitMemory) _ANSI_ARGS_((Tcl_Interp * interp));
01907 Tcl_Channel (*tcl_StackChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_ChannelType * typePtr, ClientData instanceData, int mask, Tcl_Channel prevChan));
01908 int (*tcl_UnstackChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan));
01909 Tcl_Channel (*tcl_GetStackedChannel) _ANSI_ARGS_((Tcl_Channel chan));
01910 void (*tcl_SetMainLoop) _ANSI_ARGS_((Tcl_MainLoopProc * proc));
01911 void *reserved285;
01912 void (*tcl_AppendObjToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_Obj * appendObjPtr));
01913 Tcl_Encoding (*tcl_CreateEncoding) _ANSI_ARGS_((Tcl_EncodingType * typePtr));
01914 void (*tcl_CreateThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData));
01915 void (*tcl_DeleteThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData));
01916 void (*tcl_DiscardResult) _ANSI_ARGS_((Tcl_SavedResult * statePtr));
01917 int (*tcl_EvalEx) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * script, int numBytes, int flags));
01918 int (*tcl_EvalObjv) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags));
01919 int (*tcl_EvalObjEx) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int flags));
01920 void (*tcl_ExitThread) _ANSI_ARGS_((int status));
01921 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));
01922 char * (*tcl_ExternalToUtfDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr));
01923 void (*tcl_FinalizeThread) _ANSI_ARGS_((void));
01924 void (*tcl_FinalizeNotifier) _ANSI_ARGS_((ClientData clientData));
01925 void (*tcl_FreeEncoding) _ANSI_ARGS_((Tcl_Encoding encoding));
01926 Tcl_ThreadId (*tcl_GetCurrentThread) _ANSI_ARGS_((void));
01927 Tcl_Encoding (*tcl_GetEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name));
01928 CONST84_RETURN char * (*tcl_GetEncodingName) _ANSI_ARGS_((Tcl_Encoding encoding));
01929 void (*tcl_GetEncodingNames) _ANSI_ARGS_((Tcl_Interp * interp));
01930 int (*tcl_GetIndexFromObjStruct) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CONST VOID * tablePtr, int offset, CONST char * msg, int flags, int * indexPtr));
01931 VOID * (*tcl_GetThreadData) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr, int size));
01932 Tcl_Obj * (*tcl_GetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags));
01933 ClientData (*tcl_InitNotifier) _ANSI_ARGS_((void));
01934 void (*tcl_MutexLock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
01935 void (*tcl_MutexUnlock) _ANSI_ARGS_((Tcl_Mutex * mutexPtr));
01936 void (*tcl_ConditionNotify) _ANSI_ARGS_((Tcl_Condition * condPtr));
01937 void (*tcl_ConditionWait) _ANSI_ARGS_((Tcl_Condition * condPtr, Tcl_Mutex * mutexPtr, Tcl_Time * timePtr));
01938 int (*tcl_NumUtfChars) _ANSI_ARGS_((CONST char * src, int len));
01939 int (*tcl_ReadChars) _ANSI_ARGS_((Tcl_Channel channel, Tcl_Obj * objPtr, int charsToRead, int appendFlag));
01940 void (*tcl_RestoreResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr));
01941 void (*tcl_SaveResult) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_SavedResult * statePtr));
01942 int (*tcl_SetSystemEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name));
01943 Tcl_Obj * (*tcl_SetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, Tcl_Obj * newValuePtr, int flags));
01944 void (*tcl_ThreadAlert) _ANSI_ARGS_((Tcl_ThreadId threadId));
01945 void (*tcl_ThreadQueueEvent) _ANSI_ARGS_((Tcl_ThreadId threadId, Tcl_Event* evPtr, Tcl_QueuePosition position));
01946 Tcl_UniChar (*tcl_UniCharAtIndex) _ANSI_ARGS_((CONST char * src, int index));
01947 Tcl_UniChar (*tcl_UniCharToLower) _ANSI_ARGS_((int ch));
01948 Tcl_UniChar (*tcl_UniCharToTitle) _ANSI_ARGS_((int ch));
01949 Tcl_UniChar (*tcl_UniCharToUpper) _ANSI_ARGS_((int ch));
01950 int (*tcl_UniCharToUtf) _ANSI_ARGS_((int ch, char * buf));
01951 CONST84_RETURN char * (*tcl_UtfAtIndex) _ANSI_ARGS_((CONST char * src, int index));
01952 int (*tcl_UtfCharComplete) _ANSI_ARGS_((CONST char * src, int len));
01953 int (*tcl_UtfBackslash) _ANSI_ARGS_((CONST char * src, int * readPtr, char * dst));
01954 CONST84_RETURN char * (*tcl_UtfFindFirst) _ANSI_ARGS_((CONST char * src, int ch));
01955 CONST84_RETURN char * (*tcl_UtfFindLast) _ANSI_ARGS_((CONST char * src, int ch));
01956 CONST84_RETURN char * (*tcl_UtfNext) _ANSI_ARGS_((CONST char * src));
01957 CONST84_RETURN char * (*tcl_UtfPrev) _ANSI_ARGS_((CONST char * src, CONST char * start));
01958 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));
01959 char * (*tcl_UtfToExternalDString) _ANSI_ARGS_((Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr));
01960 int (*tcl_UtfToLower) _ANSI_ARGS_((char * src));
01961 int (*tcl_UtfToTitle) _ANSI_ARGS_((char * src));
01962 int (*tcl_UtfToUniChar) _ANSI_ARGS_((CONST char * src, Tcl_UniChar * chPtr));
01963 int (*tcl_UtfToUpper) _ANSI_ARGS_((char * src));
01964 int (*tcl_WriteChars) _ANSI_ARGS_((Tcl_Channel chan, CONST char * src, int srcLen));
01965 int (*tcl_WriteObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr));
01966 char * (*tcl_GetString) _ANSI_ARGS_((Tcl_Obj * objPtr));
01967 CONST84_RETURN char * (*tcl_GetDefaultEncodingDir) _ANSI_ARGS_((void));
01968 void (*tcl_SetDefaultEncodingDir) _ANSI_ARGS_((CONST char * path));
01969 void (*tcl_AlertNotifier) _ANSI_ARGS_((ClientData clientData));
01970 void (*tcl_ServiceModeHook) _ANSI_ARGS_((int mode));
01971 int (*tcl_UniCharIsAlnum) _ANSI_ARGS_((int ch));
01972 int (*tcl_UniCharIsAlpha) _ANSI_ARGS_((int ch));
01973 int (*tcl_UniCharIsDigit) _ANSI_ARGS_((int ch));
01974 int (*tcl_UniCharIsLower) _ANSI_ARGS_((int ch));
01975 int (*tcl_UniCharIsSpace) _ANSI_ARGS_((int ch));
01976 int (*tcl_UniCharIsUpper) _ANSI_ARGS_((int ch));
01977 int (*tcl_UniCharIsWordChar) _ANSI_ARGS_((int ch));
01978 int (*tcl_UniCharLen) _ANSI_ARGS_((CONST Tcl_UniChar * str));
01979 int (*tcl_UniCharNcmp) _ANSI_ARGS_((CONST Tcl_UniChar * cs, CONST Tcl_UniChar * ct, unsigned long n));
01980 char * (*tcl_UniCharToUtfDString) _ANSI_ARGS_((CONST Tcl_UniChar * string, int numChars, Tcl_DString * dsPtr));
01981 Tcl_UniChar * (*tcl_UtfToUniCharDString) _ANSI_ARGS_((CONST char * string, int length, Tcl_DString * dsPtr));
01982 Tcl_RegExp (*tcl_GetRegExpFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * patObj, int flags));
01983 Tcl_Obj * (*tcl_EvalTokens) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Token * tokenPtr, int count));
01984 void (*tcl_FreeParse) _ANSI_ARGS_((Tcl_Parse * parsePtr));
01985 void (*tcl_LogCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * script, CONST char * command, int length));
01986 int (*tcl_ParseBraces) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string, int numBytes, Tcl_Parse * parsePtr, int append, CONST84 char ** termPtr));
01987 int (*tcl_ParseCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string, int numBytes, int nested, Tcl_Parse * parsePtr));
01988 int (*tcl_ParseExpr) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string, int numBytes, Tcl_Parse * parsePtr));
01989 int (*tcl_ParseQuotedString) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string, int numBytes, Tcl_Parse * parsePtr, int append, CONST84 char ** termPtr));
01990 int (*tcl_ParseVarName) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * string, int numBytes, Tcl_Parse * parsePtr, int append));
01991 char * (*tcl_GetCwd) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * cwdPtr));
01992 int (*tcl_Chdir) _ANSI_ARGS_((CONST char * dirName));
01993 int (*tcl_Access) _ANSI_ARGS_((CONST char * path, int mode));
01994 int (*tcl_Stat) _ANSI_ARGS_((CONST char * path, struct stat * bufPtr));
01995 int (*tcl_UtfNcmp) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n));
01996 int (*tcl_UtfNcasecmp) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n));
01997 int (*tcl_StringCaseMatch) _ANSI_ARGS_((CONST char * str, CONST char * pattern, int nocase));
01998 int (*tcl_UniCharIsControl) _ANSI_ARGS_((int ch));
01999 int (*tcl_UniCharIsGraph) _ANSI_ARGS_((int ch));
02000 int (*tcl_UniCharIsPrint) _ANSI_ARGS_((int ch));
02001 int (*tcl_UniCharIsPunct) _ANSI_ARGS_((int ch));
02002 int (*tcl_RegExpExecObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp regexp, Tcl_Obj * objPtr, int offset, int nmatches, int flags));
02003 void (*tcl_RegExpGetInfo) _ANSI_ARGS_((Tcl_RegExp regexp, Tcl_RegExpInfo * infoPtr));
02004 Tcl_Obj * (*tcl_NewUnicodeObj) _ANSI_ARGS_((CONST Tcl_UniChar * unicode, int numChars));
02005 void (*tcl_SetUnicodeObj) _ANSI_ARGS_((Tcl_Obj * objPtr, CONST Tcl_UniChar * unicode, int numChars));
02006 int (*tcl_GetCharLength) _ANSI_ARGS_((Tcl_Obj * objPtr));
02007 Tcl_UniChar (*tcl_GetUniChar) _ANSI_ARGS_((Tcl_Obj * objPtr, int index));
02008 Tcl_UniChar * (*tcl_GetUnicode) _ANSI_ARGS_((Tcl_Obj * objPtr));
02009 Tcl_Obj * (*tcl_GetRange) _ANSI_ARGS_((Tcl_Obj * objPtr, int first, int last));
02010 void (*tcl_AppendUnicodeToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, CONST Tcl_UniChar * unicode, int length));
02011 int (*tcl_RegExpMatchObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * stringObj, Tcl_Obj * patternObj));
02012 void (*tcl_SetNotifier) _ANSI_ARGS_((Tcl_NotifierProcs * notifierProcPtr));
02013 Tcl_Mutex * (*tcl_GetAllocMutex) _ANSI_ARGS_((void));
02014 int (*tcl_GetChannelNames) _ANSI_ARGS_((Tcl_Interp * interp));
02015 int (*tcl_GetChannelNamesEx) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * pattern));
02016 int (*tcl_ProcObjCmd) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[]));
02017 void (*tcl_ConditionFinalize) _ANSI_ARGS_((Tcl_Condition * condPtr));
02018 void (*tcl_MutexFinalize) _ANSI_ARGS_((Tcl_Mutex * mutex));
02019 int (*tcl_CreateThread) _ANSI_ARGS_((Tcl_ThreadId * idPtr, Tcl_ThreadCreateProc proc, ClientData clientData, int stackSize, int flags));
02020 int (*tcl_ReadRaw) _ANSI_ARGS_((Tcl_Channel chan, char * dst, int bytesToRead));
02021 int (*tcl_WriteRaw) _ANSI_ARGS_((Tcl_Channel chan, CONST char * src, int srcLen));
02022 Tcl_Channel (*tcl_GetTopChannel) _ANSI_ARGS_((Tcl_Channel chan));
02023 int (*tcl_ChannelBuffered) _ANSI_ARGS_((Tcl_Channel chan));
02024 CONST84_RETURN char * (*tcl_ChannelName) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02025 Tcl_ChannelTypeVersion (*tcl_ChannelVersion) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02026 Tcl_DriverBlockModeProc * (*tcl_ChannelBlockModeProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02027 Tcl_DriverCloseProc * (*tcl_ChannelCloseProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02028 Tcl_DriverClose2Proc * (*tcl_ChannelClose2Proc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02029 Tcl_DriverInputProc * (*tcl_ChannelInputProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02030 Tcl_DriverOutputProc * (*tcl_ChannelOutputProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02031 Tcl_DriverSeekProc * (*tcl_ChannelSeekProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02032 Tcl_DriverSetOptionProc * (*tcl_ChannelSetOptionProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02033 Tcl_DriverGetOptionProc * (*tcl_ChannelGetOptionProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02034 Tcl_DriverWatchProc * (*tcl_ChannelWatchProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02035 Tcl_DriverGetHandleProc * (*tcl_ChannelGetHandleProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02036 Tcl_DriverFlushProc * (*tcl_ChannelFlushProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02037 Tcl_DriverHandlerProc * (*tcl_ChannelHandlerProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02038 int (*tcl_JoinThread) _ANSI_ARGS_((Tcl_ThreadId threadId, int* result));
02039 int (*tcl_IsChannelShared) _ANSI_ARGS_((Tcl_Channel channel));
02040 int (*tcl_IsChannelRegistered) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_Channel channel));
02041 void (*tcl_CutChannel) _ANSI_ARGS_((Tcl_Channel channel));
02042 void (*tcl_SpliceChannel) _ANSI_ARGS_((Tcl_Channel channel));
02043 void (*tcl_ClearChannelHandlers) _ANSI_ARGS_((Tcl_Channel channel));
02044 int (*tcl_IsChannelExisting) _ANSI_ARGS_((CONST char* channelName));
02045 int (*tcl_UniCharNcasecmp) _ANSI_ARGS_((CONST Tcl_UniChar * cs, CONST Tcl_UniChar * ct, unsigned long n));
02046 int (*tcl_UniCharCaseMatch) _ANSI_ARGS_((CONST Tcl_UniChar * ustr, CONST Tcl_UniChar * pattern, int nocase));
02047 Tcl_HashEntry * (*tcl_FindHashEntry) _ANSI_ARGS_((Tcl_HashTable * tablePtr, CONST char * key));
02048 Tcl_HashEntry * (*tcl_CreateHashEntry) _ANSI_ARGS_((Tcl_HashTable * tablePtr, CONST char * key, int * newPtr));
02049 void (*tcl_InitCustomHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr, int keyType, Tcl_HashKeyType * typePtr));
02050 void (*tcl_InitObjHashTable) _ANSI_ARGS_((Tcl_HashTable * tablePtr));
02051 ClientData (*tcl_CommandTraceInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags, Tcl_CommandTraceProc * procPtr, ClientData prevClientData));
02052 int (*tcl_TraceCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags, Tcl_CommandTraceProc * proc, ClientData clientData));
02053 void (*tcl_UntraceCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName, int flags, Tcl_CommandTraceProc * proc, ClientData clientData));
02054 char * (*tcl_AttemptAlloc) _ANSI_ARGS_((unsigned int size));
02055 char * (*tcl_AttemptDbCkalloc) _ANSI_ARGS_((unsigned int size, CONST char * file, int line));
02056 char * (*tcl_AttemptRealloc) _ANSI_ARGS_((char * ptr, unsigned int size));
02057 char * (*tcl_AttemptDbCkrealloc) _ANSI_ARGS_((char * ptr, unsigned int size, CONST char * file, int line));
02058 int (*tcl_AttemptSetObjLength) _ANSI_ARGS_((Tcl_Obj * objPtr, int length));
02059 Tcl_ThreadId (*tcl_GetChannelThread) _ANSI_ARGS_((Tcl_Channel channel));
02060 Tcl_UniChar * (*tcl_GetUnicodeFromObj) _ANSI_ARGS_((Tcl_Obj * objPtr, int * lengthPtr));
02061 int (*tcl_GetMathFuncInfo) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, int * numArgsPtr, Tcl_ValueType ** argTypesPtr, Tcl_MathProc ** procPtr, ClientData * clientDataPtr));
02062 Tcl_Obj * (*tcl_ListMathFuncs) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * pattern));
02063 Tcl_Obj * (*tcl_SubstObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int flags));
02064 int (*tcl_DetachChannel) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_Channel channel));
02065 int (*tcl_IsStandardChannel) _ANSI_ARGS_((Tcl_Channel channel));
02066 int (*tcl_FSCopyFile) _ANSI_ARGS_((Tcl_Obj * srcPathPtr, Tcl_Obj * destPathPtr));
02067 int (*tcl_FSCopyDirectory) _ANSI_ARGS_((Tcl_Obj * srcPathPtr, Tcl_Obj * destPathPtr, Tcl_Obj ** errorPtr));
02068 int (*tcl_FSCreateDirectory) _ANSI_ARGS_((Tcl_Obj * pathPtr));
02069 int (*tcl_FSDeleteFile) _ANSI_ARGS_((Tcl_Obj * pathPtr));
02070 int (*tcl_FSLoadFile) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * pathPtr, CONST char * sym1, CONST char * sym2, Tcl_PackageInitProc ** proc1Ptr, Tcl_PackageInitProc ** proc2Ptr, Tcl_LoadHandle * handlePtr, Tcl_FSUnloadFileProc ** unloadProcPtr));
02071 int (*tcl_FSMatchInDirectory) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * result, Tcl_Obj * pathPtr, CONST char * pattern, Tcl_GlobTypeData * types));
02072 Tcl_Obj * (*tcl_FSLink) _ANSI_ARGS_((Tcl_Obj * pathPtr, Tcl_Obj * toPtr, int linkAction));
02073 int (*tcl_FSRemoveDirectory) _ANSI_ARGS_((Tcl_Obj * pathPtr, int recursive, Tcl_Obj ** errorPtr));
02074 int (*tcl_FSRenameFile) _ANSI_ARGS_((Tcl_Obj * srcPathPtr, Tcl_Obj * destPathPtr));
02075 int (*tcl_FSLstat) _ANSI_ARGS_((Tcl_Obj * pathPtr, Tcl_StatBuf * buf));
02076 int (*tcl_FSUtime) _ANSI_ARGS_((Tcl_Obj * pathPtr, struct utimbuf * tval));
02077 int (*tcl_FSFileAttrsGet) _ANSI_ARGS_((Tcl_Interp * interp, int index, Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef));
02078 int (*tcl_FSFileAttrsSet) _ANSI_ARGS_((Tcl_Interp * interp, int index, Tcl_Obj * pathPtr, Tcl_Obj * objPtr));
02079 CONST char ** (*tcl_FSFileAttrStrings) _ANSI_ARGS_((Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef));
02080 int (*tcl_FSStat) _ANSI_ARGS_((Tcl_Obj * pathPtr, Tcl_StatBuf * buf));
02081 int (*tcl_FSAccess) _ANSI_ARGS_((Tcl_Obj * pathPtr, int mode));
02082 Tcl_Channel (*tcl_FSOpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * pathPtr, CONST char * modeString, int permissions));
02083 Tcl_Obj* (*tcl_FSGetCwd) _ANSI_ARGS_((Tcl_Interp * interp));
02084 int (*tcl_FSChdir) _ANSI_ARGS_((Tcl_Obj * pathPtr));
02085 int (*tcl_FSConvertToPathType) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * pathPtr));
02086 Tcl_Obj* (*tcl_FSJoinPath) _ANSI_ARGS_((Tcl_Obj * listObj, int elements));
02087 Tcl_Obj* (*tcl_FSSplitPath) _ANSI_ARGS_((Tcl_Obj* pathPtr, int * lenPtr));
02088 int (*tcl_FSEqualPaths) _ANSI_ARGS_((Tcl_Obj* firstPtr, Tcl_Obj* secondPtr));
02089 Tcl_Obj* (*tcl_FSGetNormalizedPath) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj* pathObjPtr));
02090 Tcl_Obj* (*tcl_FSJoinToPath) _ANSI_ARGS_((Tcl_Obj * basePtr, int objc, Tcl_Obj *CONST objv[]));
02091 ClientData (*tcl_FSGetInternalRep) _ANSI_ARGS_((Tcl_Obj* pathObjPtr, Tcl_Filesystem * fsPtr));
02092 Tcl_Obj* (*tcl_FSGetTranslatedPath) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj* pathPtr));
02093 int (*tcl_FSEvalFile) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * fileName));
02094 Tcl_Obj* (*tcl_FSNewNativePath) _ANSI_ARGS_((Tcl_Filesystem* fromFilesystem, ClientData clientData));
02095 CONST char* (*tcl_FSGetNativePath) _ANSI_ARGS_((Tcl_Obj* pathObjPtr));
02096 Tcl_Obj* (*tcl_FSFileSystemInfo) _ANSI_ARGS_((Tcl_Obj* pathObjPtr));
02097 Tcl_Obj* (*tcl_FSPathSeparator) _ANSI_ARGS_((Tcl_Obj* pathObjPtr));
02098 Tcl_Obj* (*tcl_FSListVolumes) _ANSI_ARGS_((void));
02099 int (*tcl_FSRegister) _ANSI_ARGS_((ClientData clientData, Tcl_Filesystem * fsPtr));
02100 int (*tcl_FSUnregister) _ANSI_ARGS_((Tcl_Filesystem * fsPtr));
02101 ClientData (*tcl_FSData) _ANSI_ARGS_((Tcl_Filesystem * fsPtr));
02102 CONST char* (*tcl_FSGetTranslatedStringPath) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj* pathPtr));
02103 Tcl_Filesystem* (*tcl_FSGetFileSystemForPath) _ANSI_ARGS_((Tcl_Obj* pathObjPtr));
02104 Tcl_PathType (*tcl_FSGetPathType) _ANSI_ARGS_((Tcl_Obj * pathObjPtr));
02105 int (*tcl_OutputBuffered) _ANSI_ARGS_((Tcl_Channel chan));
02106 void (*tcl_FSMountsChanged) _ANSI_ARGS_((Tcl_Filesystem * fsPtr));
02107 int (*tcl_EvalTokensStandard) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Token * tokenPtr, int count));
02108 void (*tcl_GetTime) _ANSI_ARGS_((Tcl_Time* timeBuf));
02109 Tcl_Trace (*tcl_CreateObjTrace) _ANSI_ARGS_((Tcl_Interp* interp, int level, int flags, Tcl_CmdObjTraceProc* objProc, ClientData clientData, Tcl_CmdObjTraceDeleteProc* delProc));
02110 int (*tcl_GetCommandInfoFromToken) _ANSI_ARGS_((Tcl_Command token, Tcl_CmdInfo* infoPtr));
02111 int (*tcl_SetCommandInfoFromToken) _ANSI_ARGS_((Tcl_Command token, CONST Tcl_CmdInfo* infoPtr));
02112 Tcl_Obj * (*tcl_DbNewWideIntObj) _ANSI_ARGS_((Tcl_WideInt wideValue, CONST char * file, int line));
02113 int (*tcl_GetWideIntFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_WideInt * widePtr));
02114 Tcl_Obj * (*tcl_NewWideIntObj) _ANSI_ARGS_((Tcl_WideInt wideValue));
02115 void (*tcl_SetWideIntObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_WideInt wideValue));
02116 Tcl_StatBuf * (*tcl_AllocStatBuf) _ANSI_ARGS_((void));
02117 Tcl_WideInt (*tcl_Seek) _ANSI_ARGS_((Tcl_Channel chan, Tcl_WideInt offset, int mode));
02118 Tcl_WideInt (*tcl_Tell) _ANSI_ARGS_((Tcl_Channel chan));
02119 Tcl_DriverWideSeekProc * (*tcl_ChannelWideSeekProc) _ANSI_ARGS_((Tcl_ChannelType * chanTypePtr));
02120 } TclStubs;
02121
02122 #ifdef __cplusplus
02123 extern "C" {
02124 #endif
02125 extern TclStubs *tclStubsPtr;
02126 #ifdef __cplusplus
02127 }
02128 #endif
02129
02130 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
02131
02132
02133
02134
02135
02136 #ifndef Tcl_PkgProvideEx
02137 #define Tcl_PkgProvideEx \
02138 (tclStubsPtr->tcl_PkgProvideEx)
02139 #endif
02140 #ifndef Tcl_PkgRequireEx
02141 #define Tcl_PkgRequireEx \
02142 (tclStubsPtr->tcl_PkgRequireEx)
02143 #endif
02144 #ifndef Tcl_Panic
02145 #define Tcl_Panic \
02146 (tclStubsPtr->tcl_Panic)
02147 #endif
02148 #ifndef Tcl_Alloc
02149 #define Tcl_Alloc \
02150 (tclStubsPtr->tcl_Alloc)
02151 #endif
02152 #ifndef Tcl_Free
02153 #define Tcl_Free \
02154 (tclStubsPtr->tcl_Free)
02155 #endif
02156 #ifndef Tcl_Realloc
02157 #define Tcl_Realloc \
02158 (tclStubsPtr->tcl_Realloc)
02159 #endif
02160 #ifndef Tcl_DbCkalloc
02161 #define Tcl_DbCkalloc \
02162 (tclStubsPtr->tcl_DbCkalloc)
02163 #endif
02164 #ifndef Tcl_DbCkfree
02165 #define Tcl_DbCkfree \
02166 (tclStubsPtr->tcl_DbCkfree)
02167 #endif
02168 #ifndef Tcl_DbCkrealloc
02169 #define Tcl_DbCkrealloc \
02170 (tclStubsPtr->tcl_DbCkrealloc)
02171 #endif
02172 #if !defined(__WIN32__) && !defined(MAC_TCL)
02173 #ifndef Tcl_CreateFileHandler
02174 #define Tcl_CreateFileHandler \
02175 (tclStubsPtr->tcl_CreateFileHandler)
02176 #endif
02177 #endif
02178 #if !defined(__WIN32__) && !defined(MAC_TCL)
02179 #ifndef Tcl_DeleteFileHandler
02180 #define Tcl_DeleteFileHandler \
02181 (tclStubsPtr->tcl_DeleteFileHandler)
02182 #endif
02183 #endif
02184 #ifndef Tcl_SetTimer
02185 #define Tcl_SetTimer \
02186 (tclStubsPtr->tcl_SetTimer)
02187 #endif
02188 #ifndef Tcl_Sleep
02189 #define Tcl_Sleep \
02190 (tclStubsPtr->tcl_Sleep)
02191 #endif
02192 #ifndef Tcl_WaitForEvent
02193 #define Tcl_WaitForEvent \
02194 (tclStubsPtr->tcl_WaitForEvent)
02195 #endif
02196 #ifndef Tcl_AppendAllObjTypes
02197 #define Tcl_AppendAllObjTypes \
02198 (tclStubsPtr->tcl_AppendAllObjTypes)
02199 #endif
02200 #ifndef Tcl_AppendStringsToObj
02201 #define Tcl_AppendStringsToObj \
02202 (tclStubsPtr->tcl_AppendStringsToObj)
02203 #endif
02204 #ifndef Tcl_AppendToObj
02205 #define Tcl_AppendToObj \
02206 (tclStubsPtr->tcl_AppendToObj)
02207 #endif
02208 #ifndef Tcl_ConcatObj
02209 #define Tcl_ConcatObj \
02210 (tclStubsPtr->tcl_ConcatObj)
02211 #endif
02212 #ifndef Tcl_ConvertToType
02213 #define Tcl_ConvertToType \
02214 (tclStubsPtr->tcl_ConvertToType)
02215 #endif
02216 #ifndef Tcl_DbDecrRefCount
02217 #define Tcl_DbDecrRefCount \
02218 (tclStubsPtr->tcl_DbDecrRefCount)
02219 #endif
02220 #ifndef Tcl_DbIncrRefCount
02221 #define Tcl_DbIncrRefCount \
02222 (tclStubsPtr->tcl_DbIncrRefCount)
02223 #endif
02224 #ifndef Tcl_DbIsShared
02225 #define Tcl_DbIsShared \
02226 (tclStubsPtr->tcl_DbIsShared)
02227 #endif
02228 #ifndef Tcl_DbNewBooleanObj
02229 #define Tcl_DbNewBooleanObj \
02230 (tclStubsPtr->tcl_DbNewBooleanObj)
02231 #endif
02232 #ifndef Tcl_DbNewByteArrayObj
02233 #define Tcl_DbNewByteArrayObj \
02234 (tclStubsPtr->tcl_DbNewByteArrayObj)
02235 #endif
02236 #ifndef Tcl_DbNewDoubleObj
02237 #define Tcl_DbNewDoubleObj \
02238 (tclStubsPtr->tcl_DbNewDoubleObj)
02239 #endif
02240 #ifndef Tcl_DbNewListObj
02241 #define Tcl_DbNewListObj \
02242 (tclStubsPtr->tcl_DbNewListObj)
02243 #endif
02244 #ifndef Tcl_DbNewLongObj
02245 #define Tcl_DbNewLongObj \
02246 (tclStubsPtr->tcl_DbNewLongObj)
02247 #endif
02248 #ifndef Tcl_DbNewObj
02249 #define Tcl_DbNewObj \
02250 (tclStubsPtr->tcl_DbNewObj)
02251 #endif
02252 #ifndef Tcl_DbNewStringObj
02253 #define Tcl_DbNewStringObj \
02254 (tclStubsPtr->tcl_DbNewStringObj)
02255 #endif
02256 #ifndef Tcl_DuplicateObj
02257 #define Tcl_DuplicateObj \
02258 (tclStubsPtr->tcl_DuplicateObj)
02259 #endif
02260 #ifndef TclFreeObj
02261 #define TclFreeObj \
02262 (tclStubsPtr->tclFreeObj)
02263 #endif
02264 #ifndef Tcl_GetBoolean
02265 #define Tcl_GetBoolean \
02266 (tclStubsPtr->tcl_GetBoolean)
02267 #endif
02268 #ifndef Tcl_GetBooleanFromObj
02269 #define Tcl_GetBooleanFromObj \
02270 (tclStubsPtr->tcl_GetBooleanFromObj)
02271 #endif
02272 #ifndef Tcl_GetByteArrayFromObj
02273 #define Tcl_GetByteArrayFromObj \
02274 (tclStubsPtr->tcl_GetByteArrayFromObj)
02275 #endif
02276 #ifndef Tcl_GetDouble
02277 #define Tcl_GetDouble \
02278 (tclStubsPtr->tcl_GetDouble)
02279 #endif
02280 #ifndef Tcl_GetDoubleFromObj
02281 #define Tcl_GetDoubleFromObj \
02282 (tclStubsPtr->tcl_GetDoubleFromObj)
02283 #endif
02284 #ifndef Tcl_GetIndexFromObj
02285 #define Tcl_GetIndexFromObj \
02286 (tclStubsPtr->tcl_GetIndexFromObj)
02287 #endif
02288 #ifndef Tcl_GetInt
02289 #define Tcl_GetInt \
02290 (tclStubsPtr->tcl_GetInt)
02291 #endif
02292 #ifndef Tcl_GetIntFromObj
02293 #define Tcl_GetIntFromObj \
02294 (tclStubsPtr->tcl_GetIntFromObj)
02295 #endif
02296 #ifndef Tcl_GetLongFromObj
02297 #define Tcl_GetLongFromObj \
02298 (tclStubsPtr->tcl_GetLongFromObj)
02299 #endif
02300 #ifndef Tcl_GetObjType
02301 #define Tcl_GetObjType \
02302 (tclStubsPtr->tcl_GetObjType)
02303 #endif
02304 #ifndef Tcl_GetStringFromObj
02305 #define Tcl_GetStringFromObj \
02306 (tclStubsPtr->tcl_GetStringFromObj)
02307 #endif
02308 #ifndef Tcl_InvalidateStringRep
02309 #define Tcl_InvalidateStringRep \
02310 (tclStubsPtr->tcl_InvalidateStringRep)
02311 #endif
02312 #ifndef Tcl_ListObjAppendList
02313 #define Tcl_ListObjAppendList \
02314 (tclStubsPtr->tcl_ListObjAppendList)
02315 #endif
02316 #ifndef Tcl_ListObjAppendElement
02317 #define Tcl_ListObjAppendElement \
02318 (tclStubsPtr->tcl_ListObjAppendElement)
02319 #endif
02320 #ifndef Tcl_ListObjGetElements
02321 #define Tcl_ListObjGetElements \
02322 (tclStubsPtr->tcl_ListObjGetElements)
02323 #endif
02324 #ifndef Tcl_ListObjIndex
02325 #define Tcl_ListObjIndex \
02326 (tclStubsPtr->tcl_ListObjIndex)
02327 #endif
02328 #ifndef Tcl_ListObjLength
02329 #define Tcl_ListObjLength \
02330 (tclStubsPtr->tcl_ListObjLength)
02331 #endif
02332 #ifndef Tcl_ListObjReplace
02333 #define Tcl_ListObjReplace \
02334 (tclStubsPtr->tcl_ListObjReplace)
02335 #endif
02336 #ifndef Tcl_NewBooleanObj
02337 #define Tcl_NewBooleanObj \
02338 (tclStubsPtr->tcl_NewBooleanObj)
02339 #endif
02340 #ifndef Tcl_NewByteArrayObj
02341 #define Tcl_NewByteArrayObj \
02342 (tclStubsPtr->tcl_NewByteArrayObj)
02343 #endif
02344 #ifndef Tcl_NewDoubleObj
02345 #define Tcl_NewDoubleObj \
02346 (tclStubsPtr->tcl_NewDoubleObj)
02347 #endif
02348 #ifndef Tcl_NewIntObj
02349 #define Tcl_NewIntObj \
02350 (tclStubsPtr->tcl_NewIntObj)
02351 #endif
02352 #ifndef Tcl_NewListObj
02353 #define Tcl_NewListObj \
02354 (tclStubsPtr->tcl_NewListObj)
02355 #endif
02356 #ifndef Tcl_NewLongObj
02357 #define Tcl_NewLongObj \
02358 (tclStubsPtr->tcl_NewLongObj)
02359 #endif
02360 #ifndef Tcl_NewObj
02361 #define Tcl_NewObj \
02362 (tclStubsPtr->tcl_NewObj)
02363 #endif
02364 #ifndef Tcl_NewStringObj
02365 #define Tcl_NewStringObj \
02366 (tclStubsPtr->tcl_NewStringObj)
02367 #endif
02368 #ifndef Tcl_SetBooleanObj
02369 #define Tcl_SetBooleanObj \
02370 (tclStubsPtr->tcl_SetBooleanObj)
02371 #endif
02372 #ifndef Tcl_SetByteArrayLength
02373 #define Tcl_SetByteArrayLength \
02374 (tclStubsPtr->tcl_SetByteArrayLength)
02375 #endif
02376 #ifndef Tcl_SetByteArrayObj
02377 #define Tcl_SetByteArrayObj \
02378 (tclStubsPtr->tcl_SetByteArrayObj)
02379 #endif
02380 #ifndef Tcl_SetDoubleObj
02381 #define Tcl_SetDoubleObj \
02382 (tclStubsPtr->tcl_SetDoubleObj)
02383 #endif
02384 #ifndef Tcl_SetIntObj
02385 #define Tcl_SetIntObj \
02386 (tclStubsPtr->tcl_SetIntObj)
02387 #endif
02388 #ifndef Tcl_SetListObj
02389 #define Tcl_SetListObj \
02390 (tclStubsPtr->tcl_SetListObj)
02391 #endif
02392 #ifndef Tcl_SetLongObj
02393 #define Tcl_SetLongObj \
02394 (tclStubsPtr->tcl_SetLongObj)
02395 #endif
02396 #ifndef Tcl_SetObjLength
02397 #define Tcl_SetObjLength \
02398 (tclStubsPtr->tcl_SetObjLength)
02399 #endif
02400 #ifndef Tcl_SetStringObj
02401 #define Tcl_SetStringObj \
02402 (tclStubsPtr->tcl_SetStringObj)
02403 #endif
02404 #ifndef Tcl_AddErrorInfo
02405 #define Tcl_AddErrorInfo \
02406 (tclStubsPtr->tcl_AddErrorInfo)
02407 #endif
02408 #ifndef Tcl_AddObjErrorInfo
02409 #define Tcl_AddObjErrorInfo \
02410 (tclStubsPtr->tcl_AddObjErrorInfo)
02411 #endif
02412 #ifndef Tcl_AllowExceptions
02413 #define Tcl_AllowExceptions \
02414 (tclStubsPtr->tcl_AllowExceptions)
02415 #endif
02416 #ifndef Tcl_AppendElement
02417 #define Tcl_AppendElement \
02418 (tclStubsPtr->tcl_AppendElement)
02419 #endif
02420 #ifndef Tcl_AppendResult
02421 #define Tcl_AppendResult \
02422 (tclStubsPtr->tcl_AppendResult)
02423 #endif
02424 #ifndef Tcl_AsyncCreate
02425 #define Tcl_AsyncCreate \
02426 (tclStubsPtr->tcl_AsyncCreate)
02427 #endif
02428 #ifndef Tcl_AsyncDelete
02429 #define Tcl_AsyncDelete \
02430 (tclStubsPtr->tcl_AsyncDelete)
02431 #endif
02432 #ifndef Tcl_AsyncInvoke
02433 #define Tcl_AsyncInvoke \
02434 (tclStubsPtr->tcl_AsyncInvoke)
02435 #endif
02436 #ifndef Tcl_AsyncMark
02437 #define Tcl_AsyncMark \
02438 (tclStubsPtr->tcl_AsyncMark)
02439 #endif
02440 #ifndef Tcl_AsyncReady
02441 #define Tcl_AsyncReady \
02442 (tclStubsPtr->tcl_AsyncReady)
02443 #endif
02444 #ifndef Tcl_BackgroundError
02445 #define Tcl_BackgroundError \
02446 (tclStubsPtr->tcl_BackgroundError)
02447 #endif
02448 #ifndef Tcl_Backslash
02449 #define Tcl_Backslash \
02450 (tclStubsPtr->tcl_Backslash)
02451 #endif
02452 #ifndef Tcl_BadChannelOption
02453 #define Tcl_BadChannelOption \
02454 (tclStubsPtr->tcl_BadChannelOption)
02455 #endif
02456 #ifndef Tcl_CallWhenDeleted
02457 #define Tcl_CallWhenDeleted \
02458 (tclStubsPtr->tcl_CallWhenDeleted)
02459 #endif
02460 #ifndef Tcl_CancelIdleCall
02461 #define Tcl_CancelIdleCall \
02462 (tclStubsPtr->tcl_CancelIdleCall)
02463 #endif
02464 #ifndef Tcl_Close
02465 #define Tcl_Close \
02466 (tclStubsPtr->tcl_Close)
02467 #endif
02468 #ifndef Tcl_CommandComplete
02469 #define Tcl_CommandComplete \
02470 (tclStubsPtr->tcl_CommandComplete)
02471 #endif
02472 #ifndef Tcl_Concat
02473 #define Tcl_Concat \
02474 (tclStubsPtr->tcl_Concat)
02475 #endif
02476 #ifndef Tcl_ConvertElement
02477 #define Tcl_ConvertElement \
02478 (tclStubsPtr->tcl_ConvertElement)
02479 #endif
02480 #ifndef Tcl_ConvertCountedElement
02481 #define Tcl_ConvertCountedElement \
02482 (tclStubsPtr->tcl_ConvertCountedElement)
02483 #endif
02484 #ifndef Tcl_CreateAlias
02485 #define Tcl_CreateAlias \
02486 (tclStubsPtr->tcl_CreateAlias)
02487 #endif
02488 #ifndef Tcl_CreateAliasObj
02489 #define Tcl_CreateAliasObj \
02490 (tclStubsPtr->tcl_CreateAliasObj)
02491 #endif
02492 #ifndef Tcl_CreateChannel
02493 #define Tcl_CreateChannel \
02494 (tclStubsPtr->tcl_CreateChannel)
02495 #endif
02496 #ifndef Tcl_CreateChannelHandler
02497 #define Tcl_CreateChannelHandler \
02498 (tclStubsPtr->tcl_CreateChannelHandler)
02499 #endif
02500 #ifndef Tcl_CreateCloseHandler
02501 #define Tcl_CreateCloseHandler \
02502 (tclStubsPtr->tcl_CreateCloseHandler)
02503 #endif
02504 #ifndef Tcl_CreateCommand
02505 #define Tcl_CreateCommand \
02506 (tclStubsPtr->tcl_CreateCommand)
02507 #endif
02508 #ifndef Tcl_CreateEventSource
02509 #define Tcl_CreateEventSource \
02510 (tclStubsPtr->tcl_CreateEventSource)
02511 #endif
02512 #ifndef Tcl_CreateExitHandler
02513 #define Tcl_CreateExitHandler \
02514 (tclStubsPtr->tcl_CreateExitHandler)
02515 #endif
02516 #ifndef Tcl_CreateInterp
02517 #define Tcl_CreateInterp \
02518 (tclStubsPtr->tcl_CreateInterp)
02519 #endif
02520 #ifndef Tcl_CreateMathFunc
02521 #define Tcl_CreateMathFunc \
02522 (tclStubsPtr->tcl_CreateMathFunc)
02523 #endif
02524 #ifndef Tcl_CreateObjCommand
02525 #define Tcl_CreateObjCommand \
02526 (tclStubsPtr->tcl_CreateObjCommand)
02527 #endif
02528 #ifndef Tcl_CreateSlave
02529 #define Tcl_CreateSlave \
02530 (tclStubsPtr->tcl_CreateSlave)
02531 #endif
02532 #ifndef Tcl_CreateTimerHandler
02533 #define Tcl_CreateTimerHandler \
02534 (tclStubsPtr->tcl_CreateTimerHandler)
02535 #endif
02536 #ifndef Tcl_CreateTrace
02537 #define Tcl_CreateTrace \
02538 (tclStubsPtr->tcl_CreateTrace)
02539 #endif
02540 #ifndef Tcl_DeleteAssocData
02541 #define Tcl_DeleteAssocData \
02542 (tclStubsPtr->tcl_DeleteAssocData)
02543 #endif
02544 #ifndef Tcl_DeleteChannelHandler
02545 #define Tcl_DeleteChannelHandler \
02546 (tclStubsPtr->tcl_DeleteChannelHandler)
02547 #endif
02548 #ifndef Tcl_DeleteCloseHandler
02549 #define Tcl_DeleteCloseHandler \
02550 (tclStubsPtr->tcl_DeleteCloseHandler)
02551 #endif
02552 #ifndef Tcl_DeleteCommand
02553 #define Tcl_DeleteCommand \
02554 (tclStubsPtr->tcl_DeleteCommand)
02555 #endif
02556 #ifndef Tcl_DeleteCommandFromToken
02557 #define Tcl_DeleteCommandFromToken \
02558 (tclStubsPtr->tcl_DeleteCommandFromToken)
02559 #endif
02560 #ifndef Tcl_DeleteEvents
02561 #define Tcl_DeleteEvents \
02562 (tclStubsPtr->tcl_DeleteEvents)
02563 #endif
02564 #ifndef Tcl_DeleteEventSource
02565 #define Tcl_DeleteEventSource \
02566 (tclStubsPtr->tcl_DeleteEventSource)
02567 #endif
02568 #ifndef Tcl_DeleteExitHandler
02569 #define Tcl_DeleteExitHandler \
02570 (tclStubsPtr->tcl_DeleteExitHandler)
02571 #endif
02572 #ifndef Tcl_DeleteHashEntry
02573 #define Tcl_DeleteHashEntry \
02574 (tclStubsPtr->tcl_DeleteHashEntry)
02575 #endif
02576 #ifndef Tcl_DeleteHashTable
02577 #define Tcl_DeleteHashTable \
02578 (tclStubsPtr->tcl_DeleteHashTable)
02579 #endif
02580 #ifndef Tcl_DeleteInterp
02581 #define Tcl_DeleteInterp \
02582 (tclStubsPtr->tcl_DeleteInterp)
02583 #endif
02584 #if !defined(__WIN32__) && !defined(MAC_TCL)
02585 #ifndef Tcl_DetachPids
02586 #define Tcl_DetachPids \
02587 (tclStubsPtr->tcl_DetachPids)
02588 #endif
02589 #endif
02590 #ifdef __WIN32__
02591 #ifndef Tcl_DetachPids
02592 #define Tcl_DetachPids \
02593 (tclStubsPtr->tcl_DetachPids)
02594 #endif
02595 #endif
02596 #ifndef Tcl_DeleteTimerHandler
02597 #define Tcl_DeleteTimerHandler \
02598 (tclStubsPtr->tcl_DeleteTimerHandler)
02599 #endif
02600 #ifndef Tcl_DeleteTrace
02601 #define Tcl_DeleteTrace \
02602 (tclStubsPtr->tcl_DeleteTrace)
02603 #endif
02604 #ifndef Tcl_DontCallWhenDeleted
02605 #define Tcl_DontCallWhenDeleted \
02606 (tclStubsPtr->tcl_DontCallWhenDeleted)
02607 #endif
02608 #ifndef Tcl_DoOneEvent
02609 #define Tcl_DoOneEvent \
02610 (tclStubsPtr->tcl_DoOneEvent)
02611 #endif
02612 #ifndef Tcl_DoWhenIdle
02613 #define Tcl_DoWhenIdle \
02614 (tclStubsPtr->tcl_DoWhenIdle)
02615 #endif
02616 #ifndef Tcl_DStringAppend
02617 #define Tcl_DStringAppend \
02618 (tclStubsPtr->tcl_DStringAppend)
02619 #endif
02620 #ifndef Tcl_DStringAppendElement
02621 #define Tcl_DStringAppendElement \
02622 (tclStubsPtr->tcl_DStringAppendElement)
02623 #endif
02624 #ifndef Tcl_DStringEndSublist
02625 #define Tcl_DStringEndSublist \
02626 (tclStubsPtr->tcl_DStringEndSublist)
02627 #endif
02628 #ifndef Tcl_DStringFree
02629 #define Tcl_DStringFree \
02630 (tclStubsPtr->tcl_DStringFree)
02631 #endif
02632 #ifndef Tcl_DStringGetResult
02633 #define Tcl_DStringGetResult \
02634 (tclStubsPtr->tcl_DStringGetResult)
02635 #endif
02636 #ifndef Tcl_DStringInit
02637 #define Tcl_DStringInit \
02638 (tclStubsPtr->tcl_DStringInit)
02639 #endif
02640 #ifndef Tcl_DStringResult
02641 #define Tcl_DStringResult \
02642 (tclStubsPtr->tcl_DStringResult)
02643 #endif
02644 #ifndef Tcl_DStringSetLength
02645 #define Tcl_DStringSetLength \
02646 (tclStubsPtr->tcl_DStringSetLength)
02647 #endif
02648 #ifndef Tcl_DStringStartSublist
02649 #define Tcl_DStringStartSublist \
02650 (tclStubsPtr->tcl_DStringStartSublist)
02651 #endif
02652 #ifndef Tcl_Eof
02653 #define Tcl_Eof \
02654 (tclStubsPtr->tcl_Eof)
02655 #endif
02656 #ifndef Tcl_ErrnoId
02657 #define Tcl_ErrnoId \
02658 (tclStubsPtr->tcl_ErrnoId)
02659 #endif
02660 #ifndef Tcl_ErrnoMsg
02661 #define Tcl_ErrnoMsg \
02662 (tclStubsPtr->tcl_ErrnoMsg)
02663 #endif
02664 #ifndef Tcl_Eval
02665 #define Tcl_Eval \
02666 (tclStubsPtr->tcl_Eval)
02667 #endif
02668 #ifndef Tcl_EvalFile
02669 #define Tcl_EvalFile \
02670 (tclStubsPtr->tcl_EvalFile)
02671 #endif
02672 #ifndef Tcl_EvalObj
02673 #define Tcl_EvalObj \
02674 (tclStubsPtr->tcl_EvalObj)
02675 #endif
02676 #ifndef Tcl_EventuallyFree
02677 #define Tcl_EventuallyFree \
02678 (tclStubsPtr->tcl_EventuallyFree)
02679 #endif
02680 #ifndef Tcl_Exit
02681 #define Tcl_Exit \
02682 (tclStubsPtr->tcl_Exit)
02683 #endif
02684 #ifndef Tcl_ExposeCommand
02685 #define Tcl_ExposeCommand \
02686 (tclStubsPtr->tcl_ExposeCommand)
02687 #endif
02688 #ifndef Tcl_ExprBoolean
02689 #define Tcl_ExprBoolean \
02690 (tclStubsPtr->tcl_ExprBoolean)
02691 #endif
02692 #ifndef Tcl_ExprBooleanObj
02693 #define Tcl_ExprBooleanObj \
02694 (tclStubsPtr->tcl_ExprBooleanObj)
02695 #endif
02696 #ifndef Tcl_ExprDouble
02697 #define Tcl_ExprDouble \
02698 (tclStubsPtr->tcl_ExprDouble)
02699 #endif
02700 #ifndef Tcl_ExprDoubleObj
02701 #define Tcl_ExprDoubleObj \
02702 (tclStubsPtr->tcl_ExprDoubleObj)
02703 #endif
02704 #ifndef Tcl_ExprLong
02705 #define Tcl_ExprLong \
02706 (tclStubsPtr->tcl_ExprLong)
02707 #endif
02708 #ifndef Tcl_ExprLongObj
02709 #define Tcl_ExprLongObj \
02710 (tclStubsPtr->tcl_ExprLongObj)
02711 #endif
02712 #ifndef Tcl_ExprObj
02713 #define Tcl_ExprObj \
02714 (tclStubsPtr->tcl_ExprObj)
02715 #endif
02716 #ifndef Tcl_ExprString
02717 #define Tcl_ExprString \
02718 (tclStubsPtr->tcl_ExprString)
02719 #endif
02720 #ifndef Tcl_Finalize
02721 #define Tcl_Finalize \
02722 (tclStubsPtr->tcl_Finalize)
02723 #endif
02724 #ifndef Tcl_FindExecutable
02725 #define Tcl_FindExecutable \
02726 (tclStubsPtr->tcl_FindExecutable)
02727 #endif
02728 #ifndef Tcl_FirstHashEntry
02729 #define Tcl_FirstHashEntry \
02730 (tclStubsPtr->tcl_FirstHashEntry)
02731 #endif
02732 #ifndef Tcl_Flush
02733 #define Tcl_Flush \
02734 (tclStubsPtr->tcl_Flush)
02735 #endif
02736 #ifndef Tcl_FreeResult
02737 #define Tcl_FreeResult \
02738 (tclStubsPtr->tcl_FreeResult)
02739 #endif
02740 #ifndef Tcl_GetAlias
02741 #define Tcl_GetAlias \
02742 (tclStubsPtr->tcl_GetAlias)
02743 #endif
02744 #ifndef Tcl_GetAliasObj
02745 #define Tcl_GetAliasObj \
02746 (tclStubsPtr->tcl_GetAliasObj)
02747 #endif
02748 #ifndef Tcl_GetAssocData
02749 #define Tcl_GetAssocData \
02750 (tclStubsPtr->tcl_GetAssocData)
02751 #endif
02752 #ifndef Tcl_GetChannel
02753 #define Tcl_GetChannel \
02754 (tclStubsPtr->tcl_GetChannel)
02755 #endif
02756 #ifndef Tcl_GetChannelBufferSize
02757 #define Tcl_GetChannelBufferSize \
02758 (tclStubsPtr->tcl_GetChannelBufferSize)
02759 #endif
02760 #ifndef Tcl_GetChannelHandle
02761 #define Tcl_GetChannelHandle \
02762 (tclStubsPtr->tcl_GetChannelHandle)
02763 #endif
02764 #ifndef Tcl_GetChannelInstanceData
02765 #define Tcl_GetChannelInstanceData \
02766 (tclStubsPtr->tcl_GetChannelInstanceData)
02767 #endif
02768 #ifndef Tcl_GetChannelMode
02769 #define Tcl_GetChannelMode \
02770 (tclStubsPtr->tcl_GetChannelMode)
02771 #endif
02772 #ifndef Tcl_GetChannelName
02773 #define Tcl_GetChannelName \
02774 (tclStubsPtr->tcl_GetChannelName)
02775 #endif
02776 #ifndef Tcl_GetChannelOption
02777 #define Tcl_GetChannelOption \
02778 (tclStubsPtr->tcl_GetChannelOption)
02779 #endif
02780 #ifndef Tcl_GetChannelType
02781 #define Tcl_GetChannelType \
02782 (tclStubsPtr->tcl_GetChannelType)
02783 #endif
02784 #ifndef Tcl_GetCommandInfo
02785 #define Tcl_GetCommandInfo \
02786 (tclStubsPtr->tcl_GetCommandInfo)
02787 #endif
02788 #ifndef Tcl_GetCommandName
02789 #define Tcl_GetCommandName \
02790 (tclStubsPtr->tcl_GetCommandName)
02791 #endif
02792 #ifndef Tcl_GetErrno
02793 #define Tcl_GetErrno \
02794 (tclStubsPtr->tcl_GetErrno)
02795 #endif
02796 #ifndef Tcl_GetHostName
02797 #define Tcl_GetHostName \
02798 (tclStubsPtr->tcl_GetHostName)
02799 #endif
02800 #ifndef Tcl_GetInterpPath
02801 #define Tcl_GetInterpPath \
02802 (tclStubsPtr->tcl_GetInterpPath)
02803 #endif
02804 #ifndef Tcl_GetMaster
02805 #define Tcl_GetMaster \
02806 (tclStubsPtr->tcl_GetMaster)
02807 #endif
02808 #ifndef Tcl_GetNameOfExecutable
02809 #define Tcl_GetNameOfExecutable \
02810 (tclStubsPtr->tcl_GetNameOfExecutable)
02811 #endif
02812 #ifndef Tcl_GetObjResult
02813 #define Tcl_GetObjResult \
02814 (tclStubsPtr->tcl_GetObjResult)
02815 #endif
02816 #if !defined(__WIN32__) && !defined(MAC_TCL)
02817 #ifndef Tcl_GetOpenFile
02818 #define Tcl_GetOpenFile \
02819 (tclStubsPtr->tcl_GetOpenFile)
02820 #endif
02821 #endif
02822 #ifndef Tcl_GetPathType
02823 #define Tcl_GetPathType \
02824 (tclStubsPtr->tcl_GetPathType)
02825 #endif
02826 #ifndef Tcl_Gets
02827 #define Tcl_Gets \
02828 (tclStubsPtr->tcl_Gets)
02829 #endif
02830 #ifndef Tcl_GetsObj
02831 #define Tcl_GetsObj \
02832 (tclStubsPtr->tcl_GetsObj)
02833 #endif
02834 #ifndef Tcl_GetServiceMode
02835 #define Tcl_GetServiceMode \
02836 (tclStubsPtr->tcl_GetServiceMode)
02837 #endif
02838 #ifndef Tcl_GetSlave
02839 #define Tcl_GetSlave \
02840 (tclStubsPtr->tcl_GetSlave)
02841 #endif
02842 #ifndef Tcl_GetStdChannel
02843 #define Tcl_GetStdChannel \
02844 (tclStubsPtr->tcl_GetStdChannel)
02845 #endif
02846 #ifndef Tcl_GetStringResult
02847 #define Tcl_GetStringResult \
02848 (tclStubsPtr->tcl_GetStringResult)
02849 #endif
02850 #ifndef Tcl_GetVar
02851 #define Tcl_GetVar \
02852 (tclStubsPtr->tcl_GetVar)
02853 #endif
02854 #ifndef Tcl_GetVar2
02855 #define Tcl_GetVar2 \
02856 (tclStubsPtr->tcl_GetVar2)
02857 #endif
02858 #ifndef Tcl_GlobalEval
02859 #define Tcl_GlobalEval \
02860 (tclStubsPtr->tcl_GlobalEval)
02861 #endif
02862 #ifndef Tcl_GlobalEvalObj
02863 #define Tcl_GlobalEvalObj \
02864 (tclStubsPtr->tcl_GlobalEvalObj)
02865 #endif
02866 #ifndef Tcl_HideCommand
02867 #define Tcl_HideCommand \
02868 (tclStubsPtr->tcl_HideCommand)
02869 #endif
02870 #ifndef Tcl_Init
02871 #define Tcl_Init \
02872 (tclStubsPtr->tcl_Init)
02873 #endif
02874 #ifndef Tcl_InitHashTable
02875 #define Tcl_InitHashTable \
02876 (tclStubsPtr->tcl_InitHashTable)
02877 #endif
02878 #ifndef Tcl_InputBlocked
02879 #define Tcl_InputBlocked \
02880 (tclStubsPtr->tcl_InputBlocked)
02881 #endif
02882 #ifndef Tcl_InputBuffered
02883 #define Tcl_InputBuffered \
02884 (tclStubsPtr->tcl_InputBuffered)
02885 #endif
02886 #ifndef Tcl_InterpDeleted
02887 #define Tcl_InterpDeleted \
02888 (tclStubsPtr->tcl_InterpDeleted)
02889 #endif
02890 #ifndef Tcl_IsSafe
02891 #define Tcl_IsSafe \
02892 (tclStubsPtr->tcl_IsSafe)
02893 #endif
02894 #ifndef Tcl_JoinPath
02895 #define Tcl_JoinPath \
02896 (tclStubsPtr->tcl_JoinPath)
02897 #endif
02898 #ifndef Tcl_LinkVar
02899 #define Tcl_LinkVar \
02900 (tclStubsPtr->tcl_LinkVar)
02901 #endif
02902
02903 #ifndef Tcl_MakeFileChannel
02904 #define Tcl_MakeFileChannel \
02905 (tclStubsPtr->tcl_MakeFileChannel)
02906 #endif
02907 #ifndef Tcl_MakeSafe
02908 #define Tcl_MakeSafe \
02909 (tclStubsPtr->tcl_MakeSafe)
02910 #endif
02911 #ifndef Tcl_MakeTcpClientChannel
02912 #define Tcl_MakeTcpClientChannel \
02913 (tclStubsPtr->tcl_MakeTcpClientChannel)
02914 #endif
02915 #ifndef Tcl_Merge
02916 #define Tcl_Merge \
02917 (tclStubsPtr->tcl_Merge)
02918 #endif
02919 #ifndef Tcl_NextHashEntry
02920 #define Tcl_NextHashEntry \
02921 (tclStubsPtr->tcl_NextHashEntry)
02922 #endif
02923 #ifndef Tcl_NotifyChannel
02924 #define Tcl_NotifyChannel \
02925 (tclStubsPtr->tcl_NotifyChannel)
02926 #endif
02927 #ifndef Tcl_ObjGetVar2
02928 #define Tcl_ObjGetVar2 \
02929 (tclStubsPtr->tcl_ObjGetVar2)
02930 #endif
02931 #ifndef Tcl_ObjSetVar2
02932 #define Tcl_ObjSetVar2 \
02933 (tclStubsPtr->tcl_ObjSetVar2)
02934 #endif
02935 #if !defined(__WIN32__) && !defined(MAC_TCL)
02936 #ifndef Tcl_OpenCommandChannel
02937 #define Tcl_OpenCommandChannel \
02938 (tclStubsPtr->tcl_OpenCommandChannel)
02939 #endif
02940 #endif
02941 #ifdef __WIN32__
02942 #ifndef Tcl_OpenCommandChannel
02943 #define Tcl_OpenCommandChannel \
02944 (tclStubsPtr->tcl_OpenCommandChannel)
02945 #endif
02946 #endif
02947 #ifndef Tcl_OpenFileChannel
02948 #define Tcl_OpenFileChannel \
02949 (tclStubsPtr->tcl_OpenFileChannel)
02950 #endif
02951 #ifndef Tcl_OpenTcpClient
02952 #define Tcl_OpenTcpClient \
02953 (tclStubsPtr->tcl_OpenTcpClient)
02954 #endif
02955 #ifndef Tcl_OpenTcpServer
02956 #define Tcl_OpenTcpServer \
02957 (tclStubsPtr->tcl_OpenTcpServer)
02958 #endif
02959 #ifndef Tcl_Preserve
02960 #define Tcl_Preserve \
02961 (tclStubsPtr->tcl_Preserve)
02962 #endif
02963 #ifndef Tcl_PrintDouble
02964 #define Tcl_PrintDouble \
02965 (tclStubsPtr->tcl_PrintDouble)
02966 #endif
02967 #ifndef Tcl_PutEnv
02968 #define Tcl_PutEnv \
02969 (tclStubsPtr->tcl_PutEnv)
02970 #endif
02971 #ifndef Tcl_PosixError
02972 #define Tcl_PosixError \
02973 (tclStubsPtr->tcl_PosixError)
02974 #endif
02975 #ifndef Tcl_QueueEvent
02976 #define Tcl_QueueEvent \
02977 (tclStubsPtr->tcl_QueueEvent)
02978 #endif
02979 #ifndef Tcl_Read
02980 #define Tcl_Read \
02981 (tclStubsPtr->tcl_Read)
02982 #endif
02983 #if !defined(__WIN32__) && !defined(MAC_TCL)
02984 #ifndef Tcl_ReapDetachedProcs
02985 #define Tcl_ReapDetachedProcs \
02986 (tclStubsPtr->tcl_ReapDetachedProcs)
02987 #endif
02988 #endif
02989 #ifdef __WIN32__
02990 #ifndef Tcl_ReapDetachedProcs
02991 #define Tcl_ReapDetachedProcs \
02992 (tclStubsPtr->tcl_ReapDetachedProcs)
02993 #endif
02994 #endif
02995 #ifndef Tcl_RecordAndEval
02996 #define Tcl_RecordAndEval \
02997 (tclStubsPtr->tcl_RecordAndEval)
02998 #endif
02999 #ifndef Tcl_RecordAndEvalObj
03000 #define Tcl_RecordAndEvalObj \
03001 (tclStubsPtr->tcl_RecordAndEvalObj)
03002 #endif
03003 #ifndef Tcl_RegisterChannel
03004 #define Tcl_RegisterChannel \
03005 (tclStubsPtr->tcl_RegisterChannel)
03006 #endif
03007 #ifndef Tcl_RegisterObjType
03008 #define Tcl_RegisterObjType \
03009 (tclStubsPtr->tcl_RegisterObjType)
03010 #endif
03011 #ifndef Tcl_RegExpCompile
03012 #define Tcl_RegExpCompile \
03013 (tclStubsPtr->tcl_RegExpCompile)
03014 #endif
03015 #ifndef Tcl_RegExpExec
03016 #define Tcl_RegExpExec \
03017 (tclStubsPtr->tcl_RegExpExec)
03018 #endif
03019 #ifndef Tcl_RegExpMatch
03020 #define Tcl_RegExpMatch \
03021 (tclStubsPtr->tcl_RegExpMatch)
03022 #endif
03023 #ifndef Tcl_RegExpRange
03024 #define Tcl_RegExpRange \
03025 (tclStubsPtr->tcl_RegExpRange)
03026 #endif
03027 #ifndef Tcl_Release
03028 #define Tcl_Release \
03029 (tclStubsPtr->tcl_Release)
03030 #endif
03031 #ifndef Tcl_ResetResult
03032 #define Tcl_ResetResult \
03033 (tclStubsPtr->tcl_ResetResult)
03034 #endif
03035 #ifndef Tcl_ScanElement
03036 #define Tcl_ScanElement \
03037 (tclStubsPtr->tcl_ScanElement)
03038 #endif
03039 #ifndef Tcl_ScanCountedElement
03040 #define Tcl_ScanCountedElement \
03041 (tclStubsPtr->tcl_ScanCountedElement)
03042 #endif
03043 #ifndef Tcl_SeekOld
03044 #define Tcl_SeekOld \
03045 (tclStubsPtr->tcl_SeekOld)
03046 #endif
03047 #ifndef Tcl_ServiceAll
03048 #define Tcl_ServiceAll \
03049 (tclStubsPtr->tcl_ServiceAll)
03050 #endif
03051 #ifndef Tcl_ServiceEvent
03052 #define Tcl_ServiceEvent \
03053 (tclStubsPtr->tcl_ServiceEvent)
03054 #endif
03055 #ifndef Tcl_SetAssocData
03056 #define Tcl_SetAssocData \
03057 (tclStubsPtr->tcl_SetAssocData)
03058 #endif
03059 #ifndef Tcl_SetChannelBufferSize
03060 #define Tcl_SetChannelBufferSize \
03061 (tclStubsPtr->tcl_SetChannelBufferSize)
03062 #endif
03063 #ifndef Tcl_SetChannelOption
03064 #define Tcl_SetChannelOption \
03065 (tclStubsPtr->tcl_SetChannelOption)
03066 #endif
03067 #ifndef Tcl_SetCommandInfo
03068 #define Tcl_SetCommandInfo \
03069 (tclStubsPtr->tcl_SetCommandInfo)
03070 #endif
03071 #ifndef Tcl_SetErrno
03072 #define Tcl_SetErrno \
03073 (tclStubsPtr->tcl_SetErrno)
03074 #endif
03075 #ifndef Tcl_SetErrorCode
03076 #define Tcl_SetErrorCode \
03077 (tclStubsPtr->tcl_SetErrorCode)
03078 #endif
03079 #ifndef Tcl_SetMaxBlockTime
03080 #define Tcl_SetMaxBlockTime \
03081 (tclStubsPtr->tcl_SetMaxBlockTime)
03082 #endif
03083 #ifndef Tcl_SetPanicProc
03084 #define Tcl_SetPanicProc \
03085 (tclStubsPtr->tcl_SetPanicProc)
03086 #endif
03087 #ifndef Tcl_SetRecursionLimit
03088 #define Tcl_SetRecursionLimit \
03089 (tclStubsPtr->tcl_SetRecursionLimit)
03090 #endif
03091 #ifndef Tcl_SetResult
03092 #define Tcl_SetResult \
03093 (tclStubsPtr->tcl_SetResult)
03094 #endif
03095 #ifndef Tcl_SetServiceMode
03096 #define Tcl_SetServiceMode \
03097 (tclStubsPtr->tcl_SetServiceMode)
03098 #endif
03099 #ifndef Tcl_SetObjErrorCode
03100 #define Tcl_SetObjErrorCode \
03101 (tclStubsPtr->tcl_SetObjErrorCode)
03102 #endif
03103 #ifndef Tcl_SetObjResult
03104 #define Tcl_SetObjResult \
03105 (tclStubsPtr->tcl_SetObjResult)
03106 #endif
03107 #ifndef Tcl_SetStdChannel
03108 #define Tcl_SetStdChannel \
03109 (tclStubsPtr->tcl_SetStdChannel)
03110 #endif
03111 #ifndef Tcl_SetVar
03112 #define Tcl_SetVar \
03113 (tclStubsPtr->tcl_SetVar)
03114 #endif
03115 #ifndef Tcl_SetVar2
03116 #define Tcl_SetVar2 \
03117 (tclStubsPtr->tcl_SetVar2)
03118 #endif
03119 #ifndef Tcl_SignalId
03120 #define Tcl_SignalId \
03121 (tclStubsPtr->tcl_SignalId)
03122 #endif
03123 #ifndef Tcl_SignalMsg
03124 #define Tcl_SignalMsg \
03125 (tclStubsPtr->tcl_SignalMsg)
03126 #endif
03127 #ifndef Tcl_SourceRCFile
03128 #define Tcl_SourceRCFile \
03129 (tclStubsPtr->tcl_SourceRCFile)
03130 #endif
03131 #ifndef Tcl_SplitList
03132 #define Tcl_SplitList \
03133 (tclStubsPtr->tcl_SplitList)
03134 #endif
03135 #ifndef Tcl_SplitPath
03136 #define Tcl_SplitPath \
03137 (tclStubsPtr->tcl_SplitPath)
03138 #endif
03139 #ifndef Tcl_StaticPackage
03140 #define Tcl_StaticPackage \
03141 (tclStubsPtr->tcl_StaticPackage)
03142 #endif
03143 #ifndef Tcl_StringMatch
03144 #define Tcl_StringMatch \
03145 (tclStubsPtr->tcl_StringMatch)
03146 #endif
03147 #ifndef Tcl_TellOld
03148 #define Tcl_TellOld \
03149 (tclStubsPtr->tcl_TellOld)
03150 #endif
03151 #ifndef Tcl_TraceVar
03152 #define Tcl_TraceVar \
03153 (tclStubsPtr->tcl_TraceVar)
03154 #endif
03155 #ifndef Tcl_TraceVar2
03156 #define Tcl_TraceVar2 \
03157 (tclStubsPtr->tcl_TraceVar2)
03158 #endif
03159 #ifndef Tcl_TranslateFileName
03160 #define Tcl_TranslateFileName \
03161 (tclStubsPtr->tcl_TranslateFileName)
03162 #endif
03163 #ifndef Tcl_Ungets
03164 #define Tcl_Ungets \
03165 (tclStubsPtr->tcl_Ungets)
03166 #endif
03167 #ifndef Tcl_UnlinkVar
03168 #define Tcl_UnlinkVar \
03169 (tclStubsPtr->tcl_UnlinkVar)
03170 #endif
03171 #ifndef Tcl_UnregisterChannel
03172 #define Tcl_UnregisterChannel \
03173 (tclStubsPtr->tcl_UnregisterChannel)
03174 #endif
03175 #ifndef Tcl_UnsetVar
03176 #define Tcl_UnsetVar \
03177 (tclStubsPtr->tcl_UnsetVar)
03178 #endif
03179 #ifndef Tcl_UnsetVar2
03180 #define Tcl_UnsetVar2 \
03181 (tclStubsPtr->tcl_UnsetVar2)
03182 #endif
03183 #ifndef Tcl_UntraceVar
03184 #define Tcl_UntraceVar \
03185 (tclStubsPtr->tcl_UntraceVar)
03186 #endif
03187 #ifndef Tcl_UntraceVar2
03188 #define Tcl_UntraceVar2 \
03189 (tclStubsPtr->tcl_UntraceVar2)
03190 #endif
03191 #ifndef Tcl_UpdateLinkedVar
03192 #define Tcl_UpdateLinkedVar \
03193 (tclStubsPtr->tcl_UpdateLinkedVar)
03194 #endif
03195 #ifndef Tcl_UpVar
03196 #define Tcl_UpVar \
03197 (tclStubsPtr->tcl_UpVar)
03198 #endif
03199 #ifndef Tcl_UpVar2
03200 #define Tcl_UpVar2 \
03201 (tclStubsPtr->tcl_UpVar2)
03202 #endif
03203 #ifndef Tcl_VarEval
03204 #define Tcl_VarEval \
03205 (tclStubsPtr->tcl_VarEval)
03206 #endif
03207 #ifndef Tcl_VarTraceInfo
03208 #define Tcl_VarTraceInfo \
03209 (tclStubsPtr->tcl_VarTraceInfo)
03210 #endif
03211 #ifndef Tcl_VarTraceInfo2
03212 #define Tcl_VarTraceInfo2 \
03213 (tclStubsPtr->tcl_VarTraceInfo2)
03214 #endif
03215 #ifndef Tcl_Write
03216 #define Tcl_Write \
03217 (tclStubsPtr->tcl_Write)
03218 #endif
03219 #ifndef Tcl_WrongNumArgs
03220 #define Tcl_WrongNumArgs \
03221 (tclStubsPtr->tcl_WrongNumArgs)
03222 #endif
03223 #ifndef Tcl_DumpActiveMemory
03224 #define Tcl_DumpActiveMemory \
03225 (tclStubsPtr->tcl_DumpActiveMemory)
03226 #endif
03227 #ifndef Tcl_ValidateAllMemory
03228 #define Tcl_ValidateAllMemory \
03229 (tclStubsPtr->tcl_ValidateAllMemory)
03230 #endif
03231 #ifndef Tcl_AppendResultVA
03232 #define Tcl_AppendResultVA \
03233 (tclStubsPtr->tcl_AppendResultVA)
03234 #endif
03235 #ifndef Tcl_AppendStringsToObjVA
03236 #define Tcl_AppendStringsToObjVA \
03237 (tclStubsPtr->tcl_AppendStringsToObjVA)
03238 #endif
03239 #ifndef Tcl_HashStats
03240 #define Tcl_HashStats \
03241 (tclStubsPtr->tcl_HashStats)
03242 #endif
03243 #ifndef Tcl_ParseVar
03244 #define Tcl_ParseVar \
03245 (tclStubsPtr->tcl_ParseVar)
03246 #endif
03247 #ifndef Tcl_PkgPresent
03248 #define Tcl_PkgPresent \
03249 (tclStubsPtr->tcl_PkgPresent)
03250 #endif
03251 #ifndef Tcl_PkgPresentEx
03252 #define Tcl_PkgPresentEx \
03253 (tclStubsPtr->tcl_PkgPresentEx)
03254 #endif
03255 #ifndef Tcl_PkgProvide
03256 #define Tcl_PkgProvide \
03257 (tclStubsPtr->tcl_PkgProvide)
03258 #endif
03259 #ifndef Tcl_PkgRequire
03260 #define Tcl_PkgRequire \
03261 (tclStubsPtr->tcl_PkgRequire)
03262 #endif
03263 #ifndef Tcl_SetErrorCodeVA
03264 #define Tcl_SetErrorCodeVA \
03265 (tclStubsPtr->tcl_SetErrorCodeVA)
03266 #endif
03267 #ifndef Tcl_VarEvalVA
03268 #define Tcl_VarEvalVA \
03269 (tclStubsPtr->tcl_VarEvalVA)
03270 #endif
03271 #ifndef Tcl_WaitPid
03272 #define Tcl_WaitPid \
03273 (tclStubsPtr->tcl_WaitPid)
03274 #endif
03275 #ifndef Tcl_PanicVA
03276 #define Tcl_PanicVA \
03277 (tclStubsPtr->tcl_PanicVA)
03278 #endif
03279 #ifndef Tcl_GetVersion
03280 #define Tcl_GetVersion \
03281 (tclStubsPtr->tcl_GetVersion)
03282 #endif
03283 #ifndef Tcl_InitMemory
03284 #define Tcl_InitMemory \
03285 (tclStubsPtr->tcl_InitMemory)
03286 #endif
03287 #ifndef Tcl_StackChannel
03288 #define Tcl_StackChannel \
03289 (tclStubsPtr->tcl_StackChannel)
03290 #endif
03291 #ifndef Tcl_UnstackChannel
03292 #define Tcl_UnstackChannel \
03293 (tclStubsPtr->tcl_UnstackChannel)
03294 #endif
03295 #ifndef Tcl_GetStackedChannel
03296 #define Tcl_GetStackedChannel \
03297 (tclStubsPtr->tcl_GetStackedChannel)
03298 #endif
03299 #ifndef Tcl_SetMainLoop
03300 #define Tcl_SetMainLoop \
03301 (tclStubsPtr->tcl_SetMainLoop)
03302 #endif
03303
03304 #ifndef Tcl_AppendObjToObj
03305 #define Tcl_AppendObjToObj \
03306 (tclStubsPtr->tcl_AppendObjToObj)
03307 #endif
03308 #ifndef Tcl_CreateEncoding
03309 #define Tcl_CreateEncoding \
03310 (tclStubsPtr->tcl_CreateEncoding)
03311 #endif
03312 #ifndef Tcl_CreateThreadExitHandler
03313 #define Tcl_CreateThreadExitHandler \
03314 (tclStubsPtr->tcl_CreateThreadExitHandler)
03315 #endif
03316 #ifndef Tcl_DeleteThreadExitHandler
03317 #define Tcl_DeleteThreadExitHandler \
03318 (tclStubsPtr->tcl_DeleteThreadExitHandler)
03319 #endif
03320 #ifndef Tcl_DiscardResult
03321 #define Tcl_DiscardResult \
03322 (tclStubsPtr->tcl_DiscardResult)
03323 #endif
03324 #ifndef Tcl_EvalEx
03325 #define Tcl_EvalEx \
03326 (tclStubsPtr->tcl_EvalEx)
03327 #endif
03328 #ifndef Tcl_EvalObjv
03329 #define Tcl_EvalObjv \
03330 (tclStubsPtr->tcl_EvalObjv)
03331 #endif
03332 #ifndef Tcl_EvalObjEx
03333 #define Tcl_EvalObjEx \
03334 (tclStubsPtr->tcl_EvalObjEx)
03335 #endif
03336 #ifndef Tcl_ExitThread
03337 #define Tcl_ExitThread \
03338 (tclStubsPtr->tcl_ExitThread)
03339 #endif
03340 #ifndef Tcl_ExternalToUtf
03341 #define Tcl_ExternalToUtf \
03342 (tclStubsPtr->tcl_ExternalToUtf)
03343 #endif
03344 #ifndef Tcl_ExternalToUtfDString
03345 #define Tcl_ExternalToUtfDString \
03346 (tclStubsPtr->tcl_ExternalToUtfDString)
03347 #endif
03348 #ifndef Tcl_FinalizeThread
03349 #define Tcl_FinalizeThread \
03350 (tclStubsPtr->tcl_FinalizeThread)
03351 #endif
03352 #ifndef Tcl_FinalizeNotifier
03353 #define Tcl_FinalizeNotifier \
03354 (tclStubsPtr->tcl_FinalizeNotifier)
03355 #endif
03356 #ifndef Tcl_FreeEncoding
03357 #define Tcl_FreeEncoding \
03358 (tclStubsPtr->tcl_FreeEncoding)
03359 #endif
03360 #ifndef Tcl_GetCurrentThread
03361 #define Tcl_GetCurrentThread \
03362 (tclStubsPtr->tcl_GetCurrentThread)
03363 #endif
03364 #ifndef Tcl_GetEncoding
03365 #define Tcl_GetEncoding \
03366 (tclStubsPtr->tcl_GetEncoding)
03367 #endif
03368 #ifndef Tcl_GetEncodingName
03369 #define Tcl_GetEncodingName \
03370 (tclStubsPtr->tcl_GetEncodingName)
03371 #endif
03372 #ifndef Tcl_GetEncodingNames
03373 #define Tcl_GetEncodingNames \
03374 (tclStubsPtr->tcl_GetEncodingNames)
03375 #endif
03376 #ifndef Tcl_GetIndexFromObjStruct
03377 #define Tcl_GetIndexFromObjStruct \
03378 (tclStubsPtr->tcl_GetIndexFromObjStruct)
03379 #endif
03380 #ifndef Tcl_GetThreadData
03381 #define Tcl_GetThreadData \
03382 (tclStubsPtr->tcl_GetThreadData)
03383 #endif
03384 #ifndef Tcl_GetVar2Ex
03385 #define Tcl_GetVar2Ex \
03386 (tclStubsPtr->tcl_GetVar2Ex)
03387 #endif
03388 #ifndef Tcl_InitNotifier
03389 #define Tcl_InitNotifier \
03390 (tclStubsPtr->tcl_InitNotifier)
03391 #endif
03392 #ifndef Tcl_MutexLock
03393 #define Tcl_MutexLock \
03394 (tclStubsPtr->tcl_MutexLock)
03395 #endif
03396 #ifndef Tcl_MutexUnlock
03397 #define Tcl_MutexUnlock \
03398 (tclStubsPtr->tcl_MutexUnlock)
03399 #endif
03400 #ifndef Tcl_ConditionNotify
03401 #define Tcl_ConditionNotify \
03402 (tclStubsPtr->tcl_ConditionNotify)
03403 #endif
03404 #ifndef Tcl_ConditionWait
03405 #define Tcl_ConditionWait \
03406 (tclStubsPtr->tcl_ConditionWait)
03407 #endif
03408 #ifndef Tcl_NumUtfChars
03409 #define Tcl_NumUtfChars \
03410 (tclStubsPtr->tcl_NumUtfChars)
03411 #endif
03412 #ifndef Tcl_ReadChars
03413 #define Tcl_ReadChars \
03414 (tclStubsPtr->tcl_ReadChars)
03415 #endif
03416 #ifndef Tcl_RestoreResult
03417 #define Tcl_RestoreResult \
03418 (tclStubsPtr->tcl_RestoreResult)
03419 #endif
03420 #ifndef Tcl_SaveResult
03421 #define Tcl_SaveResult \
03422 (tclStubsPtr->tcl_SaveResult)
03423 #endif
03424 #ifndef Tcl_SetSystemEncoding
03425 #define Tcl_SetSystemEncoding \
03426 (tclStubsPtr->tcl_SetSystemEncoding)
03427 #endif
03428 #ifndef Tcl_SetVar2Ex
03429 #define Tcl_SetVar2Ex \
03430 (tclStubsPtr->tcl_SetVar2Ex)
03431 #endif
03432 #ifndef Tcl_ThreadAlert
03433 #define Tcl_ThreadAlert \
03434 (tclStubsPtr->tcl_ThreadAlert)
03435 #endif
03436 #ifndef Tcl_ThreadQueueEvent
03437 #define Tcl_ThreadQueueEvent \
03438 (tclStubsPtr->tcl_ThreadQueueEvent)
03439 #endif
03440 #ifndef Tcl_UniCharAtIndex
03441 #define Tcl_UniCharAtIndex \
03442 (tclStubsPtr->tcl_UniCharAtIndex)
03443 #endif
03444 #ifndef Tcl_UniCharToLower
03445 #define Tcl_UniCharToLower \
03446 (tclStubsPtr->tcl_UniCharToLower)
03447 #endif
03448 #ifndef Tcl_UniCharToTitle
03449 #define Tcl_UniCharToTitle \
03450 (tclStubsPtr->tcl_UniCharToTitle)
03451 #endif
03452 #ifndef Tcl_UniCharToUpper
03453 #define Tcl_UniCharToUpper \
03454 (tclStubsPtr->tcl_UniCharToUpper)
03455 #endif
03456 #ifndef Tcl_UniCharToUtf
03457 #define Tcl_UniCharToUtf \
03458 (tclStubsPtr->tcl_UniCharToUtf)
03459 #endif
03460 #ifndef Tcl_UtfAtIndex
03461 #define Tcl_UtfAtIndex \
03462 (tclStubsPtr->tcl_UtfAtIndex)
03463 #endif
03464 #ifndef Tcl_UtfCharComplete
03465 #define Tcl_UtfCharComplete \
03466 (tclStubsPtr->tcl_UtfCharComplete)
03467 #endif
03468 #ifndef Tcl_UtfBackslash
03469 #define Tcl_UtfBackslash \
03470 (tclStubsPtr->tcl_UtfBackslash)
03471 #endif
03472 #ifndef Tcl_UtfFindFirst
03473 #define Tcl_UtfFindFirst \
03474 (tclStubsPtr->tcl_UtfFindFirst)
03475 #endif
03476 #ifndef Tcl_UtfFindLast
03477 #define Tcl_UtfFindLast \
03478 (tclStubsPtr->tcl_UtfFindLast)
03479 #endif
03480 #ifndef Tcl_UtfNext
03481 #define Tcl_UtfNext \
03482 (tclStubsPtr->tcl_UtfNext)
03483 #endif
03484 #ifndef Tcl_UtfPrev
03485 #define Tcl_UtfPrev \
03486 (tclStubsPtr->tcl_UtfPrev)
03487 #endif
03488 #ifndef Tcl_UtfToExternal
03489 #define Tcl_UtfToExternal \
03490 (tclStubsPtr->tcl_UtfToExternal)
03491 #endif
03492 #ifndef Tcl_UtfToExternalDString
03493 #define Tcl_UtfToExternalDString \
03494 (tclStubsPtr->tcl_UtfToExternalDString)
03495 #endif
03496 #ifndef Tcl_UtfToLower
03497 #define Tcl_UtfToLower \
03498 (tclStubsPtr->tcl_UtfToLower)
03499 #endif
03500 #ifndef Tcl_UtfToTitle
03501 #define Tcl_UtfToTitle \
03502 (tclStubsPtr->tcl_UtfToTitle)
03503 #endif
03504 #ifndef Tcl_UtfToUniChar
03505 #define Tcl_UtfToUniChar \
03506 (tclStubsPtr->tcl_UtfToUniChar)
03507 #endif
03508 #ifndef Tcl_UtfToUpper
03509 #define Tcl_UtfToUpper \
03510 (tclStubsPtr->tcl_UtfToUpper)
03511 #endif
03512 #ifndef Tcl_WriteChars
03513 #define Tcl_WriteChars \
03514 (tclStubsPtr->tcl_WriteChars)
03515 #endif
03516 #ifndef Tcl_WriteObj
03517 #define Tcl_WriteObj \
03518 (tclStubsPtr->tcl_WriteObj)
03519 #endif
03520 #ifndef Tcl_GetString
03521 #define Tcl_GetString \
03522 (tclStubsPtr->tcl_GetString)
03523 #endif
03524 #ifndef Tcl_GetDefaultEncodingDir
03525 #define Tcl_GetDefaultEncodingDir \
03526 (tclStubsPtr->tcl_GetDefaultEncodingDir)
03527 #endif
03528 #ifndef Tcl_SetDefaultEncodingDir
03529 #define Tcl_SetDefaultEncodingDir \
03530 (tclStubsPtr->tcl_SetDefaultEncodingDir)
03531 #endif
03532 #ifndef Tcl_AlertNotifier
03533 #define Tcl_AlertNotifier \
03534 (tclStubsPtr->tcl_AlertNotifier)
03535 #endif
03536 #ifndef Tcl_ServiceModeHook
03537 #define Tcl_ServiceModeHook \
03538 (tclStubsPtr->tcl_ServiceModeHook)
03539 #endif
03540 #ifndef Tcl_UniCharIsAlnum
03541 #define Tcl_UniCharIsAlnum \
03542 (tclStubsPtr->tcl_UniCharIsAlnum)
03543 #endif
03544 #ifndef Tcl_UniCharIsAlpha
03545 #define Tcl_UniCharIsAlpha \
03546 (tclStubsPtr->tcl_UniCharIsAlpha)
03547 #endif
03548 #ifndef Tcl_UniCharIsDigit
03549 #define Tcl_UniCharIsDigit \
03550 (tclStubsPtr->tcl_UniCharIsDigit)
03551 #endif
03552 #ifndef Tcl_UniCharIsLower
03553 #define Tcl_UniCharIsLower \
03554 (tclStubsPtr->tcl_UniCharIsLower)
03555 #endif
03556 #ifndef Tcl_UniCharIsSpace
03557 #define Tcl_UniCharIsSpace \
03558 (tclStubsPtr->tcl_UniCharIsSpace)
03559 #endif
03560 #ifndef Tcl_UniCharIsUpper
03561 #define Tcl_UniCharIsUpper \
03562 (tclStubsPtr->tcl_UniCharIsUpper)
03563 #endif
03564 #ifndef Tcl_UniCharIsWordChar
03565 #define Tcl_UniCharIsWordChar \
03566 (tclStubsPtr->tcl_UniCharIsWordChar)
03567 #endif
03568 #ifndef Tcl_UniCharLen
03569 #define Tcl_UniCharLen \
03570 (tclStubsPtr->tcl_UniCharLen)
03571 #endif
03572 #ifndef Tcl_UniCharNcmp
03573 #define Tcl_UniCharNcmp \
03574 (tclStubsPtr->tcl_UniCharNcmp)
03575 #endif
03576 #ifndef Tcl_UniCharToUtfDString
03577 #define Tcl_UniCharToUtfDString \
03578 (tclStubsPtr->tcl_UniCharToUtfDString)
03579 #endif
03580 #ifndef Tcl_UtfToUniCharDString
03581 #define Tcl_UtfToUniCharDString \
03582 (tclStubsPtr->tcl_UtfToUniCharDString)
03583 #endif
03584 #ifndef Tcl_GetRegExpFromObj
03585 #define Tcl_GetRegExpFromObj \
03586 (tclStubsPtr->tcl_GetRegExpFromObj)
03587 #endif
03588 #ifndef Tcl_EvalTokens
03589 #define Tcl_EvalTokens \
03590 (tclStubsPtr->tcl_EvalTokens)
03591 #endif
03592 #ifndef Tcl_FreeParse
03593 #define Tcl_FreeParse \
03594 (tclStubsPtr->tcl_FreeParse)
03595 #endif
03596 #ifndef Tcl_LogCommandInfo
03597 #define Tcl_LogCommandInfo \
03598 (tclStubsPtr->tcl_LogCommandInfo)
03599 #endif
03600 #ifndef Tcl_ParseBraces
03601 #define Tcl_ParseBraces \
03602 (tclStubsPtr->tcl_ParseBraces)
03603 #endif
03604 #ifndef Tcl_ParseCommand
03605 #define Tcl_ParseCommand \
03606 (tclStubsPtr->tcl_ParseCommand)
03607 #endif
03608 #ifndef Tcl_ParseExpr
03609 #define Tcl_ParseExpr \
03610 (tclStubsPtr->tcl_ParseExpr)
03611 #endif
03612 #ifndef Tcl_ParseQuotedString
03613 #define Tcl_ParseQuotedString \
03614 (tclStubsPtr->tcl_ParseQuotedString)
03615 #endif
03616 #ifndef Tcl_ParseVarName
03617 #define Tcl_ParseVarName \
03618 (tclStubsPtr->tcl_ParseVarName)
03619 #endif
03620 #ifndef Tcl_GetCwd
03621 #define Tcl_GetCwd \
03622 (tclStubsPtr->tcl_GetCwd)
03623 #endif
03624 #ifndef Tcl_Chdir
03625 #define Tcl_Chdir \
03626 (tclStubsPtr->tcl_Chdir)
03627 #endif
03628 #ifndef Tcl_Access
03629 #define Tcl_Access \
03630 (tclStubsPtr->tcl_Access)
03631 #endif
03632 #ifndef Tcl_Stat
03633 #define Tcl_Stat \
03634 (tclStubsPtr->tcl_Stat)
03635 #endif
03636 #ifndef Tcl_UtfNcmp
03637 #define Tcl_UtfNcmp \
03638 (tclStubsPtr->tcl_UtfNcmp)
03639 #endif
03640 #ifndef Tcl_UtfNcasecmp
03641 #define Tcl_UtfNcasecmp \
03642 (tclStubsPtr->tcl_UtfNcasecmp)
03643 #endif
03644 #ifndef Tcl_StringCaseMatch
03645 #define Tcl_StringCaseMatch \
03646 (tclStubsPtr->tcl_StringCaseMatch)
03647 #endif
03648 #ifndef Tcl_UniCharIsControl
03649 #define Tcl_UniCharIsControl \
03650 (tclStubsPtr->tcl_UniCharIsControl)
03651 #endif
03652 #ifndef Tcl_UniCharIsGraph
03653 #define Tcl_UniCharIsGraph \
03654 (tclStubsPtr->tcl_UniCharIsGraph)
03655 #endif
03656 #ifndef Tcl_UniCharIsPrint
03657 #define Tcl_UniCharIsPrint \
03658 (tclStubsPtr->tcl_UniCharIsPrint)
03659 #endif
03660 #ifndef Tcl_UniCharIsPunct
03661 #define Tcl_UniCharIsPunct \
03662 (tclStubsPtr->tcl_UniCharIsPunct)
03663 #endif
03664 #ifndef Tcl_RegExpExecObj
03665 #define Tcl_RegExpExecObj \
03666 (tclStubsPtr->tcl_RegExpExecObj)
03667 #endif
03668 #ifndef Tcl_RegExpGetInfo
03669 #define Tcl_RegExpGetInfo \
03670 (tclStubsPtr->tcl_RegExpGetInfo)
03671 #endif
03672 #ifndef Tcl_NewUnicodeObj
03673 #define Tcl_NewUnicodeObj \
03674 (tclStubsPtr->tcl_NewUnicodeObj)
03675 #endif
03676 #ifndef Tcl_SetUnicodeObj
03677 #define Tcl_SetUnicodeObj \
03678 (tclStubsPtr->tcl_SetUnicodeObj)
03679 #endif
03680 #ifndef Tcl_GetCharLength
03681 #define Tcl_GetCharLength \
03682 (tclStubsPtr->tcl_GetCharLength)
03683 #endif
03684 #ifndef Tcl_GetUniChar
03685 #define Tcl_GetUniChar \
03686 (tclStubsPtr->tcl_GetUniChar)
03687 #endif
03688 #ifndef Tcl_GetUnicode
03689 #define Tcl_GetUnicode \
03690 (tclStubsPtr->tcl_GetUnicode)
03691 #endif
03692 #ifndef Tcl_GetRange
03693 #define Tcl_GetRange \
03694 (tclStubsPtr->tcl_GetRange)
03695 #endif
03696 #ifndef Tcl_AppendUnicodeToObj
03697 #define Tcl_AppendUnicodeToObj \
03698 (tclStubsPtr->tcl_AppendUnicodeToObj)
03699 #endif
03700 #ifndef Tcl_RegExpMatchObj
03701 #define Tcl_RegExpMatchObj \
03702 (tclStubsPtr->tcl_RegExpMatchObj)
03703 #endif
03704 #ifndef Tcl_SetNotifier
03705 #define Tcl_SetNotifier \
03706 (tclStubsPtr->tcl_SetNotifier)
03707 #endif
03708 #ifndef Tcl_GetAllocMutex
03709 #define Tcl_GetAllocMutex \
03710 (tclStubsPtr->tcl_GetAllocMutex)
03711 #endif
03712 #ifndef Tcl_GetChannelNames
03713 #define Tcl_GetChannelNames \
03714 (tclStubsPtr->tcl_GetChannelNames)
03715 #endif
03716 #ifndef Tcl_GetChannelNamesEx
03717 #define Tcl_GetChannelNamesEx \
03718 (tclStubsPtr->tcl_GetChannelNamesEx)
03719 #endif
03720 #ifndef Tcl_ProcObjCmd
03721 #define Tcl_ProcObjCmd \
03722 (tclStubsPtr->tcl_ProcObjCmd)
03723 #endif
03724 #ifndef Tcl_ConditionFinalize
03725 #define Tcl_ConditionFinalize \
03726 (tclStubsPtr->tcl_ConditionFinalize)
03727 #endif
03728 #ifndef Tcl_MutexFinalize
03729 #define Tcl_MutexFinalize \
03730 (tclStubsPtr->tcl_MutexFinalize)
03731 #endif
03732 #ifndef Tcl_CreateThread
03733 #define Tcl_CreateThread \
03734 (tclStubsPtr->tcl_CreateThread)
03735 #endif
03736 #ifndef Tcl_ReadRaw
03737 #define Tcl_ReadRaw \
03738 (tclStubsPtr->tcl_ReadRaw)
03739 #endif
03740 #ifndef Tcl_WriteRaw
03741 #define Tcl_WriteRaw \
03742 (tclStubsPtr->tcl_WriteRaw)
03743 #endif
03744 #ifndef Tcl_GetTopChannel
03745 #define Tcl_GetTopChannel \
03746 (tclStubsPtr->tcl_GetTopChannel)
03747 #endif
03748 #ifndef Tcl_ChannelBuffered
03749 #define Tcl_ChannelBuffered \
03750 (tclStubsPtr->tcl_ChannelBuffered)
03751 #endif
03752 #ifndef Tcl_ChannelName
03753 #define Tcl_ChannelName \
03754 (tclStubsPtr->tcl_ChannelName)
03755 #endif
03756 #ifndef Tcl_ChannelVersion
03757 #define Tcl_ChannelVersion \
03758 (tclStubsPtr->tcl_ChannelVersion)
03759 #endif
03760 #ifndef Tcl_ChannelBlockModeProc
03761 #define Tcl_ChannelBlockModeProc \
03762 (tclStubsPtr->tcl_ChannelBlockModeProc)
03763 #endif
03764 #ifndef Tcl_ChannelCloseProc
03765 #define Tcl_ChannelCloseProc \
03766 (tclStubsPtr->tcl_ChannelCloseProc)
03767 #endif
03768 #ifndef Tcl_ChannelClose2Proc
03769 #define Tcl_ChannelClose2Proc \
03770 (tclStubsPtr->tcl_ChannelClose2Proc)
03771 #endif
03772 #ifndef Tcl_ChannelInputProc
03773 #define Tcl_ChannelInputProc \
03774 (tclStubsPtr->tcl_ChannelInputProc)
03775 #endif
03776 #ifndef Tcl_ChannelOutputProc
03777 #define Tcl_ChannelOutputProc \
03778 (tclStubsPtr->tcl_ChannelOutputProc)
03779 #endif
03780 #ifndef Tcl_ChannelSeekProc
03781 #define Tcl_ChannelSeekProc \
03782 (tclStubsPtr->tcl_ChannelSeekProc)
03783 #endif
03784 #ifndef Tcl_ChannelSetOptionProc
03785 #define Tcl_ChannelSetOptionProc \
03786 (tclStubsPtr->tcl_ChannelSetOptionProc)
03787 #endif
03788 #ifndef Tcl_ChannelGetOptionProc
03789 #define Tcl_ChannelGetOptionProc \
03790 (tclStubsPtr->tcl_ChannelGetOptionProc)
03791 #endif
03792 #ifndef Tcl_ChannelWatchProc
03793 #define Tcl_ChannelWatchProc \
03794 (tclStubsPtr->tcl_ChannelWatchProc)
03795 #endif
03796 #ifndef Tcl_ChannelGetHandleProc
03797 #define Tcl_ChannelGetHandleProc \
03798 (tclStubsPtr->tcl_ChannelGetHandleProc)
03799 #endif
03800 #ifndef Tcl_ChannelFlushProc
03801 #define Tcl_ChannelFlushProc \
03802 (tclStubsPtr->tcl_ChannelFlushProc)
03803 #endif
03804 #ifndef Tcl_ChannelHandlerProc
03805 #define Tcl_ChannelHandlerProc \
03806 (tclStubsPtr->tcl_ChannelHandlerProc)
03807 #endif
03808 #ifndef Tcl_JoinThread
03809 #define Tcl_JoinThread \
03810 (tclStubsPtr->tcl_JoinThread)
03811 #endif
03812 #ifndef Tcl_IsChannelShared
03813 #define Tcl_IsChannelShared \
03814 (tclStubsPtr->tcl_IsChannelShared)
03815 #endif
03816 #ifndef Tcl_IsChannelRegistered
03817 #define Tcl_IsChannelRegistered \
03818 (tclStubsPtr->tcl_IsChannelRegistered)
03819 #endif
03820 #ifndef Tcl_CutChannel
03821 #define Tcl_CutChannel \
03822 (tclStubsPtr->tcl_CutChannel)
03823 #endif
03824 #ifndef Tcl_SpliceChannel
03825 #define Tcl_SpliceChannel \
03826 (tclStubsPtr->tcl_SpliceChannel)
03827 #endif
03828 #ifndef Tcl_ClearChannelHandlers
03829 #define Tcl_ClearChannelHandlers \
03830 (tclStubsPtr->tcl_ClearChannelHandlers)
03831 #endif
03832 #ifndef Tcl_IsChannelExisting
03833 #define Tcl_IsChannelExisting \
03834 (tclStubsPtr->tcl_IsChannelExisting)
03835 #endif
03836 #ifndef Tcl_UniCharNcasecmp
03837 #define Tcl_UniCharNcasecmp \
03838 (tclStubsPtr->tcl_UniCharNcasecmp)
03839 #endif
03840 #ifndef Tcl_UniCharCaseMatch
03841 #define Tcl_UniCharCaseMatch \
03842 (tclStubsPtr->tcl_UniCharCaseMatch)
03843 #endif
03844 #ifndef Tcl_FindHashEntry
03845 #define Tcl_FindHashEntry \
03846 (tclStubsPtr->tcl_FindHashEntry)
03847 #endif
03848 #ifndef Tcl_CreateHashEntry
03849 #define Tcl_CreateHashEntry \
03850 (tclStubsPtr->tcl_CreateHashEntry)
03851 #endif
03852 #ifndef Tcl_InitCustomHashTable
03853 #define Tcl_InitCustomHashTable \
03854 (tclStubsPtr->tcl_InitCustomHashTable)
03855 #endif
03856 #ifndef Tcl_InitObjHashTable
03857 #define Tcl_InitObjHashTable \
03858 (tclStubsPtr->tcl_InitObjHashTable)
03859 #endif
03860 #ifndef Tcl_CommandTraceInfo
03861 #define Tcl_CommandTraceInfo \
03862 (tclStubsPtr->tcl_CommandTraceInfo)
03863 #endif
03864 #ifndef Tcl_TraceCommand
03865 #define Tcl_TraceCommand \
03866 (tclStubsPtr->tcl_TraceCommand)
03867 #endif
03868 #ifndef Tcl_UntraceCommand
03869 #define Tcl_UntraceCommand \
03870 (tclStubsPtr->tcl_UntraceCommand)
03871 #endif
03872 #ifndef Tcl_AttemptAlloc
03873 #define Tcl_AttemptAlloc \
03874 (tclStubsPtr->tcl_AttemptAlloc)
03875 #endif
03876 #ifndef Tcl_AttemptDbCkalloc
03877 #define Tcl_AttemptDbCkalloc \
03878 (tclStubsPtr->tcl_AttemptDbCkalloc)
03879 #endif
03880 #ifndef Tcl_AttemptRealloc
03881 #define Tcl_AttemptRealloc \
03882 (tclStubsPtr->tcl_AttemptRealloc)
03883 #endif
03884 #ifndef Tcl_AttemptDbCkrealloc
03885 #define Tcl_AttemptDbCkrealloc \
03886 (tclStubsPtr->tcl_AttemptDbCkrealloc)
03887 #endif
03888 #ifndef Tcl_AttemptSetObjLength
03889 #define Tcl_AttemptSetObjLength \
03890 (tclStubsPtr->tcl_AttemptSetObjLength)
03891 #endif
03892 #ifndef Tcl_GetChannelThread
03893 #define Tcl_GetChannelThread \
03894 (tclStubsPtr->tcl_GetChannelThread)
03895 #endif
03896 #ifndef Tcl_GetUnicodeFromObj
03897 #define Tcl_GetUnicodeFromObj \
03898 (tclStubsPtr->tcl_GetUnicodeFromObj)
03899 #endif
03900 #ifndef Tcl_GetMathFuncInfo
03901 #define Tcl_GetMathFuncInfo \
03902 (tclStubsPtr->tcl_GetMathFuncInfo)
03903 #endif
03904 #ifndef Tcl_ListMathFuncs
03905 #define Tcl_ListMathFuncs \
03906 (tclStubsPtr->tcl_ListMathFuncs)
03907 #endif
03908 #ifndef Tcl_SubstObj
03909 #define Tcl_SubstObj \
03910 (tclStubsPtr->tcl_SubstObj)
03911 #endif
03912 #ifndef Tcl_DetachChannel
03913 #define Tcl_DetachChannel \
03914 (tclStubsPtr->tcl_DetachChannel)
03915 #endif
03916 #ifndef Tcl_IsStandardChannel
03917 #define Tcl_IsStandardChannel \
03918 (tclStubsPtr->tcl_IsStandardChannel)
03919 #endif
03920 #ifndef Tcl_FSCopyFile
03921 #define Tcl_FSCopyFile \
03922 (tclStubsPtr->tcl_FSCopyFile)
03923 #endif
03924 #ifndef Tcl_FSCopyDirectory
03925 #define Tcl_FSCopyDirectory \
03926 (tclStubsPtr->tcl_FSCopyDirectory)
03927 #endif
03928 #ifndef Tcl_FSCreateDirectory
03929 #define Tcl_FSCreateDirectory \
03930 (tclStubsPtr->tcl_FSCreateDirectory)
03931 #endif
03932 #ifndef Tcl_FSDeleteFile
03933 #define Tcl_FSDeleteFile \
03934 (tclStubsPtr->tcl_FSDeleteFile)
03935 #endif
03936 #ifndef Tcl_FSLoadFile
03937 #define Tcl_FSLoadFile \
03938 (tclStubsPtr->tcl_FSLoadFile)
03939 #endif
03940 #ifndef Tcl_FSMatchInDirectory
03941 #define Tcl_FSMatchInDirectory \
03942 (tclStubsPtr->tcl_FSMatchInDirectory)
03943 #endif
03944 #ifndef Tcl_FSLink
03945 #define Tcl_FSLink \
03946 (tclStubsPtr->tcl_FSLink)
03947 #endif
03948 #ifndef Tcl_FSRemoveDirectory
03949 #define Tcl_FSRemoveDirectory \
03950 (tclStubsPtr->tcl_FSRemoveDirectory)
03951 #endif
03952 #ifndef Tcl_FSRenameFile
03953 #define Tcl_FSRenameFile \
03954 (tclStubsPtr->tcl_FSRenameFile)
03955 #endif
03956 #ifndef Tcl_FSLstat
03957 #define Tcl_FSLstat \
03958 (tclStubsPtr->tcl_FSLstat)
03959 #endif
03960 #ifndef Tcl_FSUtime
03961 #define Tcl_FSUtime \
03962 (tclStubsPtr->tcl_FSUtime)
03963 #endif
03964 #ifndef Tcl_FSFileAttrsGet
03965 #define Tcl_FSFileAttrsGet \
03966 (tclStubsPtr->tcl_FSFileAttrsGet)
03967 #endif
03968 #ifndef Tcl_FSFileAttrsSet
03969 #define Tcl_FSFileAttrsSet \
03970 (tclStubsPtr->tcl_FSFileAttrsSet)
03971 #endif
03972 #ifndef Tcl_FSFileAttrStrings
03973 #define Tcl_FSFileAttrStrings \
03974 (tclStubsPtr->tcl_FSFileAttrStrings)
03975 #endif
03976 #ifndef Tcl_FSStat
03977 #define Tcl_FSStat \
03978 (tclStubsPtr->tcl_FSStat)
03979 #endif
03980 #ifndef Tcl_FSAccess
03981 #define Tcl_FSAccess \
03982 (tclStubsPtr->tcl_FSAccess)
03983 #endif
03984 #ifndef Tcl_FSOpenFileChannel
03985 #define Tcl_FSOpenFileChannel \
03986 (tclStubsPtr->tcl_FSOpenFileChannel)
03987 #endif
03988 #ifndef Tcl_FSGetCwd
03989 #define Tcl_FSGetCwd \
03990 (tclStubsPtr->tcl_FSGetCwd)
03991 #endif
03992 #ifndef Tcl_FSChdir
03993 #define Tcl_FSChdir \
03994 (tclStubsPtr->tcl_FSChdir)
03995 #endif
03996 #ifndef Tcl_FSConvertToPathType
03997 #define Tcl_FSConvertToPathType \
03998 (tclStubsPtr->tcl_FSConvertToPathType)
03999 #endif
04000 #ifndef Tcl_FSJoinPath
04001 #define Tcl_FSJoinPath \
04002 (tclStubsPtr->tcl_FSJoinPath)
04003 #endif
04004 #ifndef Tcl_FSSplitPath
04005 #define Tcl_FSSplitPath \
04006 (tclStubsPtr->tcl_FSSplitPath)
04007 #endif
04008 #ifndef Tcl_FSEqualPaths
04009 #define Tcl_FSEqualPaths \
04010 (tclStubsPtr->tcl_FSEqualPaths)
04011 #endif
04012 #ifndef Tcl_FSGetNormalizedPath
04013 #define Tcl_FSGetNormalizedPath \
04014 (tclStubsPtr->tcl_FSGetNormalizedPath)
04015 #endif
04016 #ifndef Tcl_FSJoinToPath
04017 #define Tcl_FSJoinToPath \
04018 (tclStubsPtr->tcl_FSJoinToPath)
04019 #endif
04020 #ifndef Tcl_FSGetInternalRep
04021 #define Tcl_FSGetInternalRep \
04022 (tclStubsPtr->tcl_FSGetInternalRep)
04023 #endif
04024 #ifndef Tcl_FSGetTranslatedPath
04025 #define Tcl_FSGetTranslatedPath \
04026 (tclStubsPtr->tcl_FSGetTranslatedPath)
04027 #endif
04028 #ifndef Tcl_FSEvalFile
04029 #define Tcl_FSEvalFile \
04030 (tclStubsPtr->tcl_FSEvalFile)
04031 #endif
04032 #ifndef Tcl_FSNewNativePath
04033 #define Tcl_FSNewNativePath \
04034 (tclStubsPtr->tcl_FSNewNativePath)
04035 #endif
04036 #ifndef Tcl_FSGetNativePath
04037 #define Tcl_FSGetNativePath \
04038 (tclStubsPtr->tcl_FSGetNativePath)
04039 #endif
04040 #ifndef Tcl_FSFileSystemInfo
04041 #define Tcl_FSFileSystemInfo \
04042 (tclStubsPtr->tcl_FSFileSystemInfo)
04043 #endif
04044 #ifndef Tcl_FSPathSeparator
04045 #define Tcl_FSPathSeparator \
04046 (tclStubsPtr->tcl_FSPathSeparator)
04047 #endif
04048 #ifndef Tcl_FSListVolumes
04049 #define Tcl_FSListVolumes \
04050 (tclStubsPtr->tcl_FSListVolumes)
04051 #endif
04052 #ifndef Tcl_FSRegister
04053 #define Tcl_FSRegister \
04054 (tclStubsPtr->tcl_FSRegister)
04055 #endif
04056 #ifndef Tcl_FSUnregister
04057 #define Tcl_FSUnregister \
04058 (tclStubsPtr->tcl_FSUnregister)
04059 #endif
04060 #ifndef Tcl_FSData
04061 #define Tcl_FSData \
04062 (tclStubsPtr->tcl_FSData)
04063 #endif
04064 #ifndef Tcl_FSGetTranslatedStringPath
04065 #define Tcl_FSGetTranslatedStringPath \
04066 (tclStubsPtr->tcl_FSGetTranslatedStringPath)
04067 #endif
04068 #ifndef Tcl_FSGetFileSystemForPath
04069 #define Tcl_FSGetFileSystemForPath \
04070 (tclStubsPtr->tcl_FSGetFileSystemForPath)
04071 #endif
04072 #ifndef Tcl_FSGetPathType
04073 #define Tcl_FSGetPathType \
04074 (tclStubsPtr->tcl_FSGetPathType)
04075 #endif
04076 #ifndef Tcl_OutputBuffered
04077 #define Tcl_OutputBuffered \
04078 (tclStubsPtr->tcl_OutputBuffered)
04079 #endif
04080 #ifndef Tcl_FSMountsChanged
04081 #define Tcl_FSMountsChanged \
04082 (tclStubsPtr->tcl_FSMountsChanged)
04083 #endif
04084 #ifndef Tcl_EvalTokensStandard
04085 #define Tcl_EvalTokensStandard \
04086 (tclStubsPtr->tcl_EvalTokensStandard)
04087 #endif
04088 #ifndef Tcl_GetTime
04089 #define Tcl_GetTime \
04090 (tclStubsPtr->tcl_GetTime)
04091 #endif
04092 #ifndef Tcl_CreateObjTrace
04093 #define Tcl_CreateObjTrace \
04094 (tclStubsPtr->tcl_CreateObjTrace)
04095 #endif
04096 #ifndef Tcl_GetCommandInfoFromToken
04097 #define Tcl_GetCommandInfoFromToken \
04098 (tclStubsPtr->tcl_GetCommandInfoFromToken)
04099 #endif
04100 #ifndef Tcl_SetCommandInfoFromToken
04101 #define Tcl_SetCommandInfoFromToken \
04102 (tclStubsPtr->tcl_SetCommandInfoFromToken)
04103 #endif
04104 #ifndef Tcl_DbNewWideIntObj
04105 #define Tcl_DbNewWideIntObj \
04106 (tclStubsPtr->tcl_DbNewWideIntObj)
04107 #endif
04108 #ifndef Tcl_GetWideIntFromObj
04109 #define Tcl_GetWideIntFromObj \
04110 (tclStubsPtr->tcl_GetWideIntFromObj)
04111 #endif
04112 #ifndef Tcl_NewWideIntObj
04113 #define Tcl_NewWideIntObj \
04114 (tclStubsPtr->tcl_NewWideIntObj)
04115 #endif
04116 #ifndef Tcl_SetWideIntObj
04117 #define Tcl_SetWideIntObj \
04118 (tclStubsPtr->tcl_SetWideIntObj)
04119 #endif
04120 #ifndef Tcl_AllocStatBuf
04121 #define Tcl_AllocStatBuf \
04122 (tclStubsPtr->tcl_AllocStatBuf)
04123 #endif
04124 #ifndef Tcl_Seek
04125 #define Tcl_Seek \
04126 (tclStubsPtr->tcl_Seek)
04127 #endif
04128 #ifndef Tcl_Tell
04129 #define Tcl_Tell \
04130 (tclStubsPtr->tcl_Tell)
04131 #endif
04132 #ifndef Tcl_ChannelWideSeekProc
04133 #define Tcl_ChannelWideSeekProc \
04134 (tclStubsPtr->tcl_ChannelWideSeekProc)
04135 #endif
04136
04137 #endif
04138
04139
04140
04141 #endif
04142
04143
04144
04145
04146
04147
04148
04149
04150
04151
04152