tclDecls.h
Go to the documentation of this file.00001 /* 00002 * tclDecls.h -- 00003 * 00004 * Declarations of functions in the platform independent public Tcl API. 00005 * 00006 * Copyright (c) 1998-1999 by Scriptics Corporation. 00007 * 00008 * See the file "license.terms" for information on usage and redistribution 00009 * of this file, and for a DISCLAIMER OF ALL WARRANTIES. 00010 * 00011 * RCS: @(#) $Id: tclDecls.h,v 1.130 2007/12/13 15:23:16 dgp Exp $ 00012 */ 00013 00014 #ifndef _TCLDECLS 00015 #define _TCLDECLS 00016 00017 #undef TCL_STORAGE_CLASS 00018 #ifdef BUILD_tcl 00019 # define TCL_STORAGE_CLASS DLLEXPORT 00020 #else 00021 # ifdef USE_TCL_STUBS 00022 # define TCL_STORAGE_CLASS 00023 # else 00024 # define TCL_STORAGE_CLASS DLLIMPORT 00025 # endif 00026 #endif 00027 00028 /* 00029 * WARNING: This file is automatically generated by the tools/genStubs.tcl 00030 * script. Any modifications to the function declarations below should be made 00031 * in the generic/tcl.decls script. 00032 */ 00033 00034 /* !BEGIN!: Do not edit below this line. */ 00035 00036 /* 00037 * Exported function declarations: 00038 */ 00039 00040 #ifndef Tcl_PkgProvideEx_TCL_DECLARED 00041 #define Tcl_PkgProvideEx_TCL_DECLARED 00042 /* 0 */ 00043 EXTERN int Tcl_PkgProvideEx (Tcl_Interp* interp, 00044 CONST char* name, CONST char* version, 00045 ClientData clientData); 00046 #endif 00047 #ifndef Tcl_PkgRequireEx_TCL_DECLARED 00048 #define Tcl_PkgRequireEx_TCL_DECLARED 00049 /* 1 */ 00050 EXTERN CONST84_RETURN char * Tcl_PkgRequireEx (Tcl_Interp * interp, 00051 CONST char * name, CONST char * version, 00052 int exact, ClientData * clientDataPtr); 00053 #endif 00054 #ifndef Tcl_Panic_TCL_DECLARED 00055 #define Tcl_Panic_TCL_DECLARED 00056 /* 2 */ 00057 EXTERN void Tcl_Panic (CONST char * format, ...); 00058 #endif 00059 #ifndef Tcl_Alloc_TCL_DECLARED 00060 #define Tcl_Alloc_TCL_DECLARED 00061 /* 3 */ 00062 EXTERN char * Tcl_Alloc (unsigned int size); 00063 #endif 00064 #ifndef Tcl_Free_TCL_DECLARED 00065 #define Tcl_Free_TCL_DECLARED 00066 /* 4 */ 00067 EXTERN void Tcl_Free (char * ptr); 00068 #endif 00069 #ifndef Tcl_Realloc_TCL_DECLARED 00070 #define Tcl_Realloc_TCL_DECLARED 00071 /* 5 */ 00072 EXTERN char * Tcl_Realloc (char * ptr, unsigned int size); 00073 #endif 00074 #ifndef Tcl_DbCkalloc_TCL_DECLARED 00075 #define Tcl_DbCkalloc_TCL_DECLARED 00076 /* 6 */ 00077 EXTERN char * Tcl_DbCkalloc (unsigned int size, CONST char * file, 00078 int line); 00079 #endif 00080 #ifndef Tcl_DbCkfree_TCL_DECLARED 00081 #define Tcl_DbCkfree_TCL_DECLARED 00082 /* 7 */ 00083 EXTERN int Tcl_DbCkfree (char * ptr, CONST char * file, 00084 int line); 00085 #endif 00086 #ifndef Tcl_DbCkrealloc_TCL_DECLARED 00087 #define Tcl_DbCkrealloc_TCL_DECLARED 00088 /* 8 */ 00089 EXTERN char * Tcl_DbCkrealloc (char * ptr, unsigned int size, 00090 CONST char * file, int line); 00091 #endif 00092 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 00093 #ifndef Tcl_CreateFileHandler_TCL_DECLARED 00094 #define Tcl_CreateFileHandler_TCL_DECLARED 00095 /* 9 */ 00096 EXTERN void Tcl_CreateFileHandler (int fd, int mask, 00097 Tcl_FileProc * proc, ClientData clientData); 00098 #endif 00099 #endif /* UNIX */ 00100 #ifdef MAC_OSX_TCL /* MACOSX */ 00101 #ifndef Tcl_CreateFileHandler_TCL_DECLARED 00102 #define Tcl_CreateFileHandler_TCL_DECLARED 00103 /* 9 */ 00104 EXTERN void Tcl_CreateFileHandler (int fd, int mask, 00105 Tcl_FileProc * proc, ClientData clientData); 00106 #endif 00107 #endif /* MACOSX */ 00108 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 00109 #ifndef Tcl_DeleteFileHandler_TCL_DECLARED 00110 #define Tcl_DeleteFileHandler_TCL_DECLARED 00111 /* 10 */ 00112 EXTERN void Tcl_DeleteFileHandler (int fd); 00113 #endif 00114 #endif /* UNIX */ 00115 #ifdef MAC_OSX_TCL /* MACOSX */ 00116 #ifndef Tcl_DeleteFileHandler_TCL_DECLARED 00117 #define Tcl_DeleteFileHandler_TCL_DECLARED 00118 /* 10 */ 00119 EXTERN void Tcl_DeleteFileHandler (int fd); 00120 #endif 00121 #endif /* MACOSX */ 00122 #ifndef Tcl_SetTimer_TCL_DECLARED 00123 #define Tcl_SetTimer_TCL_DECLARED 00124 /* 11 */ 00125 EXTERN void Tcl_SetTimer (Tcl_Time * timePtr); 00126 #endif 00127 #ifndef Tcl_Sleep_TCL_DECLARED 00128 #define Tcl_Sleep_TCL_DECLARED 00129 /* 12 */ 00130 EXTERN void Tcl_Sleep (int ms); 00131 #endif 00132 #ifndef Tcl_WaitForEvent_TCL_DECLARED 00133 #define Tcl_WaitForEvent_TCL_DECLARED 00134 /* 13 */ 00135 EXTERN int Tcl_WaitForEvent (Tcl_Time * timePtr); 00136 #endif 00137 #ifndef Tcl_AppendAllObjTypes_TCL_DECLARED 00138 #define Tcl_AppendAllObjTypes_TCL_DECLARED 00139 /* 14 */ 00140 EXTERN int Tcl_AppendAllObjTypes (Tcl_Interp * interp, 00141 Tcl_Obj * objPtr); 00142 #endif 00143 #ifndef Tcl_AppendStringsToObj_TCL_DECLARED 00144 #define Tcl_AppendStringsToObj_TCL_DECLARED 00145 /* 15 */ 00146 EXTERN void Tcl_AppendStringsToObj (Tcl_Obj * objPtr, ...); 00147 #endif 00148 #ifndef Tcl_AppendToObj_TCL_DECLARED 00149 #define Tcl_AppendToObj_TCL_DECLARED 00150 /* 16 */ 00151 EXTERN void Tcl_AppendToObj (Tcl_Obj* objPtr, CONST char* bytes, 00152 int length); 00153 #endif 00154 #ifndef Tcl_ConcatObj_TCL_DECLARED 00155 #define Tcl_ConcatObj_TCL_DECLARED 00156 /* 17 */ 00157 EXTERN Tcl_Obj * Tcl_ConcatObj (int objc, Tcl_Obj *CONST objv[]); 00158 #endif 00159 #ifndef Tcl_ConvertToType_TCL_DECLARED 00160 #define Tcl_ConvertToType_TCL_DECLARED 00161 /* 18 */ 00162 EXTERN int Tcl_ConvertToType (Tcl_Interp * interp, 00163 Tcl_Obj * objPtr, Tcl_ObjType * typePtr); 00164 #endif 00165 #ifndef Tcl_DbDecrRefCount_TCL_DECLARED 00166 #define Tcl_DbDecrRefCount_TCL_DECLARED 00167 /* 19 */ 00168 EXTERN void Tcl_DbDecrRefCount (Tcl_Obj * objPtr, 00169 CONST char * file, int line); 00170 #endif 00171 #ifndef Tcl_DbIncrRefCount_TCL_DECLARED 00172 #define Tcl_DbIncrRefCount_TCL_DECLARED 00173 /* 20 */ 00174 EXTERN void Tcl_DbIncrRefCount (Tcl_Obj * objPtr, 00175 CONST char * file, int line); 00176 #endif 00177 #ifndef Tcl_DbIsShared_TCL_DECLARED 00178 #define Tcl_DbIsShared_TCL_DECLARED 00179 /* 21 */ 00180 EXTERN int Tcl_DbIsShared (Tcl_Obj * objPtr, CONST char * file, 00181 int line); 00182 #endif 00183 #ifndef Tcl_DbNewBooleanObj_TCL_DECLARED 00184 #define Tcl_DbNewBooleanObj_TCL_DECLARED 00185 /* 22 */ 00186 EXTERN Tcl_Obj * Tcl_DbNewBooleanObj (int boolValue, 00187 CONST char * file, int line); 00188 #endif 00189 #ifndef Tcl_DbNewByteArrayObj_TCL_DECLARED 00190 #define Tcl_DbNewByteArrayObj_TCL_DECLARED 00191 /* 23 */ 00192 EXTERN Tcl_Obj * Tcl_DbNewByteArrayObj (CONST unsigned char * bytes, 00193 int length, CONST char * file, int line); 00194 #endif 00195 #ifndef Tcl_DbNewDoubleObj_TCL_DECLARED 00196 #define Tcl_DbNewDoubleObj_TCL_DECLARED 00197 /* 24 */ 00198 EXTERN Tcl_Obj * Tcl_DbNewDoubleObj (double doubleValue, 00199 CONST char * file, int line); 00200 #endif 00201 #ifndef Tcl_DbNewListObj_TCL_DECLARED 00202 #define Tcl_DbNewListObj_TCL_DECLARED 00203 /* 25 */ 00204 EXTERN Tcl_Obj * Tcl_DbNewListObj (int objc, Tcl_Obj *CONST * objv, 00205 CONST char * file, int line); 00206 #endif 00207 #ifndef Tcl_DbNewLongObj_TCL_DECLARED 00208 #define Tcl_DbNewLongObj_TCL_DECLARED 00209 /* 26 */ 00210 EXTERN Tcl_Obj * Tcl_DbNewLongObj (long longValue, CONST char * file, 00211 int line); 00212 #endif 00213 #ifndef Tcl_DbNewObj_TCL_DECLARED 00214 #define Tcl_DbNewObj_TCL_DECLARED 00215 /* 27 */ 00216 EXTERN Tcl_Obj * Tcl_DbNewObj (CONST char * file, int line); 00217 #endif 00218 #ifndef Tcl_DbNewStringObj_TCL_DECLARED 00219 #define Tcl_DbNewStringObj_TCL_DECLARED 00220 /* 28 */ 00221 EXTERN Tcl_Obj * Tcl_DbNewStringObj (CONST char * bytes, int length, 00222 CONST char * file, int line); 00223 #endif 00224 #ifndef Tcl_DuplicateObj_TCL_DECLARED 00225 #define Tcl_DuplicateObj_TCL_DECLARED 00226 /* 29 */ 00227 EXTERN Tcl_Obj * Tcl_DuplicateObj (Tcl_Obj * objPtr); 00228 #endif 00229 #ifndef TclFreeObj_TCL_DECLARED 00230 #define TclFreeObj_TCL_DECLARED 00231 /* 30 */ 00232 EXTERN void TclFreeObj (Tcl_Obj * objPtr); 00233 #endif 00234 #ifndef Tcl_GetBoolean_TCL_DECLARED 00235 #define Tcl_GetBoolean_TCL_DECLARED 00236 /* 31 */ 00237 EXTERN int Tcl_GetBoolean (Tcl_Interp * interp, 00238 CONST char * src, int * boolPtr); 00239 #endif 00240 #ifndef Tcl_GetBooleanFromObj_TCL_DECLARED 00241 #define Tcl_GetBooleanFromObj_TCL_DECLARED 00242 /* 32 */ 00243 EXTERN int Tcl_GetBooleanFromObj (Tcl_Interp * interp, 00244 Tcl_Obj * objPtr, int * boolPtr); 00245 #endif 00246 #ifndef Tcl_GetByteArrayFromObj_TCL_DECLARED 00247 #define Tcl_GetByteArrayFromObj_TCL_DECLARED 00248 /* 33 */ 00249 EXTERN unsigned char * Tcl_GetByteArrayFromObj (Tcl_Obj * objPtr, 00250 int * lengthPtr); 00251 #endif 00252 #ifndef Tcl_GetDouble_TCL_DECLARED 00253 #define Tcl_GetDouble_TCL_DECLARED 00254 /* 34 */ 00255 EXTERN int Tcl_GetDouble (Tcl_Interp * interp, CONST char * src, 00256 double * doublePtr); 00257 #endif 00258 #ifndef Tcl_GetDoubleFromObj_TCL_DECLARED 00259 #define Tcl_GetDoubleFromObj_TCL_DECLARED 00260 /* 35 */ 00261 EXTERN int Tcl_GetDoubleFromObj (Tcl_Interp * interp, 00262 Tcl_Obj * objPtr, double * doublePtr); 00263 #endif 00264 #ifndef Tcl_GetIndexFromObj_TCL_DECLARED 00265 #define Tcl_GetIndexFromObj_TCL_DECLARED 00266 /* 36 */ 00267 EXTERN int Tcl_GetIndexFromObj (Tcl_Interp * interp, 00268 Tcl_Obj * objPtr, CONST84 char ** tablePtr, 00269 CONST char * msg, int flags, int * indexPtr); 00270 #endif 00271 #ifndef Tcl_GetInt_TCL_DECLARED 00272 #define Tcl_GetInt_TCL_DECLARED 00273 /* 37 */ 00274 EXTERN int Tcl_GetInt (Tcl_Interp * interp, CONST char * src, 00275 int * intPtr); 00276 #endif 00277 #ifndef Tcl_GetIntFromObj_TCL_DECLARED 00278 #define Tcl_GetIntFromObj_TCL_DECLARED 00279 /* 38 */ 00280 EXTERN int Tcl_GetIntFromObj (Tcl_Interp * interp, 00281 Tcl_Obj * objPtr, int * intPtr); 00282 #endif 00283 #ifndef Tcl_GetLongFromObj_TCL_DECLARED 00284 #define Tcl_GetLongFromObj_TCL_DECLARED 00285 /* 39 */ 00286 EXTERN int Tcl_GetLongFromObj (Tcl_Interp * interp, 00287 Tcl_Obj * objPtr, long * longPtr); 00288 #endif 00289 #ifndef Tcl_GetObjType_TCL_DECLARED 00290 #define Tcl_GetObjType_TCL_DECLARED 00291 /* 40 */ 00292 EXTERN Tcl_ObjType * Tcl_GetObjType (CONST char * typeName); 00293 #endif 00294 #ifndef Tcl_GetStringFromObj_TCL_DECLARED 00295 #define Tcl_GetStringFromObj_TCL_DECLARED 00296 /* 41 */ 00297 EXTERN char * Tcl_GetStringFromObj (Tcl_Obj * objPtr, 00298 int * lengthPtr); 00299 #endif 00300 #ifndef Tcl_InvalidateStringRep_TCL_DECLARED 00301 #define Tcl_InvalidateStringRep_TCL_DECLARED 00302 /* 42 */ 00303 EXTERN void Tcl_InvalidateStringRep (Tcl_Obj * objPtr); 00304 #endif 00305 #ifndef Tcl_ListObjAppendList_TCL_DECLARED 00306 #define Tcl_ListObjAppendList_TCL_DECLARED 00307 /* 43 */ 00308 EXTERN int Tcl_ListObjAppendList (Tcl_Interp * interp, 00309 Tcl_Obj * listPtr, Tcl_Obj * elemListPtr); 00310 #endif 00311 #ifndef Tcl_ListObjAppendElement_TCL_DECLARED 00312 #define Tcl_ListObjAppendElement_TCL_DECLARED 00313 /* 44 */ 00314 EXTERN int Tcl_ListObjAppendElement (Tcl_Interp * interp, 00315 Tcl_Obj * listPtr, Tcl_Obj * objPtr); 00316 #endif 00317 #ifndef Tcl_ListObjGetElements_TCL_DECLARED 00318 #define Tcl_ListObjGetElements_TCL_DECLARED 00319 /* 45 */ 00320 EXTERN int Tcl_ListObjGetElements (Tcl_Interp * interp, 00321 Tcl_Obj * listPtr, int * objcPtr, 00322 Tcl_Obj *** objvPtr); 00323 #endif 00324 #ifndef Tcl_ListObjIndex_TCL_DECLARED 00325 #define Tcl_ListObjIndex_TCL_DECLARED 00326 /* 46 */ 00327 EXTERN int Tcl_ListObjIndex (Tcl_Interp * interp, 00328 Tcl_Obj * listPtr, int index, 00329 Tcl_Obj ** objPtrPtr); 00330 #endif 00331 #ifndef Tcl_ListObjLength_TCL_DECLARED 00332 #define Tcl_ListObjLength_TCL_DECLARED 00333 /* 47 */ 00334 EXTERN int Tcl_ListObjLength (Tcl_Interp * interp, 00335 Tcl_Obj * listPtr, int * lengthPtr); 00336 #endif 00337 #ifndef Tcl_ListObjReplace_TCL_DECLARED 00338 #define Tcl_ListObjReplace_TCL_DECLARED 00339 /* 48 */ 00340 EXTERN int Tcl_ListObjReplace (Tcl_Interp * interp, 00341 Tcl_Obj * listPtr, int first, int count, 00342 int objc, Tcl_Obj *CONST objv[]); 00343 #endif 00344 #ifndef Tcl_NewBooleanObj_TCL_DECLARED 00345 #define Tcl_NewBooleanObj_TCL_DECLARED 00346 /* 49 */ 00347 EXTERN Tcl_Obj * Tcl_NewBooleanObj (int boolValue); 00348 #endif 00349 #ifndef Tcl_NewByteArrayObj_TCL_DECLARED 00350 #define Tcl_NewByteArrayObj_TCL_DECLARED 00351 /* 50 */ 00352 EXTERN Tcl_Obj * Tcl_NewByteArrayObj (CONST unsigned char* bytes, 00353 int length); 00354 #endif 00355 #ifndef Tcl_NewDoubleObj_TCL_DECLARED 00356 #define Tcl_NewDoubleObj_TCL_DECLARED 00357 /* 51 */ 00358 EXTERN Tcl_Obj * Tcl_NewDoubleObj (double doubleValue); 00359 #endif 00360 #ifndef Tcl_NewIntObj_TCL_DECLARED 00361 #define Tcl_NewIntObj_TCL_DECLARED 00362 /* 52 */ 00363 EXTERN Tcl_Obj * Tcl_NewIntObj (int intValue); 00364 #endif 00365 #ifndef Tcl_NewListObj_TCL_DECLARED 00366 #define Tcl_NewListObj_TCL_DECLARED 00367 /* 53 */ 00368 EXTERN Tcl_Obj * Tcl_NewListObj (int objc, Tcl_Obj *CONST objv[]); 00369 #endif 00370 #ifndef Tcl_NewLongObj_TCL_DECLARED 00371 #define Tcl_NewLongObj_TCL_DECLARED 00372 /* 54 */ 00373 EXTERN Tcl_Obj * Tcl_NewLongObj (long longValue); 00374 #endif 00375 #ifndef Tcl_NewObj_TCL_DECLARED 00376 #define Tcl_NewObj_TCL_DECLARED 00377 /* 55 */ 00378 EXTERN Tcl_Obj * Tcl_NewObj (void); 00379 #endif 00380 #ifndef Tcl_NewStringObj_TCL_DECLARED 00381 #define Tcl_NewStringObj_TCL_DECLARED 00382 /* 56 */ 00383 EXTERN Tcl_Obj * Tcl_NewStringObj (CONST char * bytes, int length); 00384 #endif 00385 #ifndef Tcl_SetBooleanObj_TCL_DECLARED 00386 #define Tcl_SetBooleanObj_TCL_DECLARED 00387 /* 57 */ 00388 EXTERN void Tcl_SetBooleanObj (Tcl_Obj * objPtr, int boolValue); 00389 #endif 00390 #ifndef Tcl_SetByteArrayLength_TCL_DECLARED 00391 #define Tcl_SetByteArrayLength_TCL_DECLARED 00392 /* 58 */ 00393 EXTERN unsigned char * Tcl_SetByteArrayLength (Tcl_Obj * objPtr, int length); 00394 #endif 00395 #ifndef Tcl_SetByteArrayObj_TCL_DECLARED 00396 #define Tcl_SetByteArrayObj_TCL_DECLARED 00397 /* 59 */ 00398 EXTERN void Tcl_SetByteArrayObj (Tcl_Obj * objPtr, 00399 CONST unsigned char * bytes, int length); 00400 #endif 00401 #ifndef Tcl_SetDoubleObj_TCL_DECLARED 00402 #define Tcl_SetDoubleObj_TCL_DECLARED 00403 /* 60 */ 00404 EXTERN void Tcl_SetDoubleObj (Tcl_Obj * objPtr, 00405 double doubleValue); 00406 #endif 00407 #ifndef Tcl_SetIntObj_TCL_DECLARED 00408 #define Tcl_SetIntObj_TCL_DECLARED 00409 /* 61 */ 00410 EXTERN void Tcl_SetIntObj (Tcl_Obj * objPtr, int intValue); 00411 #endif 00412 #ifndef Tcl_SetListObj_TCL_DECLARED 00413 #define Tcl_SetListObj_TCL_DECLARED 00414 /* 62 */ 00415 EXTERN void Tcl_SetListObj (Tcl_Obj * objPtr, int objc, 00416 Tcl_Obj *CONST objv[]); 00417 #endif 00418 #ifndef Tcl_SetLongObj_TCL_DECLARED 00419 #define Tcl_SetLongObj_TCL_DECLARED 00420 /* 63 */ 00421 EXTERN void Tcl_SetLongObj (Tcl_Obj * objPtr, long longValue); 00422 #endif 00423 #ifndef Tcl_SetObjLength_TCL_DECLARED 00424 #define Tcl_SetObjLength_TCL_DECLARED 00425 /* 64 */ 00426 EXTERN void Tcl_SetObjLength (Tcl_Obj * objPtr, int length); 00427 #endif 00428 #ifndef Tcl_SetStringObj_TCL_DECLARED 00429 #define Tcl_SetStringObj_TCL_DECLARED 00430 /* 65 */ 00431 EXTERN void Tcl_SetStringObj (Tcl_Obj* objPtr, CONST char* bytes, 00432 int length); 00433 #endif 00434 #ifndef Tcl_AddErrorInfo_TCL_DECLARED 00435 #define Tcl_AddErrorInfo_TCL_DECLARED 00436 /* 66 */ 00437 EXTERN void Tcl_AddErrorInfo (Tcl_Interp * interp, 00438 CONST char * message); 00439 #endif 00440 #ifndef Tcl_AddObjErrorInfo_TCL_DECLARED 00441 #define Tcl_AddObjErrorInfo_TCL_DECLARED 00442 /* 67 */ 00443 EXTERN void Tcl_AddObjErrorInfo (Tcl_Interp * interp, 00444 CONST char * message, int length); 00445 #endif 00446 #ifndef Tcl_AllowExceptions_TCL_DECLARED 00447 #define Tcl_AllowExceptions_TCL_DECLARED 00448 /* 68 */ 00449 EXTERN void Tcl_AllowExceptions (Tcl_Interp * interp); 00450 #endif 00451 #ifndef Tcl_AppendElement_TCL_DECLARED 00452 #define Tcl_AppendElement_TCL_DECLARED 00453 /* 69 */ 00454 EXTERN void Tcl_AppendElement (Tcl_Interp * interp, 00455 CONST char * element); 00456 #endif 00457 #ifndef Tcl_AppendResult_TCL_DECLARED 00458 #define Tcl_AppendResult_TCL_DECLARED 00459 /* 70 */ 00460 EXTERN void Tcl_AppendResult (Tcl_Interp * interp, ...); 00461 #endif 00462 #ifndef Tcl_AsyncCreate_TCL_DECLARED 00463 #define Tcl_AsyncCreate_TCL_DECLARED 00464 /* 71 */ 00465 EXTERN Tcl_AsyncHandler Tcl_AsyncCreate (Tcl_AsyncProc * proc, 00466 ClientData clientData); 00467 #endif 00468 #ifndef Tcl_AsyncDelete_TCL_DECLARED 00469 #define Tcl_AsyncDelete_TCL_DECLARED 00470 /* 72 */ 00471 EXTERN void Tcl_AsyncDelete (Tcl_AsyncHandler async); 00472 #endif 00473 #ifndef Tcl_AsyncInvoke_TCL_DECLARED 00474 #define Tcl_AsyncInvoke_TCL_DECLARED 00475 /* 73 */ 00476 EXTERN int Tcl_AsyncInvoke (Tcl_Interp * interp, int code); 00477 #endif 00478 #ifndef Tcl_AsyncMark_TCL_DECLARED 00479 #define Tcl_AsyncMark_TCL_DECLARED 00480 /* 74 */ 00481 EXTERN void Tcl_AsyncMark (Tcl_AsyncHandler async); 00482 #endif 00483 #ifndef Tcl_AsyncReady_TCL_DECLARED 00484 #define Tcl_AsyncReady_TCL_DECLARED 00485 /* 75 */ 00486 EXTERN int Tcl_AsyncReady (void); 00487 #endif 00488 #ifndef Tcl_BackgroundError_TCL_DECLARED 00489 #define Tcl_BackgroundError_TCL_DECLARED 00490 /* 76 */ 00491 EXTERN void Tcl_BackgroundError (Tcl_Interp * interp); 00492 #endif 00493 #ifndef Tcl_Backslash_TCL_DECLARED 00494 #define Tcl_Backslash_TCL_DECLARED 00495 /* 77 */ 00496 EXTERN char Tcl_Backslash (CONST char * src, int * readPtr); 00497 #endif 00498 #ifndef Tcl_BadChannelOption_TCL_DECLARED 00499 #define Tcl_BadChannelOption_TCL_DECLARED 00500 /* 78 */ 00501 EXTERN int Tcl_BadChannelOption (Tcl_Interp * interp, 00502 CONST char * optionName, 00503 CONST char * optionList); 00504 #endif 00505 #ifndef Tcl_CallWhenDeleted_TCL_DECLARED 00506 #define Tcl_CallWhenDeleted_TCL_DECLARED 00507 /* 79 */ 00508 EXTERN void Tcl_CallWhenDeleted (Tcl_Interp * interp, 00509 Tcl_InterpDeleteProc * proc, 00510 ClientData clientData); 00511 #endif 00512 #ifndef Tcl_CancelIdleCall_TCL_DECLARED 00513 #define Tcl_CancelIdleCall_TCL_DECLARED 00514 /* 80 */ 00515 EXTERN void Tcl_CancelIdleCall (Tcl_IdleProc * idleProc, 00516 ClientData clientData); 00517 #endif 00518 #ifndef Tcl_Close_TCL_DECLARED 00519 #define Tcl_Close_TCL_DECLARED 00520 /* 81 */ 00521 EXTERN int Tcl_Close (Tcl_Interp * interp, Tcl_Channel chan); 00522 #endif 00523 #ifndef Tcl_CommandComplete_TCL_DECLARED 00524 #define Tcl_CommandComplete_TCL_DECLARED 00525 /* 82 */ 00526 EXTERN int Tcl_CommandComplete (CONST char * cmd); 00527 #endif 00528 #ifndef Tcl_Concat_TCL_DECLARED 00529 #define Tcl_Concat_TCL_DECLARED 00530 /* 83 */ 00531 EXTERN char * Tcl_Concat (int argc, CONST84 char * CONST * argv); 00532 #endif 00533 #ifndef Tcl_ConvertElement_TCL_DECLARED 00534 #define Tcl_ConvertElement_TCL_DECLARED 00535 /* 84 */ 00536 EXTERN int Tcl_ConvertElement (CONST char * src, char * dst, 00537 int flags); 00538 #endif 00539 #ifndef Tcl_ConvertCountedElement_TCL_DECLARED 00540 #define Tcl_ConvertCountedElement_TCL_DECLARED 00541 /* 85 */ 00542 EXTERN int Tcl_ConvertCountedElement (CONST char * src, 00543 int length, char * dst, int flags); 00544 #endif 00545 #ifndef Tcl_CreateAlias_TCL_DECLARED 00546 #define Tcl_CreateAlias_TCL_DECLARED 00547 /* 86 */ 00548 EXTERN int Tcl_CreateAlias (Tcl_Interp * slave, 00549 CONST char * slaveCmd, Tcl_Interp * target, 00550 CONST char * targetCmd, int argc, 00551 CONST84 char * CONST * argv); 00552 #endif 00553 #ifndef Tcl_CreateAliasObj_TCL_DECLARED 00554 #define Tcl_CreateAliasObj_TCL_DECLARED 00555 /* 87 */ 00556 EXTERN int Tcl_CreateAliasObj (Tcl_Interp * slave, 00557 CONST char * slaveCmd, Tcl_Interp * target, 00558 CONST char * targetCmd, int objc, 00559 Tcl_Obj *CONST objv[]); 00560 #endif 00561 #ifndef Tcl_CreateChannel_TCL_DECLARED 00562 #define Tcl_CreateChannel_TCL_DECLARED 00563 /* 88 */ 00564 EXTERN Tcl_Channel Tcl_CreateChannel (Tcl_ChannelType * typePtr, 00565 CONST char * chanName, 00566 ClientData instanceData, int mask); 00567 #endif 00568 #ifndef Tcl_CreateChannelHandler_TCL_DECLARED 00569 #define Tcl_CreateChannelHandler_TCL_DECLARED 00570 /* 89 */ 00571 EXTERN void Tcl_CreateChannelHandler (Tcl_Channel chan, int mask, 00572 Tcl_ChannelProc * proc, 00573 ClientData clientData); 00574 #endif 00575 #ifndef Tcl_CreateCloseHandler_TCL_DECLARED 00576 #define Tcl_CreateCloseHandler_TCL_DECLARED 00577 /* 90 */ 00578 EXTERN void Tcl_CreateCloseHandler (Tcl_Channel chan, 00579 Tcl_CloseProc * proc, ClientData clientData); 00580 #endif 00581 #ifndef Tcl_CreateCommand_TCL_DECLARED 00582 #define Tcl_CreateCommand_TCL_DECLARED 00583 /* 91 */ 00584 EXTERN Tcl_Command Tcl_CreateCommand (Tcl_Interp * interp, 00585 CONST char * cmdName, Tcl_CmdProc * proc, 00586 ClientData clientData, 00587 Tcl_CmdDeleteProc * deleteProc); 00588 #endif 00589 #ifndef Tcl_CreateEventSource_TCL_DECLARED 00590 #define Tcl_CreateEventSource_TCL_DECLARED 00591 /* 92 */ 00592 EXTERN void Tcl_CreateEventSource ( 00593 Tcl_EventSetupProc * setupProc, 00594 Tcl_EventCheckProc * checkProc, 00595 ClientData clientData); 00596 #endif 00597 #ifndef Tcl_CreateExitHandler_TCL_DECLARED 00598 #define Tcl_CreateExitHandler_TCL_DECLARED 00599 /* 93 */ 00600 EXTERN void Tcl_CreateExitHandler (Tcl_ExitProc * proc, 00601 ClientData clientData); 00602 #endif 00603 #ifndef Tcl_CreateInterp_TCL_DECLARED 00604 #define Tcl_CreateInterp_TCL_DECLARED 00605 /* 94 */ 00606 EXTERN Tcl_Interp * Tcl_CreateInterp (void); 00607 #endif 00608 #ifndef Tcl_CreateMathFunc_TCL_DECLARED 00609 #define Tcl_CreateMathFunc_TCL_DECLARED 00610 /* 95 */ 00611 EXTERN void Tcl_CreateMathFunc (Tcl_Interp * interp, 00612 CONST char * name, int numArgs, 00613 Tcl_ValueType * argTypes, 00614 Tcl_MathProc * proc, ClientData clientData); 00615 #endif 00616 #ifndef Tcl_CreateObjCommand_TCL_DECLARED 00617 #define Tcl_CreateObjCommand_TCL_DECLARED 00618 /* 96 */ 00619 EXTERN Tcl_Command Tcl_CreateObjCommand (Tcl_Interp * interp, 00620 CONST char * cmdName, Tcl_ObjCmdProc * proc, 00621 ClientData clientData, 00622 Tcl_CmdDeleteProc * deleteProc); 00623 #endif 00624 #ifndef Tcl_CreateSlave_TCL_DECLARED 00625 #define Tcl_CreateSlave_TCL_DECLARED 00626 /* 97 */ 00627 EXTERN Tcl_Interp * Tcl_CreateSlave (Tcl_Interp * interp, 00628 CONST char * slaveName, int isSafe); 00629 #endif 00630 #ifndef Tcl_CreateTimerHandler_TCL_DECLARED 00631 #define Tcl_CreateTimerHandler_TCL_DECLARED 00632 /* 98 */ 00633 EXTERN Tcl_TimerToken Tcl_CreateTimerHandler (int milliseconds, 00634 Tcl_TimerProc * proc, ClientData clientData); 00635 #endif 00636 #ifndef Tcl_CreateTrace_TCL_DECLARED 00637 #define Tcl_CreateTrace_TCL_DECLARED 00638 /* 99 */ 00639 EXTERN Tcl_Trace Tcl_CreateTrace (Tcl_Interp * interp, int level, 00640 Tcl_CmdTraceProc * proc, 00641 ClientData clientData); 00642 #endif 00643 #ifndef Tcl_DeleteAssocData_TCL_DECLARED 00644 #define Tcl_DeleteAssocData_TCL_DECLARED 00645 /* 100 */ 00646 EXTERN void Tcl_DeleteAssocData (Tcl_Interp * interp, 00647 CONST char * name); 00648 #endif 00649 #ifndef Tcl_DeleteChannelHandler_TCL_DECLARED 00650 #define Tcl_DeleteChannelHandler_TCL_DECLARED 00651 /* 101 */ 00652 EXTERN void Tcl_DeleteChannelHandler (Tcl_Channel chan, 00653 Tcl_ChannelProc * proc, 00654 ClientData clientData); 00655 #endif 00656 #ifndef Tcl_DeleteCloseHandler_TCL_DECLARED 00657 #define Tcl_DeleteCloseHandler_TCL_DECLARED 00658 /* 102 */ 00659 EXTERN void Tcl_DeleteCloseHandler (Tcl_Channel chan, 00660 Tcl_CloseProc * proc, ClientData clientData); 00661 #endif 00662 #ifndef Tcl_DeleteCommand_TCL_DECLARED 00663 #define Tcl_DeleteCommand_TCL_DECLARED 00664 /* 103 */ 00665 EXTERN int Tcl_DeleteCommand (Tcl_Interp * interp, 00666 CONST char * cmdName); 00667 #endif 00668 #ifndef Tcl_DeleteCommandFromToken_TCL_DECLARED 00669 #define Tcl_DeleteCommandFromToken_TCL_DECLARED 00670 /* 104 */ 00671 EXTERN int Tcl_DeleteCommandFromToken (Tcl_Interp * interp, 00672 Tcl_Command command); 00673 #endif 00674 #ifndef Tcl_DeleteEvents_TCL_DECLARED 00675 #define Tcl_DeleteEvents_TCL_DECLARED 00676 /* 105 */ 00677 EXTERN void Tcl_DeleteEvents (Tcl_EventDeleteProc * proc, 00678 ClientData clientData); 00679 #endif 00680 #ifndef Tcl_DeleteEventSource_TCL_DECLARED 00681 #define Tcl_DeleteEventSource_TCL_DECLARED 00682 /* 106 */ 00683 EXTERN void Tcl_DeleteEventSource ( 00684 Tcl_EventSetupProc * setupProc, 00685 Tcl_EventCheckProc * checkProc, 00686 ClientData clientData); 00687 #endif 00688 #ifndef Tcl_DeleteExitHandler_TCL_DECLARED 00689 #define Tcl_DeleteExitHandler_TCL_DECLARED 00690 /* 107 */ 00691 EXTERN void Tcl_DeleteExitHandler (Tcl_ExitProc * proc, 00692 ClientData clientData); 00693 #endif 00694 #ifndef Tcl_DeleteHashEntry_TCL_DECLARED 00695 #define Tcl_DeleteHashEntry_TCL_DECLARED 00696 /* 108 */ 00697 EXTERN void Tcl_DeleteHashEntry (Tcl_HashEntry * entryPtr); 00698 #endif 00699 #ifndef Tcl_DeleteHashTable_TCL_DECLARED 00700 #define Tcl_DeleteHashTable_TCL_DECLARED 00701 /* 109 */ 00702 EXTERN void Tcl_DeleteHashTable (Tcl_HashTable * tablePtr); 00703 #endif 00704 #ifndef Tcl_DeleteInterp_TCL_DECLARED 00705 #define Tcl_DeleteInterp_TCL_DECLARED 00706 /* 110 */ 00707 EXTERN void Tcl_DeleteInterp (Tcl_Interp * interp); 00708 #endif 00709 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 00710 #ifndef Tcl_DetachPids_TCL_DECLARED 00711 #define Tcl_DetachPids_TCL_DECLARED 00712 /* 111 */ 00713 EXTERN void Tcl_DetachPids (int numPids, Tcl_Pid * pidPtr); 00714 #endif 00715 #endif /* UNIX */ 00716 #ifdef __WIN32__ /* WIN */ 00717 #ifndef Tcl_DetachPids_TCL_DECLARED 00718 #define Tcl_DetachPids_TCL_DECLARED 00719 /* 111 */ 00720 EXTERN void Tcl_DetachPids (int numPids, Tcl_Pid * pidPtr); 00721 #endif 00722 #endif /* WIN */ 00723 #ifdef MAC_OSX_TCL /* MACOSX */ 00724 #ifndef Tcl_DetachPids_TCL_DECLARED 00725 #define Tcl_DetachPids_TCL_DECLARED 00726 /* 111 */ 00727 EXTERN void Tcl_DetachPids (int numPids, Tcl_Pid * pidPtr); 00728 #endif 00729 #endif /* MACOSX */ 00730 #ifndef Tcl_DeleteTimerHandler_TCL_DECLARED 00731 #define Tcl_DeleteTimerHandler_TCL_DECLARED 00732 /* 112 */ 00733 EXTERN void Tcl_DeleteTimerHandler (Tcl_TimerToken token); 00734 #endif 00735 #ifndef Tcl_DeleteTrace_TCL_DECLARED 00736 #define Tcl_DeleteTrace_TCL_DECLARED 00737 /* 113 */ 00738 EXTERN void Tcl_DeleteTrace (Tcl_Interp * interp, 00739 Tcl_Trace trace); 00740 #endif 00741 #ifndef Tcl_DontCallWhenDeleted_TCL_DECLARED 00742 #define Tcl_DontCallWhenDeleted_TCL_DECLARED 00743 /* 114 */ 00744 EXTERN void Tcl_DontCallWhenDeleted (Tcl_Interp * interp, 00745 Tcl_InterpDeleteProc * proc, 00746 ClientData clientData); 00747 #endif 00748 #ifndef Tcl_DoOneEvent_TCL_DECLARED 00749 #define Tcl_DoOneEvent_TCL_DECLARED 00750 /* 115 */ 00751 EXTERN int Tcl_DoOneEvent (int flags); 00752 #endif 00753 #ifndef Tcl_DoWhenIdle_TCL_DECLARED 00754 #define Tcl_DoWhenIdle_TCL_DECLARED 00755 /* 116 */ 00756 EXTERN void Tcl_DoWhenIdle (Tcl_IdleProc * proc, 00757 ClientData clientData); 00758 #endif 00759 #ifndef Tcl_DStringAppend_TCL_DECLARED 00760 #define Tcl_DStringAppend_TCL_DECLARED 00761 /* 117 */ 00762 EXTERN char * Tcl_DStringAppend (Tcl_DString * dsPtr, 00763 CONST char * bytes, int length); 00764 #endif 00765 #ifndef Tcl_DStringAppendElement_TCL_DECLARED 00766 #define Tcl_DStringAppendElement_TCL_DECLARED 00767 /* 118 */ 00768 EXTERN char * Tcl_DStringAppendElement (Tcl_DString * dsPtr, 00769 CONST char * element); 00770 #endif 00771 #ifndef Tcl_DStringEndSublist_TCL_DECLARED 00772 #define Tcl_DStringEndSublist_TCL_DECLARED 00773 /* 119 */ 00774 EXTERN void Tcl_DStringEndSublist (Tcl_DString * dsPtr); 00775 #endif 00776 #ifndef Tcl_DStringFree_TCL_DECLARED 00777 #define Tcl_DStringFree_TCL_DECLARED 00778 /* 120 */ 00779 EXTERN void Tcl_DStringFree (Tcl_DString * dsPtr); 00780 #endif 00781 #ifndef Tcl_DStringGetResult_TCL_DECLARED 00782 #define Tcl_DStringGetResult_TCL_DECLARED 00783 /* 121 */ 00784 EXTERN void Tcl_DStringGetResult (Tcl_Interp * interp, 00785 Tcl_DString * dsPtr); 00786 #endif 00787 #ifndef Tcl_DStringInit_TCL_DECLARED 00788 #define Tcl_DStringInit_TCL_DECLARED 00789 /* 122 */ 00790 EXTERN void Tcl_DStringInit (Tcl_DString * dsPtr); 00791 #endif 00792 #ifndef Tcl_DStringResult_TCL_DECLARED 00793 #define Tcl_DStringResult_TCL_DECLARED 00794 /* 123 */ 00795 EXTERN void Tcl_DStringResult (Tcl_Interp * interp, 00796 Tcl_DString * dsPtr); 00797 #endif 00798 #ifndef Tcl_DStringSetLength_TCL_DECLARED 00799 #define Tcl_DStringSetLength_TCL_DECLARED 00800 /* 124 */ 00801 EXTERN void Tcl_DStringSetLength (Tcl_DString * dsPtr, 00802 int length); 00803 #endif 00804 #ifndef Tcl_DStringStartSublist_TCL_DECLARED 00805 #define Tcl_DStringStartSublist_TCL_DECLARED 00806 /* 125 */ 00807 EXTERN void Tcl_DStringStartSublist (Tcl_DString * dsPtr); 00808 #endif 00809 #ifndef Tcl_Eof_TCL_DECLARED 00810 #define Tcl_Eof_TCL_DECLARED 00811 /* 126 */ 00812 EXTERN int Tcl_Eof (Tcl_Channel chan); 00813 #endif 00814 #ifndef Tcl_ErrnoId_TCL_DECLARED 00815 #define Tcl_ErrnoId_TCL_DECLARED 00816 /* 127 */ 00817 EXTERN CONST84_RETURN char * Tcl_ErrnoId (void); 00818 #endif 00819 #ifndef Tcl_ErrnoMsg_TCL_DECLARED 00820 #define Tcl_ErrnoMsg_TCL_DECLARED 00821 /* 128 */ 00822 EXTERN CONST84_RETURN char * Tcl_ErrnoMsg (int err); 00823 #endif 00824 #ifndef Tcl_Eval_TCL_DECLARED 00825 #define Tcl_Eval_TCL_DECLARED 00826 /* 129 */ 00827 EXTERN int Tcl_Eval (Tcl_Interp * interp, CONST char * script); 00828 #endif 00829 #ifndef Tcl_EvalFile_TCL_DECLARED 00830 #define Tcl_EvalFile_TCL_DECLARED 00831 /* 130 */ 00832 EXTERN int Tcl_EvalFile (Tcl_Interp * interp, 00833 CONST char * fileName); 00834 #endif 00835 #ifndef Tcl_EvalObj_TCL_DECLARED 00836 #define Tcl_EvalObj_TCL_DECLARED 00837 /* 131 */ 00838 EXTERN int Tcl_EvalObj (Tcl_Interp * interp, Tcl_Obj * objPtr); 00839 #endif 00840 #ifndef Tcl_EventuallyFree_TCL_DECLARED 00841 #define Tcl_EventuallyFree_TCL_DECLARED 00842 /* 132 */ 00843 EXTERN void Tcl_EventuallyFree (ClientData clientData, 00844 Tcl_FreeProc * freeProc); 00845 #endif 00846 #ifndef Tcl_Exit_TCL_DECLARED 00847 #define Tcl_Exit_TCL_DECLARED 00848 /* 133 */ 00849 EXTERN void Tcl_Exit (int status); 00850 #endif 00851 #ifndef Tcl_ExposeCommand_TCL_DECLARED 00852 #define Tcl_ExposeCommand_TCL_DECLARED 00853 /* 134 */ 00854 EXTERN int Tcl_ExposeCommand (Tcl_Interp * interp, 00855 CONST char * hiddenCmdToken, 00856 CONST char * cmdName); 00857 #endif 00858 #ifndef Tcl_ExprBoolean_TCL_DECLARED 00859 #define Tcl_ExprBoolean_TCL_DECLARED 00860 /* 135 */ 00861 EXTERN int Tcl_ExprBoolean (Tcl_Interp * interp, 00862 CONST char * expr, int * ptr); 00863 #endif 00864 #ifndef Tcl_ExprBooleanObj_TCL_DECLARED 00865 #define Tcl_ExprBooleanObj_TCL_DECLARED 00866 /* 136 */ 00867 EXTERN int Tcl_ExprBooleanObj (Tcl_Interp * interp, 00868 Tcl_Obj * objPtr, int * ptr); 00869 #endif 00870 #ifndef Tcl_ExprDouble_TCL_DECLARED 00871 #define Tcl_ExprDouble_TCL_DECLARED 00872 /* 137 */ 00873 EXTERN int Tcl_ExprDouble (Tcl_Interp * interp, 00874 CONST char * expr, double * ptr); 00875 #endif 00876 #ifndef Tcl_ExprDoubleObj_TCL_DECLARED 00877 #define Tcl_ExprDoubleObj_TCL_DECLARED 00878 /* 138 */ 00879 EXTERN int Tcl_ExprDoubleObj (Tcl_Interp * interp, 00880 Tcl_Obj * objPtr, double * ptr); 00881 #endif 00882 #ifndef Tcl_ExprLong_TCL_DECLARED 00883 #define Tcl_ExprLong_TCL_DECLARED 00884 /* 139 */ 00885 EXTERN int Tcl_ExprLong (Tcl_Interp * interp, CONST char * expr, 00886 long * ptr); 00887 #endif 00888 #ifndef Tcl_ExprLongObj_TCL_DECLARED 00889 #define Tcl_ExprLongObj_TCL_DECLARED 00890 /* 140 */ 00891 EXTERN int Tcl_ExprLongObj (Tcl_Interp * interp, 00892 Tcl_Obj * objPtr, long * ptr); 00893 #endif 00894 #ifndef Tcl_ExprObj_TCL_DECLARED 00895 #define Tcl_ExprObj_TCL_DECLARED 00896 /* 141 */ 00897 EXTERN int Tcl_ExprObj (Tcl_Interp * interp, Tcl_Obj * objPtr, 00898 Tcl_Obj ** resultPtrPtr); 00899 #endif 00900 #ifndef Tcl_ExprString_TCL_DECLARED 00901 #define Tcl_ExprString_TCL_DECLARED 00902 /* 142 */ 00903 EXTERN int Tcl_ExprString (Tcl_Interp * interp, 00904 CONST char * expr); 00905 #endif 00906 #ifndef Tcl_Finalize_TCL_DECLARED 00907 #define Tcl_Finalize_TCL_DECLARED 00908 /* 143 */ 00909 EXTERN void Tcl_Finalize (void); 00910 #endif 00911 #ifndef Tcl_FindExecutable_TCL_DECLARED 00912 #define Tcl_FindExecutable_TCL_DECLARED 00913 /* 144 */ 00914 EXTERN void Tcl_FindExecutable (CONST char * argv0); 00915 #endif 00916 #ifndef Tcl_FirstHashEntry_TCL_DECLARED 00917 #define Tcl_FirstHashEntry_TCL_DECLARED 00918 /* 145 */ 00919 EXTERN Tcl_HashEntry * Tcl_FirstHashEntry (Tcl_HashTable * tablePtr, 00920 Tcl_HashSearch * searchPtr); 00921 #endif 00922 #ifndef Tcl_Flush_TCL_DECLARED 00923 #define Tcl_Flush_TCL_DECLARED 00924 /* 146 */ 00925 EXTERN int Tcl_Flush (Tcl_Channel chan); 00926 #endif 00927 #ifndef Tcl_FreeResult_TCL_DECLARED 00928 #define Tcl_FreeResult_TCL_DECLARED 00929 /* 147 */ 00930 EXTERN void Tcl_FreeResult (Tcl_Interp * interp); 00931 #endif 00932 #ifndef Tcl_GetAlias_TCL_DECLARED 00933 #define Tcl_GetAlias_TCL_DECLARED 00934 /* 148 */ 00935 EXTERN int Tcl_GetAlias (Tcl_Interp * interp, 00936 CONST char * slaveCmd, 00937 Tcl_Interp ** targetInterpPtr, 00938 CONST84 char ** targetCmdPtr, int * argcPtr, 00939 CONST84 char *** argvPtr); 00940 #endif 00941 #ifndef Tcl_GetAliasObj_TCL_DECLARED 00942 #define Tcl_GetAliasObj_TCL_DECLARED 00943 /* 149 */ 00944 EXTERN int Tcl_GetAliasObj (Tcl_Interp * interp, 00945 CONST char * slaveCmd, 00946 Tcl_Interp ** targetInterpPtr, 00947 CONST84 char ** targetCmdPtr, int * objcPtr, 00948 Tcl_Obj *** objv); 00949 #endif 00950 #ifndef Tcl_GetAssocData_TCL_DECLARED 00951 #define Tcl_GetAssocData_TCL_DECLARED 00952 /* 150 */ 00953 EXTERN ClientData Tcl_GetAssocData (Tcl_Interp * interp, 00954 CONST char * name, 00955 Tcl_InterpDeleteProc ** procPtr); 00956 #endif 00957 #ifndef Tcl_GetChannel_TCL_DECLARED 00958 #define Tcl_GetChannel_TCL_DECLARED 00959 /* 151 */ 00960 EXTERN Tcl_Channel Tcl_GetChannel (Tcl_Interp * interp, 00961 CONST char * chanName, int * modePtr); 00962 #endif 00963 #ifndef Tcl_GetChannelBufferSize_TCL_DECLARED 00964 #define Tcl_GetChannelBufferSize_TCL_DECLARED 00965 /* 152 */ 00966 EXTERN int Tcl_GetChannelBufferSize (Tcl_Channel chan); 00967 #endif 00968 #ifndef Tcl_GetChannelHandle_TCL_DECLARED 00969 #define Tcl_GetChannelHandle_TCL_DECLARED 00970 /* 153 */ 00971 EXTERN int Tcl_GetChannelHandle (Tcl_Channel chan, 00972 int direction, ClientData * handlePtr); 00973 #endif 00974 #ifndef Tcl_GetChannelInstanceData_TCL_DECLARED 00975 #define Tcl_GetChannelInstanceData_TCL_DECLARED 00976 /* 154 */ 00977 EXTERN ClientData Tcl_GetChannelInstanceData (Tcl_Channel chan); 00978 #endif 00979 #ifndef Tcl_GetChannelMode_TCL_DECLARED 00980 #define Tcl_GetChannelMode_TCL_DECLARED 00981 /* 155 */ 00982 EXTERN int Tcl_GetChannelMode (Tcl_Channel chan); 00983 #endif 00984 #ifndef Tcl_GetChannelName_TCL_DECLARED 00985 #define Tcl_GetChannelName_TCL_DECLARED 00986 /* 156 */ 00987 EXTERN CONST84_RETURN char * Tcl_GetChannelName (Tcl_Channel chan); 00988 #endif 00989 #ifndef Tcl_GetChannelOption_TCL_DECLARED 00990 #define Tcl_GetChannelOption_TCL_DECLARED 00991 /* 157 */ 00992 EXTERN int Tcl_GetChannelOption (Tcl_Interp * interp, 00993 Tcl_Channel chan, CONST char * optionName, 00994 Tcl_DString * dsPtr); 00995 #endif 00996 #ifndef Tcl_GetChannelType_TCL_DECLARED 00997 #define Tcl_GetChannelType_TCL_DECLARED 00998 /* 158 */ 00999 EXTERN Tcl_ChannelType * Tcl_GetChannelType (Tcl_Channel chan); 01000 #endif 01001 #ifndef Tcl_GetCommandInfo_TCL_DECLARED 01002 #define Tcl_GetCommandInfo_TCL_DECLARED 01003 /* 159 */ 01004 EXTERN int Tcl_GetCommandInfo (Tcl_Interp * interp, 01005 CONST char * cmdName, Tcl_CmdInfo * infoPtr); 01006 #endif 01007 #ifndef Tcl_GetCommandName_TCL_DECLARED 01008 #define Tcl_GetCommandName_TCL_DECLARED 01009 /* 160 */ 01010 EXTERN CONST84_RETURN char * Tcl_GetCommandName (Tcl_Interp * interp, 01011 Tcl_Command command); 01012 #endif 01013 #ifndef Tcl_GetErrno_TCL_DECLARED 01014 #define Tcl_GetErrno_TCL_DECLARED 01015 /* 161 */ 01016 EXTERN int Tcl_GetErrno (void); 01017 #endif 01018 #ifndef Tcl_GetHostName_TCL_DECLARED 01019 #define Tcl_GetHostName_TCL_DECLARED 01020 /* 162 */ 01021 EXTERN CONST84_RETURN char * Tcl_GetHostName (void); 01022 #endif 01023 #ifndef Tcl_GetInterpPath_TCL_DECLARED 01024 #define Tcl_GetInterpPath_TCL_DECLARED 01025 /* 163 */ 01026 EXTERN int Tcl_GetInterpPath (Tcl_Interp * askInterp, 01027 Tcl_Interp * slaveInterp); 01028 #endif 01029 #ifndef Tcl_GetMaster_TCL_DECLARED 01030 #define Tcl_GetMaster_TCL_DECLARED 01031 /* 164 */ 01032 EXTERN Tcl_Interp * Tcl_GetMaster (Tcl_Interp * interp); 01033 #endif 01034 #ifndef Tcl_GetNameOfExecutable_TCL_DECLARED 01035 #define Tcl_GetNameOfExecutable_TCL_DECLARED 01036 /* 165 */ 01037 EXTERN CONST char * Tcl_GetNameOfExecutable (void); 01038 #endif 01039 #ifndef Tcl_GetObjResult_TCL_DECLARED 01040 #define Tcl_GetObjResult_TCL_DECLARED 01041 /* 166 */ 01042 EXTERN Tcl_Obj * Tcl_GetObjResult (Tcl_Interp * interp); 01043 #endif 01044 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 01045 #ifndef Tcl_GetOpenFile_TCL_DECLARED 01046 #define Tcl_GetOpenFile_TCL_DECLARED 01047 /* 167 */ 01048 EXTERN int Tcl_GetOpenFile (Tcl_Interp * interp, 01049 CONST char * chanID, int forWriting, 01050 int checkUsage, ClientData * filePtr); 01051 #endif 01052 #endif /* UNIX */ 01053 #ifdef MAC_OSX_TCL /* MACOSX */ 01054 #ifndef Tcl_GetOpenFile_TCL_DECLARED 01055 #define Tcl_GetOpenFile_TCL_DECLARED 01056 /* 167 */ 01057 EXTERN int Tcl_GetOpenFile (Tcl_Interp * interp, 01058 CONST char * chanID, int forWriting, 01059 int checkUsage, ClientData * filePtr); 01060 #endif 01061 #endif /* MACOSX */ 01062 #ifndef Tcl_GetPathType_TCL_DECLARED 01063 #define Tcl_GetPathType_TCL_DECLARED 01064 /* 168 */ 01065 EXTERN Tcl_PathType Tcl_GetPathType (CONST char * path); 01066 #endif 01067 #ifndef Tcl_Gets_TCL_DECLARED 01068 #define Tcl_Gets_TCL_DECLARED 01069 /* 169 */ 01070 EXTERN int Tcl_Gets (Tcl_Channel chan, Tcl_DString * dsPtr); 01071 #endif 01072 #ifndef Tcl_GetsObj_TCL_DECLARED 01073 #define Tcl_GetsObj_TCL_DECLARED 01074 /* 170 */ 01075 EXTERN int Tcl_GetsObj (Tcl_Channel chan, Tcl_Obj * objPtr); 01076 #endif 01077 #ifndef Tcl_GetServiceMode_TCL_DECLARED 01078 #define Tcl_GetServiceMode_TCL_DECLARED 01079 /* 171 */ 01080 EXTERN int Tcl_GetServiceMode (void); 01081 #endif 01082 #ifndef Tcl_GetSlave_TCL_DECLARED 01083 #define Tcl_GetSlave_TCL_DECLARED 01084 /* 172 */ 01085 EXTERN Tcl_Interp * Tcl_GetSlave (Tcl_Interp * interp, 01086 CONST char * slaveName); 01087 #endif 01088 #ifndef Tcl_GetStdChannel_TCL_DECLARED 01089 #define Tcl_GetStdChannel_TCL_DECLARED 01090 /* 173 */ 01091 EXTERN Tcl_Channel Tcl_GetStdChannel (int type); 01092 #endif 01093 #ifndef Tcl_GetStringResult_TCL_DECLARED 01094 #define Tcl_GetStringResult_TCL_DECLARED 01095 /* 174 */ 01096 EXTERN CONST84_RETURN char * Tcl_GetStringResult (Tcl_Interp * interp); 01097 #endif 01098 #ifndef Tcl_GetVar_TCL_DECLARED 01099 #define Tcl_GetVar_TCL_DECLARED 01100 /* 175 */ 01101 EXTERN CONST84_RETURN char * Tcl_GetVar (Tcl_Interp * interp, 01102 CONST char * varName, int flags); 01103 #endif 01104 #ifndef Tcl_GetVar2_TCL_DECLARED 01105 #define Tcl_GetVar2_TCL_DECLARED 01106 /* 176 */ 01107 EXTERN CONST84_RETURN char * Tcl_GetVar2 (Tcl_Interp * interp, 01108 CONST char * part1, CONST char * part2, 01109 int flags); 01110 #endif 01111 #ifndef Tcl_GlobalEval_TCL_DECLARED 01112 #define Tcl_GlobalEval_TCL_DECLARED 01113 /* 177 */ 01114 EXTERN int Tcl_GlobalEval (Tcl_Interp * interp, 01115 CONST char * command); 01116 #endif 01117 #ifndef Tcl_GlobalEvalObj_TCL_DECLARED 01118 #define Tcl_GlobalEvalObj_TCL_DECLARED 01119 /* 178 */ 01120 EXTERN int Tcl_GlobalEvalObj (Tcl_Interp * interp, 01121 Tcl_Obj * objPtr); 01122 #endif 01123 #ifndef Tcl_HideCommand_TCL_DECLARED 01124 #define Tcl_HideCommand_TCL_DECLARED 01125 /* 179 */ 01126 EXTERN int Tcl_HideCommand (Tcl_Interp * interp, 01127 CONST char * cmdName, 01128 CONST char * hiddenCmdToken); 01129 #endif 01130 #ifndef Tcl_Init_TCL_DECLARED 01131 #define Tcl_Init_TCL_DECLARED 01132 /* 180 */ 01133 EXTERN int Tcl_Init (Tcl_Interp * interp); 01134 #endif 01135 #ifndef Tcl_InitHashTable_TCL_DECLARED 01136 #define Tcl_InitHashTable_TCL_DECLARED 01137 /* 181 */ 01138 EXTERN void Tcl_InitHashTable (Tcl_HashTable * tablePtr, 01139 int keyType); 01140 #endif 01141 #ifndef Tcl_InputBlocked_TCL_DECLARED 01142 #define Tcl_InputBlocked_TCL_DECLARED 01143 /* 182 */ 01144 EXTERN int Tcl_InputBlocked (Tcl_Channel chan); 01145 #endif 01146 #ifndef Tcl_InputBuffered_TCL_DECLARED 01147 #define Tcl_InputBuffered_TCL_DECLARED 01148 /* 183 */ 01149 EXTERN int Tcl_InputBuffered (Tcl_Channel chan); 01150 #endif 01151 #ifndef Tcl_InterpDeleted_TCL_DECLARED 01152 #define Tcl_InterpDeleted_TCL_DECLARED 01153 /* 184 */ 01154 EXTERN int Tcl_InterpDeleted (Tcl_Interp * interp); 01155 #endif 01156 #ifndef Tcl_IsSafe_TCL_DECLARED 01157 #define Tcl_IsSafe_TCL_DECLARED 01158 /* 185 */ 01159 EXTERN int Tcl_IsSafe (Tcl_Interp * interp); 01160 #endif 01161 #ifndef Tcl_JoinPath_TCL_DECLARED 01162 #define Tcl_JoinPath_TCL_DECLARED 01163 /* 186 */ 01164 EXTERN char * Tcl_JoinPath (int argc, CONST84 char * CONST * argv, 01165 Tcl_DString * resultPtr); 01166 #endif 01167 #ifndef Tcl_LinkVar_TCL_DECLARED 01168 #define Tcl_LinkVar_TCL_DECLARED 01169 /* 187 */ 01170 EXTERN int Tcl_LinkVar (Tcl_Interp * interp, 01171 CONST char * varName, char * addr, int type); 01172 #endif 01173 /* Slot 188 is reserved */ 01174 #ifndef Tcl_MakeFileChannel_TCL_DECLARED 01175 #define Tcl_MakeFileChannel_TCL_DECLARED 01176 /* 189 */ 01177 EXTERN Tcl_Channel Tcl_MakeFileChannel (ClientData handle, int mode); 01178 #endif 01179 #ifndef Tcl_MakeSafe_TCL_DECLARED 01180 #define Tcl_MakeSafe_TCL_DECLARED 01181 /* 190 */ 01182 EXTERN int Tcl_MakeSafe (Tcl_Interp * interp); 01183 #endif 01184 #ifndef Tcl_MakeTcpClientChannel_TCL_DECLARED 01185 #define Tcl_MakeTcpClientChannel_TCL_DECLARED 01186 /* 191 */ 01187 EXTERN Tcl_Channel Tcl_MakeTcpClientChannel (ClientData tcpSocket); 01188 #endif 01189 #ifndef Tcl_Merge_TCL_DECLARED 01190 #define Tcl_Merge_TCL_DECLARED 01191 /* 192 */ 01192 EXTERN char * Tcl_Merge (int argc, CONST84 char * CONST * argv); 01193 #endif 01194 #ifndef Tcl_NextHashEntry_TCL_DECLARED 01195 #define Tcl_NextHashEntry_TCL_DECLARED 01196 /* 193 */ 01197 EXTERN Tcl_HashEntry * Tcl_NextHashEntry (Tcl_HashSearch * searchPtr); 01198 #endif 01199 #ifndef Tcl_NotifyChannel_TCL_DECLARED 01200 #define Tcl_NotifyChannel_TCL_DECLARED 01201 /* 194 */ 01202 EXTERN void Tcl_NotifyChannel (Tcl_Channel channel, int mask); 01203 #endif 01204 #ifndef Tcl_ObjGetVar2_TCL_DECLARED 01205 #define Tcl_ObjGetVar2_TCL_DECLARED 01206 /* 195 */ 01207 EXTERN Tcl_Obj * Tcl_ObjGetVar2 (Tcl_Interp * interp, 01208 Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, 01209 int flags); 01210 #endif 01211 #ifndef Tcl_ObjSetVar2_TCL_DECLARED 01212 #define Tcl_ObjSetVar2_TCL_DECLARED 01213 /* 196 */ 01214 EXTERN Tcl_Obj * Tcl_ObjSetVar2 (Tcl_Interp * interp, 01215 Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, 01216 Tcl_Obj * newValuePtr, int flags); 01217 #endif 01218 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 01219 #ifndef Tcl_OpenCommandChannel_TCL_DECLARED 01220 #define Tcl_OpenCommandChannel_TCL_DECLARED 01221 /* 197 */ 01222 EXTERN Tcl_Channel Tcl_OpenCommandChannel (Tcl_Interp * interp, 01223 int argc, CONST84 char ** argv, int flags); 01224 #endif 01225 #endif /* UNIX */ 01226 #ifdef __WIN32__ /* WIN */ 01227 #ifndef Tcl_OpenCommandChannel_TCL_DECLARED 01228 #define Tcl_OpenCommandChannel_TCL_DECLARED 01229 /* 197 */ 01230 EXTERN Tcl_Channel Tcl_OpenCommandChannel (Tcl_Interp * interp, 01231 int argc, CONST84 char ** argv, int flags); 01232 #endif 01233 #endif /* WIN */ 01234 #ifdef MAC_OSX_TCL /* MACOSX */ 01235 #ifndef Tcl_OpenCommandChannel_TCL_DECLARED 01236 #define Tcl_OpenCommandChannel_TCL_DECLARED 01237 /* 197 */ 01238 EXTERN Tcl_Channel Tcl_OpenCommandChannel (Tcl_Interp * interp, 01239 int argc, CONST84 char ** argv, int flags); 01240 #endif 01241 #endif /* MACOSX */ 01242 #ifndef Tcl_OpenFileChannel_TCL_DECLARED 01243 #define Tcl_OpenFileChannel_TCL_DECLARED 01244 /* 198 */ 01245 EXTERN Tcl_Channel Tcl_OpenFileChannel (Tcl_Interp * interp, 01246 CONST char * fileName, 01247 CONST char * modeString, int permissions); 01248 #endif 01249 #ifndef Tcl_OpenTcpClient_TCL_DECLARED 01250 #define Tcl_OpenTcpClient_TCL_DECLARED 01251 /* 199 */ 01252 EXTERN Tcl_Channel Tcl_OpenTcpClient (Tcl_Interp * interp, int port, 01253 CONST char * address, CONST char * myaddr, 01254 int myport, int async); 01255 #endif 01256 #ifndef Tcl_OpenTcpServer_TCL_DECLARED 01257 #define Tcl_OpenTcpServer_TCL_DECLARED 01258 /* 200 */ 01259 EXTERN Tcl_Channel Tcl_OpenTcpServer (Tcl_Interp * interp, int port, 01260 CONST char * host, 01261 Tcl_TcpAcceptProc * acceptProc, 01262 ClientData callbackData); 01263 #endif 01264 #ifndef Tcl_Preserve_TCL_DECLARED 01265 #define Tcl_Preserve_TCL_DECLARED 01266 /* 201 */ 01267 EXTERN void Tcl_Preserve (ClientData data); 01268 #endif 01269 #ifndef Tcl_PrintDouble_TCL_DECLARED 01270 #define Tcl_PrintDouble_TCL_DECLARED 01271 /* 202 */ 01272 EXTERN void Tcl_PrintDouble (Tcl_Interp * interp, double value, 01273 char * dst); 01274 #endif 01275 #ifndef Tcl_PutEnv_TCL_DECLARED 01276 #define Tcl_PutEnv_TCL_DECLARED 01277 /* 203 */ 01278 EXTERN int Tcl_PutEnv (CONST char * assignment); 01279 #endif 01280 #ifndef Tcl_PosixError_TCL_DECLARED 01281 #define Tcl_PosixError_TCL_DECLARED 01282 /* 204 */ 01283 EXTERN CONST84_RETURN char * Tcl_PosixError (Tcl_Interp * interp); 01284 #endif 01285 #ifndef Tcl_QueueEvent_TCL_DECLARED 01286 #define Tcl_QueueEvent_TCL_DECLARED 01287 /* 205 */ 01288 EXTERN void Tcl_QueueEvent (Tcl_Event * evPtr, 01289 Tcl_QueuePosition position); 01290 #endif 01291 #ifndef Tcl_Read_TCL_DECLARED 01292 #define Tcl_Read_TCL_DECLARED 01293 /* 206 */ 01294 EXTERN int Tcl_Read (Tcl_Channel chan, char * bufPtr, 01295 int toRead); 01296 #endif 01297 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 01298 #ifndef Tcl_ReapDetachedProcs_TCL_DECLARED 01299 #define Tcl_ReapDetachedProcs_TCL_DECLARED 01300 /* 207 */ 01301 EXTERN void Tcl_ReapDetachedProcs (void); 01302 #endif 01303 #endif /* UNIX */ 01304 #ifdef __WIN32__ /* WIN */ 01305 #ifndef Tcl_ReapDetachedProcs_TCL_DECLARED 01306 #define Tcl_ReapDetachedProcs_TCL_DECLARED 01307 /* 207 */ 01308 EXTERN void Tcl_ReapDetachedProcs (void); 01309 #endif 01310 #endif /* WIN */ 01311 #ifdef MAC_OSX_TCL /* MACOSX */ 01312 #ifndef Tcl_ReapDetachedProcs_TCL_DECLARED 01313 #define Tcl_ReapDetachedProcs_TCL_DECLARED 01314 /* 207 */ 01315 EXTERN void Tcl_ReapDetachedProcs (void); 01316 #endif 01317 #endif /* MACOSX */ 01318 #ifndef Tcl_RecordAndEval_TCL_DECLARED 01319 #define Tcl_RecordAndEval_TCL_DECLARED 01320 /* 208 */ 01321 EXTERN int Tcl_RecordAndEval (Tcl_Interp * interp, 01322 CONST char * cmd, int flags); 01323 #endif 01324 #ifndef Tcl_RecordAndEvalObj_TCL_DECLARED 01325 #define Tcl_RecordAndEvalObj_TCL_DECLARED 01326 /* 209 */ 01327 EXTERN int Tcl_RecordAndEvalObj (Tcl_Interp * interp, 01328 Tcl_Obj * cmdPtr, int flags); 01329 #endif 01330 #ifndef Tcl_RegisterChannel_TCL_DECLARED 01331 #define Tcl_RegisterChannel_TCL_DECLARED 01332 /* 210 */ 01333 EXTERN void Tcl_RegisterChannel (Tcl_Interp * interp, 01334 Tcl_Channel chan); 01335 #endif 01336 #ifndef Tcl_RegisterObjType_TCL_DECLARED 01337 #define Tcl_RegisterObjType_TCL_DECLARED 01338 /* 211 */ 01339 EXTERN void Tcl_RegisterObjType (Tcl_ObjType * typePtr); 01340 #endif 01341 #ifndef Tcl_RegExpCompile_TCL_DECLARED 01342 #define Tcl_RegExpCompile_TCL_DECLARED 01343 /* 212 */ 01344 EXTERN Tcl_RegExp Tcl_RegExpCompile (Tcl_Interp * interp, 01345 CONST char * pattern); 01346 #endif 01347 #ifndef Tcl_RegExpExec_TCL_DECLARED 01348 #define Tcl_RegExpExec_TCL_DECLARED 01349 /* 213 */ 01350 EXTERN int Tcl_RegExpExec (Tcl_Interp * interp, 01351 Tcl_RegExp regexp, CONST char * text, 01352 CONST char * start); 01353 #endif 01354 #ifndef Tcl_RegExpMatch_TCL_DECLARED 01355 #define Tcl_RegExpMatch_TCL_DECLARED 01356 /* 214 */ 01357 EXTERN int Tcl_RegExpMatch (Tcl_Interp * interp, 01358 CONST char * text, CONST char * pattern); 01359 #endif 01360 #ifndef Tcl_RegExpRange_TCL_DECLARED 01361 #define Tcl_RegExpRange_TCL_DECLARED 01362 /* 215 */ 01363 EXTERN void Tcl_RegExpRange (Tcl_RegExp regexp, int index, 01364 CONST84 char ** startPtr, 01365 CONST84 char ** endPtr); 01366 #endif 01367 #ifndef Tcl_Release_TCL_DECLARED 01368 #define Tcl_Release_TCL_DECLARED 01369 /* 216 */ 01370 EXTERN void Tcl_Release (ClientData clientData); 01371 #endif 01372 #ifndef Tcl_ResetResult_TCL_DECLARED 01373 #define Tcl_ResetResult_TCL_DECLARED 01374 /* 217 */ 01375 EXTERN void Tcl_ResetResult (Tcl_Interp * interp); 01376 #endif 01377 #ifndef Tcl_ScanElement_TCL_DECLARED 01378 #define Tcl_ScanElement_TCL_DECLARED 01379 /* 218 */ 01380 EXTERN int Tcl_ScanElement (CONST char * str, int * flagPtr); 01381 #endif 01382 #ifndef Tcl_ScanCountedElement_TCL_DECLARED 01383 #define Tcl_ScanCountedElement_TCL_DECLARED 01384 /* 219 */ 01385 EXTERN int Tcl_ScanCountedElement (CONST char * str, int length, 01386 int * flagPtr); 01387 #endif 01388 #ifndef Tcl_SeekOld_TCL_DECLARED 01389 #define Tcl_SeekOld_TCL_DECLARED 01390 /* 220 */ 01391 EXTERN int Tcl_SeekOld (Tcl_Channel chan, int offset, int mode); 01392 #endif 01393 #ifndef Tcl_ServiceAll_TCL_DECLARED 01394 #define Tcl_ServiceAll_TCL_DECLARED 01395 /* 221 */ 01396 EXTERN int Tcl_ServiceAll (void); 01397 #endif 01398 #ifndef Tcl_ServiceEvent_TCL_DECLARED 01399 #define Tcl_ServiceEvent_TCL_DECLARED 01400 /* 222 */ 01401 EXTERN int Tcl_ServiceEvent (int flags); 01402 #endif 01403 #ifndef Tcl_SetAssocData_TCL_DECLARED 01404 #define Tcl_SetAssocData_TCL_DECLARED 01405 /* 223 */ 01406 EXTERN void Tcl_SetAssocData (Tcl_Interp * interp, 01407 CONST char * name, 01408 Tcl_InterpDeleteProc * proc, 01409 ClientData clientData); 01410 #endif 01411 #ifndef Tcl_SetChannelBufferSize_TCL_DECLARED 01412 #define Tcl_SetChannelBufferSize_TCL_DECLARED 01413 /* 224 */ 01414 EXTERN void Tcl_SetChannelBufferSize (Tcl_Channel chan, int sz); 01415 #endif 01416 #ifndef Tcl_SetChannelOption_TCL_DECLARED 01417 #define Tcl_SetChannelOption_TCL_DECLARED 01418 /* 225 */ 01419 EXTERN int Tcl_SetChannelOption (Tcl_Interp * interp, 01420 Tcl_Channel chan, CONST char * optionName, 01421 CONST char * newValue); 01422 #endif 01423 #ifndef Tcl_SetCommandInfo_TCL_DECLARED 01424 #define Tcl_SetCommandInfo_TCL_DECLARED 01425 /* 226 */ 01426 EXTERN int Tcl_SetCommandInfo (Tcl_Interp * interp, 01427 CONST char * cmdName, 01428 CONST Tcl_CmdInfo * infoPtr); 01429 #endif 01430 #ifndef Tcl_SetErrno_TCL_DECLARED 01431 #define Tcl_SetErrno_TCL_DECLARED 01432 /* 227 */ 01433 EXTERN void Tcl_SetErrno (int err); 01434 #endif 01435 #ifndef Tcl_SetErrorCode_TCL_DECLARED 01436 #define Tcl_SetErrorCode_TCL_DECLARED 01437 /* 228 */ 01438 EXTERN void Tcl_SetErrorCode (Tcl_Interp * interp, ...); 01439 #endif 01440 #ifndef Tcl_SetMaxBlockTime_TCL_DECLARED 01441 #define Tcl_SetMaxBlockTime_TCL_DECLARED 01442 /* 229 */ 01443 EXTERN void Tcl_SetMaxBlockTime (Tcl_Time * timePtr); 01444 #endif 01445 #ifndef Tcl_SetPanicProc_TCL_DECLARED 01446 #define Tcl_SetPanicProc_TCL_DECLARED 01447 /* 230 */ 01448 EXTERN void Tcl_SetPanicProc (Tcl_PanicProc * panicProc); 01449 #endif 01450 #ifndef Tcl_SetRecursionLimit_TCL_DECLARED 01451 #define Tcl_SetRecursionLimit_TCL_DECLARED 01452 /* 231 */ 01453 EXTERN int Tcl_SetRecursionLimit (Tcl_Interp * interp, 01454 int depth); 01455 #endif 01456 #ifndef Tcl_SetResult_TCL_DECLARED 01457 #define Tcl_SetResult_TCL_DECLARED 01458 /* 232 */ 01459 EXTERN void Tcl_SetResult (Tcl_Interp * interp, char * result, 01460 Tcl_FreeProc * freeProc); 01461 #endif 01462 #ifndef Tcl_SetServiceMode_TCL_DECLARED 01463 #define Tcl_SetServiceMode_TCL_DECLARED 01464 /* 233 */ 01465 EXTERN int Tcl_SetServiceMode (int mode); 01466 #endif 01467 #ifndef Tcl_SetObjErrorCode_TCL_DECLARED 01468 #define Tcl_SetObjErrorCode_TCL_DECLARED 01469 /* 234 */ 01470 EXTERN void Tcl_SetObjErrorCode (Tcl_Interp * interp, 01471 Tcl_Obj * errorObjPtr); 01472 #endif 01473 #ifndef Tcl_SetObjResult_TCL_DECLARED 01474 #define Tcl_SetObjResult_TCL_DECLARED 01475 /* 235 */ 01476 EXTERN void Tcl_SetObjResult (Tcl_Interp * interp, 01477 Tcl_Obj * resultObjPtr); 01478 #endif 01479 #ifndef Tcl_SetStdChannel_TCL_DECLARED 01480 #define Tcl_SetStdChannel_TCL_DECLARED 01481 /* 236 */ 01482 EXTERN void Tcl_SetStdChannel (Tcl_Channel channel, int type); 01483 #endif 01484 #ifndef Tcl_SetVar_TCL_DECLARED 01485 #define Tcl_SetVar_TCL_DECLARED 01486 /* 237 */ 01487 EXTERN CONST84_RETURN char * Tcl_SetVar (Tcl_Interp * interp, 01488 CONST char * varName, CONST char * newValue, 01489 int flags); 01490 #endif 01491 #ifndef Tcl_SetVar2_TCL_DECLARED 01492 #define Tcl_SetVar2_TCL_DECLARED 01493 /* 238 */ 01494 EXTERN CONST84_RETURN char * Tcl_SetVar2 (Tcl_Interp * interp, 01495 CONST char * part1, CONST char * part2, 01496 CONST char * newValue, int flags); 01497 #endif 01498 #ifndef Tcl_SignalId_TCL_DECLARED 01499 #define Tcl_SignalId_TCL_DECLARED 01500 /* 239 */ 01501 EXTERN CONST84_RETURN char * Tcl_SignalId (int sig); 01502 #endif 01503 #ifndef Tcl_SignalMsg_TCL_DECLARED 01504 #define Tcl_SignalMsg_TCL_DECLARED 01505 /* 240 */ 01506 EXTERN CONST84_RETURN char * Tcl_SignalMsg (int sig); 01507 #endif 01508 #ifndef Tcl_SourceRCFile_TCL_DECLARED 01509 #define Tcl_SourceRCFile_TCL_DECLARED 01510 /* 241 */ 01511 EXTERN void Tcl_SourceRCFile (Tcl_Interp * interp); 01512 #endif 01513 #ifndef Tcl_SplitList_TCL_DECLARED 01514 #define Tcl_SplitList_TCL_DECLARED 01515 /* 242 */ 01516 EXTERN int Tcl_SplitList (Tcl_Interp * interp, 01517 CONST char * listStr, int * argcPtr, 01518 CONST84 char *** argvPtr); 01519 #endif 01520 #ifndef Tcl_SplitPath_TCL_DECLARED 01521 #define Tcl_SplitPath_TCL_DECLARED 01522 /* 243 */ 01523 EXTERN void Tcl_SplitPath (CONST char * path, int * argcPtr, 01524 CONST84 char *** argvPtr); 01525 #endif 01526 #ifndef Tcl_StaticPackage_TCL_DECLARED 01527 #define Tcl_StaticPackage_TCL_DECLARED 01528 /* 244 */ 01529 EXTERN void Tcl_StaticPackage (Tcl_Interp * interp, 01530 CONST char * pkgName, 01531 Tcl_PackageInitProc * initProc, 01532 Tcl_PackageInitProc * safeInitProc); 01533 #endif 01534 #ifndef Tcl_StringMatch_TCL_DECLARED 01535 #define Tcl_StringMatch_TCL_DECLARED 01536 /* 245 */ 01537 EXTERN int Tcl_StringMatch (CONST char * str, 01538 CONST char * pattern); 01539 #endif 01540 #ifndef Tcl_TellOld_TCL_DECLARED 01541 #define Tcl_TellOld_TCL_DECLARED 01542 /* 246 */ 01543 EXTERN int Tcl_TellOld (Tcl_Channel chan); 01544 #endif 01545 #ifndef Tcl_TraceVar_TCL_DECLARED 01546 #define Tcl_TraceVar_TCL_DECLARED 01547 /* 247 */ 01548 EXTERN int Tcl_TraceVar (Tcl_Interp * interp, 01549 CONST char * varName, int flags, 01550 Tcl_VarTraceProc * proc, 01551 ClientData clientData); 01552 #endif 01553 #ifndef Tcl_TraceVar2_TCL_DECLARED 01554 #define Tcl_TraceVar2_TCL_DECLARED 01555 /* 248 */ 01556 EXTERN int Tcl_TraceVar2 (Tcl_Interp * interp, 01557 CONST char * part1, CONST char * part2, 01558 int flags, Tcl_VarTraceProc * proc, 01559 ClientData clientData); 01560 #endif 01561 #ifndef Tcl_TranslateFileName_TCL_DECLARED 01562 #define Tcl_TranslateFileName_TCL_DECLARED 01563 /* 249 */ 01564 EXTERN char * Tcl_TranslateFileName (Tcl_Interp * interp, 01565 CONST char * name, Tcl_DString * bufferPtr); 01566 #endif 01567 #ifndef Tcl_Ungets_TCL_DECLARED 01568 #define Tcl_Ungets_TCL_DECLARED 01569 /* 250 */ 01570 EXTERN int Tcl_Ungets (Tcl_Channel chan, CONST char * str, 01571 int len, int atHead); 01572 #endif 01573 #ifndef Tcl_UnlinkVar_TCL_DECLARED 01574 #define Tcl_UnlinkVar_TCL_DECLARED 01575 /* 251 */ 01576 EXTERN void Tcl_UnlinkVar (Tcl_Interp * interp, 01577 CONST char * varName); 01578 #endif 01579 #ifndef Tcl_UnregisterChannel_TCL_DECLARED 01580 #define Tcl_UnregisterChannel_TCL_DECLARED 01581 /* 252 */ 01582 EXTERN int Tcl_UnregisterChannel (Tcl_Interp * interp, 01583 Tcl_Channel chan); 01584 #endif 01585 #ifndef Tcl_UnsetVar_TCL_DECLARED 01586 #define Tcl_UnsetVar_TCL_DECLARED 01587 /* 253 */ 01588 EXTERN int Tcl_UnsetVar (Tcl_Interp * interp, 01589 CONST char * varName, int flags); 01590 #endif 01591 #ifndef Tcl_UnsetVar2_TCL_DECLARED 01592 #define Tcl_UnsetVar2_TCL_DECLARED 01593 /* 254 */ 01594 EXTERN int Tcl_UnsetVar2 (Tcl_Interp * interp, 01595 CONST char * part1, CONST char * part2, 01596 int flags); 01597 #endif 01598 #ifndef Tcl_UntraceVar_TCL_DECLARED 01599 #define Tcl_UntraceVar_TCL_DECLARED 01600 /* 255 */ 01601 EXTERN void Tcl_UntraceVar (Tcl_Interp * interp, 01602 CONST char * varName, int flags, 01603 Tcl_VarTraceProc * proc, 01604 ClientData clientData); 01605 #endif 01606 #ifndef Tcl_UntraceVar2_TCL_DECLARED 01607 #define Tcl_UntraceVar2_TCL_DECLARED 01608 /* 256 */ 01609 EXTERN void Tcl_UntraceVar2 (Tcl_Interp * interp, 01610 CONST char * part1, CONST char * part2, 01611 int flags, Tcl_VarTraceProc * proc, 01612 ClientData clientData); 01613 #endif 01614 #ifndef Tcl_UpdateLinkedVar_TCL_DECLARED 01615 #define Tcl_UpdateLinkedVar_TCL_DECLARED 01616 /* 257 */ 01617 EXTERN void Tcl_UpdateLinkedVar (Tcl_Interp * interp, 01618 CONST char * varName); 01619 #endif 01620 #ifndef Tcl_UpVar_TCL_DECLARED 01621 #define Tcl_UpVar_TCL_DECLARED 01622 /* 258 */ 01623 EXTERN int Tcl_UpVar (Tcl_Interp * interp, 01624 CONST char * frameName, CONST char * varName, 01625 CONST char * localName, int flags); 01626 #endif 01627 #ifndef Tcl_UpVar2_TCL_DECLARED 01628 #define Tcl_UpVar2_TCL_DECLARED 01629 /* 259 */ 01630 EXTERN int Tcl_UpVar2 (Tcl_Interp * interp, 01631 CONST char * frameName, CONST char * part1, 01632 CONST char * part2, CONST char * localName, 01633 int flags); 01634 #endif 01635 #ifndef Tcl_VarEval_TCL_DECLARED 01636 #define Tcl_VarEval_TCL_DECLARED 01637 /* 260 */ 01638 EXTERN int Tcl_VarEval (Tcl_Interp * interp, ...); 01639 #endif 01640 #ifndef Tcl_VarTraceInfo_TCL_DECLARED 01641 #define Tcl_VarTraceInfo_TCL_DECLARED 01642 /* 261 */ 01643 EXTERN ClientData Tcl_VarTraceInfo (Tcl_Interp * interp, 01644 CONST char * varName, int flags, 01645 Tcl_VarTraceProc * procPtr, 01646 ClientData prevClientData); 01647 #endif 01648 #ifndef Tcl_VarTraceInfo2_TCL_DECLARED 01649 #define Tcl_VarTraceInfo2_TCL_DECLARED 01650 /* 262 */ 01651 EXTERN ClientData Tcl_VarTraceInfo2 (Tcl_Interp * interp, 01652 CONST char * part1, CONST char * part2, 01653 int flags, Tcl_VarTraceProc * procPtr, 01654 ClientData prevClientData); 01655 #endif 01656 #ifndef Tcl_Write_TCL_DECLARED 01657 #define Tcl_Write_TCL_DECLARED 01658 /* 263 */ 01659 EXTERN int Tcl_Write (Tcl_Channel chan, CONST char * s, 01660 int slen); 01661 #endif 01662 #ifndef Tcl_WrongNumArgs_TCL_DECLARED 01663 #define Tcl_WrongNumArgs_TCL_DECLARED 01664 /* 264 */ 01665 EXTERN void Tcl_WrongNumArgs (Tcl_Interp * interp, int objc, 01666 Tcl_Obj *CONST objv[], CONST char * message); 01667 #endif 01668 #ifndef Tcl_DumpActiveMemory_TCL_DECLARED 01669 #define Tcl_DumpActiveMemory_TCL_DECLARED 01670 /* 265 */ 01671 EXTERN int Tcl_DumpActiveMemory (CONST char * fileName); 01672 #endif 01673 #ifndef Tcl_ValidateAllMemory_TCL_DECLARED 01674 #define Tcl_ValidateAllMemory_TCL_DECLARED 01675 /* 266 */ 01676 EXTERN void Tcl_ValidateAllMemory (CONST char * file, int line); 01677 #endif 01678 #ifndef Tcl_AppendResultVA_TCL_DECLARED 01679 #define Tcl_AppendResultVA_TCL_DECLARED 01680 /* 267 */ 01681 EXTERN void Tcl_AppendResultVA (Tcl_Interp * interp, 01682 va_list argList); 01683 #endif 01684 #ifndef Tcl_AppendStringsToObjVA_TCL_DECLARED 01685 #define Tcl_AppendStringsToObjVA_TCL_DECLARED 01686 /* 268 */ 01687 EXTERN void Tcl_AppendStringsToObjVA (Tcl_Obj * objPtr, 01688 va_list argList); 01689 #endif 01690 #ifndef Tcl_HashStats_TCL_DECLARED 01691 #define Tcl_HashStats_TCL_DECLARED 01692 /* 269 */ 01693 EXTERN CONST84_RETURN char * Tcl_HashStats (Tcl_HashTable * tablePtr); 01694 #endif 01695 #ifndef Tcl_ParseVar_TCL_DECLARED 01696 #define Tcl_ParseVar_TCL_DECLARED 01697 /* 270 */ 01698 EXTERN CONST84_RETURN char * Tcl_ParseVar (Tcl_Interp * interp, 01699 CONST char * start, CONST84 char ** termPtr); 01700 #endif 01701 #ifndef Tcl_PkgPresent_TCL_DECLARED 01702 #define Tcl_PkgPresent_TCL_DECLARED 01703 /* 271 */ 01704 EXTERN CONST84_RETURN char * Tcl_PkgPresent (Tcl_Interp * interp, 01705 CONST char * name, CONST char * version, 01706 int exact); 01707 #endif 01708 #ifndef Tcl_PkgPresentEx_TCL_DECLARED 01709 #define Tcl_PkgPresentEx_TCL_DECLARED 01710 /* 272 */ 01711 EXTERN CONST84_RETURN char * Tcl_PkgPresentEx (Tcl_Interp * interp, 01712 CONST char * name, CONST char * version, 01713 int exact, ClientData * clientDataPtr); 01714 #endif 01715 #ifndef Tcl_PkgProvide_TCL_DECLARED 01716 #define Tcl_PkgProvide_TCL_DECLARED 01717 /* 273 */ 01718 EXTERN int Tcl_PkgProvide (Tcl_Interp * interp, 01719 CONST char * name, CONST char * version); 01720 #endif 01721 #ifndef Tcl_PkgRequire_TCL_DECLARED 01722 #define Tcl_PkgRequire_TCL_DECLARED 01723 /* 274 */ 01724 EXTERN CONST84_RETURN char * Tcl_PkgRequire (Tcl_Interp * interp, 01725 CONST char * name, CONST char * version, 01726 int exact); 01727 #endif 01728 #ifndef Tcl_SetErrorCodeVA_TCL_DECLARED 01729 #define Tcl_SetErrorCodeVA_TCL_DECLARED 01730 /* 275 */ 01731 EXTERN void Tcl_SetErrorCodeVA (Tcl_Interp * interp, 01732 va_list argList); 01733 #endif 01734 #ifndef Tcl_VarEvalVA_TCL_DECLARED 01735 #define Tcl_VarEvalVA_TCL_DECLARED 01736 /* 276 */ 01737 EXTERN int Tcl_VarEvalVA (Tcl_Interp * interp, va_list argList); 01738 #endif 01739 #ifndef Tcl_WaitPid_TCL_DECLARED 01740 #define Tcl_WaitPid_TCL_DECLARED 01741 /* 277 */ 01742 EXTERN Tcl_Pid Tcl_WaitPid (Tcl_Pid pid, int * statPtr, int options); 01743 #endif 01744 #ifndef Tcl_PanicVA_TCL_DECLARED 01745 #define Tcl_PanicVA_TCL_DECLARED 01746 /* 278 */ 01747 EXTERN void Tcl_PanicVA (CONST char * format, va_list argList); 01748 #endif 01749 #ifndef Tcl_GetVersion_TCL_DECLARED 01750 #define Tcl_GetVersion_TCL_DECLARED 01751 /* 279 */ 01752 EXTERN void Tcl_GetVersion (int * major, int * minor, 01753 int * patchLevel, int * type); 01754 #endif 01755 #ifndef Tcl_InitMemory_TCL_DECLARED 01756 #define Tcl_InitMemory_TCL_DECLARED 01757 /* 280 */ 01758 EXTERN void Tcl_InitMemory (Tcl_Interp * interp); 01759 #endif 01760 #ifndef Tcl_StackChannel_TCL_DECLARED 01761 #define Tcl_StackChannel_TCL_DECLARED 01762 /* 281 */ 01763 EXTERN Tcl_Channel Tcl_StackChannel (Tcl_Interp * interp, 01764 Tcl_ChannelType * typePtr, 01765 ClientData instanceData, int mask, 01766 Tcl_Channel prevChan); 01767 #endif 01768 #ifndef Tcl_UnstackChannel_TCL_DECLARED 01769 #define Tcl_UnstackChannel_TCL_DECLARED 01770 /* 282 */ 01771 EXTERN int Tcl_UnstackChannel (Tcl_Interp * interp, 01772 Tcl_Channel chan); 01773 #endif 01774 #ifndef Tcl_GetStackedChannel_TCL_DECLARED 01775 #define Tcl_GetStackedChannel_TCL_DECLARED 01776 /* 283 */ 01777 EXTERN Tcl_Channel Tcl_GetStackedChannel (Tcl_Channel chan); 01778 #endif 01779 #ifndef Tcl_SetMainLoop_TCL_DECLARED 01780 #define Tcl_SetMainLoop_TCL_DECLARED 01781 /* 284 */ 01782 EXTERN void Tcl_SetMainLoop (Tcl_MainLoopProc * proc); 01783 #endif 01784 /* Slot 285 is reserved */ 01785 #ifndef Tcl_AppendObjToObj_TCL_DECLARED 01786 #define Tcl_AppendObjToObj_TCL_DECLARED 01787 /* 286 */ 01788 EXTERN void Tcl_AppendObjToObj (Tcl_Obj * objPtr, 01789 Tcl_Obj * appendObjPtr); 01790 #endif 01791 #ifndef Tcl_CreateEncoding_TCL_DECLARED 01792 #define Tcl_CreateEncoding_TCL_DECLARED 01793 /* 287 */ 01794 EXTERN Tcl_Encoding Tcl_CreateEncoding (const Tcl_EncodingType * typePtr); 01795 #endif 01796 #ifndef Tcl_CreateThreadExitHandler_TCL_DECLARED 01797 #define Tcl_CreateThreadExitHandler_TCL_DECLARED 01798 /* 288 */ 01799 EXTERN void Tcl_CreateThreadExitHandler (Tcl_ExitProc * proc, 01800 ClientData clientData); 01801 #endif 01802 #ifndef Tcl_DeleteThreadExitHandler_TCL_DECLARED 01803 #define Tcl_DeleteThreadExitHandler_TCL_DECLARED 01804 /* 289 */ 01805 EXTERN void Tcl_DeleteThreadExitHandler (Tcl_ExitProc * proc, 01806 ClientData clientData); 01807 #endif 01808 #ifndef Tcl_DiscardResult_TCL_DECLARED 01809 #define Tcl_DiscardResult_TCL_DECLARED 01810 /* 290 */ 01811 EXTERN void Tcl_DiscardResult (Tcl_SavedResult * statePtr); 01812 #endif 01813 #ifndef Tcl_EvalEx_TCL_DECLARED 01814 #define Tcl_EvalEx_TCL_DECLARED 01815 /* 291 */ 01816 EXTERN int Tcl_EvalEx (Tcl_Interp * interp, CONST char * script, 01817 int numBytes, int flags); 01818 #endif 01819 #ifndef Tcl_EvalObjv_TCL_DECLARED 01820 #define Tcl_EvalObjv_TCL_DECLARED 01821 /* 292 */ 01822 EXTERN int Tcl_EvalObjv (Tcl_Interp * interp, int objc, 01823 Tcl_Obj *CONST objv[], int flags); 01824 #endif 01825 #ifndef Tcl_EvalObjEx_TCL_DECLARED 01826 #define Tcl_EvalObjEx_TCL_DECLARED 01827 /* 293 */ 01828 EXTERN int Tcl_EvalObjEx (Tcl_Interp * interp, Tcl_Obj * objPtr, 01829 int flags); 01830 #endif 01831 #ifndef Tcl_ExitThread_TCL_DECLARED 01832 #define Tcl_ExitThread_TCL_DECLARED 01833 /* 294 */ 01834 EXTERN void Tcl_ExitThread (int status); 01835 #endif 01836 #ifndef Tcl_ExternalToUtf_TCL_DECLARED 01837 #define Tcl_ExternalToUtf_TCL_DECLARED 01838 /* 295 */ 01839 EXTERN int Tcl_ExternalToUtf (Tcl_Interp * interp, 01840 Tcl_Encoding encoding, CONST char * src, 01841 int srcLen, int flags, 01842 Tcl_EncodingState * statePtr, char * dst, 01843 int dstLen, int * srcReadPtr, 01844 int * dstWrotePtr, int * dstCharsPtr); 01845 #endif 01846 #ifndef Tcl_ExternalToUtfDString_TCL_DECLARED 01847 #define Tcl_ExternalToUtfDString_TCL_DECLARED 01848 /* 296 */ 01849 EXTERN char * Tcl_ExternalToUtfDString (Tcl_Encoding encoding, 01850 CONST char * src, int srcLen, 01851 Tcl_DString * dsPtr); 01852 #endif 01853 #ifndef Tcl_FinalizeThread_TCL_DECLARED 01854 #define Tcl_FinalizeThread_TCL_DECLARED 01855 /* 297 */ 01856 EXTERN void Tcl_FinalizeThread (void); 01857 #endif 01858 #ifndef Tcl_FinalizeNotifier_TCL_DECLARED 01859 #define Tcl_FinalizeNotifier_TCL_DECLARED 01860 /* 298 */ 01861 EXTERN void Tcl_FinalizeNotifier (ClientData clientData); 01862 #endif 01863 #ifndef Tcl_FreeEncoding_TCL_DECLARED 01864 #define Tcl_FreeEncoding_TCL_DECLARED 01865 /* 299 */ 01866 EXTERN void Tcl_FreeEncoding (Tcl_Encoding encoding); 01867 #endif 01868 #ifndef Tcl_GetCurrentThread_TCL_DECLARED 01869 #define Tcl_GetCurrentThread_TCL_DECLARED 01870 /* 300 */ 01871 EXTERN Tcl_ThreadId Tcl_GetCurrentThread (void); 01872 #endif 01873 #ifndef Tcl_GetEncoding_TCL_DECLARED 01874 #define Tcl_GetEncoding_TCL_DECLARED 01875 /* 301 */ 01876 EXTERN Tcl_Encoding Tcl_GetEncoding (Tcl_Interp * interp, 01877 CONST char * name); 01878 #endif 01879 #ifndef Tcl_GetEncodingName_TCL_DECLARED 01880 #define Tcl_GetEncodingName_TCL_DECLARED 01881 /* 302 */ 01882 EXTERN CONST84_RETURN char * Tcl_GetEncodingName (Tcl_Encoding encoding); 01883 #endif 01884 #ifndef Tcl_GetEncodingNames_TCL_DECLARED 01885 #define Tcl_GetEncodingNames_TCL_DECLARED 01886 /* 303 */ 01887 EXTERN void Tcl_GetEncodingNames (Tcl_Interp * interp); 01888 #endif 01889 #ifndef Tcl_GetIndexFromObjStruct_TCL_DECLARED 01890 #define Tcl_GetIndexFromObjStruct_TCL_DECLARED 01891 /* 304 */ 01892 EXTERN int Tcl_GetIndexFromObjStruct (Tcl_Interp * interp, 01893 Tcl_Obj * objPtr, CONST VOID * tablePtr, 01894 int offset, CONST char * msg, int flags, 01895 int * indexPtr); 01896 #endif 01897 #ifndef Tcl_GetThreadData_TCL_DECLARED 01898 #define Tcl_GetThreadData_TCL_DECLARED 01899 /* 305 */ 01900 EXTERN VOID * Tcl_GetThreadData (Tcl_ThreadDataKey * keyPtr, 01901 int size); 01902 #endif 01903 #ifndef Tcl_GetVar2Ex_TCL_DECLARED 01904 #define Tcl_GetVar2Ex_TCL_DECLARED 01905 /* 306 */ 01906 EXTERN Tcl_Obj * Tcl_GetVar2Ex (Tcl_Interp * interp, 01907 CONST char * part1, CONST char * part2, 01908 int flags); 01909 #endif 01910 #ifndef Tcl_InitNotifier_TCL_DECLARED 01911 #define Tcl_InitNotifier_TCL_DECLARED 01912 /* 307 */ 01913 EXTERN ClientData Tcl_InitNotifier (void); 01914 #endif 01915 #ifndef Tcl_MutexLock_TCL_DECLARED 01916 #define Tcl_MutexLock_TCL_DECLARED 01917 /* 308 */ 01918 EXTERN void Tcl_MutexLock (Tcl_Mutex * mutexPtr); 01919 #endif 01920 #ifndef Tcl_MutexUnlock_TCL_DECLARED 01921 #define Tcl_MutexUnlock_TCL_DECLARED 01922 /* 309 */ 01923 EXTERN void Tcl_MutexUnlock (Tcl_Mutex * mutexPtr); 01924 #endif 01925 #ifndef Tcl_ConditionNotify_TCL_DECLARED 01926 #define Tcl_ConditionNotify_TCL_DECLARED 01927 /* 310 */ 01928 EXTERN void Tcl_ConditionNotify (Tcl_Condition * condPtr); 01929 #endif 01930 #ifndef Tcl_ConditionWait_TCL_DECLARED 01931 #define Tcl_ConditionWait_TCL_DECLARED 01932 /* 311 */ 01933 EXTERN void Tcl_ConditionWait (Tcl_Condition * condPtr, 01934 Tcl_Mutex * mutexPtr, Tcl_Time * timePtr); 01935 #endif 01936 #ifndef Tcl_NumUtfChars_TCL_DECLARED 01937 #define Tcl_NumUtfChars_TCL_DECLARED 01938 /* 312 */ 01939 EXTERN int Tcl_NumUtfChars (CONST char * src, int length); 01940 #endif 01941 #ifndef Tcl_ReadChars_TCL_DECLARED 01942 #define Tcl_ReadChars_TCL_DECLARED 01943 /* 313 */ 01944 EXTERN int Tcl_ReadChars (Tcl_Channel channel, Tcl_Obj * objPtr, 01945 int charsToRead, int appendFlag); 01946 #endif 01947 #ifndef Tcl_RestoreResult_TCL_DECLARED 01948 #define Tcl_RestoreResult_TCL_DECLARED 01949 /* 314 */ 01950 EXTERN void Tcl_RestoreResult (Tcl_Interp * interp, 01951 Tcl_SavedResult * statePtr); 01952 #endif 01953 #ifndef Tcl_SaveResult_TCL_DECLARED 01954 #define Tcl_SaveResult_TCL_DECLARED 01955 /* 315 */ 01956 EXTERN void Tcl_SaveResult (Tcl_Interp * interp, 01957 Tcl_SavedResult * statePtr); 01958 #endif 01959 #ifndef Tcl_SetSystemEncoding_TCL_DECLARED 01960 #define Tcl_SetSystemEncoding_TCL_DECLARED 01961 /* 316 */ 01962 EXTERN int Tcl_SetSystemEncoding (Tcl_Interp * interp, 01963 CONST char * name); 01964 #endif 01965 #ifndef Tcl_SetVar2Ex_TCL_DECLARED 01966 #define Tcl_SetVar2Ex_TCL_DECLARED 01967 /* 317 */ 01968 EXTERN Tcl_Obj * Tcl_SetVar2Ex (Tcl_Interp * interp, 01969 CONST char * part1, CONST char * part2, 01970 Tcl_Obj * newValuePtr, int flags); 01971 #endif 01972 #ifndef Tcl_ThreadAlert_TCL_DECLARED 01973 #define Tcl_ThreadAlert_TCL_DECLARED 01974 /* 318 */ 01975 EXTERN void Tcl_ThreadAlert (Tcl_ThreadId threadId); 01976 #endif 01977 #ifndef Tcl_ThreadQueueEvent_TCL_DECLARED 01978 #define Tcl_ThreadQueueEvent_TCL_DECLARED 01979 /* 319 */ 01980 EXTERN void Tcl_ThreadQueueEvent (Tcl_ThreadId threadId, 01981 Tcl_Event* evPtr, Tcl_QueuePosition position); 01982 #endif 01983 #ifndef Tcl_UniCharAtIndex_TCL_DECLARED 01984 #define Tcl_UniCharAtIndex_TCL_DECLARED 01985 /* 320 */ 01986 EXTERN Tcl_UniChar Tcl_UniCharAtIndex (CONST char * src, int index); 01987 #endif 01988 #ifndef Tcl_UniCharToLower_TCL_DECLARED 01989 #define Tcl_UniCharToLower_TCL_DECLARED 01990 /* 321 */ 01991 EXTERN Tcl_UniChar Tcl_UniCharToLower (int ch); 01992 #endif 01993 #ifndef Tcl_UniCharToTitle_TCL_DECLARED 01994 #define Tcl_UniCharToTitle_TCL_DECLARED 01995 /* 322 */ 01996 EXTERN Tcl_UniChar Tcl_UniCharToTitle (int ch); 01997 #endif 01998 #ifndef Tcl_UniCharToUpper_TCL_DECLARED 01999 #define Tcl_UniCharToUpper_TCL_DECLARED 02000 /* 323 */ 02001 EXTERN Tcl_UniChar Tcl_UniCharToUpper (int ch); 02002 #endif 02003 #ifndef Tcl_UniCharToUtf_TCL_DECLARED 02004 #define Tcl_UniCharToUtf_TCL_DECLARED 02005 /* 324 */ 02006 EXTERN int Tcl_UniCharToUtf (int ch, char * buf); 02007 #endif 02008 #ifndef Tcl_UtfAtIndex_TCL_DECLARED 02009 #define Tcl_UtfAtIndex_TCL_DECLARED 02010 /* 325 */ 02011 EXTERN CONST84_RETURN char * Tcl_UtfAtIndex (CONST char * src, int index); 02012 #endif 02013 #ifndef Tcl_UtfCharComplete_TCL_DECLARED 02014 #define Tcl_UtfCharComplete_TCL_DECLARED 02015 /* 326 */ 02016 EXTERN int Tcl_UtfCharComplete (CONST char * src, int length); 02017 #endif 02018 #ifndef Tcl_UtfBackslash_TCL_DECLARED 02019 #define Tcl_UtfBackslash_TCL_DECLARED 02020 /* 327 */ 02021 EXTERN int Tcl_UtfBackslash (CONST char * src, int * readPtr, 02022 char * dst); 02023 #endif 02024 #ifndef Tcl_UtfFindFirst_TCL_DECLARED 02025 #define Tcl_UtfFindFirst_TCL_DECLARED 02026 /* 328 */ 02027 EXTERN CONST84_RETURN char * Tcl_UtfFindFirst (CONST char * src, int ch); 02028 #endif 02029 #ifndef Tcl_UtfFindLast_TCL_DECLARED 02030 #define Tcl_UtfFindLast_TCL_DECLARED 02031 /* 329 */ 02032 EXTERN CONST84_RETURN char * Tcl_UtfFindLast (CONST char * src, int ch); 02033 #endif 02034 #ifndef Tcl_UtfNext_TCL_DECLARED 02035 #define Tcl_UtfNext_TCL_DECLARED 02036 /* 330 */ 02037 EXTERN CONST84_RETURN char * Tcl_UtfNext (CONST char * src); 02038 #endif 02039 #ifndef Tcl_UtfPrev_TCL_DECLARED 02040 #define Tcl_UtfPrev_TCL_DECLARED 02041 /* 331 */ 02042 EXTERN CONST84_RETURN char * Tcl_UtfPrev (CONST char * src, 02043 CONST char * start); 02044 #endif 02045 #ifndef Tcl_UtfToExternal_TCL_DECLARED 02046 #define Tcl_UtfToExternal_TCL_DECLARED 02047 /* 332 */ 02048 EXTERN int Tcl_UtfToExternal (Tcl_Interp * interp, 02049 Tcl_Encoding encoding, CONST char * src, 02050 int srcLen, int flags, 02051 Tcl_EncodingState * statePtr, char * dst, 02052 int dstLen, int * srcReadPtr, 02053 int * dstWrotePtr, int * dstCharsPtr); 02054 #endif 02055 #ifndef Tcl_UtfToExternalDString_TCL_DECLARED 02056 #define Tcl_UtfToExternalDString_TCL_DECLARED 02057 /* 333 */ 02058 EXTERN char * Tcl_UtfToExternalDString (Tcl_Encoding encoding, 02059 CONST char * src, int srcLen, 02060 Tcl_DString * dsPtr); 02061 #endif 02062 #ifndef Tcl_UtfToLower_TCL_DECLARED 02063 #define Tcl_UtfToLower_TCL_DECLARED 02064 /* 334 */ 02065 EXTERN int Tcl_UtfToLower (char * src); 02066 #endif 02067 #ifndef Tcl_UtfToTitle_TCL_DECLARED 02068 #define Tcl_UtfToTitle_TCL_DECLARED 02069 /* 335 */ 02070 EXTERN int Tcl_UtfToTitle (char * src); 02071 #endif 02072 #ifndef Tcl_UtfToUniChar_TCL_DECLARED 02073 #define Tcl_UtfToUniChar_TCL_DECLARED 02074 /* 336 */ 02075 EXTERN int Tcl_UtfToUniChar (CONST char * src, 02076 Tcl_UniChar * chPtr); 02077 #endif 02078 #ifndef Tcl_UtfToUpper_TCL_DECLARED 02079 #define Tcl_UtfToUpper_TCL_DECLARED 02080 /* 337 */ 02081 EXTERN int Tcl_UtfToUpper (char * src); 02082 #endif 02083 #ifndef Tcl_WriteChars_TCL_DECLARED 02084 #define Tcl_WriteChars_TCL_DECLARED 02085 /* 338 */ 02086 EXTERN int Tcl_WriteChars (Tcl_Channel chan, CONST char * src, 02087 int srcLen); 02088 #endif 02089 #ifndef Tcl_WriteObj_TCL_DECLARED 02090 #define Tcl_WriteObj_TCL_DECLARED 02091 /* 339 */ 02092 EXTERN int Tcl_WriteObj (Tcl_Channel chan, Tcl_Obj * objPtr); 02093 #endif 02094 #ifndef Tcl_GetString_TCL_DECLARED 02095 #define Tcl_GetString_TCL_DECLARED 02096 /* 340 */ 02097 EXTERN char * Tcl_GetString (Tcl_Obj * objPtr); 02098 #endif 02099 #ifndef Tcl_GetDefaultEncodingDir_TCL_DECLARED 02100 #define Tcl_GetDefaultEncodingDir_TCL_DECLARED 02101 /* 341 */ 02102 EXTERN CONST84_RETURN char * Tcl_GetDefaultEncodingDir (void); 02103 #endif 02104 #ifndef Tcl_SetDefaultEncodingDir_TCL_DECLARED 02105 #define Tcl_SetDefaultEncodingDir_TCL_DECLARED 02106 /* 342 */ 02107 EXTERN void Tcl_SetDefaultEncodingDir (CONST char * path); 02108 #endif 02109 #ifndef Tcl_AlertNotifier_TCL_DECLARED 02110 #define Tcl_AlertNotifier_TCL_DECLARED 02111 /* 343 */ 02112 EXTERN void Tcl_AlertNotifier (ClientData clientData); 02113 #endif 02114 #ifndef Tcl_ServiceModeHook_TCL_DECLARED 02115 #define Tcl_ServiceModeHook_TCL_DECLARED 02116 /* 344 */ 02117 EXTERN void Tcl_ServiceModeHook (int mode); 02118 #endif 02119 #ifndef Tcl_UniCharIsAlnum_TCL_DECLARED 02120 #define Tcl_UniCharIsAlnum_TCL_DECLARED 02121 /* 345 */ 02122 EXTERN int Tcl_UniCharIsAlnum (int ch); 02123 #endif 02124 #ifndef Tcl_UniCharIsAlpha_TCL_DECLARED 02125 #define Tcl_UniCharIsAlpha_TCL_DECLARED 02126 /* 346 */ 02127 EXTERN int Tcl_UniCharIsAlpha (int ch); 02128 #endif 02129 #ifndef Tcl_UniCharIsDigit_TCL_DECLARED 02130 #define Tcl_UniCharIsDigit_TCL_DECLARED 02131 /* 347 */ 02132 EXTERN int Tcl_UniCharIsDigit (int ch); 02133 #endif 02134 #ifndef Tcl_UniCharIsLower_TCL_DECLARED 02135 #define Tcl_UniCharIsLower_TCL_DECLARED 02136 /* 348 */ 02137 EXTERN int Tcl_UniCharIsLower (int ch); 02138 #endif 02139 #ifndef Tcl_UniCharIsSpace_TCL_DECLARED 02140 #define Tcl_UniCharIsSpace_TCL_DECLARED 02141 /* 349 */ 02142 EXTERN int Tcl_UniCharIsSpace (int ch); 02143 #endif 02144 #ifndef Tcl_UniCharIsUpper_TCL_DECLARED 02145 #define Tcl_UniCharIsUpper_TCL_DECLARED 02146 /* 350 */ 02147 EXTERN int Tcl_UniCharIsUpper (int ch); 02148 #endif 02149 #ifndef Tcl_UniCharIsWordChar_TCL_DECLARED 02150 #define Tcl_UniCharIsWordChar_TCL_DECLARED 02151 /* 351 */ 02152 EXTERN int Tcl_UniCharIsWordChar (int ch); 02153 #endif 02154 #ifndef Tcl_UniCharLen_TCL_DECLARED 02155 #define Tcl_UniCharLen_TCL_DECLARED 02156 /* 352 */ 02157 EXTERN int Tcl_UniCharLen (CONST Tcl_UniChar * uniStr); 02158 #endif 02159 #ifndef Tcl_UniCharNcmp_TCL_DECLARED 02160 #define Tcl_UniCharNcmp_TCL_DECLARED 02161 /* 353 */ 02162 EXTERN int Tcl_UniCharNcmp (CONST Tcl_UniChar * ucs, 02163 CONST Tcl_UniChar * uct, 02164 unsigned long numChars); 02165 #endif 02166 #ifndef Tcl_UniCharToUtfDString_TCL_DECLARED 02167 #define Tcl_UniCharToUtfDString_TCL_DECLARED 02168 /* 354 */ 02169 EXTERN char * Tcl_UniCharToUtfDString (CONST Tcl_UniChar * uniStr, 02170 int uniLength, Tcl_DString * dsPtr); 02171 #endif 02172 #ifndef Tcl_UtfToUniCharDString_TCL_DECLARED 02173 #define Tcl_UtfToUniCharDString_TCL_DECLARED 02174 /* 355 */ 02175 EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString (CONST char * src, 02176 int length, Tcl_DString * dsPtr); 02177 #endif 02178 #ifndef Tcl_GetRegExpFromObj_TCL_DECLARED 02179 #define Tcl_GetRegExpFromObj_TCL_DECLARED 02180 /* 356 */ 02181 EXTERN Tcl_RegExp Tcl_GetRegExpFromObj (Tcl_Interp * interp, 02182 Tcl_Obj * patObj, int flags); 02183 #endif 02184 #ifndef Tcl_EvalTokens_TCL_DECLARED 02185 #define Tcl_EvalTokens_TCL_DECLARED 02186 /* 357 */ 02187 EXTERN Tcl_Obj * Tcl_EvalTokens (Tcl_Interp * interp, 02188 Tcl_Token * tokenPtr, int count); 02189 #endif 02190 #ifndef Tcl_FreeParse_TCL_DECLARED 02191 #define Tcl_FreeParse_TCL_DECLARED 02192 /* 358 */ 02193 EXTERN void Tcl_FreeParse (Tcl_Parse * parsePtr); 02194 #endif 02195 #ifndef Tcl_LogCommandInfo_TCL_DECLARED 02196 #define Tcl_LogCommandInfo_TCL_DECLARED 02197 /* 359 */ 02198 EXTERN void Tcl_LogCommandInfo (Tcl_Interp * interp, 02199 CONST char * script, CONST char * command, 02200 int length); 02201 #endif 02202 #ifndef Tcl_ParseBraces_TCL_DECLARED 02203 #define Tcl_ParseBraces_TCL_DECLARED 02204 /* 360 */ 02205 EXTERN int Tcl_ParseBraces (Tcl_Interp * interp, 02206 CONST char * start, int numBytes, 02207 Tcl_Parse * parsePtr, int append, 02208 CONST84 char ** termPtr); 02209 #endif 02210 #ifndef Tcl_ParseCommand_TCL_DECLARED 02211 #define Tcl_ParseCommand_TCL_DECLARED 02212 /* 361 */ 02213 EXTERN int Tcl_ParseCommand (Tcl_Interp * interp, 02214 CONST char * start, int numBytes, int nested, 02215 Tcl_Parse * parsePtr); 02216 #endif 02217 #ifndef Tcl_ParseExpr_TCL_DECLARED 02218 #define Tcl_ParseExpr_TCL_DECLARED 02219 /* 362 */ 02220 EXTERN int Tcl_ParseExpr (Tcl_Interp * interp, 02221 CONST char * start, int numBytes, 02222 Tcl_Parse * parsePtr); 02223 #endif 02224 #ifndef Tcl_ParseQuotedString_TCL_DECLARED 02225 #define Tcl_ParseQuotedString_TCL_DECLARED 02226 /* 363 */ 02227 EXTERN int Tcl_ParseQuotedString (Tcl_Interp * interp, 02228 CONST char * start, int numBytes, 02229 Tcl_Parse * parsePtr, int append, 02230 CONST84 char ** termPtr); 02231 #endif 02232 #ifndef Tcl_ParseVarName_TCL_DECLARED 02233 #define Tcl_ParseVarName_TCL_DECLARED 02234 /* 364 */ 02235 EXTERN int Tcl_ParseVarName (Tcl_Interp * interp, 02236 CONST char * start, int numBytes, 02237 Tcl_Parse * parsePtr, int append); 02238 #endif 02239 #ifndef Tcl_GetCwd_TCL_DECLARED 02240 #define Tcl_GetCwd_TCL_DECLARED 02241 /* 365 */ 02242 EXTERN char * Tcl_GetCwd (Tcl_Interp * interp, 02243 Tcl_DString * cwdPtr); 02244 #endif 02245 #ifndef Tcl_Chdir_TCL_DECLARED 02246 #define Tcl_Chdir_TCL_DECLARED 02247 /* 366 */ 02248 EXTERN int Tcl_Chdir (CONST char * dirName); 02249 #endif 02250 #ifndef Tcl_Access_TCL_DECLARED 02251 #define Tcl_Access_TCL_DECLARED 02252 /* 367 */ 02253 EXTERN int Tcl_Access (CONST char * path, int mode); 02254 #endif 02255 #ifndef Tcl_Stat_TCL_DECLARED 02256 #define Tcl_Stat_TCL_DECLARED 02257 /* 368 */ 02258 EXTERN int Tcl_Stat (CONST char * path, struct stat * bufPtr); 02259 #endif 02260 #ifndef Tcl_UtfNcmp_TCL_DECLARED 02261 #define Tcl_UtfNcmp_TCL_DECLARED 02262 /* 369 */ 02263 EXTERN int Tcl_UtfNcmp (CONST char * s1, CONST char * s2, 02264 unsigned long n); 02265 #endif 02266 #ifndef Tcl_UtfNcasecmp_TCL_DECLARED 02267 #define Tcl_UtfNcasecmp_TCL_DECLARED 02268 /* 370 */ 02269 EXTERN int Tcl_UtfNcasecmp (CONST char * s1, CONST char * s2, 02270 unsigned long n); 02271 #endif 02272 #ifndef Tcl_StringCaseMatch_TCL_DECLARED 02273 #define Tcl_StringCaseMatch_TCL_DECLARED 02274 /* 371 */ 02275 EXTERN int Tcl_StringCaseMatch (CONST char * str, 02276 CONST char * pattern, int nocase); 02277 #endif 02278 #ifndef Tcl_UniCharIsControl_TCL_DECLARED 02279 #define Tcl_UniCharIsControl_TCL_DECLARED 02280 /* 372 */ 02281 EXTERN int Tcl_UniCharIsControl (int ch); 02282 #endif 02283 #ifndef Tcl_UniCharIsGraph_TCL_DECLARED 02284 #define Tcl_UniCharIsGraph_TCL_DECLARED 02285 /* 373 */ 02286 EXTERN int Tcl_UniCharIsGraph (int ch); 02287 #endif 02288 #ifndef Tcl_UniCharIsPrint_TCL_DECLARED 02289 #define Tcl_UniCharIsPrint_TCL_DECLARED 02290 /* 374 */ 02291 EXTERN int Tcl_UniCharIsPrint (int ch); 02292 #endif 02293 #ifndef Tcl_UniCharIsPunct_TCL_DECLARED 02294 #define Tcl_UniCharIsPunct_TCL_DECLARED 02295 /* 375 */ 02296 EXTERN int Tcl_UniCharIsPunct (int ch); 02297 #endif 02298 #ifndef Tcl_RegExpExecObj_TCL_DECLARED 02299 #define Tcl_RegExpExecObj_TCL_DECLARED 02300 /* 376 */ 02301 EXTERN int Tcl_RegExpExecObj (Tcl_Interp * interp, 02302 Tcl_RegExp regexp, Tcl_Obj * textObj, 02303 int offset, int nmatches, int flags); 02304 #endif 02305 #ifndef Tcl_RegExpGetInfo_TCL_DECLARED 02306 #define Tcl_RegExpGetInfo_TCL_DECLARED 02307 /* 377 */ 02308 EXTERN void Tcl_RegExpGetInfo (Tcl_RegExp regexp, 02309 Tcl_RegExpInfo * infoPtr); 02310 #endif 02311 #ifndef Tcl_NewUnicodeObj_TCL_DECLARED 02312 #define Tcl_NewUnicodeObj_TCL_DECLARED 02313 /* 378 */ 02314 EXTERN Tcl_Obj * Tcl_NewUnicodeObj (CONST Tcl_UniChar * unicode, 02315 int numChars); 02316 #endif 02317 #ifndef Tcl_SetUnicodeObj_TCL_DECLARED 02318 #define Tcl_SetUnicodeObj_TCL_DECLARED 02319 /* 379 */ 02320 EXTERN void Tcl_SetUnicodeObj (Tcl_Obj * objPtr, 02321 CONST Tcl_UniChar * unicode, int numChars); 02322 #endif 02323 #ifndef Tcl_GetCharLength_TCL_DECLARED 02324 #define Tcl_GetCharLength_TCL_DECLARED 02325 /* 380 */ 02326 EXTERN int Tcl_GetCharLength (Tcl_Obj * objPtr); 02327 #endif 02328 #ifndef Tcl_GetUniChar_TCL_DECLARED 02329 #define Tcl_GetUniChar_TCL_DECLARED 02330 /* 381 */ 02331 EXTERN Tcl_UniChar Tcl_GetUniChar (Tcl_Obj * objPtr, int index); 02332 #endif 02333 #ifndef Tcl_GetUnicode_TCL_DECLARED 02334 #define Tcl_GetUnicode_TCL_DECLARED 02335 /* 382 */ 02336 EXTERN Tcl_UniChar * Tcl_GetUnicode (Tcl_Obj * objPtr); 02337 #endif 02338 #ifndef Tcl_GetRange_TCL_DECLARED 02339 #define Tcl_GetRange_TCL_DECLARED 02340 /* 383 */ 02341 EXTERN Tcl_Obj * Tcl_GetRange (Tcl_Obj * objPtr, int first, int last); 02342 #endif 02343 #ifndef Tcl_AppendUnicodeToObj_TCL_DECLARED 02344 #define Tcl_AppendUnicodeToObj_TCL_DECLARED 02345 /* 384 */ 02346 EXTERN void Tcl_AppendUnicodeToObj (Tcl_Obj * objPtr, 02347 CONST Tcl_UniChar * unicode, int length); 02348 #endif 02349 #ifndef Tcl_RegExpMatchObj_TCL_DECLARED 02350 #define Tcl_RegExpMatchObj_TCL_DECLARED 02351 /* 385 */ 02352 EXTERN int Tcl_RegExpMatchObj (Tcl_Interp * interp, 02353 Tcl_Obj * textObj, Tcl_Obj * patternObj); 02354 #endif 02355 #ifndef Tcl_SetNotifier_TCL_DECLARED 02356 #define Tcl_SetNotifier_TCL_DECLARED 02357 /* 386 */ 02358 EXTERN void Tcl_SetNotifier (Tcl_NotifierProcs * notifierProcPtr); 02359 #endif 02360 #ifndef Tcl_GetAllocMutex_TCL_DECLARED 02361 #define Tcl_GetAllocMutex_TCL_DECLARED 02362 /* 387 */ 02363 EXTERN Tcl_Mutex * Tcl_GetAllocMutex (void); 02364 #endif 02365 #ifndef Tcl_GetChannelNames_TCL_DECLARED 02366 #define Tcl_GetChannelNames_TCL_DECLARED 02367 /* 388 */ 02368 EXTERN int Tcl_GetChannelNames (Tcl_Interp * interp); 02369 #endif 02370 #ifndef Tcl_GetChannelNamesEx_TCL_DECLARED 02371 #define Tcl_GetChannelNamesEx_TCL_DECLARED 02372 /* 389 */ 02373 EXTERN int Tcl_GetChannelNamesEx (Tcl_Interp * interp, 02374 CONST char * pattern); 02375 #endif 02376 #ifndef Tcl_ProcObjCmd_TCL_DECLARED 02377 #define Tcl_ProcObjCmd_TCL_DECLARED 02378 /* 390 */ 02379 EXTERN int Tcl_ProcObjCmd (ClientData clientData, 02380 Tcl_Interp * interp, int objc, 02381 Tcl_Obj *CONST objv[]); 02382 #endif 02383 #ifndef Tcl_ConditionFinalize_TCL_DECLARED 02384 #define Tcl_ConditionFinalize_TCL_DECLARED 02385 /* 391 */ 02386 EXTERN void Tcl_ConditionFinalize (Tcl_Condition * condPtr); 02387 #endif 02388 #ifndef Tcl_MutexFinalize_TCL_DECLARED 02389 #define Tcl_MutexFinalize_TCL_DECLARED 02390 /* 392 */ 02391 EXTERN void Tcl_MutexFinalize (Tcl_Mutex * mutex); 02392 #endif 02393 #ifndef Tcl_CreateThread_TCL_DECLARED 02394 #define Tcl_CreateThread_TCL_DECLARED 02395 /* 393 */ 02396 EXTERN int Tcl_CreateThread (Tcl_ThreadId * idPtr, 02397 Tcl_ThreadCreateProc proc, 02398 ClientData clientData, int stackSize, 02399 int flags); 02400 #endif 02401 #ifndef Tcl_ReadRaw_TCL_DECLARED 02402 #define Tcl_ReadRaw_TCL_DECLARED 02403 /* 394 */ 02404 EXTERN int Tcl_ReadRaw (Tcl_Channel chan, char * dst, 02405 int bytesToRead); 02406 #endif 02407 #ifndef Tcl_WriteRaw_TCL_DECLARED 02408 #define Tcl_WriteRaw_TCL_DECLARED 02409 /* 395 */ 02410 EXTERN int Tcl_WriteRaw (Tcl_Channel chan, CONST char * src, 02411 int srcLen); 02412 #endif 02413 #ifndef Tcl_GetTopChannel_TCL_DECLARED 02414 #define Tcl_GetTopChannel_TCL_DECLARED 02415 /* 396 */ 02416 EXTERN Tcl_Channel Tcl_GetTopChannel (Tcl_Channel chan); 02417 #endif 02418 #ifndef Tcl_ChannelBuffered_TCL_DECLARED 02419 #define Tcl_ChannelBuffered_TCL_DECLARED 02420 /* 397 */ 02421 EXTERN int Tcl_ChannelBuffered (Tcl_Channel chan); 02422 #endif 02423 #ifndef Tcl_ChannelName_TCL_DECLARED 02424 #define Tcl_ChannelName_TCL_DECLARED 02425 /* 398 */ 02426 EXTERN CONST84_RETURN char * Tcl_ChannelName ( 02427 CONST Tcl_ChannelType * chanTypePtr); 02428 #endif 02429 #ifndef Tcl_ChannelVersion_TCL_DECLARED 02430 #define Tcl_ChannelVersion_TCL_DECLARED 02431 /* 399 */ 02432 EXTERN Tcl_ChannelTypeVersion Tcl_ChannelVersion ( 02433 CONST Tcl_ChannelType * chanTypePtr); 02434 #endif 02435 #ifndef Tcl_ChannelBlockModeProc_TCL_DECLARED 02436 #define Tcl_ChannelBlockModeProc_TCL_DECLARED 02437 /* 400 */ 02438 EXTERN Tcl_DriverBlockModeProc * Tcl_ChannelBlockModeProc ( 02439 CONST Tcl_ChannelType * chanTypePtr); 02440 #endif 02441 #ifndef Tcl_ChannelCloseProc_TCL_DECLARED 02442 #define Tcl_ChannelCloseProc_TCL_DECLARED 02443 /* 401 */ 02444 EXTERN Tcl_DriverCloseProc * Tcl_ChannelCloseProc ( 02445 CONST Tcl_ChannelType * chanTypePtr); 02446 #endif 02447 #ifndef Tcl_ChannelClose2Proc_TCL_DECLARED 02448 #define Tcl_ChannelClose2Proc_TCL_DECLARED 02449 /* 402 */ 02450 EXTERN Tcl_DriverClose2Proc * Tcl_ChannelClose2Proc ( 02451 CONST Tcl_ChannelType * chanTypePtr); 02452 #endif 02453 #ifndef Tcl_ChannelInputProc_TCL_DECLARED 02454 #define Tcl_ChannelInputProc_TCL_DECLARED 02455 /* 403 */ 02456 EXTERN Tcl_DriverInputProc * Tcl_ChannelInputProc ( 02457 CONST Tcl_ChannelType * chanTypePtr); 02458 #endif 02459 #ifndef Tcl_ChannelOutputProc_TCL_DECLARED 02460 #define Tcl_ChannelOutputProc_TCL_DECLARED 02461 /* 404 */ 02462 EXTERN Tcl_DriverOutputProc * Tcl_ChannelOutputProc ( 02463 CONST Tcl_ChannelType * chanTypePtr); 02464 #endif 02465 #ifndef Tcl_ChannelSeekProc_TCL_DECLARED 02466 #define Tcl_ChannelSeekProc_TCL_DECLARED 02467 /* 405 */ 02468 EXTERN Tcl_DriverSeekProc * Tcl_ChannelSeekProc ( 02469 CONST Tcl_ChannelType * chanTypePtr); 02470 #endif 02471 #ifndef Tcl_ChannelSetOptionProc_TCL_DECLARED 02472 #define Tcl_ChannelSetOptionProc_TCL_DECLARED 02473 /* 406 */ 02474 EXTERN Tcl_DriverSetOptionProc * Tcl_ChannelSetOptionProc ( 02475 CONST Tcl_ChannelType * chanTypePtr); 02476 #endif 02477 #ifndef Tcl_ChannelGetOptionProc_TCL_DECLARED 02478 #define Tcl_ChannelGetOptionProc_TCL_DECLARED 02479 /* 407 */ 02480 EXTERN Tcl_DriverGetOptionProc * Tcl_ChannelGetOptionProc ( 02481 CONST Tcl_ChannelType * chanTypePtr); 02482 #endif 02483 #ifndef Tcl_ChannelWatchProc_TCL_DECLARED 02484 #define Tcl_ChannelWatchProc_TCL_DECLARED 02485 /* 408 */ 02486 EXTERN Tcl_DriverWatchProc * Tcl_ChannelWatchProc ( 02487 CONST Tcl_ChannelType * chanTypePtr); 02488 #endif 02489 #ifndef Tcl_ChannelGetHandleProc_TCL_DECLARED 02490 #define Tcl_ChannelGetHandleProc_TCL_DECLARED 02491 /* 409 */ 02492 EXTERN Tcl_DriverGetHandleProc * Tcl_ChannelGetHandleProc ( 02493 CONST Tcl_ChannelType * chanTypePtr); 02494 #endif 02495 #ifndef Tcl_ChannelFlushProc_TCL_DECLARED 02496 #define Tcl_ChannelFlushProc_TCL_DECLARED 02497 /* 410 */ 02498 EXTERN Tcl_DriverFlushProc * Tcl_ChannelFlushProc ( 02499 CONST Tcl_ChannelType * chanTypePtr); 02500 #endif 02501 #ifndef Tcl_ChannelHandlerProc_TCL_DECLARED 02502 #define Tcl_ChannelHandlerProc_TCL_DECLARED 02503 /* 411 */ 02504 EXTERN Tcl_DriverHandlerProc * Tcl_ChannelHandlerProc ( 02505 CONST Tcl_ChannelType * chanTypePtr); 02506 #endif 02507 #ifndef Tcl_JoinThread_TCL_DECLARED 02508 #define Tcl_JoinThread_TCL_DECLARED 02509 /* 412 */ 02510 EXTERN int Tcl_JoinThread (Tcl_ThreadId threadId, int* result); 02511 #endif 02512 #ifndef Tcl_IsChannelShared_TCL_DECLARED 02513 #define Tcl_IsChannelShared_TCL_DECLARED 02514 /* 413 */ 02515 EXTERN int Tcl_IsChannelShared (Tcl_Channel channel); 02516 #endif 02517 #ifndef Tcl_IsChannelRegistered_TCL_DECLARED 02518 #define Tcl_IsChannelRegistered_TCL_DECLARED 02519 /* 414 */ 02520 EXTERN int Tcl_IsChannelRegistered (Tcl_Interp* interp, 02521 Tcl_Channel channel); 02522 #endif 02523 #ifndef Tcl_CutChannel_TCL_DECLARED 02524 #define Tcl_CutChannel_TCL_DECLARED 02525 /* 415 */ 02526 EXTERN void Tcl_CutChannel (Tcl_Channel channel); 02527 #endif 02528 #ifndef Tcl_SpliceChannel_TCL_DECLARED 02529 #define Tcl_SpliceChannel_TCL_DECLARED 02530 /* 416 */ 02531 EXTERN void Tcl_SpliceChannel (Tcl_Channel channel); 02532 #endif 02533 #ifndef Tcl_ClearChannelHandlers_TCL_DECLARED 02534 #define Tcl_ClearChannelHandlers_TCL_DECLARED 02535 /* 417 */ 02536 EXTERN void Tcl_ClearChannelHandlers (Tcl_Channel channel); 02537 #endif 02538 #ifndef Tcl_IsChannelExisting_TCL_DECLARED 02539 #define Tcl_IsChannelExisting_TCL_DECLARED 02540 /* 418 */ 02541 EXTERN int Tcl_IsChannelExisting (CONST char* channelName); 02542 #endif 02543 #ifndef Tcl_UniCharNcasecmp_TCL_DECLARED 02544 #define Tcl_UniCharNcasecmp_TCL_DECLARED 02545 /* 419 */ 02546 EXTERN int Tcl_UniCharNcasecmp (CONST Tcl_UniChar * ucs, 02547 CONST Tcl_UniChar * uct, 02548 unsigned long numChars); 02549 #endif 02550 #ifndef Tcl_UniCharCaseMatch_TCL_DECLARED 02551 #define Tcl_UniCharCaseMatch_TCL_DECLARED 02552 /* 420 */ 02553 EXTERN int Tcl_UniCharCaseMatch (CONST Tcl_UniChar * uniStr, 02554 CONST Tcl_UniChar * uniPattern, int nocase); 02555 #endif 02556 #ifndef Tcl_FindHashEntry_TCL_DECLARED 02557 #define Tcl_FindHashEntry_TCL_DECLARED 02558 /* 421 */ 02559 EXTERN Tcl_HashEntry * Tcl_FindHashEntry (Tcl_HashTable * tablePtr, 02560 CONST char * key); 02561 #endif 02562 #ifndef Tcl_CreateHashEntry_TCL_DECLARED 02563 #define Tcl_CreateHashEntry_TCL_DECLARED 02564 /* 422 */ 02565 EXTERN Tcl_HashEntry * Tcl_CreateHashEntry (Tcl_HashTable * tablePtr, 02566 CONST char * key, int * newPtr); 02567 #endif 02568 #ifndef Tcl_InitCustomHashTable_TCL_DECLARED 02569 #define Tcl_InitCustomHashTable_TCL_DECLARED 02570 /* 423 */ 02571 EXTERN void Tcl_InitCustomHashTable (Tcl_HashTable * tablePtr, 02572 int keyType, Tcl_HashKeyType * typePtr); 02573 #endif 02574 #ifndef Tcl_InitObjHashTable_TCL_DECLARED 02575 #define Tcl_InitObjHashTable_TCL_DECLARED 02576 /* 424 */ 02577 EXTERN void Tcl_InitObjHashTable (Tcl_HashTable * tablePtr); 02578 #endif 02579 #ifndef Tcl_CommandTraceInfo_TCL_DECLARED 02580 #define Tcl_CommandTraceInfo_TCL_DECLARED 02581 /* 425 */ 02582 EXTERN ClientData Tcl_CommandTraceInfo (Tcl_Interp * interp, 02583 CONST char * varName, int flags, 02584 Tcl_CommandTraceProc * procPtr, 02585 ClientData prevClientData); 02586 #endif 02587 #ifndef Tcl_TraceCommand_TCL_DECLARED 02588 #define Tcl_TraceCommand_TCL_DECLARED 02589 /* 426 */ 02590 EXTERN int Tcl_TraceCommand (Tcl_Interp * interp, 02591 CONST char * varName, int flags, 02592 Tcl_CommandTraceProc * proc, 02593 ClientData clientData); 02594 #endif 02595 #ifndef Tcl_UntraceCommand_TCL_DECLARED 02596 #define Tcl_UntraceCommand_TCL_DECLARED 02597 /* 427 */ 02598 EXTERN void Tcl_UntraceCommand (Tcl_Interp * interp, 02599 CONST char * varName, int flags, 02600 Tcl_CommandTraceProc * proc, 02601 ClientData clientData); 02602 #endif 02603 #ifndef Tcl_AttemptAlloc_TCL_DECLARED 02604 #define Tcl_AttemptAlloc_TCL_DECLARED 02605 /* 428 */ 02606 EXTERN char * Tcl_AttemptAlloc (unsigned int size); 02607 #endif 02608 #ifndef Tcl_AttemptDbCkalloc_TCL_DECLARED 02609 #define Tcl_AttemptDbCkalloc_TCL_DECLARED 02610 /* 429 */ 02611 EXTERN char * Tcl_AttemptDbCkalloc (unsigned int size, 02612 CONST char * file, int line); 02613 #endif 02614 #ifndef Tcl_AttemptRealloc_TCL_DECLARED 02615 #define Tcl_AttemptRealloc_TCL_DECLARED 02616 /* 430 */ 02617 EXTERN char * Tcl_AttemptRealloc (char * ptr, unsigned int size); 02618 #endif 02619 #ifndef Tcl_AttemptDbCkrealloc_TCL_DECLARED 02620 #define Tcl_AttemptDbCkrealloc_TCL_DECLARED 02621 /* 431 */ 02622 EXTERN char * Tcl_AttemptDbCkrealloc (char * ptr, 02623 unsigned int size, CONST char * file, 02624 int line); 02625 #endif 02626 #ifndef Tcl_AttemptSetObjLength_TCL_DECLARED 02627 #define Tcl_AttemptSetObjLength_TCL_DECLARED 02628 /* 432 */ 02629 EXTERN int Tcl_AttemptSetObjLength (Tcl_Obj * objPtr, 02630 int length); 02631 #endif 02632 #ifndef Tcl_GetChannelThread_TCL_DECLARED 02633 #define Tcl_GetChannelThread_TCL_DECLARED 02634 /* 433 */ 02635 EXTERN Tcl_ThreadId Tcl_GetChannelThread (Tcl_Channel channel); 02636 #endif 02637 #ifndef Tcl_GetUnicodeFromObj_TCL_DECLARED 02638 #define Tcl_GetUnicodeFromObj_TCL_DECLARED 02639 /* 434 */ 02640 EXTERN Tcl_UniChar * Tcl_GetUnicodeFromObj (Tcl_Obj * objPtr, 02641 int * lengthPtr); 02642 #endif 02643 #ifndef Tcl_GetMathFuncInfo_TCL_DECLARED 02644 #define Tcl_GetMathFuncInfo_TCL_DECLARED 02645 /* 435 */ 02646 EXTERN int Tcl_GetMathFuncInfo (Tcl_Interp * interp, 02647 CONST char * name, int * numArgsPtr, 02648 Tcl_ValueType ** argTypesPtr, 02649 Tcl_MathProc ** procPtr, 02650 ClientData * clientDataPtr); 02651 #endif 02652 #ifndef Tcl_ListMathFuncs_TCL_DECLARED 02653 #define Tcl_ListMathFuncs_TCL_DECLARED 02654 /* 436 */ 02655 EXTERN Tcl_Obj * Tcl_ListMathFuncs (Tcl_Interp * interp, 02656 CONST char * pattern); 02657 #endif 02658 #ifndef Tcl_SubstObj_TCL_DECLARED 02659 #define Tcl_SubstObj_TCL_DECLARED 02660 /* 437 */ 02661 EXTERN Tcl_Obj * Tcl_SubstObj (Tcl_Interp * interp, Tcl_Obj * objPtr, 02662 int flags); 02663 #endif 02664 #ifndef Tcl_DetachChannel_TCL_DECLARED 02665 #define Tcl_DetachChannel_TCL_DECLARED 02666 /* 438 */ 02667 EXTERN int Tcl_DetachChannel (Tcl_Interp* interp, 02668 Tcl_Channel channel); 02669 #endif 02670 #ifndef Tcl_IsStandardChannel_TCL_DECLARED 02671 #define Tcl_IsStandardChannel_TCL_DECLARED 02672 /* 439 */ 02673 EXTERN int Tcl_IsStandardChannel (Tcl_Channel channel); 02674 #endif 02675 #ifndef Tcl_FSCopyFile_TCL_DECLARED 02676 #define Tcl_FSCopyFile_TCL_DECLARED 02677 /* 440 */ 02678 EXTERN int Tcl_FSCopyFile (Tcl_Obj * srcPathPtr, 02679 Tcl_Obj * destPathPtr); 02680 #endif 02681 #ifndef Tcl_FSCopyDirectory_TCL_DECLARED 02682 #define Tcl_FSCopyDirectory_TCL_DECLARED 02683 /* 441 */ 02684 EXTERN int Tcl_FSCopyDirectory (Tcl_Obj * srcPathPtr, 02685 Tcl_Obj * destPathPtr, Tcl_Obj ** errorPtr); 02686 #endif 02687 #ifndef Tcl_FSCreateDirectory_TCL_DECLARED 02688 #define Tcl_FSCreateDirectory_TCL_DECLARED 02689 /* 442 */ 02690 EXTERN int Tcl_FSCreateDirectory (Tcl_Obj * pathPtr); 02691 #endif 02692 #ifndef Tcl_FSDeleteFile_TCL_DECLARED 02693 #define Tcl_FSDeleteFile_TCL_DECLARED 02694 /* 443 */ 02695 EXTERN int Tcl_FSDeleteFile (Tcl_Obj * pathPtr); 02696 #endif 02697 #ifndef Tcl_FSLoadFile_TCL_DECLARED 02698 #define Tcl_FSLoadFile_TCL_DECLARED 02699 /* 444 */ 02700 EXTERN int Tcl_FSLoadFile (Tcl_Interp * interp, 02701 Tcl_Obj * pathPtr, CONST char * sym1, 02702 CONST char * sym2, 02703 Tcl_PackageInitProc ** proc1Ptr, 02704 Tcl_PackageInitProc ** proc2Ptr, 02705 Tcl_LoadHandle * handlePtr, 02706 Tcl_FSUnloadFileProc ** unloadProcPtr); 02707 #endif 02708 #ifndef Tcl_FSMatchInDirectory_TCL_DECLARED 02709 #define Tcl_FSMatchInDirectory_TCL_DECLARED 02710 /* 445 */ 02711 EXTERN int Tcl_FSMatchInDirectory (Tcl_Interp * interp, 02712 Tcl_Obj * result, Tcl_Obj * pathPtr, 02713 CONST char * pattern, 02714 Tcl_GlobTypeData * types); 02715 #endif 02716 #ifndef Tcl_FSLink_TCL_DECLARED 02717 #define Tcl_FSLink_TCL_DECLARED 02718 /* 446 */ 02719 EXTERN Tcl_Obj * Tcl_FSLink (Tcl_Obj * pathPtr, Tcl_Obj * toPtr, 02720 int linkAction); 02721 #endif 02722 #ifndef Tcl_FSRemoveDirectory_TCL_DECLARED 02723 #define Tcl_FSRemoveDirectory_TCL_DECLARED 02724 /* 447 */ 02725 EXTERN int Tcl_FSRemoveDirectory (Tcl_Obj * pathPtr, 02726 int recursive, Tcl_Obj ** errorPtr); 02727 #endif 02728 #ifndef Tcl_FSRenameFile_TCL_DECLARED 02729 #define Tcl_FSRenameFile_TCL_DECLARED 02730 /* 448 */ 02731 EXTERN int Tcl_FSRenameFile (Tcl_Obj * srcPathPtr, 02732 Tcl_Obj * destPathPtr); 02733 #endif 02734 #ifndef Tcl_FSLstat_TCL_DECLARED 02735 #define Tcl_FSLstat_TCL_DECLARED 02736 /* 449 */ 02737 EXTERN int Tcl_FSLstat (Tcl_Obj * pathPtr, Tcl_StatBuf * buf); 02738 #endif 02739 #ifndef Tcl_FSUtime_TCL_DECLARED 02740 #define Tcl_FSUtime_TCL_DECLARED 02741 /* 450 */ 02742 EXTERN int Tcl_FSUtime (Tcl_Obj * pathPtr, 02743 struct utimbuf * tval); 02744 #endif 02745 #ifndef Tcl_FSFileAttrsGet_TCL_DECLARED 02746 #define Tcl_FSFileAttrsGet_TCL_DECLARED 02747 /* 451 */ 02748 EXTERN int Tcl_FSFileAttrsGet (Tcl_Interp * interp, int index, 02749 Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef); 02750 #endif 02751 #ifndef Tcl_FSFileAttrsSet_TCL_DECLARED 02752 #define Tcl_FSFileAttrsSet_TCL_DECLARED 02753 /* 452 */ 02754 EXTERN int Tcl_FSFileAttrsSet (Tcl_Interp * interp, int index, 02755 Tcl_Obj * pathPtr, Tcl_Obj * objPtr); 02756 #endif 02757 #ifndef Tcl_FSFileAttrStrings_TCL_DECLARED 02758 #define Tcl_FSFileAttrStrings_TCL_DECLARED 02759 /* 453 */ 02760 EXTERN CONST char ** Tcl_FSFileAttrStrings (Tcl_Obj * pathPtr, 02761 Tcl_Obj ** objPtrRef); 02762 #endif 02763 #ifndef Tcl_FSStat_TCL_DECLARED 02764 #define Tcl_FSStat_TCL_DECLARED 02765 /* 454 */ 02766 EXTERN int Tcl_FSStat (Tcl_Obj * pathPtr, Tcl_StatBuf * buf); 02767 #endif 02768 #ifndef Tcl_FSAccess_TCL_DECLARED 02769 #define Tcl_FSAccess_TCL_DECLARED 02770 /* 455 */ 02771 EXTERN int Tcl_FSAccess (Tcl_Obj * pathPtr, int mode); 02772 #endif 02773 #ifndef Tcl_FSOpenFileChannel_TCL_DECLARED 02774 #define Tcl_FSOpenFileChannel_TCL_DECLARED 02775 /* 456 */ 02776 EXTERN Tcl_Channel Tcl_FSOpenFileChannel (Tcl_Interp * interp, 02777 Tcl_Obj * pathPtr, CONST char * modeString, 02778 int permissions); 02779 #endif 02780 #ifndef Tcl_FSGetCwd_TCL_DECLARED 02781 #define Tcl_FSGetCwd_TCL_DECLARED 02782 /* 457 */ 02783 EXTERN Tcl_Obj* Tcl_FSGetCwd (Tcl_Interp * interp); 02784 #endif 02785 #ifndef Tcl_FSChdir_TCL_DECLARED 02786 #define Tcl_FSChdir_TCL_DECLARED 02787 /* 458 */ 02788 EXTERN int Tcl_FSChdir (Tcl_Obj * pathPtr); 02789 #endif 02790 #ifndef Tcl_FSConvertToPathType_TCL_DECLARED 02791 #define Tcl_FSConvertToPathType_TCL_DECLARED 02792 /* 459 */ 02793 EXTERN int Tcl_FSConvertToPathType (Tcl_Interp * interp, 02794 Tcl_Obj * pathPtr); 02795 #endif 02796 #ifndef Tcl_FSJoinPath_TCL_DECLARED 02797 #define Tcl_FSJoinPath_TCL_DECLARED 02798 /* 460 */ 02799 EXTERN Tcl_Obj* Tcl_FSJoinPath (Tcl_Obj * listObj, int elements); 02800 #endif 02801 #ifndef Tcl_FSSplitPath_TCL_DECLARED 02802 #define Tcl_FSSplitPath_TCL_DECLARED 02803 /* 461 */ 02804 EXTERN Tcl_Obj* Tcl_FSSplitPath (Tcl_Obj* pathPtr, int * lenPtr); 02805 #endif 02806 #ifndef Tcl_FSEqualPaths_TCL_DECLARED 02807 #define Tcl_FSEqualPaths_TCL_DECLARED 02808 /* 462 */ 02809 EXTERN int Tcl_FSEqualPaths (Tcl_Obj* firstPtr, 02810 Tcl_Obj* secondPtr); 02811 #endif 02812 #ifndef Tcl_FSGetNormalizedPath_TCL_DECLARED 02813 #define Tcl_FSGetNormalizedPath_TCL_DECLARED 02814 /* 463 */ 02815 EXTERN Tcl_Obj* Tcl_FSGetNormalizedPath (Tcl_Interp * interp, 02816 Tcl_Obj* pathPtr); 02817 #endif 02818 #ifndef Tcl_FSJoinToPath_TCL_DECLARED 02819 #define Tcl_FSJoinToPath_TCL_DECLARED 02820 /* 464 */ 02821 EXTERN Tcl_Obj* Tcl_FSJoinToPath (Tcl_Obj * pathPtr, int objc, 02822 Tcl_Obj *CONST objv[]); 02823 #endif 02824 #ifndef Tcl_FSGetInternalRep_TCL_DECLARED 02825 #define Tcl_FSGetInternalRep_TCL_DECLARED 02826 /* 465 */ 02827 EXTERN ClientData Tcl_FSGetInternalRep (Tcl_Obj* pathPtr, 02828 Tcl_Filesystem * fsPtr); 02829 #endif 02830 #ifndef Tcl_FSGetTranslatedPath_TCL_DECLARED 02831 #define Tcl_FSGetTranslatedPath_TCL_DECLARED 02832 /* 466 */ 02833 EXTERN Tcl_Obj* Tcl_FSGetTranslatedPath (Tcl_Interp * interp, 02834 Tcl_Obj* pathPtr); 02835 #endif 02836 #ifndef Tcl_FSEvalFile_TCL_DECLARED 02837 #define Tcl_FSEvalFile_TCL_DECLARED 02838 /* 467 */ 02839 EXTERN int Tcl_FSEvalFile (Tcl_Interp * interp, 02840 Tcl_Obj * fileName); 02841 #endif 02842 #ifndef Tcl_FSNewNativePath_TCL_DECLARED 02843 #define Tcl_FSNewNativePath_TCL_DECLARED 02844 /* 468 */ 02845 EXTERN Tcl_Obj* Tcl_FSNewNativePath (Tcl_Filesystem* fromFilesystem, 02846 ClientData clientData); 02847 #endif 02848 #ifndef Tcl_FSGetNativePath_TCL_DECLARED 02849 #define Tcl_FSGetNativePath_TCL_DECLARED 02850 /* 469 */ 02851 EXTERN CONST char* Tcl_FSGetNativePath (Tcl_Obj* pathPtr); 02852 #endif 02853 #ifndef Tcl_FSFileSystemInfo_TCL_DECLARED 02854 #define Tcl_FSFileSystemInfo_TCL_DECLARED 02855 /* 470 */ 02856 EXTERN Tcl_Obj* Tcl_FSFileSystemInfo (Tcl_Obj* pathPtr); 02857 #endif 02858 #ifndef Tcl_FSPathSeparator_TCL_DECLARED 02859 #define Tcl_FSPathSeparator_TCL_DECLARED 02860 /* 471 */ 02861 EXTERN Tcl_Obj* Tcl_FSPathSeparator (Tcl_Obj* pathPtr); 02862 #endif 02863 #ifndef Tcl_FSListVolumes_TCL_DECLARED 02864 #define Tcl_FSListVolumes_TCL_DECLARED 02865 /* 472 */ 02866 EXTERN Tcl_Obj* Tcl_FSListVolumes (void); 02867 #endif 02868 #ifndef Tcl_FSRegister_TCL_DECLARED 02869 #define Tcl_FSRegister_TCL_DECLARED 02870 /* 473 */ 02871 EXTERN int Tcl_FSRegister (ClientData clientData, 02872 Tcl_Filesystem * fsPtr); 02873 #endif 02874 #ifndef Tcl_FSUnregister_TCL_DECLARED 02875 #define Tcl_FSUnregister_TCL_DECLARED 02876 /* 474 */ 02877 EXTERN int Tcl_FSUnregister (Tcl_Filesystem * fsPtr); 02878 #endif 02879 #ifndef Tcl_FSData_TCL_DECLARED 02880 #define Tcl_FSData_TCL_DECLARED 02881 /* 475 */ 02882 EXTERN ClientData Tcl_FSData (Tcl_Filesystem * fsPtr); 02883 #endif 02884 #ifndef Tcl_FSGetTranslatedStringPath_TCL_DECLARED 02885 #define Tcl_FSGetTranslatedStringPath_TCL_DECLARED 02886 /* 476 */ 02887 EXTERN CONST char* Tcl_FSGetTranslatedStringPath (Tcl_Interp * interp, 02888 Tcl_Obj* pathPtr); 02889 #endif 02890 #ifndef Tcl_FSGetFileSystemForPath_TCL_DECLARED 02891 #define Tcl_FSGetFileSystemForPath_TCL_DECLARED 02892 /* 477 */ 02893 EXTERN Tcl_Filesystem* Tcl_FSGetFileSystemForPath (Tcl_Obj* pathPtr); 02894 #endif 02895 #ifndef Tcl_FSGetPathType_TCL_DECLARED 02896 #define Tcl_FSGetPathType_TCL_DECLARED 02897 /* 478 */ 02898 EXTERN Tcl_PathType Tcl_FSGetPathType (Tcl_Obj * pathPtr); 02899 #endif 02900 #ifndef Tcl_OutputBuffered_TCL_DECLARED 02901 #define Tcl_OutputBuffered_TCL_DECLARED 02902 /* 479 */ 02903 EXTERN int Tcl_OutputBuffered (Tcl_Channel chan); 02904 #endif 02905 #ifndef Tcl_FSMountsChanged_TCL_DECLARED 02906 #define Tcl_FSMountsChanged_TCL_DECLARED 02907 /* 480 */ 02908 EXTERN void Tcl_FSMountsChanged (Tcl_Filesystem * fsPtr); 02909 #endif 02910 #ifndef Tcl_EvalTokensStandard_TCL_DECLARED 02911 #define Tcl_EvalTokensStandard_TCL_DECLARED 02912 /* 481 */ 02913 EXTERN int Tcl_EvalTokensStandard (Tcl_Interp * interp, 02914 Tcl_Token * tokenPtr, int count); 02915 #endif 02916 #ifndef Tcl_GetTime_TCL_DECLARED 02917 #define Tcl_GetTime_TCL_DECLARED 02918 /* 482 */ 02919 EXTERN void Tcl_GetTime (Tcl_Time* timeBuf); 02920 #endif 02921 #ifndef Tcl_CreateObjTrace_TCL_DECLARED 02922 #define Tcl_CreateObjTrace_TCL_DECLARED 02923 /* 483 */ 02924 EXTERN Tcl_Trace Tcl_CreateObjTrace (Tcl_Interp* interp, int level, 02925 int flags, Tcl_CmdObjTraceProc* objProc, 02926 ClientData clientData, 02927 Tcl_CmdObjTraceDeleteProc* delProc); 02928 #endif 02929 #ifndef Tcl_GetCommandInfoFromToken_TCL_DECLARED 02930 #define Tcl_GetCommandInfoFromToken_TCL_DECLARED 02931 /* 484 */ 02932 EXTERN int Tcl_GetCommandInfoFromToken (Tcl_Command token, 02933 Tcl_CmdInfo* infoPtr); 02934 #endif 02935 #ifndef Tcl_SetCommandInfoFromToken_TCL_DECLARED 02936 #define Tcl_SetCommandInfoFromToken_TCL_DECLARED 02937 /* 485 */ 02938 EXTERN int Tcl_SetCommandInfoFromToken (Tcl_Command token, 02939 CONST Tcl_CmdInfo* infoPtr); 02940 #endif 02941 #ifndef Tcl_DbNewWideIntObj_TCL_DECLARED 02942 #define Tcl_DbNewWideIntObj_TCL_DECLARED 02943 /* 486 */ 02944 EXTERN Tcl_Obj * Tcl_DbNewWideIntObj (Tcl_WideInt wideValue, 02945 CONST char * file, int line); 02946 #endif 02947 #ifndef Tcl_GetWideIntFromObj_TCL_DECLARED 02948 #define Tcl_GetWideIntFromObj_TCL_DECLARED 02949 /* 487 */ 02950 EXTERN int Tcl_GetWideIntFromObj (Tcl_Interp * interp, 02951 Tcl_Obj * objPtr, Tcl_WideInt * widePtr); 02952 #endif 02953 #ifndef Tcl_NewWideIntObj_TCL_DECLARED 02954 #define Tcl_NewWideIntObj_TCL_DECLARED 02955 /* 488 */ 02956 EXTERN Tcl_Obj * Tcl_NewWideIntObj (Tcl_WideInt wideValue); 02957 #endif 02958 #ifndef Tcl_SetWideIntObj_TCL_DECLARED 02959 #define Tcl_SetWideIntObj_TCL_DECLARED 02960 /* 489 */ 02961 EXTERN void Tcl_SetWideIntObj (Tcl_Obj * objPtr, 02962 Tcl_WideInt wideValue); 02963 #endif 02964 #ifndef Tcl_AllocStatBuf_TCL_DECLARED 02965 #define Tcl_AllocStatBuf_TCL_DECLARED 02966 /* 490 */ 02967 EXTERN Tcl_StatBuf * Tcl_AllocStatBuf (void); 02968 #endif 02969 #ifndef Tcl_Seek_TCL_DECLARED 02970 #define Tcl_Seek_TCL_DECLARED 02971 /* 491 */ 02972 EXTERN Tcl_WideInt Tcl_Seek (Tcl_Channel chan, Tcl_WideInt offset, 02973 int mode); 02974 #endif 02975 #ifndef Tcl_Tell_TCL_DECLARED 02976 #define Tcl_Tell_TCL_DECLARED 02977 /* 492 */ 02978 EXTERN Tcl_WideInt Tcl_Tell (Tcl_Channel chan); 02979 #endif 02980 #ifndef Tcl_ChannelWideSeekProc_TCL_DECLARED 02981 #define Tcl_ChannelWideSeekProc_TCL_DECLARED 02982 /* 493 */ 02983 EXTERN Tcl_DriverWideSeekProc * Tcl_ChannelWideSeekProc ( 02984 CONST Tcl_ChannelType * chanTypePtr); 02985 #endif 02986 #ifndef Tcl_DictObjPut_TCL_DECLARED 02987 #define Tcl_DictObjPut_TCL_DECLARED 02988 /* 494 */ 02989 EXTERN int Tcl_DictObjPut (Tcl_Interp * interp, 02990 Tcl_Obj * dictPtr, Tcl_Obj * keyPtr, 02991 Tcl_Obj * valuePtr); 02992 #endif 02993 #ifndef Tcl_DictObjGet_TCL_DECLARED 02994 #define Tcl_DictObjGet_TCL_DECLARED 02995 /* 495 */ 02996 EXTERN int Tcl_DictObjGet (Tcl_Interp * interp, 02997 Tcl_Obj * dictPtr, Tcl_Obj * keyPtr, 02998 Tcl_Obj ** valuePtrPtr); 02999 #endif 03000 #ifndef Tcl_DictObjRemove_TCL_DECLARED 03001 #define Tcl_DictObjRemove_TCL_DECLARED 03002 /* 496 */ 03003 EXTERN int Tcl_DictObjRemove (Tcl_Interp * interp, 03004 Tcl_Obj * dictPtr, Tcl_Obj * keyPtr); 03005 #endif 03006 #ifndef Tcl_DictObjSize_TCL_DECLARED 03007 #define Tcl_DictObjSize_TCL_DECLARED 03008 /* 497 */ 03009 EXTERN int Tcl_DictObjSize (Tcl_Interp * interp, 03010 Tcl_Obj * dictPtr, int * sizePtr); 03011 #endif 03012 #ifndef Tcl_DictObjFirst_TCL_DECLARED 03013 #define Tcl_DictObjFirst_TCL_DECLARED 03014 /* 498 */ 03015 EXTERN int Tcl_DictObjFirst (Tcl_Interp * interp, 03016 Tcl_Obj * dictPtr, 03017 Tcl_DictSearch * searchPtr, 03018 Tcl_Obj ** keyPtrPtr, Tcl_Obj ** valuePtrPtr, 03019 int * donePtr); 03020 #endif 03021 #ifndef Tcl_DictObjNext_TCL_DECLARED 03022 #define Tcl_DictObjNext_TCL_DECLARED 03023 /* 499 */ 03024 EXTERN void Tcl_DictObjNext (Tcl_DictSearch * searchPtr, 03025 Tcl_Obj ** keyPtrPtr, Tcl_Obj ** valuePtrPtr, 03026 int * donePtr); 03027 #endif 03028 #ifndef Tcl_DictObjDone_TCL_DECLARED 03029 #define Tcl_DictObjDone_TCL_DECLARED 03030 /* 500 */ 03031 EXTERN void Tcl_DictObjDone (Tcl_DictSearch * searchPtr); 03032 #endif 03033 #ifndef Tcl_DictObjPutKeyList_TCL_DECLARED 03034 #define Tcl_DictObjPutKeyList_TCL_DECLARED 03035 /* 501 */ 03036 EXTERN int Tcl_DictObjPutKeyList (Tcl_Interp * interp, 03037 Tcl_Obj * dictPtr, int keyc, 03038 Tcl_Obj *CONST * keyv, Tcl_Obj * valuePtr); 03039 #endif 03040 #ifndef Tcl_DictObjRemoveKeyList_TCL_DECLARED 03041 #define Tcl_DictObjRemoveKeyList_TCL_DECLARED 03042 /* 502 */ 03043 EXTERN int Tcl_DictObjRemoveKeyList (Tcl_Interp * interp, 03044 Tcl_Obj * dictPtr, int keyc, 03045 Tcl_Obj *CONST * keyv); 03046 #endif 03047 #ifndef Tcl_NewDictObj_TCL_DECLARED 03048 #define Tcl_NewDictObj_TCL_DECLARED 03049 /* 503 */ 03050 EXTERN Tcl_Obj * Tcl_NewDictObj (void); 03051 #endif 03052 #ifndef Tcl_DbNewDictObj_TCL_DECLARED 03053 #define Tcl_DbNewDictObj_TCL_DECLARED 03054 /* 504 */ 03055 EXTERN Tcl_Obj * Tcl_DbNewDictObj (CONST char * file, int line); 03056 #endif 03057 #ifndef Tcl_RegisterConfig_TCL_DECLARED 03058 #define Tcl_RegisterConfig_TCL_DECLARED 03059 /* 505 */ 03060 EXTERN void Tcl_RegisterConfig (Tcl_Interp* interp, 03061 CONST char* pkgName, 03062 Tcl_Config* configuration, 03063 CONST char* valEncoding); 03064 #endif 03065 #ifndef Tcl_CreateNamespace_TCL_DECLARED 03066 #define Tcl_CreateNamespace_TCL_DECLARED 03067 /* 506 */ 03068 EXTERN Tcl_Namespace * Tcl_CreateNamespace (Tcl_Interp * interp, 03069 CONST char * name, ClientData clientData, 03070 Tcl_NamespaceDeleteProc * deleteProc); 03071 #endif 03072 #ifndef Tcl_DeleteNamespace_TCL_DECLARED 03073 #define Tcl_DeleteNamespace_TCL_DECLARED 03074 /* 507 */ 03075 EXTERN void Tcl_DeleteNamespace (Tcl_Namespace * nsPtr); 03076 #endif 03077 #ifndef Tcl_AppendExportList_TCL_DECLARED 03078 #define Tcl_AppendExportList_TCL_DECLARED 03079 /* 508 */ 03080 EXTERN int Tcl_AppendExportList (Tcl_Interp * interp, 03081 Tcl_Namespace * nsPtr, Tcl_Obj * objPtr); 03082 #endif 03083 #ifndef Tcl_Export_TCL_DECLARED 03084 #define Tcl_Export_TCL_DECLARED 03085 /* 509 */ 03086 EXTERN int Tcl_Export (Tcl_Interp * interp, 03087 Tcl_Namespace * nsPtr, CONST char * pattern, 03088 int resetListFirst); 03089 #endif 03090 #ifndef Tcl_Import_TCL_DECLARED 03091 #define Tcl_Import_TCL_DECLARED 03092 /* 510 */ 03093 EXTERN int Tcl_Import (Tcl_Interp * interp, 03094 Tcl_Namespace * nsPtr, CONST char * pattern, 03095 int allowOverwrite); 03096 #endif 03097 #ifndef Tcl_ForgetImport_TCL_DECLARED 03098 #define Tcl_ForgetImport_TCL_DECLARED 03099 /* 511 */ 03100 EXTERN int Tcl_ForgetImport (Tcl_Interp * interp, 03101 Tcl_Namespace * nsPtr, CONST char * pattern); 03102 #endif 03103 #ifndef Tcl_GetCurrentNamespace_TCL_DECLARED 03104 #define Tcl_GetCurrentNamespace_TCL_DECLARED 03105 /* 512 */ 03106 EXTERN Tcl_Namespace * Tcl_GetCurrentNamespace (Tcl_Interp * interp); 03107 #endif 03108 #ifndef Tcl_GetGlobalNamespace_TCL_DECLARED 03109 #define Tcl_GetGlobalNamespace_TCL_DECLARED 03110 /* 513 */ 03111 EXTERN Tcl_Namespace * Tcl_GetGlobalNamespace (Tcl_Interp * interp); 03112 #endif 03113 #ifndef Tcl_FindNamespace_TCL_DECLARED 03114 #define Tcl_FindNamespace_TCL_DECLARED 03115 /* 514 */ 03116 EXTERN Tcl_Namespace * Tcl_FindNamespace (Tcl_Interp * interp, 03117 CONST char * name, 03118 Tcl_Namespace * contextNsPtr, int flags); 03119 #endif 03120 #ifndef Tcl_FindCommand_TCL_DECLARED 03121 #define Tcl_FindCommand_TCL_DECLARED 03122 /* 515 */ 03123 EXTERN Tcl_Command Tcl_FindCommand (Tcl_Interp * interp, 03124 CONST char * name, 03125 Tcl_Namespace * contextNsPtr, int flags); 03126 #endif 03127 #ifndef Tcl_GetCommandFromObj_TCL_DECLARED 03128 #define Tcl_GetCommandFromObj_TCL_DECLARED 03129 /* 516 */ 03130 EXTERN Tcl_Command Tcl_GetCommandFromObj (Tcl_Interp * interp, 03131 Tcl_Obj * objPtr); 03132 #endif 03133 #ifndef Tcl_GetCommandFullName_TCL_DECLARED 03134 #define Tcl_GetCommandFullName_TCL_DECLARED 03135 /* 517 */ 03136 EXTERN void Tcl_GetCommandFullName (Tcl_Interp * interp, 03137 Tcl_Command command, Tcl_Obj * objPtr); 03138 #endif 03139 #ifndef Tcl_FSEvalFileEx_TCL_DECLARED 03140 #define Tcl_FSEvalFileEx_TCL_DECLARED 03141 /* 518 */ 03142 EXTERN int Tcl_FSEvalFileEx (Tcl_Interp * interp, 03143 Tcl_Obj * fileName, 03144 CONST char * encodingName); 03145 #endif 03146 #ifndef Tcl_SetExitProc_TCL_DECLARED 03147 #define Tcl_SetExitProc_TCL_DECLARED 03148 /* 519 */ 03149 EXTERN Tcl_ExitProc * Tcl_SetExitProc (Tcl_ExitProc * proc); 03150 #endif 03151 #ifndef Tcl_LimitAddHandler_TCL_DECLARED 03152 #define Tcl_LimitAddHandler_TCL_DECLARED 03153 /* 520 */ 03154 EXTERN void Tcl_LimitAddHandler (Tcl_Interp * interp, int type, 03155 Tcl_LimitHandlerProc * handlerProc, 03156 ClientData clientData, 03157 Tcl_LimitHandlerDeleteProc * deleteProc); 03158 #endif 03159 #ifndef Tcl_LimitRemoveHandler_TCL_DECLARED 03160 #define Tcl_LimitRemoveHandler_TCL_DECLARED 03161 /* 521 */ 03162 EXTERN void Tcl_LimitRemoveHandler (Tcl_Interp * interp, 03163 int type, Tcl_LimitHandlerProc * handlerProc, 03164 ClientData clientData); 03165 #endif 03166 #ifndef Tcl_LimitReady_TCL_DECLARED 03167 #define Tcl_LimitReady_TCL_DECLARED 03168 /* 522 */ 03169 EXTERN int Tcl_LimitReady (Tcl_Interp * interp); 03170 #endif 03171 #ifndef Tcl_LimitCheck_TCL_DECLARED 03172 #define Tcl_LimitCheck_TCL_DECLARED 03173 /* 523 */ 03174 EXTERN int Tcl_LimitCheck (Tcl_Interp * interp); 03175 #endif 03176 #ifndef Tcl_LimitExceeded_TCL_DECLARED 03177 #define Tcl_LimitExceeded_TCL_DECLARED 03178 /* 524 */ 03179 EXTERN int Tcl_LimitExceeded (Tcl_Interp * interp); 03180 #endif 03181 #ifndef Tcl_LimitSetCommands_TCL_DECLARED 03182 #define Tcl_LimitSetCommands_TCL_DECLARED 03183 /* 525 */ 03184 EXTERN void Tcl_LimitSetCommands (Tcl_Interp * interp, 03185 int commandLimit); 03186 #endif 03187 #ifndef Tcl_LimitSetTime_TCL_DECLARED 03188 #define Tcl_LimitSetTime_TCL_DECLARED 03189 /* 526 */ 03190 EXTERN void Tcl_LimitSetTime (Tcl_Interp * interp, 03191 Tcl_Time * timeLimitPtr); 03192 #endif 03193 #ifndef Tcl_LimitSetGranularity_TCL_DECLARED 03194 #define Tcl_LimitSetGranularity_TCL_DECLARED 03195 /* 527 */ 03196 EXTERN void Tcl_LimitSetGranularity (Tcl_Interp * interp, 03197 int type, int granularity); 03198 #endif 03199 #ifndef Tcl_LimitTypeEnabled_TCL_DECLARED 03200 #define Tcl_LimitTypeEnabled_TCL_DECLARED 03201 /* 528 */ 03202 EXTERN int Tcl_LimitTypeEnabled (Tcl_Interp * interp, int type); 03203 #endif 03204 #ifndef Tcl_LimitTypeExceeded_TCL_DECLARED 03205 #define Tcl_LimitTypeExceeded_TCL_DECLARED 03206 /* 529 */ 03207 EXTERN int Tcl_LimitTypeExceeded (Tcl_Interp * interp, int type); 03208 #endif 03209 #ifndef Tcl_LimitTypeSet_TCL_DECLARED 03210 #define Tcl_LimitTypeSet_TCL_DECLARED 03211 /* 530 */ 03212 EXTERN void Tcl_LimitTypeSet (Tcl_Interp * interp, int type); 03213 #endif 03214 #ifndef Tcl_LimitTypeReset_TCL_DECLARED 03215 #define Tcl_LimitTypeReset_TCL_DECLARED 03216 /* 531 */ 03217 EXTERN void Tcl_LimitTypeReset (Tcl_Interp * interp, int type); 03218 #endif 03219 #ifndef Tcl_LimitGetCommands_TCL_DECLARED 03220 #define Tcl_LimitGetCommands_TCL_DECLARED 03221 /* 532 */ 03222 EXTERN int Tcl_LimitGetCommands (Tcl_Interp * interp); 03223 #endif 03224 #ifndef Tcl_LimitGetTime_TCL_DECLARED 03225 #define Tcl_LimitGetTime_TCL_DECLARED 03226 /* 533 */ 03227 EXTERN void Tcl_LimitGetTime (Tcl_Interp * interp, 03228 Tcl_Time * timeLimitPtr); 03229 #endif 03230 #ifndef Tcl_LimitGetGranularity_TCL_DECLARED 03231 #define Tcl_LimitGetGranularity_TCL_DECLARED 03232 /* 534 */ 03233 EXTERN int Tcl_LimitGetGranularity (Tcl_Interp * interp, 03234 int type); 03235 #endif 03236 #ifndef Tcl_SaveInterpState_TCL_DECLARED 03237 #define Tcl_SaveInterpState_TCL_DECLARED 03238 /* 535 */ 03239 EXTERN Tcl_InterpState Tcl_SaveInterpState (Tcl_Interp * interp, int status); 03240 #endif 03241 #ifndef Tcl_RestoreInterpState_TCL_DECLARED 03242 #define Tcl_RestoreInterpState_TCL_DECLARED 03243 /* 536 */ 03244 EXTERN int Tcl_RestoreInterpState (Tcl_Interp * interp, 03245 Tcl_InterpState state); 03246 #endif 03247 #ifndef Tcl_DiscardInterpState_TCL_DECLARED 03248 #define Tcl_DiscardInterpState_TCL_DECLARED 03249 /* 537 */ 03250 EXTERN void Tcl_DiscardInterpState (Tcl_InterpState state); 03251 #endif 03252 #ifndef Tcl_SetReturnOptions_TCL_DECLARED 03253 #define Tcl_SetReturnOptions_TCL_DECLARED 03254 /* 538 */ 03255 EXTERN int Tcl_SetReturnOptions (Tcl_Interp * interp, 03256 Tcl_Obj * options); 03257 #endif 03258 #ifndef Tcl_GetReturnOptions_TCL_DECLARED 03259 #define Tcl_GetReturnOptions_TCL_DECLARED 03260 /* 539 */ 03261 EXTERN Tcl_Obj * Tcl_GetReturnOptions (Tcl_Interp * interp, 03262 int result); 03263 #endif 03264 #ifndef Tcl_IsEnsemble_TCL_DECLARED 03265 #define Tcl_IsEnsemble_TCL_DECLARED 03266 /* 540 */ 03267 EXTERN int Tcl_IsEnsemble (Tcl_Command token); 03268 #endif 03269 #ifndef Tcl_CreateEnsemble_TCL_DECLARED 03270 #define Tcl_CreateEnsemble_TCL_DECLARED 03271 /* 541 */ 03272 EXTERN Tcl_Command Tcl_CreateEnsemble (Tcl_Interp * interp, 03273 CONST char * name, 03274 Tcl_Namespace * namespacePtr, int flags); 03275 #endif 03276 #ifndef Tcl_FindEnsemble_TCL_DECLARED 03277 #define Tcl_FindEnsemble_TCL_DECLARED 03278 /* 542 */ 03279 EXTERN Tcl_Command Tcl_FindEnsemble (Tcl_Interp * interp, 03280 Tcl_Obj * cmdNameObj, int flags); 03281 #endif 03282 #ifndef Tcl_SetEnsembleSubcommandList_TCL_DECLARED 03283 #define Tcl_SetEnsembleSubcommandList_TCL_DECLARED 03284 /* 543 */ 03285 EXTERN int Tcl_SetEnsembleSubcommandList (Tcl_Interp * interp, 03286 Tcl_Command token, Tcl_Obj * subcmdList); 03287 #endif 03288 #ifndef Tcl_SetEnsembleMappingDict_TCL_DECLARED 03289 #define Tcl_SetEnsembleMappingDict_TCL_DECLARED 03290 /* 544 */ 03291 EXTERN int Tcl_SetEnsembleMappingDict (Tcl_Interp * interp, 03292 Tcl_Command token, Tcl_Obj * mapDict); 03293 #endif 03294 #ifndef Tcl_SetEnsembleUnknownHandler_TCL_DECLARED 03295 #define Tcl_SetEnsembleUnknownHandler_TCL_DECLARED 03296 /* 545 */ 03297 EXTERN int Tcl_SetEnsembleUnknownHandler (Tcl_Interp * interp, 03298 Tcl_Command token, Tcl_Obj * unknownList); 03299 #endif 03300 #ifndef Tcl_SetEnsembleFlags_TCL_DECLARED 03301 #define Tcl_SetEnsembleFlags_TCL_DECLARED 03302 /* 546 */ 03303 EXTERN int Tcl_SetEnsembleFlags (Tcl_Interp * interp, 03304 Tcl_Command token, int flags); 03305 #endif 03306 #ifndef Tcl_GetEnsembleSubcommandList_TCL_DECLARED 03307 #define Tcl_GetEnsembleSubcommandList_TCL_DECLARED 03308 /* 547 */ 03309 EXTERN int Tcl_GetEnsembleSubcommandList (Tcl_Interp * interp, 03310 Tcl_Command token, Tcl_Obj ** subcmdListPtr); 03311 #endif 03312 #ifndef Tcl_GetEnsembleMappingDict_TCL_DECLARED 03313 #define Tcl_GetEnsembleMappingDict_TCL_DECLARED 03314 /* 548 */ 03315 EXTERN int Tcl_GetEnsembleMappingDict (Tcl_Interp * interp, 03316 Tcl_Command token, Tcl_Obj ** mapDictPtr); 03317 #endif 03318 #ifndef Tcl_GetEnsembleUnknownHandler_TCL_DECLARED 03319 #define Tcl_GetEnsembleUnknownHandler_TCL_DECLARED 03320 /* 549 */ 03321 EXTERN int Tcl_GetEnsembleUnknownHandler (Tcl_Interp * interp, 03322 Tcl_Command token, Tcl_Obj ** unknownListPtr); 03323 #endif 03324 #ifndef Tcl_GetEnsembleFlags_TCL_DECLARED 03325 #define Tcl_GetEnsembleFlags_TCL_DECLARED 03326 /* 550 */ 03327 EXTERN int Tcl_GetEnsembleFlags (Tcl_Interp * interp, 03328 Tcl_Command token, int * flagsPtr); 03329 #endif 03330 #ifndef Tcl_GetEnsembleNamespace_TCL_DECLARED 03331 #define Tcl_GetEnsembleNamespace_TCL_DECLARED 03332 /* 551 */ 03333 EXTERN int Tcl_GetEnsembleNamespace (Tcl_Interp * interp, 03334 Tcl_Command token, 03335 Tcl_Namespace ** namespacePtrPtr); 03336 #endif 03337 #ifndef Tcl_SetTimeProc_TCL_DECLARED 03338 #define Tcl_SetTimeProc_TCL_DECLARED 03339 /* 552 */ 03340 EXTERN void Tcl_SetTimeProc (Tcl_GetTimeProc* getProc, 03341 Tcl_ScaleTimeProc* scaleProc, 03342 ClientData clientData); 03343 #endif 03344 #ifndef Tcl_QueryTimeProc_TCL_DECLARED 03345 #define Tcl_QueryTimeProc_TCL_DECLARED 03346 /* 553 */ 03347 EXTERN void Tcl_QueryTimeProc (Tcl_GetTimeProc** getProc, 03348 Tcl_ScaleTimeProc** scaleProc, 03349 ClientData* clientData); 03350 #endif 03351 #ifndef Tcl_ChannelThreadActionProc_TCL_DECLARED 03352 #define Tcl_ChannelThreadActionProc_TCL_DECLARED 03353 /* 554 */ 03354 EXTERN Tcl_DriverThreadActionProc * Tcl_ChannelThreadActionProc ( 03355 CONST Tcl_ChannelType * chanTypePtr); 03356 #endif 03357 #ifndef Tcl_NewBignumObj_TCL_DECLARED 03358 #define Tcl_NewBignumObj_TCL_DECLARED 03359 /* 555 */ 03360 EXTERN Tcl_Obj* Tcl_NewBignumObj (mp_int* value); 03361 #endif 03362 #ifndef Tcl_DbNewBignumObj_TCL_DECLARED 03363 #define Tcl_DbNewBignumObj_TCL_DECLARED 03364 /* 556 */ 03365 EXTERN Tcl_Obj* Tcl_DbNewBignumObj (mp_int* value, CONST char* file, 03366 int line); 03367 #endif 03368 #ifndef Tcl_SetBignumObj_TCL_DECLARED 03369 #define Tcl_SetBignumObj_TCL_DECLARED 03370 /* 557 */ 03371 EXTERN void Tcl_SetBignumObj (Tcl_Obj* obj, mp_int* value); 03372 #endif 03373 #ifndef Tcl_GetBignumFromObj_TCL_DECLARED 03374 #define Tcl_GetBignumFromObj_TCL_DECLARED 03375 /* 558 */ 03376 EXTERN int Tcl_GetBignumFromObj (Tcl_Interp* interp, 03377 Tcl_Obj* obj, mp_int* value); 03378 #endif 03379 #ifndef Tcl_TakeBignumFromObj_TCL_DECLARED 03380 #define Tcl_TakeBignumFromObj_TCL_DECLARED 03381 /* 559 */ 03382 EXTERN int Tcl_TakeBignumFromObj (Tcl_Interp* interp, 03383 Tcl_Obj* obj, mp_int* value); 03384 #endif 03385 #ifndef Tcl_TruncateChannel_TCL_DECLARED 03386 #define Tcl_TruncateChannel_TCL_DECLARED 03387 /* 560 */ 03388 EXTERN int Tcl_TruncateChannel (Tcl_Channel chan, 03389 Tcl_WideInt length); 03390 #endif 03391 #ifndef Tcl_ChannelTruncateProc_TCL_DECLARED 03392 #define Tcl_ChannelTruncateProc_TCL_DECLARED 03393 /* 561 */ 03394 EXTERN Tcl_DriverTruncateProc * Tcl_ChannelTruncateProc ( 03395 CONST Tcl_ChannelType * chanTypePtr); 03396 #endif 03397 #ifndef Tcl_SetChannelErrorInterp_TCL_DECLARED 03398 #define Tcl_SetChannelErrorInterp_TCL_DECLARED 03399 /* 562 */ 03400 EXTERN void Tcl_SetChannelErrorInterp (Tcl_Interp* interp, 03401 Tcl_Obj* msg); 03402 #endif 03403 #ifndef Tcl_GetChannelErrorInterp_TCL_DECLARED 03404 #define Tcl_GetChannelErrorInterp_TCL_DECLARED 03405 /* 563 */ 03406 EXTERN void Tcl_GetChannelErrorInterp (Tcl_Interp* interp, 03407 Tcl_Obj** msg); 03408 #endif 03409 #ifndef Tcl_SetChannelError_TCL_DECLARED 03410 #define Tcl_SetChannelError_TCL_DECLARED 03411 /* 564 */ 03412 EXTERN void Tcl_SetChannelError (Tcl_Channel chan, Tcl_Obj* msg); 03413 #endif 03414 #ifndef Tcl_GetChannelError_TCL_DECLARED 03415 #define Tcl_GetChannelError_TCL_DECLARED 03416 /* 565 */ 03417 EXTERN void Tcl_GetChannelError (Tcl_Channel chan, Tcl_Obj** msg); 03418 #endif 03419 #ifndef Tcl_InitBignumFromDouble_TCL_DECLARED 03420 #define Tcl_InitBignumFromDouble_TCL_DECLARED 03421 /* 566 */ 03422 EXTERN int Tcl_InitBignumFromDouble (Tcl_Interp* interp, 03423 double initval, mp_int * toInit); 03424 #endif 03425 #ifndef Tcl_GetNamespaceUnknownHandler_TCL_DECLARED 03426 #define Tcl_GetNamespaceUnknownHandler_TCL_DECLARED 03427 /* 567 */ 03428 EXTERN Tcl_Obj * Tcl_GetNamespaceUnknownHandler (Tcl_Interp * interp, 03429 Tcl_Namespace * nsPtr); 03430 #endif 03431 #ifndef Tcl_SetNamespaceUnknownHandler_TCL_DECLARED 03432 #define Tcl_SetNamespaceUnknownHandler_TCL_DECLARED 03433 /* 568 */ 03434 EXTERN int Tcl_SetNamespaceUnknownHandler (Tcl_Interp * interp, 03435 Tcl_Namespace * nsPtr, Tcl_Obj * handlerPtr); 03436 #endif 03437 #ifndef Tcl_GetEncodingFromObj_TCL_DECLARED 03438 #define Tcl_GetEncodingFromObj_TCL_DECLARED 03439 /* 569 */ 03440 EXTERN int Tcl_GetEncodingFromObj (Tcl_Interp* interp, 03441 Tcl_Obj* objPtr, Tcl_Encoding* encodingPtr); 03442 #endif 03443 #ifndef Tcl_GetEncodingSearchPath_TCL_DECLARED 03444 #define Tcl_GetEncodingSearchPath_TCL_DECLARED 03445 /* 570 */ 03446 EXTERN Tcl_Obj* Tcl_GetEncodingSearchPath (void); 03447 #endif 03448 #ifndef Tcl_SetEncodingSearchPath_TCL_DECLARED 03449 #define Tcl_SetEncodingSearchPath_TCL_DECLARED 03450 /* 571 */ 03451 EXTERN int Tcl_SetEncodingSearchPath (Tcl_Obj* searchPath); 03452 #endif 03453 #ifndef Tcl_GetEncodingNameFromEnvironment_TCL_DECLARED 03454 #define Tcl_GetEncodingNameFromEnvironment_TCL_DECLARED 03455 /* 572 */ 03456 EXTERN CONST char * Tcl_GetEncodingNameFromEnvironment ( 03457 Tcl_DString* bufPtr); 03458 #endif 03459 #ifndef Tcl_PkgRequireProc_TCL_DECLARED 03460 #define Tcl_PkgRequireProc_TCL_DECLARED 03461 /* 573 */ 03462 EXTERN int Tcl_PkgRequireProc (Tcl_Interp * interp, 03463 CONST char * name, int objc, 03464 Tcl_Obj *CONST objv[], 03465 ClientData * clientDataPtr); 03466 #endif 03467 #ifndef Tcl_AppendObjToErrorInfo_TCL_DECLARED 03468 #define Tcl_AppendObjToErrorInfo_TCL_DECLARED 03469 /* 574 */ 03470 EXTERN void Tcl_AppendObjToErrorInfo (Tcl_Interp * interp, 03471 Tcl_Obj * objPtr); 03472 #endif 03473 #ifndef Tcl_AppendLimitedToObj_TCL_DECLARED 03474 #define Tcl_AppendLimitedToObj_TCL_DECLARED 03475 /* 575 */ 03476 EXTERN void Tcl_AppendLimitedToObj (Tcl_Obj * objPtr, 03477 CONST char * bytes, int length, int limit, 03478 CONST char * ellipsis); 03479 #endif 03480 #ifndef Tcl_Format_TCL_DECLARED 03481 #define Tcl_Format_TCL_DECLARED 03482 /* 576 */ 03483 EXTERN Tcl_Obj * Tcl_Format (Tcl_Interp * interp, CONST char * format, 03484 int objc, Tcl_Obj * CONST objv[]); 03485 #endif 03486 #ifndef Tcl_AppendFormatToObj_TCL_DECLARED 03487 #define Tcl_AppendFormatToObj_TCL_DECLARED 03488 /* 577 */ 03489 EXTERN int Tcl_AppendFormatToObj (Tcl_Interp * interp, 03490 Tcl_Obj * objPtr, CONST char * format, 03491 int objc, Tcl_Obj * CONST objv[]); 03492 #endif 03493 #ifndef Tcl_ObjPrintf_TCL_DECLARED 03494 #define Tcl_ObjPrintf_TCL_DECLARED 03495 /* 578 */ 03496 EXTERN Tcl_Obj * Tcl_ObjPrintf (CONST char * format, ...); 03497 #endif 03498 #ifndef Tcl_AppendPrintfToObj_TCL_DECLARED 03499 #define Tcl_AppendPrintfToObj_TCL_DECLARED 03500 /* 579 */ 03501 EXTERN void Tcl_AppendPrintfToObj (Tcl_Obj * objPtr, 03502 CONST char * format, ...); 03503 #endif 03504 03505 typedef struct TclStubHooks { 03506 struct TclPlatStubs *tclPlatStubs; 03507 struct TclIntStubs *tclIntStubs; 03508 struct TclIntPlatStubs *tclIntPlatStubs; 03509 } TclStubHooks; 03510 03511 typedef struct TclStubs { 03512 int magic; 03513 struct TclStubHooks *hooks; 03514 03515 int (*tcl_PkgProvideEx) (Tcl_Interp* interp, CONST char* name, CONST char* version, ClientData clientData); /* 0 */ 03516 CONST84_RETURN char * (*tcl_PkgRequireEx) (Tcl_Interp * interp, CONST char * name, CONST char * version, int exact, ClientData * clientDataPtr); /* 1 */ 03517 void (*tcl_Panic) (CONST char * format, ...); /* 2 */ 03518 char * (*tcl_Alloc) (unsigned int size); /* 3 */ 03519 void (*tcl_Free) (char * ptr); /* 4 */ 03520 char * (*tcl_Realloc) (char * ptr, unsigned int size); /* 5 */ 03521 char * (*tcl_DbCkalloc) (unsigned int size, CONST char * file, int line); /* 6 */ 03522 int (*tcl_DbCkfree) (char * ptr, CONST char * file, int line); /* 7 */ 03523 char * (*tcl_DbCkrealloc) (char * ptr, unsigned int size, CONST char * file, int line); /* 8 */ 03524 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 03525 void (*tcl_CreateFileHandler) (int fd, int mask, Tcl_FileProc * proc, ClientData clientData); /* 9 */ 03526 #endif /* UNIX */ 03527 #ifdef __WIN32__ /* WIN */ 03528 void *reserved9; 03529 #endif /* WIN */ 03530 #ifdef MAC_OSX_TCL /* MACOSX */ 03531 void (*tcl_CreateFileHandler) (int fd, int mask, Tcl_FileProc * proc, ClientData clientData); /* 9 */ 03532 #endif /* MACOSX */ 03533 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 03534 void (*tcl_DeleteFileHandler) (int fd); /* 10 */ 03535 #endif /* UNIX */ 03536 #ifdef __WIN32__ /* WIN */ 03537 void *reserved10; 03538 #endif /* WIN */ 03539 #ifdef MAC_OSX_TCL /* MACOSX */ 03540 void (*tcl_DeleteFileHandler) (int fd); /* 10 */ 03541 #endif /* MACOSX */ 03542 void (*tcl_SetTimer) (Tcl_Time * timePtr); /* 11 */ 03543 void (*tcl_Sleep) (int ms); /* 12 */ 03544 int (*tcl_WaitForEvent) (Tcl_Time * timePtr); /* 13 */ 03545 int (*tcl_AppendAllObjTypes) (Tcl_Interp * interp, Tcl_Obj * objPtr); /* 14 */ 03546 void (*tcl_AppendStringsToObj) (Tcl_Obj * objPtr, ...); /* 15 */ 03547 void (*tcl_AppendToObj) (Tcl_Obj* objPtr, CONST char* bytes, int length); /* 16 */ 03548 Tcl_Obj * (*tcl_ConcatObj) (int objc, Tcl_Obj *CONST objv[]); /* 17 */ 03549 int (*tcl_ConvertToType) (Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_ObjType * typePtr); /* 18 */ 03550 void (*tcl_DbDecrRefCount) (Tcl_Obj * objPtr, CONST char * file, int line); /* 19 */ 03551 void (*tcl_DbIncrRefCount) (Tcl_Obj * objPtr, CONST char * file, int line); /* 20 */ 03552 int (*tcl_DbIsShared) (Tcl_Obj * objPtr, CONST char * file, int line); /* 21 */ 03553 Tcl_Obj * (*tcl_DbNewBooleanObj) (int boolValue, CONST char * file, int line); /* 22 */ 03554 Tcl_Obj * (*tcl_DbNewByteArrayObj) (CONST unsigned char * bytes, int length, CONST char * file, int line); /* 23 */ 03555 Tcl_Obj * (*tcl_DbNewDoubleObj) (double doubleValue, CONST char * file, int line); /* 24 */ 03556 Tcl_Obj * (*tcl_DbNewListObj) (int objc, Tcl_Obj *CONST * objv, CONST char * file, int line); /* 25 */ 03557 Tcl_Obj * (*tcl_DbNewLongObj) (long longValue, CONST char * file, int line); /* 26 */ 03558 Tcl_Obj * (*tcl_DbNewObj) (CONST char * file, int line); /* 27 */ 03559 Tcl_Obj * (*tcl_DbNewStringObj) (CONST char * bytes, int length, CONST char * file, int line); /* 28 */ 03560 Tcl_Obj * (*tcl_DuplicateObj) (Tcl_Obj * objPtr); /* 29 */ 03561 void (*tclFreeObj) (Tcl_Obj * objPtr); /* 30 */ 03562 int (*tcl_GetBoolean) (Tcl_Interp * interp, CONST char * src, int * boolPtr); /* 31 */ 03563 int (*tcl_GetBooleanFromObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, int * boolPtr); /* 32 */ 03564 unsigned char * (*tcl_GetByteArrayFromObj) (Tcl_Obj * objPtr, int * lengthPtr); /* 33 */ 03565 int (*tcl_GetDouble) (Tcl_Interp * interp, CONST char * src, double * doublePtr); /* 34 */ 03566 int (*tcl_GetDoubleFromObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, double * doublePtr); /* 35 */ 03567 int (*tcl_GetIndexFromObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, CONST84 char ** tablePtr, CONST char * msg, int flags, int * indexPtr); /* 36 */ 03568 int (*tcl_GetInt) (Tcl_Interp * interp, CONST char * src, int * intPtr); /* 37 */ 03569 int (*tcl_GetIntFromObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, int * intPtr); /* 38 */ 03570 int (*tcl_GetLongFromObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, long * longPtr); /* 39 */ 03571 Tcl_ObjType * (*tcl_GetObjType) (CONST char * typeName); /* 40 */ 03572 char * (*tcl_GetStringFromObj) (Tcl_Obj * objPtr, int * lengthPtr); /* 41 */ 03573 void (*tcl_InvalidateStringRep) (Tcl_Obj * objPtr); /* 42 */ 03574 int (*tcl_ListObjAppendList) (Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * elemListPtr); /* 43 */ 03575 int (*tcl_ListObjAppendElement) (Tcl_Interp * interp, Tcl_Obj * listPtr, Tcl_Obj * objPtr); /* 44 */ 03576 int (*tcl_ListObjGetElements) (Tcl_Interp * interp, Tcl_Obj * listPtr, int * objcPtr, Tcl_Obj *** objvPtr); /* 45 */ 03577 int (*tcl_ListObjIndex) (Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj ** objPtrPtr); /* 46 */ 03578 int (*tcl_ListObjLength) (Tcl_Interp * interp, Tcl_Obj * listPtr, int * lengthPtr); /* 47 */ 03579 int (*tcl_ListObjReplace) (Tcl_Interp * interp, Tcl_Obj * listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[]); /* 48 */ 03580 Tcl_Obj * (*tcl_NewBooleanObj) (int boolValue); /* 49 */ 03581 Tcl_Obj * (*tcl_NewByteArrayObj) (CONST unsigned char* bytes, int length); /* 50 */ 03582 Tcl_Obj * (*tcl_NewDoubleObj) (double doubleValue); /* 51 */ 03583 Tcl_Obj * (*tcl_NewIntObj) (int intValue); /* 52 */ 03584 Tcl_Obj * (*tcl_NewListObj) (int objc, Tcl_Obj *CONST objv[]); /* 53 */ 03585 Tcl_Obj * (*tcl_NewLongObj) (long longValue); /* 54 */ 03586 Tcl_Obj * (*tcl_NewObj) (void); /* 55 */ 03587 Tcl_Obj * (*tcl_NewStringObj) (CONST char * bytes, int length); /* 56 */ 03588 void (*tcl_SetBooleanObj) (Tcl_Obj * objPtr, int boolValue); /* 57 */ 03589 unsigned char * (*tcl_SetByteArrayLength) (Tcl_Obj * objPtr, int length); /* 58 */ 03590 void (*tcl_SetByteArrayObj) (Tcl_Obj * objPtr, CONST unsigned char * bytes, int length); /* 59 */ 03591 void (*tcl_SetDoubleObj) (Tcl_Obj * objPtr, double doubleValue); /* 60 */ 03592 void (*tcl_SetIntObj) (Tcl_Obj * objPtr, int intValue); /* 61 */ 03593 void (*tcl_SetListObj) (Tcl_Obj * objPtr, int objc, Tcl_Obj *CONST objv[]); /* 62 */ 03594 void (*tcl_SetLongObj) (Tcl_Obj * objPtr, long longValue); /* 63 */ 03595 void (*tcl_SetObjLength) (Tcl_Obj * objPtr, int length); /* 64 */ 03596 void (*tcl_SetStringObj) (Tcl_Obj* objPtr, CONST char* bytes, int length); /* 65 */ 03597 void (*tcl_AddErrorInfo) (Tcl_Interp * interp, CONST char * message); /* 66 */ 03598 void (*tcl_AddObjErrorInfo) (Tcl_Interp * interp, CONST char * message, int length); /* 67 */ 03599 void (*tcl_AllowExceptions) (Tcl_Interp * interp); /* 68 */ 03600 void (*tcl_AppendElement) (Tcl_Interp * interp, CONST char * element); /* 69 */ 03601 void (*tcl_AppendResult) (Tcl_Interp * interp, ...); /* 70 */ 03602 Tcl_AsyncHandler (*tcl_AsyncCreate) (Tcl_AsyncProc * proc, ClientData clientData); /* 71 */ 03603 void (*tcl_AsyncDelete) (Tcl_AsyncHandler async); /* 72 */ 03604 int (*tcl_AsyncInvoke) (Tcl_Interp * interp, int code); /* 73 */ 03605 void (*tcl_AsyncMark) (Tcl_AsyncHandler async); /* 74 */ 03606 int (*tcl_AsyncReady) (void); /* 75 */ 03607 void (*tcl_BackgroundError) (Tcl_Interp * interp); /* 76 */ 03608 char (*tcl_Backslash) (CONST char * src, int * readPtr); /* 77 */ 03609 int (*tcl_BadChannelOption) (Tcl_Interp * interp, CONST char * optionName, CONST char * optionList); /* 78 */ 03610 void (*tcl_CallWhenDeleted) (Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData); /* 79 */ 03611 void (*tcl_CancelIdleCall) (Tcl_IdleProc * idleProc, ClientData clientData); /* 80 */ 03612 int (*tcl_Close) (Tcl_Interp * interp, Tcl_Channel chan); /* 81 */ 03613 int (*tcl_CommandComplete) (CONST char * cmd); /* 82 */ 03614 char * (*tcl_Concat) (int argc, CONST84 char * CONST * argv); /* 83 */ 03615 int (*tcl_ConvertElement) (CONST char * src, char * dst, int flags); /* 84 */ 03616 int (*tcl_ConvertCountedElement) (CONST char * src, int length, char * dst, int flags); /* 85 */ 03617 int (*tcl_CreateAlias) (Tcl_Interp * slave, CONST char * slaveCmd, Tcl_Interp * target, CONST char * targetCmd, int argc, CONST84 char * CONST * argv); /* 86 */ 03618 int (*tcl_CreateAliasObj) (Tcl_Interp * slave, CONST char * slaveCmd, Tcl_Interp * target, CONST char * targetCmd, int objc, Tcl_Obj *CONST objv[]); /* 87 */ 03619 Tcl_Channel (*tcl_CreateChannel) (Tcl_ChannelType * typePtr, CONST char * chanName, ClientData instanceData, int mask); /* 88 */ 03620 void (*tcl_CreateChannelHandler) (Tcl_Channel chan, int mask, Tcl_ChannelProc * proc, ClientData clientData); /* 89 */ 03621 void (*tcl_CreateCloseHandler) (Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData); /* 90 */ 03622 Tcl_Command (*tcl_CreateCommand) (Tcl_Interp * interp, CONST char * cmdName, Tcl_CmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc); /* 91 */ 03623 void (*tcl_CreateEventSource) (Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData); /* 92 */ 03624 void (*tcl_CreateExitHandler) (Tcl_ExitProc * proc, ClientData clientData); /* 93 */ 03625 Tcl_Interp * (*tcl_CreateInterp) (void); /* 94 */ 03626 void (*tcl_CreateMathFunc) (Tcl_Interp * interp, CONST char * name, int numArgs, Tcl_ValueType * argTypes, Tcl_MathProc * proc, ClientData clientData); /* 95 */ 03627 Tcl_Command (*tcl_CreateObjCommand) (Tcl_Interp * interp, CONST char * cmdName, Tcl_ObjCmdProc * proc, ClientData clientData, Tcl_CmdDeleteProc * deleteProc); /* 96 */ 03628 Tcl_Interp * (*tcl_CreateSlave) (Tcl_Interp * interp, CONST char * slaveName, int isSafe); /* 97 */ 03629 Tcl_TimerToken (*tcl_CreateTimerHandler) (int milliseconds, Tcl_TimerProc * proc, ClientData clientData); /* 98 */ 03630 Tcl_Trace (*tcl_CreateTrace) (Tcl_Interp * interp, int level, Tcl_CmdTraceProc * proc, ClientData clientData); /* 99 */ 03631 void (*tcl_DeleteAssocData) (Tcl_Interp * interp, CONST char * name); /* 100 */ 03632 void (*tcl_DeleteChannelHandler) (Tcl_Channel chan, Tcl_ChannelProc * proc, ClientData clientData); /* 101 */ 03633 void (*tcl_DeleteCloseHandler) (Tcl_Channel chan, Tcl_CloseProc * proc, ClientData clientData); /* 102 */ 03634 int (*tcl_DeleteCommand) (Tcl_Interp * interp, CONST char * cmdName); /* 103 */ 03635 int (*tcl_DeleteCommandFromToken) (Tcl_Interp * interp, Tcl_Command command); /* 104 */ 03636 void (*tcl_DeleteEvents) (Tcl_EventDeleteProc * proc, ClientData clientData); /* 105 */ 03637 void (*tcl_DeleteEventSource) (Tcl_EventSetupProc * setupProc, Tcl_EventCheckProc * checkProc, ClientData clientData); /* 106 */ 03638 void (*tcl_DeleteExitHandler) (Tcl_ExitProc * proc, ClientData clientData); /* 107 */ 03639 void (*tcl_DeleteHashEntry) (Tcl_HashEntry * entryPtr); /* 108 */ 03640 void (*tcl_DeleteHashTable) (Tcl_HashTable * tablePtr); /* 109 */ 03641 void (*tcl_DeleteInterp) (Tcl_Interp * interp); /* 110 */ 03642 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 03643 void (*tcl_DetachPids) (int numPids, Tcl_Pid * pidPtr); /* 111 */ 03644 #endif /* UNIX */ 03645 #ifdef __WIN32__ /* WIN */ 03646 void (*tcl_DetachPids) (int numPids, Tcl_Pid * pidPtr); /* 111 */ 03647 #endif /* WIN */ 03648 #ifdef MAC_OSX_TCL /* MACOSX */ 03649 void (*tcl_DetachPids) (int numPids, Tcl_Pid * pidPtr); /* 111 */ 03650 #endif /* MACOSX */ 03651 void (*tcl_DeleteTimerHandler) (Tcl_TimerToken token); /* 112 */ 03652 void (*tcl_DeleteTrace) (Tcl_Interp * interp, Tcl_Trace trace); /* 113 */ 03653 void (*tcl_DontCallWhenDeleted) (Tcl_Interp * interp, Tcl_InterpDeleteProc * proc, ClientData clientData); /* 114 */ 03654 int (*tcl_DoOneEvent) (int flags); /* 115 */ 03655 void (*tcl_DoWhenIdle) (Tcl_IdleProc * proc, ClientData clientData); /* 116 */ 03656 char * (*tcl_DStringAppend) (Tcl_DString * dsPtr, CONST char * bytes, int length); /* 117 */ 03657 char * (*tcl_DStringAppendElement) (Tcl_DString * dsPtr, CONST char * element); /* 118 */ 03658 void (*tcl_DStringEndSublist) (Tcl_DString * dsPtr); /* 119 */ 03659 void (*tcl_DStringFree) (Tcl_DString * dsPtr); /* 120 */ 03660 void (*tcl_DStringGetResult) (Tcl_Interp * interp, Tcl_DString * dsPtr); /* 121 */ 03661 void (*tcl_DStringInit) (Tcl_DString * dsPtr); /* 122 */ 03662 void (*tcl_DStringResult) (Tcl_Interp * interp, Tcl_DString * dsPtr); /* 123 */ 03663 void (*tcl_DStringSetLength) (Tcl_DString * dsPtr, int length); /* 124 */ 03664 void (*tcl_DStringStartSublist) (Tcl_DString * dsPtr); /* 125 */ 03665 int (*tcl_Eof) (Tcl_Channel chan); /* 126 */ 03666 CONST84_RETURN char * (*tcl_ErrnoId) (void); /* 127 */ 03667 CONST84_RETURN char * (*tcl_ErrnoMsg) (int err); /* 128 */ 03668 int (*tcl_Eval) (Tcl_Interp * interp, CONST char * script); /* 129 */ 03669 int (*tcl_EvalFile) (Tcl_Interp * interp, CONST char * fileName); /* 130 */ 03670 int (*tcl_EvalObj) (Tcl_Interp * interp, Tcl_Obj * objPtr); /* 131 */ 03671 void (*tcl_EventuallyFree) (ClientData clientData, Tcl_FreeProc * freeProc); /* 132 */ 03672 void (*tcl_Exit) (int status); /* 133 */ 03673 int (*tcl_ExposeCommand) (Tcl_Interp * interp, CONST char * hiddenCmdToken, CONST char * cmdName); /* 134 */ 03674 int (*tcl_ExprBoolean) (Tcl_Interp * interp, CONST char * expr, int * ptr); /* 135 */ 03675 int (*tcl_ExprBooleanObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, int * ptr); /* 136 */ 03676 int (*tcl_ExprDouble) (Tcl_Interp * interp, CONST char * expr, double * ptr); /* 137 */ 03677 int (*tcl_ExprDoubleObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, double * ptr); /* 138 */ 03678 int (*tcl_ExprLong) (Tcl_Interp * interp, CONST char * expr, long * ptr); /* 139 */ 03679 int (*tcl_ExprLongObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, long * ptr); /* 140 */ 03680 int (*tcl_ExprObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_Obj ** resultPtrPtr); /* 141 */ 03681 int (*tcl_ExprString) (Tcl_Interp * interp, CONST char * expr); /* 142 */ 03682 void (*tcl_Finalize) (void); /* 143 */ 03683 void (*tcl_FindExecutable) (CONST char * argv0); /* 144 */ 03684 Tcl_HashEntry * (*tcl_FirstHashEntry) (Tcl_HashTable * tablePtr, Tcl_HashSearch * searchPtr); /* 145 */ 03685 int (*tcl_Flush) (Tcl_Channel chan); /* 146 */ 03686 void (*tcl_FreeResult) (Tcl_Interp * interp); /* 147 */ 03687 int (*tcl_GetAlias) (Tcl_Interp * interp, CONST char * slaveCmd, Tcl_Interp ** targetInterpPtr, CONST84 char ** targetCmdPtr, int * argcPtr, CONST84 char *** argvPtr); /* 148 */ 03688 int (*tcl_GetAliasObj) (Tcl_Interp * interp, CONST char * slaveCmd, Tcl_Interp ** targetInterpPtr, CONST84 char ** targetCmdPtr, int * objcPtr, Tcl_Obj *** objv); /* 149 */ 03689 ClientData (*tcl_GetAssocData) (Tcl_Interp * interp, CONST char * name, Tcl_InterpDeleteProc ** procPtr); /* 150 */ 03690 Tcl_Channel (*tcl_GetChannel) (Tcl_Interp * interp, CONST char * chanName, int * modePtr); /* 151 */ 03691 int (*tcl_GetChannelBufferSize) (Tcl_Channel chan); /* 152 */ 03692 int (*tcl_GetChannelHandle) (Tcl_Channel chan, int direction, ClientData * handlePtr); /* 153 */ 03693 ClientData (*tcl_GetChannelInstanceData) (Tcl_Channel chan); /* 154 */ 03694 int (*tcl_GetChannelMode) (Tcl_Channel chan); /* 155 */ 03695 CONST84_RETURN char * (*tcl_GetChannelName) (Tcl_Channel chan); /* 156 */ 03696 int (*tcl_GetChannelOption) (Tcl_Interp * interp, Tcl_Channel chan, CONST char * optionName, Tcl_DString * dsPtr); /* 157 */ 03697 Tcl_ChannelType * (*tcl_GetChannelType) (Tcl_Channel chan); /* 158 */ 03698 int (*tcl_GetCommandInfo) (Tcl_Interp * interp, CONST char * cmdName, Tcl_CmdInfo * infoPtr); /* 159 */ 03699 CONST84_RETURN char * (*tcl_GetCommandName) (Tcl_Interp * interp, Tcl_Command command); /* 160 */ 03700 int (*tcl_GetErrno) (void); /* 161 */ 03701 CONST84_RETURN char * (*tcl_GetHostName) (void); /* 162 */ 03702 int (*tcl_GetInterpPath) (Tcl_Interp * askInterp, Tcl_Interp * slaveInterp); /* 163 */ 03703 Tcl_Interp * (*tcl_GetMaster) (Tcl_Interp * interp); /* 164 */ 03704 CONST char * (*tcl_GetNameOfExecutable) (void); /* 165 */ 03705 Tcl_Obj * (*tcl_GetObjResult) (Tcl_Interp * interp); /* 166 */ 03706 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 03707 int (*tcl_GetOpenFile) (Tcl_Interp * interp, CONST char * chanID, int forWriting, int checkUsage, ClientData * filePtr); /* 167 */ 03708 #endif /* UNIX */ 03709 #ifdef __WIN32__ /* WIN */ 03710 void *reserved167; 03711 #endif /* WIN */ 03712 #ifdef MAC_OSX_TCL /* MACOSX */ 03713 int (*tcl_GetOpenFile) (Tcl_Interp * interp, CONST char * chanID, int forWriting, int checkUsage, ClientData * filePtr); /* 167 */ 03714 #endif /* MACOSX */ 03715 Tcl_PathType (*tcl_GetPathType) (CONST char * path); /* 168 */ 03716 int (*tcl_Gets) (Tcl_Channel chan, Tcl_DString * dsPtr); /* 169 */ 03717 int (*tcl_GetsObj) (Tcl_Channel chan, Tcl_Obj * objPtr); /* 170 */ 03718 int (*tcl_GetServiceMode) (void); /* 171 */ 03719 Tcl_Interp * (*tcl_GetSlave) (Tcl_Interp * interp, CONST char * slaveName); /* 172 */ 03720 Tcl_Channel (*tcl_GetStdChannel) (int type); /* 173 */ 03721 CONST84_RETURN char * (*tcl_GetStringResult) (Tcl_Interp * interp); /* 174 */ 03722 CONST84_RETURN char * (*tcl_GetVar) (Tcl_Interp * interp, CONST char * varName, int flags); /* 175 */ 03723 CONST84_RETURN char * (*tcl_GetVar2) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags); /* 176 */ 03724 int (*tcl_GlobalEval) (Tcl_Interp * interp, CONST char * command); /* 177 */ 03725 int (*tcl_GlobalEvalObj) (Tcl_Interp * interp, Tcl_Obj * objPtr); /* 178 */ 03726 int (*tcl_HideCommand) (Tcl_Interp * interp, CONST char * cmdName, CONST char * hiddenCmdToken); /* 179 */ 03727 int (*tcl_Init) (Tcl_Interp * interp); /* 180 */ 03728 void (*tcl_InitHashTable) (Tcl_HashTable * tablePtr, int keyType); /* 181 */ 03729 int (*tcl_InputBlocked) (Tcl_Channel chan); /* 182 */ 03730 int (*tcl_InputBuffered) (Tcl_Channel chan); /* 183 */ 03731 int (*tcl_InterpDeleted) (Tcl_Interp * interp); /* 184 */ 03732 int (*tcl_IsSafe) (Tcl_Interp * interp); /* 185 */ 03733 char * (*tcl_JoinPath) (int argc, CONST84 char * CONST * argv, Tcl_DString * resultPtr); /* 186 */ 03734 int (*tcl_LinkVar) (Tcl_Interp * interp, CONST char * varName, char * addr, int type); /* 187 */ 03735 void *reserved188; 03736 Tcl_Channel (*tcl_MakeFileChannel) (ClientData handle, int mode); /* 189 */ 03737 int (*tcl_MakeSafe) (Tcl_Interp * interp); /* 190 */ 03738 Tcl_Channel (*tcl_MakeTcpClientChannel) (ClientData tcpSocket); /* 191 */ 03739 char * (*tcl_Merge) (int argc, CONST84 char * CONST * argv); /* 192 */ 03740 Tcl_HashEntry * (*tcl_NextHashEntry) (Tcl_HashSearch * searchPtr); /* 193 */ 03741 void (*tcl_NotifyChannel) (Tcl_Channel channel, int mask); /* 194 */ 03742 Tcl_Obj * (*tcl_ObjGetVar2) (Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, int flags); /* 195 */ 03743 Tcl_Obj * (*tcl_ObjSetVar2) (Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, Tcl_Obj * newValuePtr, int flags); /* 196 */ 03744 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 03745 Tcl_Channel (*tcl_OpenCommandChannel) (Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags); /* 197 */ 03746 #endif /* UNIX */ 03747 #ifdef __WIN32__ /* WIN */ 03748 Tcl_Channel (*tcl_OpenCommandChannel) (Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags); /* 197 */ 03749 #endif /* WIN */ 03750 #ifdef MAC_OSX_TCL /* MACOSX */ 03751 Tcl_Channel (*tcl_OpenCommandChannel) (Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags); /* 197 */ 03752 #endif /* MACOSX */ 03753 Tcl_Channel (*tcl_OpenFileChannel) (Tcl_Interp * interp, CONST char * fileName, CONST char * modeString, int permissions); /* 198 */ 03754 Tcl_Channel (*tcl_OpenTcpClient) (Tcl_Interp * interp, int port, CONST char * address, CONST char * myaddr, int myport, int async); /* 199 */ 03755 Tcl_Channel (*tcl_OpenTcpServer) (Tcl_Interp * interp, int port, CONST char * host, Tcl_TcpAcceptProc * acceptProc, ClientData callbackData); /* 200 */ 03756 void (*tcl_Preserve) (ClientData data); /* 201 */ 03757 void (*tcl_PrintDouble) (Tcl_Interp * interp, double value, char * dst); /* 202 */ 03758 int (*tcl_PutEnv) (CONST char * assignment); /* 203 */ 03759 CONST84_RETURN char * (*tcl_PosixError) (Tcl_Interp * interp); /* 204 */ 03760 void (*tcl_QueueEvent) (Tcl_Event * evPtr, Tcl_QueuePosition position); /* 205 */ 03761 int (*tcl_Read) (Tcl_Channel chan, char * bufPtr, int toRead); /* 206 */ 03762 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 03763 void (*tcl_ReapDetachedProcs) (void); /* 207 */ 03764 #endif /* UNIX */ 03765 #ifdef __WIN32__ /* WIN */ 03766 void (*tcl_ReapDetachedProcs) (void); /* 207 */ 03767 #endif /* WIN */ 03768 #ifdef MAC_OSX_TCL /* MACOSX */ 03769 void (*tcl_ReapDetachedProcs) (void); /* 207 */ 03770 #endif /* MACOSX */ 03771 int (*tcl_RecordAndEval) (Tcl_Interp * interp, CONST char * cmd, int flags); /* 208 */ 03772 int (*tcl_RecordAndEvalObj) (Tcl_Interp * interp, Tcl_Obj * cmdPtr, int flags); /* 209 */ 03773 void (*tcl_RegisterChannel) (Tcl_Interp * interp, Tcl_Channel chan); /* 210 */ 03774 void (*tcl_RegisterObjType) (Tcl_ObjType * typePtr); /* 211 */ 03775 Tcl_RegExp (*tcl_RegExpCompile) (Tcl_Interp * interp, CONST char * pattern); /* 212 */ 03776 int (*tcl_RegExpExec) (Tcl_Interp * interp, Tcl_RegExp regexp, CONST char * text, CONST char * start); /* 213 */ 03777 int (*tcl_RegExpMatch) (Tcl_Interp * interp, CONST char * text, CONST char * pattern); /* 214 */ 03778 void (*tcl_RegExpRange) (Tcl_RegExp regexp, int index, CONST84 char ** startPtr, CONST84 char ** endPtr); /* 215 */ 03779 void (*tcl_Release) (ClientData clientData); /* 216 */ 03780 void (*tcl_ResetResult) (Tcl_Interp * interp); /* 217 */ 03781 int (*tcl_ScanElement) (CONST char * str, int * flagPtr); /* 218 */ 03782 int (*tcl_ScanCountedElement) (CONST char * str, int length, int * flagPtr); /* 219 */ 03783 int (*tcl_SeekOld) (Tcl_Channel chan, int offset, int mode); /* 220 */ 03784 int (*tcl_ServiceAll) (void); /* 221 */ 03785 int (*tcl_ServiceEvent) (int flags); /* 222 */ 03786 void (*tcl_SetAssocData) (Tcl_Interp * interp, CONST char * name, Tcl_InterpDeleteProc * proc, ClientData clientData); /* 223 */ 03787 void (*tcl_SetChannelBufferSize) (Tcl_Channel chan, int sz); /* 224 */ 03788 int (*tcl_SetChannelOption) (Tcl_Interp * interp, Tcl_Channel chan, CONST char * optionName, CONST char * newValue); /* 225 */ 03789 int (*tcl_SetCommandInfo) (Tcl_Interp * interp, CONST char * cmdName, CONST Tcl_CmdInfo * infoPtr); /* 226 */ 03790 void (*tcl_SetErrno) (int err); /* 227 */ 03791 void (*tcl_SetErrorCode) (Tcl_Interp * interp, ...); /* 228 */ 03792 void (*tcl_SetMaxBlockTime) (Tcl_Time * timePtr); /* 229 */ 03793 void (*tcl_SetPanicProc) (Tcl_PanicProc * panicProc); /* 230 */ 03794 int (*tcl_SetRecursionLimit) (Tcl_Interp * interp, int depth); /* 231 */ 03795 void (*tcl_SetResult) (Tcl_Interp * interp, char * result, Tcl_FreeProc * freeProc); /* 232 */ 03796 int (*tcl_SetServiceMode) (int mode); /* 233 */ 03797 void (*tcl_SetObjErrorCode) (Tcl_Interp * interp, Tcl_Obj * errorObjPtr); /* 234 */ 03798 void (*tcl_SetObjResult) (Tcl_Interp * interp, Tcl_Obj * resultObjPtr); /* 235 */ 03799 void (*tcl_SetStdChannel) (Tcl_Channel channel, int type); /* 236 */ 03800 CONST84_RETURN char * (*tcl_SetVar) (Tcl_Interp * interp, CONST char * varName, CONST char * newValue, int flags); /* 237 */ 03801 CONST84_RETURN char * (*tcl_SetVar2) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, CONST char * newValue, int flags); /* 238 */ 03802 CONST84_RETURN char * (*tcl_SignalId) (int sig); /* 239 */ 03803 CONST84_RETURN char * (*tcl_SignalMsg) (int sig); /* 240 */ 03804 void (*tcl_SourceRCFile) (Tcl_Interp * interp); /* 241 */ 03805 int (*tcl_SplitList) (Tcl_Interp * interp, CONST char * listStr, int * argcPtr, CONST84 char *** argvPtr); /* 242 */ 03806 void (*tcl_SplitPath) (CONST char * path, int * argcPtr, CONST84 char *** argvPtr); /* 243 */ 03807 void (*tcl_StaticPackage) (Tcl_Interp * interp, CONST char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc); /* 244 */ 03808 int (*tcl_StringMatch) (CONST char * str, CONST char * pattern); /* 245 */ 03809 int (*tcl_TellOld) (Tcl_Channel chan); /* 246 */ 03810 int (*tcl_TraceVar) (Tcl_Interp * interp, CONST char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData); /* 247 */ 03811 int (*tcl_TraceVar2) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData); /* 248 */ 03812 char * (*tcl_TranslateFileName) (Tcl_Interp * interp, CONST char * name, Tcl_DString * bufferPtr); /* 249 */ 03813 int (*tcl_Ungets) (Tcl_Channel chan, CONST char * str, int len, int atHead); /* 250 */ 03814 void (*tcl_UnlinkVar) (Tcl_Interp * interp, CONST char * varName); /* 251 */ 03815 int (*tcl_UnregisterChannel) (Tcl_Interp * interp, Tcl_Channel chan); /* 252 */ 03816 int (*tcl_UnsetVar) (Tcl_Interp * interp, CONST char * varName, int flags); /* 253 */ 03817 int (*tcl_UnsetVar2) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags); /* 254 */ 03818 void (*tcl_UntraceVar) (Tcl_Interp * interp, CONST char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData); /* 255 */ 03819 void (*tcl_UntraceVar2) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, Tcl_VarTraceProc * proc, ClientData clientData); /* 256 */ 03820 void (*tcl_UpdateLinkedVar) (Tcl_Interp * interp, CONST char * varName); /* 257 */ 03821 int (*tcl_UpVar) (Tcl_Interp * interp, CONST char * frameName, CONST char * varName, CONST char * localName, int flags); /* 258 */ 03822 int (*tcl_UpVar2) (Tcl_Interp * interp, CONST char * frameName, CONST char * part1, CONST char * part2, CONST char * localName, int flags); /* 259 */ 03823 int (*tcl_VarEval) (Tcl_Interp * interp, ...); /* 260 */ 03824 ClientData (*tcl_VarTraceInfo) (Tcl_Interp * interp, CONST char * varName, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData); /* 261 */ 03825 ClientData (*tcl_VarTraceInfo2) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData); /* 262 */ 03826 int (*tcl_Write) (Tcl_Channel chan, CONST char * s, int slen); /* 263 */ 03827 void (*tcl_WrongNumArgs) (Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], CONST char * message); /* 264 */ 03828 int (*tcl_DumpActiveMemory) (CONST char * fileName); /* 265 */ 03829 void (*tcl_ValidateAllMemory) (CONST char * file, int line); /* 266 */ 03830 void (*tcl_AppendResultVA) (Tcl_Interp * interp, va_list argList); /* 267 */ 03831 void (*tcl_AppendStringsToObjVA) (Tcl_Obj * objPtr, va_list argList); /* 268 */ 03832 CONST84_RETURN char * (*tcl_HashStats) (Tcl_HashTable * tablePtr); /* 269 */ 03833 CONST84_RETURN char * (*tcl_ParseVar) (Tcl_Interp * interp, CONST char * start, CONST84 char ** termPtr); /* 270 */ 03834 CONST84_RETURN char * (*tcl_PkgPresent) (Tcl_Interp * interp, CONST char * name, CONST char * version, int exact); /* 271 */ 03835 CONST84_RETURN char * (*tcl_PkgPresentEx) (Tcl_Interp * interp, CONST char * name, CONST char * version, int exact, ClientData * clientDataPtr); /* 272 */ 03836 int (*tcl_PkgProvide) (Tcl_Interp * interp, CONST char * name, CONST char * version); /* 273 */ 03837 CONST84_RETURN char * (*tcl_PkgRequire) (Tcl_Interp * interp, CONST char * name, CONST char * version, int exact); /* 274 */ 03838 void (*tcl_SetErrorCodeVA) (Tcl_Interp * interp, va_list argList); /* 275 */ 03839 int (*tcl_VarEvalVA) (Tcl_Interp * interp, va_list argList); /* 276 */ 03840 Tcl_Pid (*tcl_WaitPid) (Tcl_Pid pid, int * statPtr, int options); /* 277 */ 03841 void (*tcl_PanicVA) (CONST char * format, va_list argList); /* 278 */ 03842 void (*tcl_GetVersion) (int * major, int * minor, int * patchLevel, int * type); /* 279 */ 03843 void (*tcl_InitMemory) (Tcl_Interp * interp); /* 280 */ 03844 Tcl_Channel (*tcl_StackChannel) (Tcl_Interp * interp, Tcl_ChannelType * typePtr, ClientData instanceData, int mask, Tcl_Channel prevChan); /* 281 */ 03845 int (*tcl_UnstackChannel) (Tcl_Interp * interp, Tcl_Channel chan); /* 282 */ 03846 Tcl_Channel (*tcl_GetStackedChannel) (Tcl_Channel chan); /* 283 */ 03847 void (*tcl_SetMainLoop) (Tcl_MainLoopProc * proc); /* 284 */ 03848 void *reserved285; 03849 void (*tcl_AppendObjToObj) (Tcl_Obj * objPtr, Tcl_Obj * appendObjPtr); /* 286 */ 03850 Tcl_Encoding (*tcl_CreateEncoding) (const Tcl_EncodingType * typePtr); /* 287 */ 03851 void (*tcl_CreateThreadExitHandler) (Tcl_ExitProc * proc, ClientData clientData); /* 288 */ 03852 void (*tcl_DeleteThreadExitHandler) (Tcl_ExitProc * proc, ClientData clientData); /* 289 */ 03853 void (*tcl_DiscardResult) (Tcl_SavedResult * statePtr); /* 290 */ 03854 int (*tcl_EvalEx) (Tcl_Interp * interp, CONST char * script, int numBytes, int flags); /* 291 */ 03855 int (*tcl_EvalObjv) (Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags); /* 292 */ 03856 int (*tcl_EvalObjEx) (Tcl_Interp * interp, Tcl_Obj * objPtr, int flags); /* 293 */ 03857 void (*tcl_ExitThread) (int status); /* 294 */ 03858 int (*tcl_ExternalToUtf) (Tcl_Interp * interp, Tcl_Encoding encoding, CONST char * src, int srcLen, int flags, Tcl_EncodingState * statePtr, char * dst, int dstLen, int * srcReadPtr, int * dstWrotePtr, int * dstCharsPtr); /* 295 */ 03859 char * (*tcl_ExternalToUtfDString) (Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr); /* 296 */ 03860 void (*tcl_FinalizeThread) (void); /* 297 */ 03861 void (*tcl_FinalizeNotifier) (ClientData clientData); /* 298 */ 03862 void (*tcl_FreeEncoding) (Tcl_Encoding encoding); /* 299 */ 03863 Tcl_ThreadId (*tcl_GetCurrentThread) (void); /* 300 */ 03864 Tcl_Encoding (*tcl_GetEncoding) (Tcl_Interp * interp, CONST char * name); /* 301 */ 03865 CONST84_RETURN char * (*tcl_GetEncodingName) (Tcl_Encoding encoding); /* 302 */ 03866 void (*tcl_GetEncodingNames) (Tcl_Interp * interp); /* 303 */ 03867 int (*tcl_GetIndexFromObjStruct) (Tcl_Interp * interp, Tcl_Obj * objPtr, CONST VOID * tablePtr, int offset, CONST char * msg, int flags, int * indexPtr); /* 304 */ 03868 VOID * (*tcl_GetThreadData) (Tcl_ThreadDataKey * keyPtr, int size); /* 305 */ 03869 Tcl_Obj * (*tcl_GetVar2Ex) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags); /* 306 */ 03870 ClientData (*tcl_InitNotifier) (void); /* 307 */ 03871 void (*tcl_MutexLock) (Tcl_Mutex * mutexPtr); /* 308 */ 03872 void (*tcl_MutexUnlock) (Tcl_Mutex * mutexPtr); /* 309 */ 03873 void (*tcl_ConditionNotify) (Tcl_Condition * condPtr); /* 310 */ 03874 void (*tcl_ConditionWait) (Tcl_Condition * condPtr, Tcl_Mutex * mutexPtr, Tcl_Time * timePtr); /* 311 */ 03875 int (*tcl_NumUtfChars) (CONST char * src, int length); /* 312 */ 03876 int (*tcl_ReadChars) (Tcl_Channel channel, Tcl_Obj * objPtr, int charsToRead, int appendFlag); /* 313 */ 03877 void (*tcl_RestoreResult) (Tcl_Interp * interp, Tcl_SavedResult * statePtr); /* 314 */ 03878 void (*tcl_SaveResult) (Tcl_Interp * interp, Tcl_SavedResult * statePtr); /* 315 */ 03879 int (*tcl_SetSystemEncoding) (Tcl_Interp * interp, CONST char * name); /* 316 */ 03880 Tcl_Obj * (*tcl_SetVar2Ex) (Tcl_Interp * interp, CONST char * part1, CONST char * part2, Tcl_Obj * newValuePtr, int flags); /* 317 */ 03881 void (*tcl_ThreadAlert) (Tcl_ThreadId threadId); /* 318 */ 03882 void (*tcl_ThreadQueueEvent) (Tcl_ThreadId threadId, Tcl_Event* evPtr, Tcl_QueuePosition position); /* 319 */ 03883 Tcl_UniChar (*tcl_UniCharAtIndex) (CONST char * src, int index); /* 320 */ 03884 Tcl_UniChar (*tcl_UniCharToLower) (int ch); /* 321 */ 03885 Tcl_UniChar (*tcl_UniCharToTitle) (int ch); /* 322 */ 03886 Tcl_UniChar (*tcl_UniCharToUpper) (int ch); /* 323 */ 03887 int (*tcl_UniCharToUtf) (int ch, char * buf); /* 324 */ 03888 CONST84_RETURN char * (*tcl_UtfAtIndex) (CONST char * src, int index); /* 325 */ 03889 int (*tcl_UtfCharComplete) (CONST char * src, int length); /* 326 */ 03890 int (*tcl_UtfBackslash) (CONST char * src, int * readPtr, char * dst); /* 327 */ 03891 CONST84_RETURN char * (*tcl_UtfFindFirst) (CONST char * src, int ch); /* 328 */ 03892 CONST84_RETURN char * (*tcl_UtfFindLast) (CONST char * src, int ch); /* 329 */ 03893 CONST84_RETURN char * (*tcl_UtfNext) (CONST char * src); /* 330 */ 03894 CONST84_RETURN char * (*tcl_UtfPrev) (CONST char * src, CONST char * start); /* 331 */ 03895 int (*tcl_UtfToExternal) (Tcl_Interp * interp, Tcl_Encoding encoding, CONST char * src, int srcLen, int flags, Tcl_EncodingState * statePtr, char * dst, int dstLen, int * srcReadPtr, int * dstWrotePtr, int * dstCharsPtr); /* 332 */ 03896 char * (*tcl_UtfToExternalDString) (Tcl_Encoding encoding, CONST char * src, int srcLen, Tcl_DString * dsPtr); /* 333 */ 03897 int (*tcl_UtfToLower) (char * src); /* 334 */ 03898 int (*tcl_UtfToTitle) (char * src); /* 335 */ 03899 int (*tcl_UtfToUniChar) (CONST char * src, Tcl_UniChar * chPtr); /* 336 */ 03900 int (*tcl_UtfToUpper) (char * src); /* 337 */ 03901 int (*tcl_WriteChars) (Tcl_Channel chan, CONST char * src, int srcLen); /* 338 */ 03902 int (*tcl_WriteObj) (Tcl_Channel chan, Tcl_Obj * objPtr); /* 339 */ 03903 char * (*tcl_GetString) (Tcl_Obj * objPtr); /* 340 */ 03904 CONST84_RETURN char * (*tcl_GetDefaultEncodingDir) (void); /* 341 */ 03905 void (*tcl_SetDefaultEncodingDir) (CONST char * path); /* 342 */ 03906 void (*tcl_AlertNotifier) (ClientData clientData); /* 343 */ 03907 void (*tcl_ServiceModeHook) (int mode); /* 344 */ 03908 int (*tcl_UniCharIsAlnum) (int ch); /* 345 */ 03909 int (*tcl_UniCharIsAlpha) (int ch); /* 346 */ 03910 int (*tcl_UniCharIsDigit) (int ch); /* 347 */ 03911 int (*tcl_UniCharIsLower) (int ch); /* 348 */ 03912 int (*tcl_UniCharIsSpace) (int ch); /* 349 */ 03913 int (*tcl_UniCharIsUpper) (int ch); /* 350 */ 03914 int (*tcl_UniCharIsWordChar) (int ch); /* 351 */ 03915 int (*tcl_UniCharLen) (CONST Tcl_UniChar * uniStr); /* 352 */ 03916 int (*tcl_UniCharNcmp) (CONST Tcl_UniChar * ucs, CONST Tcl_UniChar * uct, unsigned long numChars); /* 353 */ 03917 char * (*tcl_UniCharToUtfDString) (CONST Tcl_UniChar * uniStr, int uniLength, Tcl_DString * dsPtr); /* 354 */ 03918 Tcl_UniChar * (*tcl_UtfToUniCharDString) (CONST char * src, int length, Tcl_DString * dsPtr); /* 355 */ 03919 Tcl_RegExp (*tcl_GetRegExpFromObj) (Tcl_Interp * interp, Tcl_Obj * patObj, int flags); /* 356 */ 03920 Tcl_Obj * (*tcl_EvalTokens) (Tcl_Interp * interp, Tcl_Token * tokenPtr, int count); /* 357 */ 03921 void (*tcl_FreeParse) (Tcl_Parse * parsePtr); /* 358 */ 03922 void (*tcl_LogCommandInfo) (Tcl_Interp * interp, CONST char * script, CONST char * command, int length); /* 359 */ 03923 int (*tcl_ParseBraces) (Tcl_Interp * interp, CONST char * start, int numBytes, Tcl_Parse * parsePtr, int append, CONST84 char ** termPtr); /* 360 */ 03924 int (*tcl_ParseCommand) (Tcl_Interp * interp, CONST char * start, int numBytes, int nested, Tcl_Parse * parsePtr); /* 361 */ 03925 int (*tcl_ParseExpr) (Tcl_Interp * interp, CONST char * start, int numBytes, Tcl_Parse * parsePtr); /* 362 */ 03926 int (*tcl_ParseQuotedString) (Tcl_Interp * interp, CONST char * start, int numBytes, Tcl_Parse * parsePtr, int append, CONST84 char ** termPtr); /* 363 */ 03927 int (*tcl_ParseVarName) (Tcl_Interp * interp, CONST char * start, int numBytes, Tcl_Parse * parsePtr, int append); /* 364 */ 03928 char * (*tcl_GetCwd) (Tcl_Interp * interp, Tcl_DString * cwdPtr); /* 365 */ 03929 int (*tcl_Chdir) (CONST char * dirName); /* 366 */ 03930 int (*tcl_Access) (CONST char * path, int mode); /* 367 */ 03931 int (*tcl_Stat) (CONST char * path, struct stat * bufPtr); /* 368 */ 03932 int (*tcl_UtfNcmp) (CONST char * s1, CONST char * s2, unsigned long n); /* 369 */ 03933 int (*tcl_UtfNcasecmp) (CONST char * s1, CONST char * s2, unsigned long n); /* 370 */ 03934 int (*tcl_StringCaseMatch) (CONST char * str, CONST char * pattern, int nocase); /* 371 */ 03935 int (*tcl_UniCharIsControl) (int ch); /* 372 */ 03936 int (*tcl_UniCharIsGraph) (int ch); /* 373 */ 03937 int (*tcl_UniCharIsPrint) (int ch); /* 374 */ 03938 int (*tcl_UniCharIsPunct) (int ch); /* 375 */ 03939 int (*tcl_RegExpExecObj) (Tcl_Interp * interp, Tcl_RegExp regexp, Tcl_Obj * textObj, int offset, int nmatches, int flags); /* 376 */ 03940 void (*tcl_RegExpGetInfo) (Tcl_RegExp regexp, Tcl_RegExpInfo * infoPtr); /* 377 */ 03941 Tcl_Obj * (*tcl_NewUnicodeObj) (CONST Tcl_UniChar * unicode, int numChars); /* 378 */ 03942 void (*tcl_SetUnicodeObj) (Tcl_Obj * objPtr, CONST Tcl_UniChar * unicode, int numChars); /* 379 */ 03943 int (*tcl_GetCharLength) (Tcl_Obj * objPtr); /* 380 */ 03944 Tcl_UniChar (*tcl_GetUniChar) (Tcl_Obj * objPtr, int index); /* 381 */ 03945 Tcl_UniChar * (*tcl_GetUnicode) (Tcl_Obj * objPtr); /* 382 */ 03946 Tcl_Obj * (*tcl_GetRange) (Tcl_Obj * objPtr, int first, int last); /* 383 */ 03947 void (*tcl_AppendUnicodeToObj) (Tcl_Obj * objPtr, CONST Tcl_UniChar * unicode, int length); /* 384 */ 03948 int (*tcl_RegExpMatchObj) (Tcl_Interp * interp, Tcl_Obj * textObj, Tcl_Obj * patternObj); /* 385 */ 03949 void (*tcl_SetNotifier) (Tcl_NotifierProcs * notifierProcPtr); /* 386 */ 03950 Tcl_Mutex * (*tcl_GetAllocMutex) (void); /* 387 */ 03951 int (*tcl_GetChannelNames) (Tcl_Interp * interp); /* 388 */ 03952 int (*tcl_GetChannelNamesEx) (Tcl_Interp * interp, CONST char * pattern); /* 389 */ 03953 int (*tcl_ProcObjCmd) (ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[]); /* 390 */ 03954 void (*tcl_ConditionFinalize) (Tcl_Condition * condPtr); /* 391 */ 03955 void (*tcl_MutexFinalize) (Tcl_Mutex * mutex); /* 392 */ 03956 int (*tcl_CreateThread) (Tcl_ThreadId * idPtr, Tcl_ThreadCreateProc proc, ClientData clientData, int stackSize, int flags); /* 393 */ 03957 int (*tcl_ReadRaw) (Tcl_Channel chan, char * dst, int bytesToRead); /* 394 */ 03958 int (*tcl_WriteRaw) (Tcl_Channel chan, CONST char * src, int srcLen); /* 395 */ 03959 Tcl_Channel (*tcl_GetTopChannel) (Tcl_Channel chan); /* 396 */ 03960 int (*tcl_ChannelBuffered) (Tcl_Channel chan); /* 397 */ 03961 CONST84_RETURN char * (*tcl_ChannelName) (CONST Tcl_ChannelType * chanTypePtr); /* 398 */ 03962 Tcl_ChannelTypeVersion (*tcl_ChannelVersion) (CONST Tcl_ChannelType * chanTypePtr); /* 399 */ 03963 Tcl_DriverBlockModeProc * (*tcl_ChannelBlockModeProc) (CONST Tcl_ChannelType * chanTypePtr); /* 400 */ 03964 Tcl_DriverCloseProc * (*tcl_ChannelCloseProc) (CONST Tcl_ChannelType * chanTypePtr); /* 401 */ 03965 Tcl_DriverClose2Proc * (*tcl_ChannelClose2Proc) (CONST Tcl_ChannelType * chanTypePtr); /* 402 */ 03966 Tcl_DriverInputProc * (*tcl_ChannelInputProc) (CONST Tcl_ChannelType * chanTypePtr); /* 403 */ 03967 Tcl_DriverOutputProc * (*tcl_ChannelOutputProc) (CONST Tcl_ChannelType * chanTypePtr); /* 404 */ 03968 Tcl_DriverSeekProc * (*tcl_ChannelSeekProc) (CONST Tcl_ChannelType * chanTypePtr); /* 405 */ 03969 Tcl_DriverSetOptionProc * (*tcl_ChannelSetOptionProc) (CONST Tcl_ChannelType * chanTypePtr); /* 406 */ 03970 Tcl_DriverGetOptionProc * (*tcl_ChannelGetOptionProc) (CONST Tcl_ChannelType * chanTypePtr); /* 407 */ 03971 Tcl_DriverWatchProc * (*tcl_ChannelWatchProc) (CONST Tcl_ChannelType * chanTypePtr); /* 408 */ 03972 Tcl_DriverGetHandleProc * (*tcl_ChannelGetHandleProc) (CONST Tcl_ChannelType * chanTypePtr); /* 409 */ 03973 Tcl_DriverFlushProc * (*tcl_ChannelFlushProc) (CONST Tcl_ChannelType * chanTypePtr); /* 410 */ 03974 Tcl_DriverHandlerProc * (*tcl_ChannelHandlerProc) (CONST Tcl_ChannelType * chanTypePtr); /* 411 */ 03975 int (*tcl_JoinThread) (Tcl_ThreadId threadId, int* result); /* 412 */ 03976 int (*tcl_IsChannelShared) (Tcl_Channel channel); /* 413 */ 03977 int (*tcl_IsChannelRegistered) (Tcl_Interp* interp, Tcl_Channel channel); /* 414 */ 03978 void (*tcl_CutChannel) (Tcl_Channel channel); /* 415 */ 03979 void (*tcl_SpliceChannel) (Tcl_Channel channel); /* 416 */ 03980 void (*tcl_ClearChannelHandlers) (Tcl_Channel channel); /* 417 */ 03981 int (*tcl_IsChannelExisting) (CONST char* channelName); /* 418 */ 03982 int (*tcl_UniCharNcasecmp) (CONST Tcl_UniChar * ucs, CONST Tcl_UniChar * uct, unsigned long numChars); /* 419 */ 03983 int (*tcl_UniCharCaseMatch) (CONST Tcl_UniChar * uniStr, CONST Tcl_UniChar * uniPattern, int nocase); /* 420 */ 03984 Tcl_HashEntry * (*tcl_FindHashEntry) (Tcl_HashTable * tablePtr, CONST char * key); /* 421 */ 03985 Tcl_HashEntry * (*tcl_CreateHashEntry) (Tcl_HashTable * tablePtr, CONST char * key, int * newPtr); /* 422 */ 03986 void (*tcl_InitCustomHashTable) (Tcl_HashTable * tablePtr, int keyType, Tcl_HashKeyType * typePtr); /* 423 */ 03987 void (*tcl_InitObjHashTable) (Tcl_HashTable * tablePtr); /* 424 */ 03988 ClientData (*tcl_CommandTraceInfo) (Tcl_Interp * interp, CONST char * varName, int flags, Tcl_CommandTraceProc * procPtr, ClientData prevClientData); /* 425 */ 03989 int (*tcl_TraceCommand) (Tcl_Interp * interp, CONST char * varName, int flags, Tcl_CommandTraceProc * proc, ClientData clientData); /* 426 */ 03990 void (*tcl_UntraceCommand) (Tcl_Interp * interp, CONST char * varName, int flags, Tcl_CommandTraceProc * proc, ClientData clientData); /* 427 */ 03991 char * (*tcl_AttemptAlloc) (unsigned int size); /* 428 */ 03992 char * (*tcl_AttemptDbCkalloc) (unsigned int size, CONST char * file, int line); /* 429 */ 03993 char * (*tcl_AttemptRealloc) (char * ptr, unsigned int size); /* 430 */ 03994 char * (*tcl_AttemptDbCkrealloc) (char * ptr, unsigned int size, CONST char * file, int line); /* 431 */ 03995 int (*tcl_AttemptSetObjLength) (Tcl_Obj * objPtr, int length); /* 432 */ 03996 Tcl_ThreadId (*tcl_GetChannelThread) (Tcl_Channel channel); /* 433 */ 03997 Tcl_UniChar * (*tcl_GetUnicodeFromObj) (Tcl_Obj * objPtr, int * lengthPtr); /* 434 */ 03998 int (*tcl_GetMathFuncInfo) (Tcl_Interp * interp, CONST char * name, int * numArgsPtr, Tcl_ValueType ** argTypesPtr, Tcl_MathProc ** procPtr, ClientData * clientDataPtr); /* 435 */ 03999 Tcl_Obj * (*tcl_ListMathFuncs) (Tcl_Interp * interp, CONST char * pattern); /* 436 */ 04000 Tcl_Obj * (*tcl_SubstObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, int flags); /* 437 */ 04001 int (*tcl_DetachChannel) (Tcl_Interp* interp, Tcl_Channel channel); /* 438 */ 04002 int (*tcl_IsStandardChannel) (Tcl_Channel channel); /* 439 */ 04003 int (*tcl_FSCopyFile) (Tcl_Obj * srcPathPtr, Tcl_Obj * destPathPtr); /* 440 */ 04004 int (*tcl_FSCopyDirectory) (Tcl_Obj * srcPathPtr, Tcl_Obj * destPathPtr, Tcl_Obj ** errorPtr); /* 441 */ 04005 int (*tcl_FSCreateDirectory) (Tcl_Obj * pathPtr); /* 442 */ 04006 int (*tcl_FSDeleteFile) (Tcl_Obj * pathPtr); /* 443 */ 04007 int (*tcl_FSLoadFile) (Tcl_Interp * interp, Tcl_Obj * pathPtr, CONST char * sym1, CONST char * sym2, Tcl_PackageInitProc ** proc1Ptr, Tcl_PackageInitProc ** proc2Ptr, Tcl_LoadHandle * handlePtr, Tcl_FSUnloadFileProc ** unloadProcPtr); /* 444 */ 04008 int (*tcl_FSMatchInDirectory) (Tcl_Interp * interp, Tcl_Obj * result, Tcl_Obj * pathPtr, CONST char * pattern, Tcl_GlobTypeData * types); /* 445 */ 04009 Tcl_Obj * (*tcl_FSLink) (Tcl_Obj * pathPtr, Tcl_Obj * toPtr, int linkAction); /* 446 */ 04010 int (*tcl_FSRemoveDirectory) (Tcl_Obj * pathPtr, int recursive, Tcl_Obj ** errorPtr); /* 447 */ 04011 int (*tcl_FSRenameFile) (Tcl_Obj * srcPathPtr, Tcl_Obj * destPathPtr); /* 448 */ 04012 int (*tcl_FSLstat) (Tcl_Obj * pathPtr, Tcl_StatBuf * buf); /* 449 */ 04013 int (*tcl_FSUtime) (Tcl_Obj * pathPtr, struct utimbuf * tval); /* 450 */ 04014 int (*tcl_FSFileAttrsGet) (Tcl_Interp * interp, int index, Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef); /* 451 */ 04015 int (*tcl_FSFileAttrsSet) (Tcl_Interp * interp, int index, Tcl_Obj * pathPtr, Tcl_Obj * objPtr); /* 452 */ 04016 CONST char ** (*tcl_FSFileAttrStrings) (Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef); /* 453 */ 04017 int (*tcl_FSStat) (Tcl_Obj * pathPtr, Tcl_StatBuf * buf); /* 454 */ 04018 int (*tcl_FSAccess) (Tcl_Obj * pathPtr, int mode); /* 455 */ 04019 Tcl_Channel (*tcl_FSOpenFileChannel) (Tcl_Interp * interp, Tcl_Obj * pathPtr, CONST char * modeString, int permissions); /* 456 */ 04020 Tcl_Obj* (*tcl_FSGetCwd) (Tcl_Interp * interp); /* 457 */ 04021 int (*tcl_FSChdir) (Tcl_Obj * pathPtr); /* 458 */ 04022 int (*tcl_FSConvertToPathType) (Tcl_Interp * interp, Tcl_Obj * pathPtr); /* 459 */ 04023 Tcl_Obj* (*tcl_FSJoinPath) (Tcl_Obj * listObj, int elements); /* 460 */ 04024 Tcl_Obj* (*tcl_FSSplitPath) (Tcl_Obj* pathPtr, int * lenPtr); /* 461 */ 04025 int (*tcl_FSEqualPaths) (Tcl_Obj* firstPtr, Tcl_Obj* secondPtr); /* 462 */ 04026 Tcl_Obj* (*tcl_FSGetNormalizedPath) (Tcl_Interp * interp, Tcl_Obj* pathPtr); /* 463 */ 04027 Tcl_Obj* (*tcl_FSJoinToPath) (Tcl_Obj * pathPtr, int objc, Tcl_Obj *CONST objv[]); /* 464 */ 04028 ClientData (*tcl_FSGetInternalRep) (Tcl_Obj* pathPtr, Tcl_Filesystem * fsPtr); /* 465 */ 04029 Tcl_Obj* (*tcl_FSGetTranslatedPath) (Tcl_Interp * interp, Tcl_Obj* pathPtr); /* 466 */ 04030 int (*tcl_FSEvalFile) (Tcl_Interp * interp, Tcl_Obj * fileName); /* 467 */ 04031 Tcl_Obj* (*tcl_FSNewNativePath) (Tcl_Filesystem* fromFilesystem, ClientData clientData); /* 468 */ 04032 CONST char* (*tcl_FSGetNativePath) (Tcl_Obj* pathPtr); /* 469 */ 04033 Tcl_Obj* (*tcl_FSFileSystemInfo) (Tcl_Obj* pathPtr); /* 470 */ 04034 Tcl_Obj* (*tcl_FSPathSeparator) (Tcl_Obj* pathPtr); /* 471 */ 04035 Tcl_Obj* (*tcl_FSListVolumes) (void); /* 472 */ 04036 int (*tcl_FSRegister) (ClientData clientData, Tcl_Filesystem * fsPtr); /* 473 */ 04037 int (*tcl_FSUnregister) (Tcl_Filesystem * fsPtr); /* 474 */ 04038 ClientData (*tcl_FSData) (Tcl_Filesystem * fsPtr); /* 475 */ 04039 CONST char* (*tcl_FSGetTranslatedStringPath) (Tcl_Interp * interp, Tcl_Obj* pathPtr); /* 476 */ 04040 Tcl_Filesystem* (*tcl_FSGetFileSystemForPath) (Tcl_Obj* pathPtr); /* 477 */ 04041 Tcl_PathType (*tcl_FSGetPathType) (Tcl_Obj * pathPtr); /* 478 */ 04042 int (*tcl_OutputBuffered) (Tcl_Channel chan); /* 479 */ 04043 void (*tcl_FSMountsChanged) (Tcl_Filesystem * fsPtr); /* 480 */ 04044 int (*tcl_EvalTokensStandard) (Tcl_Interp * interp, Tcl_Token * tokenPtr, int count); /* 481 */ 04045 void (*tcl_GetTime) (Tcl_Time* timeBuf); /* 482 */ 04046 Tcl_Trace (*tcl_CreateObjTrace) (Tcl_Interp* interp, int level, int flags, Tcl_CmdObjTraceProc* objProc, ClientData clientData, Tcl_CmdObjTraceDeleteProc* delProc); /* 483 */ 04047 int (*tcl_GetCommandInfoFromToken) (Tcl_Command token, Tcl_CmdInfo* infoPtr); /* 484 */ 04048 int (*tcl_SetCommandInfoFromToken) (Tcl_Command token, CONST Tcl_CmdInfo* infoPtr); /* 485 */ 04049 Tcl_Obj * (*tcl_DbNewWideIntObj) (Tcl_WideInt wideValue, CONST char * file, int line); /* 486 */ 04050 int (*tcl_GetWideIntFromObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, Tcl_WideInt * widePtr); /* 487 */ 04051 Tcl_Obj * (*tcl_NewWideIntObj) (Tcl_WideInt wideValue); /* 488 */ 04052 void (*tcl_SetWideIntObj) (Tcl_Obj * objPtr, Tcl_WideInt wideValue); /* 489 */ 04053 Tcl_StatBuf * (*tcl_AllocStatBuf) (void); /* 490 */ 04054 Tcl_WideInt (*tcl_Seek) (Tcl_Channel chan, Tcl_WideInt offset, int mode); /* 491 */ 04055 Tcl_WideInt (*tcl_Tell) (Tcl_Channel chan); /* 492 */ 04056 Tcl_DriverWideSeekProc * (*tcl_ChannelWideSeekProc) (CONST Tcl_ChannelType * chanTypePtr); /* 493 */ 04057 int (*tcl_DictObjPut) (Tcl_Interp * interp, Tcl_Obj * dictPtr, Tcl_Obj * keyPtr, Tcl_Obj * valuePtr); /* 494 */ 04058 int (*tcl_DictObjGet) (Tcl_Interp * interp, Tcl_Obj * dictPtr, Tcl_Obj * keyPtr, Tcl_Obj ** valuePtrPtr); /* 495 */ 04059 int (*tcl_DictObjRemove) (Tcl_Interp * interp, Tcl_Obj * dictPtr, Tcl_Obj * keyPtr); /* 496 */ 04060 int (*tcl_DictObjSize) (Tcl_Interp * interp, Tcl_Obj * dictPtr, int * sizePtr); /* 497 */ 04061 int (*tcl_DictObjFirst) (Tcl_Interp * interp, Tcl_Obj * dictPtr, Tcl_DictSearch * searchPtr, Tcl_Obj ** keyPtrPtr, Tcl_Obj ** valuePtrPtr, int * donePtr); /* 498 */ 04062 void (*tcl_DictObjNext) (Tcl_DictSearch * searchPtr, Tcl_Obj ** keyPtrPtr, Tcl_Obj ** valuePtrPtr, int * donePtr); /* 499 */ 04063 void (*tcl_DictObjDone) (Tcl_DictSearch * searchPtr); /* 500 */ 04064 int (*tcl_DictObjPutKeyList) (Tcl_Interp * interp, Tcl_Obj * dictPtr, int keyc, Tcl_Obj *CONST * keyv, Tcl_Obj * valuePtr); /* 501 */ 04065 int (*tcl_DictObjRemoveKeyList) (Tcl_Interp * interp, Tcl_Obj * dictPtr, int keyc, Tcl_Obj *CONST * keyv); /* 502 */ 04066 Tcl_Obj * (*tcl_NewDictObj) (void); /* 503 */ 04067 Tcl_Obj * (*tcl_DbNewDictObj) (CONST char * file, int line); /* 504 */ 04068 void (*tcl_RegisterConfig) (Tcl_Interp* interp, CONST char* pkgName, Tcl_Config* configuration, CONST char* valEncoding); /* 505 */ 04069 Tcl_Namespace * (*tcl_CreateNamespace) (Tcl_Interp * interp, CONST char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc); /* 506 */ 04070 void (*tcl_DeleteNamespace) (Tcl_Namespace * nsPtr); /* 507 */ 04071 int (*tcl_AppendExportList) (Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr); /* 508 */ 04072 int (*tcl_Export) (Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int resetListFirst); /* 509 */ 04073 int (*tcl_Import) (Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int allowOverwrite); /* 510 */ 04074 int (*tcl_ForgetImport) (Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern); /* 511 */ 04075 Tcl_Namespace * (*tcl_GetCurrentNamespace) (Tcl_Interp * interp); /* 512 */ 04076 Tcl_Namespace * (*tcl_GetGlobalNamespace) (Tcl_Interp * interp); /* 513 */ 04077 Tcl_Namespace * (*tcl_FindNamespace) (Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags); /* 514 */ 04078 Tcl_Command (*tcl_FindCommand) (Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags); /* 515 */ 04079 Tcl_Command (*tcl_GetCommandFromObj) (Tcl_Interp * interp, Tcl_Obj * objPtr); /* 516 */ 04080 void (*tcl_GetCommandFullName) (Tcl_Interp * interp, Tcl_Command command, Tcl_Obj * objPtr); /* 517 */ 04081 int (*tcl_FSEvalFileEx) (Tcl_Interp * interp, Tcl_Obj * fileName, CONST char * encodingName); /* 518 */ 04082 Tcl_ExitProc * (*tcl_SetExitProc) (Tcl_ExitProc * proc); /* 519 */ 04083 void (*tcl_LimitAddHandler) (Tcl_Interp * interp, int type, Tcl_LimitHandlerProc * handlerProc, ClientData clientData, Tcl_LimitHandlerDeleteProc * deleteProc); /* 520 */ 04084 void (*tcl_LimitRemoveHandler) (Tcl_Interp * interp, int type, Tcl_LimitHandlerProc * handlerProc, ClientData clientData); /* 521 */ 04085 int (*tcl_LimitReady) (Tcl_Interp * interp); /* 522 */ 04086 int (*tcl_LimitCheck) (Tcl_Interp * interp); /* 523 */ 04087 int (*tcl_LimitExceeded) (Tcl_Interp * interp); /* 524 */ 04088 void (*tcl_LimitSetCommands) (Tcl_Interp * interp, int commandLimit); /* 525 */ 04089 void (*tcl_LimitSetTime) (Tcl_Interp * interp, Tcl_Time * timeLimitPtr); /* 526 */ 04090 void (*tcl_LimitSetGranularity) (Tcl_Interp * interp, int type, int granularity); /* 527 */ 04091 int (*tcl_LimitTypeEnabled) (Tcl_Interp * interp, int type); /* 528 */ 04092 int (*tcl_LimitTypeExceeded) (Tcl_Interp * interp, int type); /* 529 */ 04093 void (*tcl_LimitTypeSet) (Tcl_Interp * interp, int type); /* 530 */ 04094 void (*tcl_LimitTypeReset) (Tcl_Interp * interp, int type); /* 531 */ 04095 int (*tcl_LimitGetCommands) (Tcl_Interp * interp); /* 532 */ 04096 void (*tcl_LimitGetTime) (Tcl_Interp * interp, Tcl_Time * timeLimitPtr); /* 533 */ 04097 int (*tcl_LimitGetGranularity) (Tcl_Interp * interp, int type); /* 534 */ 04098 Tcl_InterpState (*tcl_SaveInterpState) (Tcl_Interp * interp, int status); /* 535 */ 04099 int (*tcl_RestoreInterpState) (Tcl_Interp * interp, Tcl_InterpState state); /* 536 */ 04100 void (*tcl_DiscardInterpState) (Tcl_InterpState state); /* 537 */ 04101 int (*tcl_SetReturnOptions) (Tcl_Interp * interp, Tcl_Obj * options); /* 538 */ 04102 Tcl_Obj * (*tcl_GetReturnOptions) (Tcl_Interp * interp, int result); /* 539 */ 04103 int (*tcl_IsEnsemble) (Tcl_Command token); /* 540 */ 04104 Tcl_Command (*tcl_CreateEnsemble) (Tcl_Interp * interp, CONST char * name, Tcl_Namespace * namespacePtr, int flags); /* 541 */ 04105 Tcl_Command (*tcl_FindEnsemble) (Tcl_Interp * interp, Tcl_Obj * cmdNameObj, int flags); /* 542 */ 04106 int (*tcl_SetEnsembleSubcommandList) (Tcl_Interp * interp, Tcl_Command token, Tcl_Obj * subcmdList); /* 543 */ 04107 int (*tcl_SetEnsembleMappingDict) (Tcl_Interp * interp, Tcl_Command token, Tcl_Obj * mapDict); /* 544 */ 04108 int (*tcl_SetEnsembleUnknownHandler) (Tcl_Interp * interp, Tcl_Command token, Tcl_Obj * unknownList); /* 545 */ 04109 int (*tcl_SetEnsembleFlags) (Tcl_Interp * interp, Tcl_Command token, int flags); /* 546 */ 04110 int (*tcl_GetEnsembleSubcommandList) (Tcl_Interp * interp, Tcl_Command token, Tcl_Obj ** subcmdListPtr); /* 547 */ 04111 int (*tcl_GetEnsembleMappingDict) (Tcl_Interp * interp, Tcl_Command token, Tcl_Obj ** mapDictPtr); /* 548 */ 04112 int (*tcl_GetEnsembleUnknownHandler) (Tcl_Interp * interp, Tcl_Command token, Tcl_Obj ** unknownListPtr); /* 549 */ 04113 int (*tcl_GetEnsembleFlags) (Tcl_Interp * interp, Tcl_Command token, int * flagsPtr); /* 550 */ 04114 int (*tcl_GetEnsembleNamespace) (Tcl_Interp * interp, Tcl_Command token, Tcl_Namespace ** namespacePtrPtr); /* 551 */ 04115 void (*tcl_SetTimeProc) (Tcl_GetTimeProc* getProc, Tcl_ScaleTimeProc* scaleProc, ClientData clientData); /* 552 */ 04116 void (*tcl_QueryTimeProc) (Tcl_GetTimeProc** getProc, Tcl_ScaleTimeProc** scaleProc, ClientData* clientData); /* 553 */ 04117 Tcl_DriverThreadActionProc * (*tcl_ChannelThreadActionProc) (CONST Tcl_ChannelType * chanTypePtr); /* 554 */ 04118 Tcl_Obj* (*tcl_NewBignumObj) (mp_int* value); /* 555 */ 04119 Tcl_Obj* (*tcl_DbNewBignumObj) (mp_int* value, CONST char* file, int line); /* 556 */ 04120 void (*tcl_SetBignumObj) (Tcl_Obj* obj, mp_int* value); /* 557 */ 04121 int (*tcl_GetBignumFromObj) (Tcl_Interp* interp, Tcl_Obj* obj, mp_int* value); /* 558 */ 04122 int (*tcl_TakeBignumFromObj) (Tcl_Interp* interp, Tcl_Obj* obj, mp_int* value); /* 559 */ 04123 int (*tcl_TruncateChannel) (Tcl_Channel chan, Tcl_WideInt length); /* 560 */ 04124 Tcl_DriverTruncateProc * (*tcl_ChannelTruncateProc) (CONST Tcl_ChannelType * chanTypePtr); /* 561 */ 04125 void (*tcl_SetChannelErrorInterp) (Tcl_Interp* interp, Tcl_Obj* msg); /* 562 */ 04126 void (*tcl_GetChannelErrorInterp) (Tcl_Interp* interp, Tcl_Obj** msg); /* 563 */ 04127 void (*tcl_SetChannelError) (Tcl_Channel chan, Tcl_Obj* msg); /* 564 */ 04128 void (*tcl_GetChannelError) (Tcl_Channel chan, Tcl_Obj** msg); /* 565 */ 04129 int (*tcl_InitBignumFromDouble) (Tcl_Interp* interp, double initval, mp_int * toInit); /* 566 */ 04130 Tcl_Obj * (*tcl_GetNamespaceUnknownHandler) (Tcl_Interp * interp, Tcl_Namespace * nsPtr); /* 567 */ 04131 int (*tcl_SetNamespaceUnknownHandler) (Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * handlerPtr); /* 568 */ 04132 int (*tcl_GetEncodingFromObj) (Tcl_Interp* interp, Tcl_Obj* objPtr, Tcl_Encoding* encodingPtr); /* 569 */ 04133 Tcl_Obj* (*tcl_GetEncodingSearchPath) (void); /* 570 */ 04134 int (*tcl_SetEncodingSearchPath) (Tcl_Obj* searchPath); /* 571 */ 04135 CONST char * (*tcl_GetEncodingNameFromEnvironment) (Tcl_DString* bufPtr); /* 572 */ 04136 int (*tcl_PkgRequireProc) (Tcl_Interp * interp, CONST char * name, int objc, Tcl_Obj *CONST objv[], ClientData * clientDataPtr); /* 573 */ 04137 void (*tcl_AppendObjToErrorInfo) (Tcl_Interp * interp, Tcl_Obj * objPtr); /* 574 */ 04138 void (*tcl_AppendLimitedToObj) (Tcl_Obj * objPtr, CONST char * bytes, int length, int limit, CONST char * ellipsis); /* 575 */ 04139 Tcl_Obj * (*tcl_Format) (Tcl_Interp * interp, CONST char * format, int objc, Tcl_Obj * CONST objv[]); /* 576 */ 04140 int (*tcl_AppendFormatToObj) (Tcl_Interp * interp, Tcl_Obj * objPtr, CONST char * format, int objc, Tcl_Obj * CONST objv[]); /* 577 */ 04141 Tcl_Obj * (*tcl_ObjPrintf) (CONST char * format, ...); /* 578 */ 04142 void (*tcl_AppendPrintfToObj) (Tcl_Obj * objPtr, CONST char * format, ...); /* 579 */ 04143 } TclStubs; 04144 04145 #ifdef __cplusplus 04146 extern "C" { 04147 #endif 04148 extern TclStubs *tclStubsPtr; 04149 #ifdef __cplusplus 04150 } 04151 #endif 04152 04153 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) 04154 04155 /* 04156 * Inline function declarations: 04157 */ 04158 04159 #ifndef Tcl_PkgProvideEx 04160 #define Tcl_PkgProvideEx \ 04161 (tclStubsPtr->tcl_PkgProvideEx) /* 0 */ 04162 #endif 04163 #ifndef Tcl_PkgRequireEx 04164 #define Tcl_PkgRequireEx \ 04165 (tclStubsPtr->tcl_PkgRequireEx) /* 1 */ 04166 #endif 04167 #ifndef Tcl_Panic 04168 #define Tcl_Panic \ 04169 (tclStubsPtr->tcl_Panic) /* 2 */ 04170 #endif 04171 #ifndef Tcl_Alloc 04172 #define Tcl_Alloc \ 04173 (tclStubsPtr->tcl_Alloc) /* 3 */ 04174 #endif 04175 #ifndef Tcl_Free 04176 #define Tcl_Free \ 04177 (tclStubsPtr->tcl_Free) /* 4 */ 04178 #endif 04179 #ifndef Tcl_Realloc 04180 #define Tcl_Realloc \ 04181 (tclStubsPtr->tcl_Realloc) /* 5 */ 04182 #endif 04183 #ifndef Tcl_DbCkalloc 04184 #define Tcl_DbCkalloc \ 04185 (tclStubsPtr->tcl_DbCkalloc) /* 6 */ 04186 #endif 04187 #ifndef Tcl_DbCkfree 04188 #define Tcl_DbCkfree \ 04189 (tclStubsPtr->tcl_DbCkfree) /* 7 */ 04190 #endif 04191 #ifndef Tcl_DbCkrealloc 04192 #define Tcl_DbCkrealloc \ 04193 (tclStubsPtr->tcl_DbCkrealloc) /* 8 */ 04194 #endif 04195 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 04196 #ifndef Tcl_CreateFileHandler 04197 #define Tcl_CreateFileHandler \ 04198 (tclStubsPtr->tcl_CreateFileHandler) /* 9 */ 04199 #endif 04200 #endif /* UNIX */ 04201 #ifdef MAC_OSX_TCL /* MACOSX */ 04202 #ifndef Tcl_CreateFileHandler 04203 #define Tcl_CreateFileHandler \ 04204 (tclStubsPtr->tcl_CreateFileHandler) /* 9 */ 04205 #endif 04206 #endif /* MACOSX */ 04207 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 04208 #ifndef Tcl_DeleteFileHandler 04209 #define Tcl_DeleteFileHandler \ 04210 (tclStubsPtr->tcl_DeleteFileHandler) /* 10 */ 04211 #endif 04212 #endif /* UNIX */ 04213 #ifdef MAC_OSX_TCL /* MACOSX */ 04214 #ifndef Tcl_DeleteFileHandler 04215 #define Tcl_DeleteFileHandler \ 04216 (tclStubsPtr->tcl_DeleteFileHandler) /* 10 */ 04217 #endif 04218 #endif /* MACOSX */ 04219 #ifndef Tcl_SetTimer 04220 #define Tcl_SetTimer \ 04221 (tclStubsPtr->tcl_SetTimer) /* 11 */ 04222 #endif 04223 #ifndef Tcl_Sleep 04224 #define Tcl_Sleep \ 04225 (tclStubsPtr->tcl_Sleep) /* 12 */ 04226 #endif 04227 #ifndef Tcl_WaitForEvent 04228 #define Tcl_WaitForEvent \ 04229 (tclStubsPtr->tcl_WaitForEvent) /* 13 */ 04230 #endif 04231 #ifndef Tcl_AppendAllObjTypes 04232 #define Tcl_AppendAllObjTypes \ 04233 (tclStubsPtr->tcl_AppendAllObjTypes) /* 14 */ 04234 #endif 04235 #ifndef Tcl_AppendStringsToObj 04236 #define Tcl_AppendStringsToObj \ 04237 (tclStubsPtr->tcl_AppendStringsToObj) /* 15 */ 04238 #endif 04239 #ifndef Tcl_AppendToObj 04240 #define Tcl_AppendToObj \ 04241 (tclStubsPtr->tcl_AppendToObj) /* 16 */ 04242 #endif 04243 #ifndef Tcl_ConcatObj 04244 #define Tcl_ConcatObj \ 04245 (tclStubsPtr->tcl_ConcatObj) /* 17 */ 04246 #endif 04247 #ifndef Tcl_ConvertToType 04248 #define Tcl_ConvertToType \ 04249 (tclStubsPtr->tcl_ConvertToType) /* 18 */ 04250 #endif 04251 #ifndef Tcl_DbDecrRefCount 04252 #define Tcl_DbDecrRefCount \ 04253 (tclStubsPtr->tcl_DbDecrRefCount) /* 19 */ 04254 #endif 04255 #ifndef Tcl_DbIncrRefCount 04256 #define Tcl_DbIncrRefCount \ 04257 (tclStubsPtr->tcl_DbIncrRefCount) /* 20 */ 04258 #endif 04259 #ifndef Tcl_DbIsShared 04260 #define Tcl_DbIsShared \ 04261 (tclStubsPtr->tcl_DbIsShared) /* 21 */ 04262 #endif 04263 #ifndef Tcl_DbNewBooleanObj 04264 #define Tcl_DbNewBooleanObj \ 04265 (tclStubsPtr->tcl_DbNewBooleanObj) /* 22 */ 04266 #endif 04267 #ifndef Tcl_DbNewByteArrayObj 04268 #define Tcl_DbNewByteArrayObj \ 04269 (tclStubsPtr->tcl_DbNewByteArrayObj) /* 23 */ 04270 #endif 04271 #ifndef Tcl_DbNewDoubleObj 04272 #define Tcl_DbNewDoubleObj \ 04273 (tclStubsPtr->tcl_DbNewDoubleObj) /* 24 */ 04274 #endif 04275 #ifndef Tcl_DbNewListObj 04276 #define Tcl_DbNewListObj \ 04277 (tclStubsPtr->tcl_DbNewListObj) /* 25 */ 04278 #endif 04279 #ifndef Tcl_DbNewLongObj 04280 #define Tcl_DbNewLongObj \ 04281 (tclStubsPtr->tcl_DbNewLongObj) /* 26 */ 04282 #endif 04283 #ifndef Tcl_DbNewObj 04284 #define Tcl_DbNewObj \ 04285 (tclStubsPtr->tcl_DbNewObj) /* 27 */ 04286 #endif 04287 #ifndef Tcl_DbNewStringObj 04288 #define Tcl_DbNewStringObj \ 04289 (tclStubsPtr->tcl_DbNewStringObj) /* 28 */ 04290 #endif 04291 #ifndef Tcl_DuplicateObj 04292 #define Tcl_DuplicateObj \ 04293 (tclStubsPtr->tcl_DuplicateObj) /* 29 */ 04294 #endif 04295 #ifndef TclFreeObj 04296 #define TclFreeObj \ 04297 (tclStubsPtr->tclFreeObj) /* 30 */ 04298 #endif 04299 #ifndef Tcl_GetBoolean 04300 #define Tcl_GetBoolean \ 04301 (tclStubsPtr->tcl_GetBoolean) /* 31 */ 04302 #endif 04303 #ifndef Tcl_GetBooleanFromObj 04304 #define Tcl_GetBooleanFromObj \ 04305 (tclStubsPtr->tcl_GetBooleanFromObj) /* 32 */ 04306 #endif 04307 #ifndef Tcl_GetByteArrayFromObj 04308 #define Tcl_GetByteArrayFromObj \ 04309 (tclStubsPtr->tcl_GetByteArrayFromObj) /* 33 */ 04310 #endif 04311 #ifndef Tcl_GetDouble 04312 #define Tcl_GetDouble \ 04313 (tclStubsPtr->tcl_GetDouble) /* 34 */ 04314 #endif 04315 #ifndef Tcl_GetDoubleFromObj 04316 #define Tcl_GetDoubleFromObj \ 04317 (tclStubsPtr->tcl_GetDoubleFromObj) /* 35 */ 04318 #endif 04319 #ifndef Tcl_GetIndexFromObj 04320 #define Tcl_GetIndexFromObj \ 04321 (tclStubsPtr->tcl_GetIndexFromObj) /* 36 */ 04322 #endif 04323 #ifndef Tcl_GetInt 04324 #define Tcl_GetInt \ 04325 (tclStubsPtr->tcl_GetInt) /* 37 */ 04326 #endif 04327 #ifndef Tcl_GetIntFromObj 04328 #define Tcl_GetIntFromObj \ 04329 (tclStubsPtr->tcl_GetIntFromObj) /* 38 */ 04330 #endif 04331 #ifndef Tcl_GetLongFromObj 04332 #define Tcl_GetLongFromObj \ 04333 (tclStubsPtr->tcl_GetLongFromObj) /* 39 */ 04334 #endif 04335 #ifndef Tcl_GetObjType 04336 #define Tcl_GetObjType \ 04337 (tclStubsPtr->tcl_GetObjType) /* 40 */ 04338 #endif 04339 #ifndef Tcl_GetStringFromObj 04340 #define Tcl_GetStringFromObj \ 04341 (tclStubsPtr->tcl_GetStringFromObj) /* 41 */ 04342 #endif 04343 #ifndef Tcl_InvalidateStringRep 04344 #define Tcl_InvalidateStringRep \ 04345 (tclStubsPtr->tcl_InvalidateStringRep) /* 42 */ 04346 #endif 04347 #ifndef Tcl_ListObjAppendList 04348 #define Tcl_ListObjAppendList \ 04349 (tclStubsPtr->tcl_ListObjAppendList) /* 43 */ 04350 #endif 04351 #ifndef Tcl_ListObjAppendElement 04352 #define Tcl_ListObjAppendElement \ 04353 (tclStubsPtr->tcl_ListObjAppendElement) /* 44 */ 04354 #endif 04355 #ifndef Tcl_ListObjGetElements 04356 #define Tcl_ListObjGetElements \ 04357 (tclStubsPtr->tcl_ListObjGetElements) /* 45 */ 04358 #endif 04359 #ifndef Tcl_ListObjIndex 04360 #define Tcl_ListObjIndex \ 04361 (tclStubsPtr->tcl_ListObjIndex) /* 46 */ 04362 #endif 04363 #ifndef Tcl_ListObjLength 04364 #define Tcl_ListObjLength \ 04365 (tclStubsPtr->tcl_ListObjLength) /* 47 */ 04366 #endif 04367 #ifndef Tcl_ListObjReplace 04368 #define Tcl_ListObjReplace \ 04369 (tclStubsPtr->tcl_ListObjReplace) /* 48 */ 04370 #endif 04371 #ifndef Tcl_NewBooleanObj 04372 #define Tcl_NewBooleanObj \ 04373 (tclStubsPtr->tcl_NewBooleanObj) /* 49 */ 04374 #endif 04375 #ifndef Tcl_NewByteArrayObj 04376 #define Tcl_NewByteArrayObj \ 04377 (tclStubsPtr->tcl_NewByteArrayObj) /* 50 */ 04378 #endif 04379 #ifndef Tcl_NewDoubleObj 04380 #define Tcl_NewDoubleObj \ 04381 (tclStubsPtr->tcl_NewDoubleObj) /* 51 */ 04382 #endif 04383 #ifndef Tcl_NewIntObj 04384 #define Tcl_NewIntObj \ 04385 (tclStubsPtr->tcl_NewIntObj) /* 52 */ 04386 #endif 04387 #ifndef Tcl_NewListObj 04388 #define Tcl_NewListObj \ 04389 (tclStubsPtr->tcl_NewListObj) /* 53 */ 04390 #endif 04391 #ifndef Tcl_NewLongObj 04392 #define Tcl_NewLongObj \ 04393 (tclStubsPtr->tcl_NewLongObj) /* 54 */ 04394 #endif 04395 #ifndef Tcl_NewObj 04396 #define Tcl_NewObj \ 04397 (tclStubsPtr->tcl_NewObj) /* 55 */ 04398 #endif 04399 #ifndef Tcl_NewStringObj 04400 #define Tcl_NewStringObj \ 04401 (tclStubsPtr->tcl_NewStringObj) /* 56 */ 04402 #endif 04403 #ifndef Tcl_SetBooleanObj 04404 #define Tcl_SetBooleanObj \ 04405 (tclStubsPtr->tcl_SetBooleanObj) /* 57 */ 04406 #endif 04407 #ifndef Tcl_SetByteArrayLength 04408 #define Tcl_SetByteArrayLength \ 04409 (tclStubsPtr->tcl_SetByteArrayLength) /* 58 */ 04410 #endif 04411 #ifndef Tcl_SetByteArrayObj 04412 #define Tcl_SetByteArrayObj \ 04413 (tclStubsPtr->tcl_SetByteArrayObj) /* 59 */ 04414 #endif 04415 #ifndef Tcl_SetDoubleObj 04416 #define Tcl_SetDoubleObj \ 04417 (tclStubsPtr->tcl_SetDoubleObj) /* 60 */ 04418 #endif 04419 #ifndef Tcl_SetIntObj 04420 #define Tcl_SetIntObj \ 04421 (tclStubsPtr->tcl_SetIntObj) /* 61 */ 04422 #endif 04423 #ifndef Tcl_SetListObj 04424 #define Tcl_SetListObj \ 04425 (tclStubsPtr->tcl_SetListObj) /* 62 */ 04426 #endif 04427 #ifndef Tcl_SetLongObj 04428 #define Tcl_SetLongObj \ 04429 (tclStubsPtr->tcl_SetLongObj) /* 63 */ 04430 #endif 04431 #ifndef Tcl_SetObjLength 04432 #define Tcl_SetObjLength \ 04433 (tclStubsPtr->tcl_SetObjLength) /* 64 */ 04434 #endif 04435 #ifndef Tcl_SetStringObj 04436 #define Tcl_SetStringObj \ 04437 (tclStubsPtr->tcl_SetStringObj) /* 65 */ 04438 #endif 04439 #ifndef Tcl_AddErrorInfo 04440 #define Tcl_AddErrorInfo \ 04441 (tclStubsPtr->tcl_AddErrorInfo) /* 66 */ 04442 #endif 04443 #ifndef Tcl_AddObjErrorInfo 04444 #define Tcl_AddObjErrorInfo \ 04445 (tclStubsPtr->tcl_AddObjErrorInfo) /* 67 */ 04446 #endif 04447 #ifndef Tcl_AllowExceptions 04448 #define Tcl_AllowExceptions \ 04449 (tclStubsPtr->tcl_AllowExceptions) /* 68 */ 04450 #endif 04451 #ifndef Tcl_AppendElement 04452 #define Tcl_AppendElement \ 04453 (tclStubsPtr->tcl_AppendElement) /* 69 */ 04454 #endif 04455 #ifndef Tcl_AppendResult 04456 #define Tcl_AppendResult \ 04457 (tclStubsPtr->tcl_AppendResult) /* 70 */ 04458 #endif 04459 #ifndef Tcl_AsyncCreate 04460 #define Tcl_AsyncCreate \ 04461 (tclStubsPtr->tcl_AsyncCreate) /* 71 */ 04462 #endif 04463 #ifndef Tcl_AsyncDelete 04464 #define Tcl_AsyncDelete \ 04465 (tclStubsPtr->tcl_AsyncDelete) /* 72 */ 04466 #endif 04467 #ifndef Tcl_AsyncInvoke 04468 #define Tcl_AsyncInvoke \ 04469 (tclStubsPtr->tcl_AsyncInvoke) /* 73 */ 04470 #endif 04471 #ifndef Tcl_AsyncMark 04472 #define Tcl_AsyncMark \ 04473 (tclStubsPtr->tcl_AsyncMark) /* 74 */ 04474 #endif 04475 #ifndef Tcl_AsyncReady 04476 #define Tcl_AsyncReady \ 04477 (tclStubsPtr->tcl_AsyncReady) /* 75 */ 04478 #endif 04479 #ifndef Tcl_BackgroundError 04480 #define Tcl_BackgroundError \ 04481 (tclStubsPtr->tcl_BackgroundError) /* 76 */ 04482 #endif 04483 #ifndef Tcl_Backslash 04484 #define Tcl_Backslash \ 04485 (tclStubsPtr->tcl_Backslash) /* 77 */ 04486 #endif 04487 #ifndef Tcl_BadChannelOption 04488 #define Tcl_BadChannelOption \ 04489 (tclStubsPtr->tcl_BadChannelOption) /* 78 */ 04490 #endif 04491 #ifndef Tcl_CallWhenDeleted 04492 #define Tcl_CallWhenDeleted \ 04493 (tclStubsPtr->tcl_CallWhenDeleted) /* 79 */ 04494 #endif 04495 #ifndef Tcl_CancelIdleCall 04496 #define Tcl_CancelIdleCall \ 04497 (tclStubsPtr->tcl_CancelIdleCall) /* 80 */ 04498 #endif 04499 #ifndef Tcl_Close 04500 #define Tcl_Close \ 04501 (tclStubsPtr->tcl_Close) /* 81 */ 04502 #endif 04503 #ifndef Tcl_CommandComplete 04504 #define Tcl_CommandComplete \ 04505 (tclStubsPtr->tcl_CommandComplete) /* 82 */ 04506 #endif 04507 #ifndef Tcl_Concat 04508 #define Tcl_Concat \ 04509 (tclStubsPtr->tcl_Concat) /* 83 */ 04510 #endif 04511 #ifndef Tcl_ConvertElement 04512 #define Tcl_ConvertElement \ 04513 (tclStubsPtr->tcl_ConvertElement) /* 84 */ 04514 #endif 04515 #ifndef Tcl_ConvertCountedElement 04516 #define Tcl_ConvertCountedElement \ 04517 (tclStubsPtr->tcl_ConvertCountedElement) /* 85 */ 04518 #endif 04519 #ifndef Tcl_CreateAlias 04520 #define Tcl_CreateAlias \ 04521 (tclStubsPtr->tcl_CreateAlias) /* 86 */ 04522 #endif 04523 #ifndef Tcl_CreateAliasObj 04524 #define Tcl_CreateAliasObj \ 04525 (tclStubsPtr->tcl_CreateAliasObj) /* 87 */ 04526 #endif 04527 #ifndef Tcl_CreateChannel 04528 #define Tcl_CreateChannel \ 04529 (tclStubsPtr->tcl_CreateChannel) /* 88 */ 04530 #endif 04531 #ifndef Tcl_CreateChannelHandler 04532 #define Tcl_CreateChannelHandler \ 04533 (tclStubsPtr->tcl_CreateChannelHandler) /* 89 */ 04534 #endif 04535 #ifndef Tcl_CreateCloseHandler 04536 #define Tcl_CreateCloseHandler \ 04537 (tclStubsPtr->tcl_CreateCloseHandler) /* 90 */ 04538 #endif 04539 #ifndef Tcl_CreateCommand 04540 #define Tcl_CreateCommand \ 04541 (tclStubsPtr->tcl_CreateCommand) /* 91 */ 04542 #endif 04543 #ifndef Tcl_CreateEventSource 04544 #define Tcl_CreateEventSource \ 04545 (tclStubsPtr->tcl_CreateEventSource) /* 92 */ 04546 #endif 04547 #ifndef Tcl_CreateExitHandler 04548 #define Tcl_CreateExitHandler \ 04549 (tclStubsPtr->tcl_CreateExitHandler) /* 93 */ 04550 #endif 04551 #ifndef Tcl_CreateInterp 04552 #define Tcl_CreateInterp \ 04553 (tclStubsPtr->tcl_CreateInterp) /* 94 */ 04554 #endif 04555 #ifndef Tcl_CreateMathFunc 04556 #define Tcl_CreateMathFunc \ 04557 (tclStubsPtr->tcl_CreateMathFunc) /* 95 */ 04558 #endif 04559 #ifndef Tcl_CreateObjCommand 04560 #define Tcl_CreateObjCommand \ 04561 (tclStubsPtr->tcl_CreateObjCommand) /* 96 */ 04562 #endif 04563 #ifndef Tcl_CreateSlave 04564 #define Tcl_CreateSlave \ 04565 (tclStubsPtr->tcl_CreateSlave) /* 97 */ 04566 #endif 04567 #ifndef Tcl_CreateTimerHandler 04568 #define Tcl_CreateTimerHandler \ 04569 (tclStubsPtr->tcl_CreateTimerHandler) /* 98 */ 04570 #endif 04571 #ifndef Tcl_CreateTrace 04572 #define Tcl_CreateTrace \ 04573 (tclStubsPtr->tcl_CreateTrace) /* 99 */ 04574 #endif 04575 #ifndef Tcl_DeleteAssocData 04576 #define Tcl_DeleteAssocData \ 04577 (tclStubsPtr->tcl_DeleteAssocData) /* 100 */ 04578 #endif 04579 #ifndef Tcl_DeleteChannelHandler 04580 #define Tcl_DeleteChannelHandler \ 04581 (tclStubsPtr->tcl_DeleteChannelHandler) /* 101 */ 04582 #endif 04583 #ifndef Tcl_DeleteCloseHandler 04584 #define Tcl_DeleteCloseHandler \ 04585 (tclStubsPtr->tcl_DeleteCloseHandler) /* 102 */ 04586 #endif 04587 #ifndef Tcl_DeleteCommand 04588 #define Tcl_DeleteCommand \ 04589 (tclStubsPtr->tcl_DeleteCommand) /* 103 */ 04590 #endif 04591 #ifndef Tcl_DeleteCommandFromToken 04592 #define Tcl_DeleteCommandFromToken \ 04593 (tclStubsPtr->tcl_DeleteCommandFromToken) /* 104 */ 04594 #endif 04595 #ifndef Tcl_DeleteEvents 04596 #define Tcl_DeleteEvents \ 04597 (tclStubsPtr->tcl_DeleteEvents) /* 105 */ 04598 #endif 04599 #ifndef Tcl_DeleteEventSource 04600 #define Tcl_DeleteEventSource \ 04601 (tclStubsPtr->tcl_DeleteEventSource) /* 106 */ 04602 #endif 04603 #ifndef Tcl_DeleteExitHandler 04604 #define Tcl_DeleteExitHandler \ 04605 (tclStubsPtr->tcl_DeleteExitHandler) /* 107 */ 04606 #endif 04607 #ifndef Tcl_DeleteHashEntry 04608 #define Tcl_DeleteHashEntry \ 04609 (tclStubsPtr->tcl_DeleteHashEntry) /* 108 */ 04610 #endif 04611 #ifndef Tcl_DeleteHashTable 04612 #define Tcl_DeleteHashTable \ 04613 (tclStubsPtr->tcl_DeleteHashTable) /* 109 */ 04614 #endif 04615 #ifndef Tcl_DeleteInterp 04616 #define Tcl_DeleteInterp \ 04617 (tclStubsPtr->tcl_DeleteInterp) /* 110 */ 04618 #endif 04619 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 04620 #ifndef Tcl_DetachPids 04621 #define Tcl_DetachPids \ 04622 (tclStubsPtr->tcl_DetachPids) /* 111 */ 04623 #endif 04624 #endif /* UNIX */ 04625 #ifdef __WIN32__ /* WIN */ 04626 #ifndef Tcl_DetachPids 04627 #define Tcl_DetachPids \ 04628 (tclStubsPtr->tcl_DetachPids) /* 111 */ 04629 #endif 04630 #endif /* WIN */ 04631 #ifdef MAC_OSX_TCL /* MACOSX */ 04632 #ifndef Tcl_DetachPids 04633 #define Tcl_DetachPids \ 04634 (tclStubsPtr->tcl_DetachPids) /* 111 */ 04635 #endif 04636 #endif /* MACOSX */ 04637 #ifndef Tcl_DeleteTimerHandler 04638 #define Tcl_DeleteTimerHandler \ 04639 (tclStubsPtr->tcl_DeleteTimerHandler) /* 112 */ 04640 #endif 04641 #ifndef Tcl_DeleteTrace 04642 #define Tcl_DeleteTrace \ 04643 (tclStubsPtr->tcl_DeleteTrace) /* 113 */ 04644 #endif 04645 #ifndef Tcl_DontCallWhenDeleted 04646 #define Tcl_DontCallWhenDeleted \ 04647 (tclStubsPtr->tcl_DontCallWhenDeleted) /* 114 */ 04648 #endif 04649 #ifndef Tcl_DoOneEvent 04650 #define Tcl_DoOneEvent \ 04651 (tclStubsPtr->tcl_DoOneEvent) /* 115 */ 04652 #endif 04653 #ifndef Tcl_DoWhenIdle 04654 #define Tcl_DoWhenIdle \ 04655 (tclStubsPtr->tcl_DoWhenIdle) /* 116 */ 04656 #endif 04657 #ifndef Tcl_DStringAppend 04658 #define Tcl_DStringAppend \ 04659 (tclStubsPtr->tcl_DStringAppend) /* 117 */ 04660 #endif 04661 #ifndef Tcl_DStringAppendElement 04662 #define Tcl_DStringAppendElement \ 04663 (tclStubsPtr->tcl_DStringAppendElement) /* 118 */ 04664 #endif 04665 #ifndef Tcl_DStringEndSublist 04666 #define Tcl_DStringEndSublist \ 04667 (tclStubsPtr->tcl_DStringEndSublist) /* 119 */ 04668 #endif 04669 #ifndef Tcl_DStringFree 04670 #define Tcl_DStringFree \ 04671 (tclStubsPtr->tcl_DStringFree) /* 120 */ 04672 #endif 04673 #ifndef Tcl_DStringGetResult 04674 #define Tcl_DStringGetResult \ 04675 (tclStubsPtr->tcl_DStringGetResult) /* 121 */ 04676 #endif 04677 #ifndef Tcl_DStringInit 04678 #define Tcl_DStringInit \ 04679 (tclStubsPtr->tcl_DStringInit) /* 122 */ 04680 #endif 04681 #ifndef Tcl_DStringResult 04682 #define Tcl_DStringResult \ 04683 (tclStubsPtr->tcl_DStringResult) /* 123 */ 04684 #endif 04685 #ifndef Tcl_DStringSetLength 04686 #define Tcl_DStringSetLength \ 04687 (tclStubsPtr->tcl_DStringSetLength) /* 124 */ 04688 #endif 04689 #ifndef Tcl_DStringStartSublist 04690 #define Tcl_DStringStartSublist \ 04691 (tclStubsPtr->tcl_DStringStartSublist) /* 125 */ 04692 #endif 04693 #ifndef Tcl_Eof 04694 #define Tcl_Eof \ 04695 (tclStubsPtr->tcl_Eof) /* 126 */ 04696 #endif 04697 #ifndef Tcl_ErrnoId 04698 #define Tcl_ErrnoId \ 04699 (tclStubsPtr->tcl_ErrnoId) /* 127 */ 04700 #endif 04701 #ifndef Tcl_ErrnoMsg 04702 #define Tcl_ErrnoMsg \ 04703 (tclStubsPtr->tcl_ErrnoMsg) /* 128 */ 04704 #endif 04705 #ifndef Tcl_Eval 04706 #define Tcl_Eval \ 04707 (tclStubsPtr->tcl_Eval) /* 129 */ 04708 #endif 04709 #ifndef Tcl_EvalFile 04710 #define Tcl_EvalFile \ 04711 (tclStubsPtr->tcl_EvalFile) /* 130 */ 04712 #endif 04713 #ifndef Tcl_EvalObj 04714 #define Tcl_EvalObj \ 04715 (tclStubsPtr->tcl_EvalObj) /* 131 */ 04716 #endif 04717 #ifndef Tcl_EventuallyFree 04718 #define Tcl_EventuallyFree \ 04719 (tclStubsPtr->tcl_EventuallyFree) /* 132 */ 04720 #endif 04721 #ifndef Tcl_Exit 04722 #define Tcl_Exit \ 04723 (tclStubsPtr->tcl_Exit) /* 133 */ 04724 #endif 04725 #ifndef Tcl_ExposeCommand 04726 #define Tcl_ExposeCommand \ 04727 (tclStubsPtr->tcl_ExposeCommand) /* 134 */ 04728 #endif 04729 #ifndef Tcl_ExprBoolean 04730 #define Tcl_ExprBoolean \ 04731 (tclStubsPtr->tcl_ExprBoolean) /* 135 */ 04732 #endif 04733 #ifndef Tcl_ExprBooleanObj 04734 #define Tcl_ExprBooleanObj \ 04735 (tclStubsPtr->tcl_ExprBooleanObj) /* 136 */ 04736 #endif 04737 #ifndef Tcl_ExprDouble 04738 #define Tcl_ExprDouble \ 04739 (tclStubsPtr->tcl_ExprDouble) /* 137 */ 04740 #endif 04741 #ifndef Tcl_ExprDoubleObj 04742 #define Tcl_ExprDoubleObj \ 04743 (tclStubsPtr->tcl_ExprDoubleObj) /* 138 */ 04744 #endif 04745 #ifndef Tcl_ExprLong 04746 #define Tcl_ExprLong \ 04747 (tclStubsPtr->tcl_ExprLong) /* 139 */ 04748 #endif 04749 #ifndef Tcl_ExprLongObj 04750 #define Tcl_ExprLongObj \ 04751 (tclStubsPtr->tcl_ExprLongObj) /* 140 */ 04752 #endif 04753 #ifndef Tcl_ExprObj 04754 #define Tcl_ExprObj \ 04755 (tclStubsPtr->tcl_ExprObj) /* 141 */ 04756 #endif 04757 #ifndef Tcl_ExprString 04758 #define Tcl_ExprString \ 04759 (tclStubsPtr->tcl_ExprString) /* 142 */ 04760 #endif 04761 #ifndef Tcl_Finalize 04762 #define Tcl_Finalize \ 04763 (tclStubsPtr->tcl_Finalize) /* 143 */ 04764 #endif 04765 #ifndef Tcl_FindExecutable 04766 #define Tcl_FindExecutable \ 04767 (tclStubsPtr->tcl_FindExecutable) /* 144 */ 04768 #endif 04769 #ifndef Tcl_FirstHashEntry 04770 #define Tcl_FirstHashEntry \ 04771 (tclStubsPtr->tcl_FirstHashEntry) /* 145 */ 04772 #endif 04773 #ifndef Tcl_Flush 04774 #define Tcl_Flush \ 04775 (tclStubsPtr->tcl_Flush) /* 146 */ 04776 #endif 04777 #ifndef Tcl_FreeResult 04778 #define Tcl_FreeResult \ 04779 (tclStubsPtr->tcl_FreeResult) /* 147 */ 04780 #endif 04781 #ifndef Tcl_GetAlias 04782 #define Tcl_GetAlias \ 04783 (tclStubsPtr->tcl_GetAlias) /* 148 */ 04784 #endif 04785 #ifndef Tcl_GetAliasObj 04786 #define Tcl_GetAliasObj \ 04787 (tclStubsPtr->tcl_GetAliasObj) /* 149 */ 04788 #endif 04789 #ifndef Tcl_GetAssocData 04790 #define Tcl_GetAssocData \ 04791 (tclStubsPtr->tcl_GetAssocData) /* 150 */ 04792 #endif 04793 #ifndef Tcl_GetChannel 04794 #define Tcl_GetChannel \ 04795 (tclStubsPtr->tcl_GetChannel) /* 151 */ 04796 #endif 04797 #ifndef Tcl_GetChannelBufferSize 04798 #define Tcl_GetChannelBufferSize \ 04799 (tclStubsPtr->tcl_GetChannelBufferSize) /* 152 */ 04800 #endif 04801 #ifndef Tcl_GetChannelHandle 04802 #define Tcl_GetChannelHandle \ 04803 (tclStubsPtr->tcl_GetChannelHandle) /* 153 */ 04804 #endif 04805 #ifndef Tcl_GetChannelInstanceData 04806 #define Tcl_GetChannelInstanceData \ 04807 (tclStubsPtr->tcl_GetChannelInstanceData) /* 154 */ 04808 #endif 04809 #ifndef Tcl_GetChannelMode 04810 #define Tcl_GetChannelMode \ 04811 (tclStubsPtr->tcl_GetChannelMode) /* 155 */ 04812 #endif 04813 #ifndef Tcl_GetChannelName 04814 #define Tcl_GetChannelName \ 04815 (tclStubsPtr->tcl_GetChannelName) /* 156 */ 04816 #endif 04817 #ifndef Tcl_GetChannelOption 04818 #define Tcl_GetChannelOption \ 04819 (tclStubsPtr->tcl_GetChannelOption) /* 157 */ 04820 #endif 04821 #ifndef Tcl_GetChannelType 04822 #define Tcl_GetChannelType \ 04823 (tclStubsPtr->tcl_GetChannelType) /* 158 */ 04824 #endif 04825 #ifndef Tcl_GetCommandInfo 04826 #define Tcl_GetCommandInfo \ 04827 (tclStubsPtr->tcl_GetCommandInfo) /* 159 */ 04828 #endif 04829 #ifndef Tcl_GetCommandName 04830 #define Tcl_GetCommandName \ 04831 (tclStubsPtr->tcl_GetCommandName) /* 160 */ 04832 #endif 04833 #ifndef Tcl_GetErrno 04834 #define Tcl_GetErrno \ 04835 (tclStubsPtr->tcl_GetErrno) /* 161 */ 04836 #endif 04837 #ifndef Tcl_GetHostName 04838 #define Tcl_GetHostName \ 04839 (tclStubsPtr->tcl_GetHostName) /* 162 */ 04840 #endif 04841 #ifndef Tcl_GetInterpPath 04842 #define Tcl_GetInterpPath \ 04843 (tclStubsPtr->tcl_GetInterpPath) /* 163 */ 04844 #endif 04845 #ifndef Tcl_GetMaster 04846 #define Tcl_GetMaster \ 04847 (tclStubsPtr->tcl_GetMaster) /* 164 */ 04848 #endif 04849 #ifndef Tcl_GetNameOfExecutable 04850 #define Tcl_GetNameOfExecutable \ 04851 (tclStubsPtr->tcl_GetNameOfExecutable) /* 165 */ 04852 #endif 04853 #ifndef Tcl_GetObjResult 04854 #define Tcl_GetObjResult \ 04855 (tclStubsPtr->tcl_GetObjResult) /* 166 */ 04856 #endif 04857 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 04858 #ifndef Tcl_GetOpenFile 04859 #define Tcl_GetOpenFile \ 04860 (tclStubsPtr->tcl_GetOpenFile) /* 167 */ 04861 #endif 04862 #endif /* UNIX */ 04863 #ifdef MAC_OSX_TCL /* MACOSX */ 04864 #ifndef Tcl_GetOpenFile 04865 #define Tcl_GetOpenFile \ 04866 (tclStubsPtr->tcl_GetOpenFile) /* 167 */ 04867 #endif 04868 #endif /* MACOSX */ 04869 #ifndef Tcl_GetPathType 04870 #define Tcl_GetPathType \ 04871 (tclStubsPtr->tcl_GetPathType) /* 168 */ 04872 #endif 04873 #ifndef Tcl_Gets 04874 #define Tcl_Gets \ 04875 (tclStubsPtr->tcl_Gets) /* 169 */ 04876 #endif 04877 #ifndef Tcl_GetsObj 04878 #define Tcl_GetsObj \ 04879 (tclStubsPtr->tcl_GetsObj) /* 170 */ 04880 #endif 04881 #ifndef Tcl_GetServiceMode 04882 #define Tcl_GetServiceMode \ 04883 (tclStubsPtr->tcl_GetServiceMode) /* 171 */ 04884 #endif 04885 #ifndef Tcl_GetSlave 04886 #define Tcl_GetSlave \ 04887 (tclStubsPtr->tcl_GetSlave) /* 172 */ 04888 #endif 04889 #ifndef Tcl_GetStdChannel 04890 #define Tcl_GetStdChannel \ 04891 (tclStubsPtr->tcl_GetStdChannel) /* 173 */ 04892 #endif 04893 #ifndef Tcl_GetStringResult 04894 #define Tcl_GetStringResult \ 04895 (tclStubsPtr->tcl_GetStringResult) /* 174 */ 04896 #endif 04897 #ifndef Tcl_GetVar 04898 #define Tcl_GetVar \ 04899 (tclStubsPtr->tcl_GetVar) /* 175 */ 04900 #endif 04901 #ifndef Tcl_GetVar2 04902 #define Tcl_GetVar2 \ 04903 (tclStubsPtr->tcl_GetVar2) /* 176 */ 04904 #endif 04905 #ifndef Tcl_GlobalEval 04906 #define Tcl_GlobalEval \ 04907 (tclStubsPtr->tcl_GlobalEval) /* 177 */ 04908 #endif 04909 #ifndef Tcl_GlobalEvalObj 04910 #define Tcl_GlobalEvalObj \ 04911 (tclStubsPtr->tcl_GlobalEvalObj) /* 178 */ 04912 #endif 04913 #ifndef Tcl_HideCommand 04914 #define Tcl_HideCommand \ 04915 (tclStubsPtr->tcl_HideCommand) /* 179 */ 04916 #endif 04917 #ifndef Tcl_Init 04918 #define Tcl_Init \ 04919 (tclStubsPtr->tcl_Init) /* 180 */ 04920 #endif 04921 #ifndef Tcl_InitHashTable 04922 #define Tcl_InitHashTable \ 04923 (tclStubsPtr->tcl_InitHashTable) /* 181 */ 04924 #endif 04925 #ifndef Tcl_InputBlocked 04926 #define Tcl_InputBlocked \ 04927 (tclStubsPtr->tcl_InputBlocked) /* 182 */ 04928 #endif 04929 #ifndef Tcl_InputBuffered 04930 #define Tcl_InputBuffered \ 04931 (tclStubsPtr->tcl_InputBuffered) /* 183 */ 04932 #endif 04933 #ifndef Tcl_InterpDeleted 04934 #define Tcl_InterpDeleted \ 04935 (tclStubsPtr->tcl_InterpDeleted) /* 184 */ 04936 #endif 04937 #ifndef Tcl_IsSafe 04938 #define Tcl_IsSafe \ 04939 (tclStubsPtr->tcl_IsSafe) /* 185 */ 04940 #endif 04941 #ifndef Tcl_JoinPath 04942 #define Tcl_JoinPath \ 04943 (tclStubsPtr->tcl_JoinPath) /* 186 */ 04944 #endif 04945 #ifndef Tcl_LinkVar 04946 #define Tcl_LinkVar \ 04947 (tclStubsPtr->tcl_LinkVar) /* 187 */ 04948 #endif 04949 /* Slot 188 is reserved */ 04950 #ifndef Tcl_MakeFileChannel 04951 #define Tcl_MakeFileChannel \ 04952 (tclStubsPtr->tcl_MakeFileChannel) /* 189 */ 04953 #endif 04954 #ifndef Tcl_MakeSafe 04955 #define Tcl_MakeSafe \ 04956 (tclStubsPtr->tcl_MakeSafe) /* 190 */ 04957 #endif 04958 #ifndef Tcl_MakeTcpClientChannel 04959 #define Tcl_MakeTcpClientChannel \ 04960 (tclStubsPtr->tcl_MakeTcpClientChannel) /* 191 */ 04961 #endif 04962 #ifndef Tcl_Merge 04963 #define Tcl_Merge \ 04964 (tclStubsPtr->tcl_Merge) /* 192 */ 04965 #endif 04966 #ifndef Tcl_NextHashEntry 04967 #define Tcl_NextHashEntry \ 04968 (tclStubsPtr->tcl_NextHashEntry) /* 193 */ 04969 #endif 04970 #ifndef Tcl_NotifyChannel 04971 #define Tcl_NotifyChannel \ 04972 (tclStubsPtr->tcl_NotifyChannel) /* 194 */ 04973 #endif 04974 #ifndef Tcl_ObjGetVar2 04975 #define Tcl_ObjGetVar2 \ 04976 (tclStubsPtr->tcl_ObjGetVar2) /* 195 */ 04977 #endif 04978 #ifndef Tcl_ObjSetVar2 04979 #define Tcl_ObjSetVar2 \ 04980 (tclStubsPtr->tcl_ObjSetVar2) /* 196 */ 04981 #endif 04982 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 04983 #ifndef Tcl_OpenCommandChannel 04984 #define Tcl_OpenCommandChannel \ 04985 (tclStubsPtr->tcl_OpenCommandChannel) /* 197 */ 04986 #endif 04987 #endif /* UNIX */ 04988 #ifdef __WIN32__ /* WIN */ 04989 #ifndef Tcl_OpenCommandChannel 04990 #define Tcl_OpenCommandChannel \ 04991 (tclStubsPtr->tcl_OpenCommandChannel) /* 197 */ 04992 #endif 04993 #endif /* WIN */ 04994 #ifdef MAC_OSX_TCL /* MACOSX */ 04995 #ifndef Tcl_OpenCommandChannel 04996 #define Tcl_OpenCommandChannel \ 04997 (tclStubsPtr->tcl_OpenCommandChannel) /* 197 */ 04998 #endif 04999 #endif /* MACOSX */ 05000 #ifndef Tcl_OpenFileChannel 05001 #define Tcl_OpenFileChannel \ 05002 (tclStubsPtr->tcl_OpenFileChannel) /* 198 */ 05003 #endif 05004 #ifndef Tcl_OpenTcpClient 05005 #define Tcl_OpenTcpClient \ 05006 (tclStubsPtr->tcl_OpenTcpClient) /* 199 */ 05007 #endif 05008 #ifndef Tcl_OpenTcpServer 05009 #define Tcl_OpenTcpServer \ 05010 (tclStubsPtr->tcl_OpenTcpServer) /* 200 */ 05011 #endif 05012 #ifndef Tcl_Preserve 05013 #define Tcl_Preserve \ 05014 (tclStubsPtr->tcl_Preserve) /* 201 */ 05015 #endif 05016 #ifndef Tcl_PrintDouble 05017 #define Tcl_PrintDouble \ 05018 (tclStubsPtr->tcl_PrintDouble) /* 202 */ 05019 #endif 05020 #ifndef Tcl_PutEnv 05021 #define Tcl_PutEnv \ 05022 (tclStubsPtr->tcl_PutEnv) /* 203 */ 05023 #endif 05024 #ifndef Tcl_PosixError 05025 #define Tcl_PosixError \ 05026 (tclStubsPtr->tcl_PosixError) /* 204 */ 05027 #endif 05028 #ifndef Tcl_QueueEvent 05029 #define Tcl_QueueEvent \ 05030 (tclStubsPtr->tcl_QueueEvent) /* 205 */ 05031 #endif 05032 #ifndef Tcl_Read 05033 #define Tcl_Read \ 05034 (tclStubsPtr->tcl_Read) /* 206 */ 05035 #endif 05036 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 05037 #ifndef Tcl_ReapDetachedProcs 05038 #define Tcl_ReapDetachedProcs \ 05039 (tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */ 05040 #endif 05041 #endif /* UNIX */ 05042 #ifdef __WIN32__ /* WIN */ 05043 #ifndef Tcl_ReapDetachedProcs 05044 #define Tcl_ReapDetachedProcs \ 05045 (tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */ 05046 #endif 05047 #endif /* WIN */ 05048 #ifdef MAC_OSX_TCL /* MACOSX */ 05049 #ifndef Tcl_ReapDetachedProcs 05050 #define Tcl_ReapDetachedProcs \ 05051 (tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */ 05052 #endif 05053 #endif /* MACOSX */ 05054 #ifndef Tcl_RecordAndEval 05055 #define Tcl_RecordAndEval \ 05056 (tclStubsPtr->tcl_RecordAndEval) /* 208 */ 05057 #endif 05058 #ifndef Tcl_RecordAndEvalObj 05059 #define Tcl_RecordAndEvalObj \ 05060 (tclStubsPtr->tcl_RecordAndEvalObj) /* 209 */ 05061 #endif 05062 #ifndef Tcl_RegisterChannel 05063 #define Tcl_RegisterChannel \ 05064 (tclStubsPtr->tcl_RegisterChannel) /* 210 */ 05065 #endif 05066 #ifndef Tcl_RegisterObjType 05067 #define Tcl_RegisterObjType \ 05068 (tclStubsPtr->tcl_RegisterObjType) /* 211 */ 05069 #endif 05070 #ifndef Tcl_RegExpCompile 05071 #define Tcl_RegExpCompile \ 05072 (tclStubsPtr->tcl_RegExpCompile) /* 212 */ 05073 #endif 05074 #ifndef Tcl_RegExpExec 05075 #define Tcl_RegExpExec \ 05076 (tclStubsPtr->tcl_RegExpExec) /* 213 */ 05077 #endif 05078 #ifndef Tcl_RegExpMatch 05079 #define Tcl_RegExpMatch \ 05080 (tclStubsPtr->tcl_RegExpMatch) /* 214 */ 05081 #endif 05082 #ifndef Tcl_RegExpRange 05083 #define Tcl_RegExpRange \ 05084 (tclStubsPtr->tcl_RegExpRange) /* 215 */ 05085 #endif 05086 #ifndef Tcl_Release 05087 #define Tcl_Release \ 05088 (tclStubsPtr->tcl_Release) /* 216 */ 05089 #endif 05090 #ifndef Tcl_ResetResult 05091 #define Tcl_ResetResult \ 05092 (tclStubsPtr->tcl_ResetResult) /* 217 */ 05093 #endif 05094 #ifndef Tcl_ScanElement 05095 #define Tcl_ScanElement \ 05096 (tclStubsPtr->tcl_ScanElement) /* 218 */ 05097 #endif 05098 #ifndef Tcl_ScanCountedElement 05099 #define Tcl_ScanCountedElement \ 05100 (tclStubsPtr->tcl_ScanCountedElement) /* 219 */ 05101 #endif 05102 #ifndef Tcl_SeekOld 05103 #define Tcl_SeekOld \ 05104 (tclStubsPtr->tcl_SeekOld) /* 220 */ 05105 #endif 05106 #ifndef Tcl_ServiceAll 05107 #define Tcl_ServiceAll \ 05108 (tclStubsPtr->tcl_ServiceAll) /* 221 */ 05109 #endif 05110 #ifndef Tcl_ServiceEvent 05111 #define Tcl_ServiceEvent \ 05112 (tclStubsPtr->tcl_ServiceEvent) /* 222 */ 05113 #endif 05114 #ifndef Tcl_SetAssocData 05115 #define Tcl_SetAssocData \ 05116 (tclStubsPtr->tcl_SetAssocData) /* 223 */ 05117 #endif 05118 #ifndef Tcl_SetChannelBufferSize 05119 #define Tcl_SetChannelBufferSize \ 05120 (tclStubsPtr->tcl_SetChannelBufferSize) /* 224 */ 05121 #endif 05122 #ifndef Tcl_SetChannelOption 05123 #define Tcl_SetChannelOption \ 05124 (tclStubsPtr->tcl_SetChannelOption) /* 225 */ 05125 #endif 05126 #ifndef Tcl_SetCommandInfo 05127 #define Tcl_SetCommandInfo \ 05128 (tclStubsPtr->tcl_SetCommandInfo) /* 226 */ 05129 #endif 05130 #ifndef Tcl_SetErrno 05131 #define Tcl_SetErrno \ 05132 (tclStubsPtr->tcl_SetErrno) /* 227 */ 05133 #endif 05134 #ifndef Tcl_SetErrorCode 05135 #define Tcl_SetErrorCode \ 05136 (tclStubsPtr->tcl_SetErrorCode) /* 228 */ 05137 #endif 05138 #ifndef Tcl_SetMaxBlockTime 05139 #define Tcl_SetMaxBlockTime \ 05140 (tclStubsPtr->tcl_SetMaxBlockTime) /* 229 */ 05141 #endif 05142 #ifndef Tcl_SetPanicProc 05143 #define Tcl_SetPanicProc \ 05144 (tclStubsPtr->tcl_SetPanicProc) /* 230 */ 05145 #endif 05146 #ifndef Tcl_SetRecursionLimit 05147 #define Tcl_SetRecursionLimit \ 05148 (tclStubsPtr->tcl_SetRecursionLimit) /* 231 */ 05149 #endif 05150 #ifndef Tcl_SetResult 05151 #define Tcl_SetResult \ 05152 (tclStubsPtr->tcl_SetResult) /* 232 */ 05153 #endif 05154 #ifndef Tcl_SetServiceMode 05155 #define Tcl_SetServiceMode \ 05156 (tclStubsPtr->tcl_SetServiceMode) /* 233 */ 05157 #endif 05158 #ifndef Tcl_SetObjErrorCode 05159 #define Tcl_SetObjErrorCode \ 05160 (tclStubsPtr->tcl_SetObjErrorCode) /* 234 */ 05161 #endif 05162 #ifndef Tcl_SetObjResult 05163 #define Tcl_SetObjResult \ 05164 (tclStubsPtr->tcl_SetObjResult) /* 235 */ 05165 #endif 05166 #ifndef Tcl_SetStdChannel 05167 #define Tcl_SetStdChannel \ 05168 (tclStubsPtr->tcl_SetStdChannel) /* 236 */ 05169 #endif 05170 #ifndef Tcl_SetVar 05171 #define Tcl_SetVar \ 05172 (tclStubsPtr->tcl_SetVar) /* 237 */ 05173 #endif 05174 #ifndef Tcl_SetVar2 05175 #define Tcl_SetVar2 \ 05176 (tclStubsPtr->tcl_SetVar2) /* 238 */ 05177 #endif 05178 #ifndef Tcl_SignalId 05179 #define Tcl_SignalId \ 05180 (tclStubsPtr->tcl_SignalId) /* 239 */ 05181 #endif 05182 #ifndef Tcl_SignalMsg 05183 #define Tcl_SignalMsg \ 05184 (tclStubsPtr->tcl_SignalMsg) /* 240 */ 05185 #endif 05186 #ifndef Tcl_SourceRCFile 05187 #define Tcl_SourceRCFile \ 05188 (tclStubsPtr->tcl_SourceRCFile) /* 241 */ 05189 #endif 05190 #ifndef Tcl_SplitList 05191 #define Tcl_SplitList \ 05192 (tclStubsPtr->tcl_SplitList) /* 242 */ 05193 #endif 05194 #ifndef Tcl_SplitPath 05195 #define Tcl_SplitPath \ 05196 (tclStubsPtr->tcl_SplitPath) /* 243 */ 05197 #endif 05198 #ifndef Tcl_StaticPackage 05199 #define Tcl_StaticPackage \ 05200 (tclStubsPtr->tcl_StaticPackage) /* 244 */ 05201 #endif 05202 #ifndef Tcl_StringMatch 05203 #define Tcl_StringMatch \ 05204 (tclStubsPtr->tcl_StringMatch) /* 245 */ 05205 #endif 05206 #ifndef Tcl_TellOld 05207 #define Tcl_TellOld \ 05208 (tclStubsPtr->tcl_TellOld) /* 246 */ 05209 #endif 05210 #ifndef Tcl_TraceVar 05211 #define Tcl_TraceVar \ 05212 (tclStubsPtr->tcl_TraceVar) /* 247 */ 05213 #endif 05214 #ifndef Tcl_TraceVar2 05215 #define Tcl_TraceVar2 \ 05216 (tclStubsPtr->tcl_TraceVar2) /* 248 */ 05217 #endif 05218 #ifndef Tcl_TranslateFileName 05219 #define Tcl_TranslateFileName \ 05220 (tclStubsPtr->tcl_TranslateFileName) /* 249 */ 05221 #endif 05222 #ifndef Tcl_Ungets 05223 #define Tcl_Ungets \ 05224 (tclStubsPtr->tcl_Ungets) /* 250 */ 05225 #endif 05226 #ifndef Tcl_UnlinkVar 05227 #define Tcl_UnlinkVar \ 05228 (tclStubsPtr->tcl_UnlinkVar) /* 251 */ 05229 #endif 05230 #ifndef Tcl_UnregisterChannel 05231 #define Tcl_UnregisterChannel \ 05232 (tclStubsPtr->tcl_UnregisterChannel) /* 252 */ 05233 #endif 05234 #ifndef Tcl_UnsetVar 05235 #define Tcl_UnsetVar \ 05236 (tclStubsPtr->tcl_UnsetVar) /* 253 */ 05237 #endif 05238 #ifndef Tcl_UnsetVar2 05239 #define Tcl_UnsetVar2 \ 05240 (tclStubsPtr->tcl_UnsetVar2) /* 254 */ 05241 #endif 05242 #ifndef Tcl_UntraceVar 05243 #define Tcl_UntraceVar \ 05244 (tclStubsPtr->tcl_UntraceVar) /* 255 */ 05245 #endif 05246 #ifndef Tcl_UntraceVar2 05247 #define Tcl_UntraceVar2 \ 05248 (tclStubsPtr->tcl_UntraceVar2) /* 256 */ 05249 #endif 05250 #ifndef Tcl_UpdateLinkedVar 05251 #define Tcl_UpdateLinkedVar \ 05252 (tclStubsPtr->tcl_UpdateLinkedVar) /* 257 */ 05253 #endif 05254 #ifndef Tcl_UpVar 05255 #define Tcl_UpVar \ 05256 (tclStubsPtr->tcl_UpVar) /* 258 */ 05257 #endif 05258 #ifndef Tcl_UpVar2 05259 #define Tcl_UpVar2 \ 05260 (tclStubsPtr->tcl_UpVar2) /* 259 */ 05261 #endif 05262 #ifndef Tcl_VarEval 05263 #define Tcl_VarEval \ 05264 (tclStubsPtr->tcl_VarEval) /* 260 */ 05265 #endif 05266 #ifndef Tcl_VarTraceInfo 05267 #define Tcl_VarTraceInfo \ 05268 (tclStubsPtr->tcl_VarTraceInfo) /* 261 */ 05269 #endif 05270 #ifndef Tcl_VarTraceInfo2 05271 #define Tcl_VarTraceInfo2 \ 05272 (tclStubsPtr->tcl_VarTraceInfo2) /* 262 */ 05273 #endif 05274 #ifndef Tcl_Write 05275 #define Tcl_Write \ 05276 (tclStubsPtr->tcl_Write) /* 263 */ 05277 #endif 05278 #ifndef Tcl_WrongNumArgs 05279 #define Tcl_WrongNumArgs \ 05280 (tclStubsPtr->tcl_WrongNumArgs) /* 264 */ 05281 #endif 05282 #ifndef Tcl_DumpActiveMemory 05283 #define Tcl_DumpActiveMemory \ 05284 (tclStubsPtr->tcl_DumpActiveMemory) /* 265 */ 05285 #endif 05286 #ifndef Tcl_ValidateAllMemory 05287 #define Tcl_ValidateAllMemory \ 05288 (tclStubsPtr->tcl_ValidateAllMemory) /* 266 */ 05289 #endif 05290 #ifndef Tcl_AppendResultVA 05291 #define Tcl_AppendResultVA \ 05292 (tclStubsPtr->tcl_AppendResultVA) /* 267 */ 05293 #endif 05294 #ifndef Tcl_AppendStringsToObjVA 05295 #define Tcl_AppendStringsToObjVA \ 05296 (tclStubsPtr->tcl_AppendStringsToObjVA) /* 268 */ 05297 #endif 05298 #ifndef Tcl_HashStats 05299 #define Tcl_HashStats \ 05300 (tclStubsPtr->tcl_HashStats) /* 269 */ 05301 #endif 05302 #ifndef Tcl_ParseVar 05303 #define Tcl_ParseVar \ 05304 (tclStubsPtr->tcl_ParseVar) /* 270 */ 05305 #endif 05306 #ifndef Tcl_PkgPresent 05307 #define Tcl_PkgPresent \ 05308 (tclStubsPtr->tcl_PkgPresent) /* 271 */ 05309 #endif 05310 #ifndef Tcl_PkgPresentEx 05311 #define Tcl_PkgPresentEx \ 05312 (tclStubsPtr->tcl_PkgPresentEx) /* 272 */ 05313 #endif 05314 #ifndef Tcl_PkgProvide 05315 #define Tcl_PkgProvide \ 05316 (tclStubsPtr->tcl_PkgProvide) /* 273 */ 05317 #endif 05318 #ifndef Tcl_PkgRequire 05319 #define Tcl_PkgRequire \ 05320 (tclStubsPtr->tcl_PkgRequire) /* 274 */ 05321 #endif 05322 #ifndef Tcl_SetErrorCodeVA 05323 #define Tcl_SetErrorCodeVA \ 05324 (tclStubsPtr->tcl_SetErrorCodeVA) /* 275 */ 05325 #endif 05326 #ifndef Tcl_VarEvalVA 05327 #define Tcl_VarEvalVA \ 05328 (tclStubsPtr->tcl_VarEvalVA) /* 276 */ 05329 #endif 05330 #ifndef Tcl_WaitPid 05331 #define Tcl_WaitPid \ 05332 (tclStubsPtr->tcl_WaitPid) /* 277 */ 05333 #endif 05334 #ifndef Tcl_PanicVA 05335 #define Tcl_PanicVA \ 05336 (tclStubsPtr->tcl_PanicVA) /* 278 */ 05337 #endif 05338 #ifndef Tcl_GetVersion 05339 #define Tcl_GetVersion \ 05340 (tclStubsPtr->tcl_GetVersion) /* 279 */ 05341 #endif 05342 #ifndef Tcl_InitMemory 05343 #define Tcl_InitMemory \ 05344 (tclStubsPtr->tcl_InitMemory) /* 280 */ 05345 #endif 05346 #ifndef Tcl_StackChannel 05347 #define Tcl_StackChannel \ 05348 (tclStubsPtr->tcl_StackChannel) /* 281 */ 05349 #endif 05350 #ifndef Tcl_UnstackChannel 05351 #define Tcl_UnstackChannel \ 05352 (tclStubsPtr->tcl_UnstackChannel) /* 282 */ 05353 #endif 05354 #ifndef Tcl_GetStackedChannel 05355 #define Tcl_GetStackedChannel \ 05356 (tclStubsPtr->tcl_GetStackedChannel) /* 283 */ 05357 #endif 05358 #ifndef Tcl_SetMainLoop 05359 #define Tcl_SetMainLoop \ 05360 (tclStubsPtr->tcl_SetMainLoop) /* 284 */ 05361 #endif 05362 /* Slot 285 is reserved */ 05363 #ifndef Tcl_AppendObjToObj 05364 #define Tcl_AppendObjToObj \ 05365 (tclStubsPtr->tcl_AppendObjToObj) /* 286 */ 05366 #endif 05367 #ifndef Tcl_CreateEncoding 05368 #define Tcl_CreateEncoding \ 05369 (tclStubsPtr->tcl_CreateEncoding) /* 287 */ 05370 #endif 05371 #ifndef Tcl_CreateThreadExitHandler 05372 #define Tcl_CreateThreadExitHandler \ 05373 (tclStubsPtr->tcl_CreateThreadExitHandler) /* 288 */ 05374 #endif 05375 #ifndef Tcl_DeleteThreadExitHandler 05376 #define Tcl_DeleteThreadExitHandler \ 05377 (tclStubsPtr->tcl_DeleteThreadExitHandler) /* 289 */ 05378 #endif 05379 #ifndef Tcl_DiscardResult 05380 #define Tcl_DiscardResult \ 05381 (tclStubsPtr->tcl_DiscardResult) /* 290 */ 05382 #endif 05383 #ifndef Tcl_EvalEx 05384 #define Tcl_EvalEx \ 05385 (tclStubsPtr->tcl_EvalEx) /* 291 */ 05386 #endif 05387 #ifndef Tcl_EvalObjv 05388 #define Tcl_EvalObjv \ 05389 (tclStubsPtr->tcl_EvalObjv) /* 292 */ 05390 #endif 05391 #ifndef Tcl_EvalObjEx 05392 #define Tcl_EvalObjEx \ 05393 (tclStubsPtr->tcl_EvalObjEx) /* 293 */ 05394 #endif 05395 #ifndef Tcl_ExitThread 05396 #define Tcl_ExitThread \ 05397 (tclStubsPtr->tcl_ExitThread) /* 294 */ 05398 #endif 05399 #ifndef Tcl_ExternalToUtf 05400 #define Tcl_ExternalToUtf \ 05401 (tclStubsPtr->tcl_ExternalToUtf) /* 295 */ 05402 #endif 05403 #ifndef Tcl_ExternalToUtfDString 05404 #define Tcl_ExternalToUtfDString \ 05405 (tclStubsPtr->tcl_ExternalToUtfDString) /* 296 */ 05406 #endif 05407 #ifndef Tcl_FinalizeThread 05408 #define Tcl_FinalizeThread \ 05409 (tclStubsPtr->tcl_FinalizeThread) /* 297 */ 05410 #endif 05411 #ifndef Tcl_FinalizeNotifier 05412 #define Tcl_FinalizeNotifier \ 05413 (tclStubsPtr->tcl_FinalizeNotifier) /* 298 */ 05414 #endif 05415 #ifndef Tcl_FreeEncoding 05416 #define Tcl_FreeEncoding \ 05417 (tclStubsPtr->tcl_FreeEncoding) /* 299 */ 05418 #endif 05419 #ifndef Tcl_GetCurrentThread 05420 #define Tcl_GetCurrentThread \ 05421 (tclStubsPtr->tcl_GetCurrentThread) /* 300 */ 05422 #endif 05423 #ifndef Tcl_GetEncoding 05424 #define Tcl_GetEncoding \ 05425 (tclStubsPtr->tcl_GetEncoding) /* 301 */ 05426 #endif 05427 #ifndef Tcl_GetEncodingName 05428 #define Tcl_GetEncodingName \ 05429 (tclStubsPtr->tcl_GetEncodingName) /* 302 */ 05430 #endif 05431 #ifndef Tcl_GetEncodingNames 05432 #define Tcl_GetEncodingNames \ 05433 (tclStubsPtr->tcl_GetEncodingNames) /* 303 */ 05434 #endif 05435 #ifndef Tcl_GetIndexFromObjStruct 05436 #define Tcl_GetIndexFromObjStruct \ 05437 (tclStubsPtr->tcl_GetIndexFromObjStruct) /* 304 */ 05438 #endif 05439 #ifndef Tcl_GetThreadData 05440 #define Tcl_GetThreadData \ 05441 (tclStubsPtr->tcl_GetThreadData) /* 305 */ 05442 #endif 05443 #ifndef Tcl_GetVar2Ex 05444 #define Tcl_GetVar2Ex \ 05445 (tclStubsPtr->tcl_GetVar2Ex) /* 306 */ 05446 #endif 05447 #ifndef Tcl_InitNotifier 05448 #define Tcl_InitNotifier \ 05449 (tclStubsPtr->tcl_InitNotifier) /* 307 */ 05450 #endif 05451 #ifndef Tcl_MutexLock 05452 #define Tcl_MutexLock \ 05453 (tclStubsPtr->tcl_MutexLock) /* 308 */ 05454 #endif 05455 #ifndef Tcl_MutexUnlock 05456 #define Tcl_MutexUnlock \ 05457 (tclStubsPtr->tcl_MutexUnlock) /* 309 */ 05458 #endif 05459 #ifndef Tcl_ConditionNotify 05460 #define Tcl_ConditionNotify \ 05461 (tclStubsPtr->tcl_ConditionNotify) /* 310 */ 05462 #endif 05463 #ifndef Tcl_ConditionWait 05464 #define Tcl_ConditionWait \ 05465 (tclStubsPtr->tcl_ConditionWait) /* 311 */ 05466 #endif 05467 #ifndef Tcl_NumUtfChars 05468 #define Tcl_NumUtfChars \ 05469 (tclStubsPtr->tcl_NumUtfChars) /* 312 */ 05470 #endif 05471 #ifndef Tcl_ReadChars 05472 #define Tcl_ReadChars \ 05473 (tclStubsPtr->tcl_ReadChars) /* 313 */ 05474 #endif 05475 #ifndef Tcl_RestoreResult 05476 #define Tcl_RestoreResult \ 05477 (tclStubsPtr->tcl_RestoreResult) /* 314 */ 05478 #endif 05479 #ifndef Tcl_SaveResult 05480 #define Tcl_SaveResult \ 05481 (tclStubsPtr->tcl_SaveResult) /* 315 */ 05482 #endif 05483 #ifndef Tcl_SetSystemEncoding 05484 #define Tcl_SetSystemEncoding \ 05485 (tclStubsPtr->tcl_SetSystemEncoding) /* 316 */ 05486 #endif 05487 #ifndef Tcl_SetVar2Ex 05488 #define Tcl_SetVar2Ex \ 05489 (tclStubsPtr->tcl_SetVar2Ex) /* 317 */ 05490 #endif 05491 #ifndef Tcl_ThreadAlert 05492 #define Tcl_ThreadAlert \ 05493 (tclStubsPtr->tcl_ThreadAlert) /* 318 */ 05494 #endif 05495 #ifndef Tcl_ThreadQueueEvent 05496 #define Tcl_ThreadQueueEvent \ 05497 (tclStubsPtr->tcl_ThreadQueueEvent) /* 319 */ 05498 #endif 05499 #ifndef Tcl_UniCharAtIndex 05500 #define Tcl_UniCharAtIndex \ 05501 (tclStubsPtr->tcl_UniCharAtIndex) /* 320 */ 05502 #endif 05503 #ifndef Tcl_UniCharToLower 05504 #define Tcl_UniCharToLower \ 05505 (tclStubsPtr->tcl_UniCharToLower) /* 321 */ 05506 #endif 05507 #ifndef Tcl_UniCharToTitle 05508 #define Tcl_UniCharToTitle \ 05509 (tclStubsPtr->tcl_UniCharToTitle) /* 322 */ 05510 #endif 05511 #ifndef Tcl_UniCharToUpper 05512 #define Tcl_UniCharToUpper \ 05513 (tclStubsPtr->tcl_UniCharToUpper) /* 323 */ 05514 #endif 05515 #ifndef Tcl_UniCharToUtf 05516 #define Tcl_UniCharToUtf \ 05517 (tclStubsPtr->tcl_UniCharToUtf) /* 324 */ 05518 #endif 05519 #ifndef Tcl_UtfAtIndex 05520 #define Tcl_UtfAtIndex \ 05521 (tclStubsPtr->tcl_UtfAtIndex) /* 325 */ 05522 #endif 05523 #ifndef Tcl_UtfCharComplete 05524 #define Tcl_UtfCharComplete \ 05525 (tclStubsPtr->tcl_UtfCharComplete) /* 326 */ 05526 #endif 05527 #ifndef Tcl_UtfBackslash 05528 #define Tcl_UtfBackslash \ 05529 (tclStubsPtr->tcl_UtfBackslash) /* 327 */ 05530 #endif 05531 #ifndef Tcl_UtfFindFirst 05532 #define Tcl_UtfFindFirst \ 05533 (tclStubsPtr->tcl_UtfFindFirst) /* 328 */ 05534 #endif 05535 #ifndef Tcl_UtfFindLast 05536 #define Tcl_UtfFindLast \ 05537 (tclStubsPtr->tcl_UtfFindLast) /* 329 */ 05538 #endif 05539 #ifndef Tcl_UtfNext 05540 #define Tcl_UtfNext \ 05541 (tclStubsPtr->tcl_UtfNext) /* 330 */ 05542 #endif 05543 #ifndef Tcl_UtfPrev 05544 #define Tcl_UtfPrev \ 05545 (tclStubsPtr->tcl_UtfPrev) /* 331 */ 05546 #endif 05547 #ifndef Tcl_UtfToExternal 05548 #define Tcl_UtfToExternal \ 05549 (tclStubsPtr->tcl_UtfToExternal) /* 332 */ 05550 #endif 05551 #ifndef Tcl_UtfToExternalDString 05552 #define Tcl_UtfToExternalDString \ 05553 (tclStubsPtr->tcl_UtfToExternalDString) /* 333 */ 05554 #endif 05555 #ifndef Tcl_UtfToLower 05556 #define Tcl_UtfToLower \ 05557 (tclStubsPtr->tcl_UtfToLower) /* 334 */ 05558 #endif 05559 #ifndef Tcl_UtfToTitle 05560 #define Tcl_UtfToTitle \ 05561 (tclStubsPtr->tcl_UtfToTitle) /* 335 */ 05562 #endif 05563 #ifndef Tcl_UtfToUniChar 05564 #define Tcl_UtfToUniChar \ 05565 (tclStubsPtr->tcl_UtfToUniChar) /* 336 */ 05566 #endif 05567 #ifndef Tcl_UtfToUpper 05568 #define Tcl_UtfToUpper \ 05569 (tclStubsPtr->tcl_UtfToUpper) /* 337 */ 05570 #endif 05571 #ifndef Tcl_WriteChars 05572 #define Tcl_WriteChars \ 05573 (tclStubsPtr->tcl_WriteChars) /* 338 */ 05574 #endif 05575 #ifndef Tcl_WriteObj 05576 #define Tcl_WriteObj \ 05577 (tclStubsPtr->tcl_WriteObj) /* 339 */ 05578 #endif 05579 #ifndef Tcl_GetString 05580 #define Tcl_GetString \ 05581 (tclStubsPtr->tcl_GetString) /* 340 */ 05582 #endif 05583 #ifndef Tcl_GetDefaultEncodingDir 05584 #define Tcl_GetDefaultEncodingDir \ 05585 (tclStubsPtr->tcl_GetDefaultEncodingDir) /* 341 */ 05586 #endif 05587 #ifndef Tcl_SetDefaultEncodingDir 05588 #define Tcl_SetDefaultEncodingDir \ 05589 (tclStubsPtr->tcl_SetDefaultEncodingDir) /* 342 */ 05590 #endif 05591 #ifndef Tcl_AlertNotifier 05592 #define Tcl_AlertNotifier \ 05593 (tclStubsPtr->tcl_AlertNotifier) /* 343 */ 05594 #endif 05595 #ifndef Tcl_ServiceModeHook 05596 #define Tcl_ServiceModeHook \ 05597 (tclStubsPtr->tcl_ServiceModeHook) /* 344 */ 05598 #endif 05599 #ifndef Tcl_UniCharIsAlnum 05600 #define Tcl_UniCharIsAlnum \ 05601 (tclStubsPtr->tcl_UniCharIsAlnum) /* 345 */ 05602 #endif 05603 #ifndef Tcl_UniCharIsAlpha 05604 #define Tcl_UniCharIsAlpha \ 05605 (tclStubsPtr->tcl_UniCharIsAlpha) /* 346 */ 05606 #endif 05607 #ifndef Tcl_UniCharIsDigit 05608 #define Tcl_UniCharIsDigit \ 05609 (tclStubsPtr->tcl_UniCharIsDigit) /* 347 */ 05610 #endif 05611 #ifndef Tcl_UniCharIsLower 05612 #define Tcl_UniCharIsLower \ 05613 (tclStubsPtr->tcl_UniCharIsLower) /* 348 */ 05614 #endif 05615 #ifndef Tcl_UniCharIsSpace 05616 #define Tcl_UniCharIsSpace \ 05617 (tclStubsPtr->tcl_UniCharIsSpace) /* 349 */ 05618 #endif 05619 #ifndef Tcl_UniCharIsUpper 05620 #define Tcl_UniCharIsUpper \ 05621 (tclStubsPtr->tcl_UniCharIsUpper) /* 350 */ 05622 #endif 05623 #ifndef Tcl_UniCharIsWordChar 05624 #define Tcl_UniCharIsWordChar \ 05625 (tclStubsPtr->tcl_UniCharIsWordChar) /* 351 */ 05626 #endif 05627 #ifndef Tcl_UniCharLen 05628 #define Tcl_UniCharLen \ 05629 (tclStubsPtr->tcl_UniCharLen) /* 352 */ 05630 #endif 05631 #ifndef Tcl_UniCharNcmp 05632 #define Tcl_UniCharNcmp \ 05633 (tclStubsPtr->tcl_UniCharNcmp) /* 353 */ 05634 #endif 05635 #ifndef Tcl_UniCharToUtfDString 05636 #define Tcl_UniCharToUtfDString \ 05637 (tclStubsPtr->tcl_UniCharToUtfDString) /* 354 */ 05638 #endif 05639 #ifndef Tcl_UtfToUniCharDString 05640 #define Tcl_UtfToUniCharDString \ 05641 (tclStubsPtr->tcl_UtfToUniCharDString) /* 355 */ 05642 #endif 05643 #ifndef Tcl_GetRegExpFromObj 05644 #define Tcl_GetRegExpFromObj \ 05645 (tclStubsPtr->tcl_GetRegExpFromObj) /* 356 */ 05646 #endif 05647 #ifndef Tcl_EvalTokens 05648 #define Tcl_EvalTokens \ 05649 (tclStubsPtr->tcl_EvalTokens) /* 357 */ 05650 #endif 05651 #ifndef Tcl_FreeParse 05652 #define Tcl_FreeParse \ 05653 (tclStubsPtr->tcl_FreeParse) /* 358 */ 05654 #endif 05655 #ifndef Tcl_LogCommandInfo 05656 #define Tcl_LogCommandInfo \ 05657 (tclStubsPtr->tcl_LogCommandInfo) /* 359 */ 05658 #endif 05659 #ifndef Tcl_ParseBraces 05660 #define Tcl_ParseBraces \ 05661 (tclStubsPtr->tcl_ParseBraces) /* 360 */ 05662 #endif 05663 #ifndef Tcl_ParseCommand 05664 #define Tcl_ParseCommand \ 05665 (tclStubsPtr->tcl_ParseCommand) /* 361 */ 05666 #endif 05667 #ifndef Tcl_ParseExpr 05668 #define Tcl_ParseExpr \ 05669 (tclStubsPtr->tcl_ParseExpr) /* 362 */ 05670 #endif 05671 #ifndef Tcl_ParseQuotedString 05672 #define Tcl_ParseQuotedString \ 05673 (tclStubsPtr->tcl_ParseQuotedString) /* 363 */ 05674 #endif 05675 #ifndef Tcl_ParseVarName 05676 #define Tcl_ParseVarName \ 05677 (tclStubsPtr->tcl_ParseVarName) /* 364 */ 05678 #endif 05679 #ifndef Tcl_GetCwd 05680 #define Tcl_GetCwd \ 05681 (tclStubsPtr->tcl_GetCwd) /* 365 */ 05682 #endif 05683 #ifndef Tcl_Chdir 05684 #define Tcl_Chdir \ 05685 (tclStubsPtr->tcl_Chdir) /* 366 */ 05686 #endif 05687 #ifndef Tcl_Access 05688 #define Tcl_Access \ 05689 (tclStubsPtr->tcl_Access) /* 367 */ 05690 #endif 05691 #ifndef Tcl_Stat 05692 #define Tcl_Stat \ 05693 (tclStubsPtr->tcl_Stat) /* 368 */ 05694 #endif 05695 #ifndef Tcl_UtfNcmp 05696 #define Tcl_UtfNcmp \ 05697 (tclStubsPtr->tcl_UtfNcmp) /* 369 */ 05698 #endif 05699 #ifndef Tcl_UtfNcasecmp 05700 #define Tcl_UtfNcasecmp \ 05701 (tclStubsPtr->tcl_UtfNcasecmp) /* 370 */ 05702 #endif 05703 #ifndef Tcl_StringCaseMatch 05704 #define Tcl_StringCaseMatch \ 05705 (tclStubsPtr->tcl_StringCaseMatch) /* 371 */ 05706 #endif 05707 #ifndef Tcl_UniCharIsControl 05708 #define Tcl_UniCharIsControl \ 05709 (tclStubsPtr->tcl_UniCharIsControl) /* 372 */ 05710 #endif 05711 #ifndef Tcl_UniCharIsGraph 05712 #define Tcl_UniCharIsGraph \ 05713 (tclStubsPtr->tcl_UniCharIsGraph) /* 373 */ 05714 #endif 05715 #ifndef Tcl_UniCharIsPrint 05716 #define Tcl_UniCharIsPrint \ 05717 (tclStubsPtr->tcl_UniCharIsPrint) /* 374 */ 05718 #endif 05719 #ifndef Tcl_UniCharIsPunct 05720 #define Tcl_UniCharIsPunct \ 05721 (tclStubsPtr->tcl_UniCharIsPunct) /* 375 */ 05722 #endif 05723 #ifndef Tcl_RegExpExecObj 05724 #define Tcl_RegExpExecObj \ 05725 (tclStubsPtr->tcl_RegExpExecObj) /* 376 */ 05726 #endif 05727 #ifndef Tcl_RegExpGetInfo 05728 #define Tcl_RegExpGetInfo \ 05729 (tclStubsPtr->tcl_RegExpGetInfo) /* 377 */ 05730 #endif 05731 #ifndef Tcl_NewUnicodeObj 05732 #define Tcl_NewUnicodeObj \ 05733 (tclStubsPtr->tcl_NewUnicodeObj) /* 378 */ 05734 #endif 05735 #ifndef Tcl_SetUnicodeObj 05736 #define Tcl_SetUnicodeObj \ 05737 (tclStubsPtr->tcl_SetUnicodeObj) /* 379 */ 05738 #endif 05739 #ifndef Tcl_GetCharLength 05740 #define Tcl_GetCharLength \ 05741 (tclStubsPtr->tcl_GetCharLength) /* 380 */ 05742 #endif 05743 #ifndef Tcl_GetUniChar 05744 #define Tcl_GetUniChar \ 05745 (tclStubsPtr->tcl_GetUniChar) /* 381 */ 05746 #endif 05747 #ifndef Tcl_GetUnicode 05748 #define Tcl_GetUnicode \ 05749 (tclStubsPtr->tcl_GetUnicode) /* 382 */ 05750 #endif 05751 #ifndef Tcl_GetRange 05752 #define Tcl_GetRange \ 05753 (tclStubsPtr->tcl_GetRange) /* 383 */ 05754 #endif 05755 #ifndef Tcl_AppendUnicodeToObj 05756 #define Tcl_AppendUnicodeToObj \ 05757 (tclStubsPtr->tcl_AppendUnicodeToObj) /* 384 */ 05758 #endif 05759 #ifndef Tcl_RegExpMatchObj 05760 #define Tcl_RegExpMatchObj \ 05761 (tclStubsPtr->tcl_RegExpMatchObj) /* 385 */ 05762 #endif 05763 #ifndef Tcl_SetNotifier 05764 #define Tcl_SetNotifier \ 05765 (tclStubsPtr->tcl_SetNotifier) /* 386 */ 05766 #endif 05767 #ifndef Tcl_GetAllocMutex 05768 #define Tcl_GetAllocMutex \ 05769 (tclStubsPtr->tcl_GetAllocMutex) /* 387 */ 05770 #endif 05771 #ifndef Tcl_GetChannelNames 05772 #define Tcl_GetChannelNames \ 05773 (tclStubsPtr->tcl_GetChannelNames) /* 388 */ 05774 #endif 05775 #ifndef Tcl_GetChannelNamesEx 05776 #define Tcl_GetChannelNamesEx \ 05777 (tclStubsPtr->tcl_GetChannelNamesEx) /* 389 */ 05778 #endif 05779 #ifndef Tcl_ProcObjCmd 05780 #define Tcl_ProcObjCmd \ 05781 (tclStubsPtr->tcl_ProcObjCmd) /* 390 */ 05782 #endif 05783 #ifndef Tcl_ConditionFinalize 05784 #define Tcl_ConditionFinalize \ 05785 (tclStubsPtr->tcl_ConditionFinalize) /* 391 */ 05786 #endif 05787 #ifndef Tcl_MutexFinalize 05788 #define Tcl_MutexFinalize \ 05789 (tclStubsPtr->tcl_MutexFinalize) /* 392 */ 05790 #endif 05791 #ifndef Tcl_CreateThread 05792 #define Tcl_CreateThread \ 05793 (tclStubsPtr->tcl_CreateThread) /* 393 */ 05794 #endif 05795 #ifndef Tcl_ReadRaw 05796 #define Tcl_ReadRaw \ 05797 (tclStubsPtr->tcl_ReadRaw) /* 394 */ 05798 #endif 05799 #ifndef Tcl_WriteRaw 05800 #define Tcl_WriteRaw \ 05801 (tclStubsPtr->tcl_WriteRaw) /* 395 */ 05802 #endif 05803 #ifndef Tcl_GetTopChannel 05804 #define Tcl_GetTopChannel \ 05805 (tclStubsPtr->tcl_GetTopChannel) /* 396 */ 05806 #endif 05807 #ifndef Tcl_ChannelBuffered 05808 #define Tcl_ChannelBuffered \ 05809 (tclStubsPtr->tcl_ChannelBuffered) /* 397 */ 05810 #endif 05811 #ifndef Tcl_ChannelName 05812 #define Tcl_ChannelName \ 05813 (tclStubsPtr->tcl_ChannelName) /* 398 */ 05814 #endif 05815 #ifndef Tcl_ChannelVersion 05816 #define Tcl_ChannelVersion \ 05817 (tclStubsPtr->tcl_ChannelVersion) /* 399 */ 05818 #endif 05819 #ifndef Tcl_ChannelBlockModeProc 05820 #define Tcl_ChannelBlockModeProc \ 05821 (tclStubsPtr->tcl_ChannelBlockModeProc) /* 400 */ 05822 #endif 05823 #ifndef Tcl_ChannelCloseProc 05824 #define Tcl_ChannelCloseProc \ 05825 (tclStubsPtr->tcl_ChannelCloseProc) /* 401 */ 05826 #endif 05827 #ifndef Tcl_ChannelClose2Proc 05828 #define Tcl_ChannelClose2Proc \ 05829 (tclStubsPtr->tcl_ChannelClose2Proc) /* 402 */ 05830 #endif 05831 #ifndef Tcl_ChannelInputProc 05832 #define Tcl_ChannelInputProc \ 05833 (tclStubsPtr->tcl_ChannelInputProc) /* 403 */ 05834 #endif 05835 #ifndef Tcl_ChannelOutputProc 05836 #define Tcl_ChannelOutputProc \ 05837 (tclStubsPtr->tcl_ChannelOutputProc) /* 404 */ 05838 #endif 05839 #ifndef Tcl_ChannelSeekProc 05840 #define Tcl_ChannelSeekProc \ 05841 (tclStubsPtr->tcl_ChannelSeekProc) /* 405 */ 05842 #endif 05843 #ifndef Tcl_ChannelSetOptionProc 05844 #define Tcl_ChannelSetOptionProc \ 05845 (tclStubsPtr->tcl_ChannelSetOptionProc) /* 406 */ 05846 #endif 05847 #ifndef Tcl_ChannelGetOptionProc 05848 #define Tcl_ChannelGetOptionProc \ 05849 (tclStubsPtr->tcl_ChannelGetOptionProc) /* 407 */ 05850 #endif 05851 #ifndef Tcl_ChannelWatchProc 05852 #define Tcl_ChannelWatchProc \ 05853 (tclStubsPtr->tcl_ChannelWatchProc) /* 408 */ 05854 #endif 05855 #ifndef Tcl_ChannelGetHandleProc 05856 #define Tcl_ChannelGetHandleProc \ 05857 (tclStubsPtr->tcl_ChannelGetHandleProc) /* 409 */ 05858 #endif 05859 #ifndef Tcl_ChannelFlushProc 05860 #define Tcl_ChannelFlushProc \ 05861 (tclStubsPtr->tcl_ChannelFlushProc) /* 410 */ 05862 #endif 05863 #ifndef Tcl_ChannelHandlerProc 05864 #define Tcl_ChannelHandlerProc \ 05865 (tclStubsPtr->tcl_ChannelHandlerProc) /* 411 */ 05866 #endif 05867 #ifndef Tcl_JoinThread 05868 #define Tcl_JoinThread \ 05869 (tclStubsPtr->tcl_JoinThread) /* 412 */ 05870 #endif 05871 #ifndef Tcl_IsChannelShared 05872 #define Tcl_IsChannelShared \ 05873 (tclStubsPtr->tcl_IsChannelShared) /* 413 */ 05874 #endif 05875 #ifndef Tcl_IsChannelRegistered 05876 #define Tcl_IsChannelRegistered \ 05877 (tclStubsPtr->tcl_IsChannelRegistered) /* 414 */ 05878 #endif 05879 #ifndef Tcl_CutChannel 05880 #define Tcl_CutChannel \ 05881 (tclStubsPtr->tcl_CutChannel) /* 415 */ 05882 #endif 05883 #ifndef Tcl_SpliceChannel 05884 #define Tcl_SpliceChannel \ 05885 (tclStubsPtr->tcl_SpliceChannel) /* 416 */ 05886 #endif 05887 #ifndef Tcl_ClearChannelHandlers 05888 #define Tcl_ClearChannelHandlers \ 05889 (tclStubsPtr->tcl_ClearChannelHandlers) /* 417 */ 05890 #endif 05891 #ifndef Tcl_IsChannelExisting 05892 #define Tcl_IsChannelExisting \ 05893 (tclStubsPtr->tcl_IsChannelExisting) /* 418 */ 05894 #endif 05895 #ifndef Tcl_UniCharNcasecmp 05896 #define Tcl_UniCharNcasecmp \ 05897 (tclStubsPtr->tcl_UniCharNcasecmp) /* 419 */ 05898 #endif 05899 #ifndef Tcl_UniCharCaseMatch 05900 #define Tcl_UniCharCaseMatch \ 05901 (tclStubsPtr->tcl_UniCharCaseMatch) /* 420 */ 05902 #endif 05903 #ifndef Tcl_FindHashEntry 05904 #define Tcl_FindHashEntry \ 05905 (tclStubsPtr->tcl_FindHashEntry) /* 421 */ 05906 #endif 05907 #ifndef Tcl_CreateHashEntry 05908 #define Tcl_CreateHashEntry \ 05909 (tclStubsPtr->tcl_CreateHashEntry) /* 422 */ 05910 #endif 05911 #ifndef Tcl_InitCustomHashTable 05912 #define Tcl_InitCustomHashTable \ 05913 (tclStubsPtr->tcl_InitCustomHashTable) /* 423 */ 05914 #endif 05915 #ifndef Tcl_InitObjHashTable 05916 #define Tcl_InitObjHashTable \ 05917 (tclStubsPtr->tcl_InitObjHashTable) /* 424 */ 05918 #endif 05919 #ifndef Tcl_CommandTraceInfo 05920 #define Tcl_CommandTraceInfo \ 05921 (tclStubsPtr->tcl_CommandTraceInfo) /* 425 */ 05922 #endif 05923 #ifndef Tcl_TraceCommand 05924 #define Tcl_TraceCommand \ 05925 (tclStubsPtr->tcl_TraceCommand) /* 426 */ 05926 #endif 05927 #ifndef Tcl_UntraceCommand 05928 #define Tcl_UntraceCommand \ 05929 (tclStubsPtr->tcl_UntraceCommand) /* 427 */ 05930 #endif 05931 #ifndef Tcl_AttemptAlloc 05932 #define Tcl_AttemptAlloc \ 05933 (tclStubsPtr->tcl_AttemptAlloc) /* 428 */ 05934 #endif 05935 #ifndef Tcl_AttemptDbCkalloc 05936 #define Tcl_AttemptDbCkalloc \ 05937 (tclStubsPtr->tcl_AttemptDbCkalloc) /* 429 */ 05938 #endif 05939 #ifndef Tcl_AttemptRealloc 05940 #define Tcl_AttemptRealloc \ 05941 (tclStubsPtr->tcl_AttemptRealloc) /* 430 */ 05942 #endif 05943 #ifndef Tcl_AttemptDbCkrealloc 05944 #define Tcl_AttemptDbCkrealloc \ 05945 (tclStubsPtr->tcl_AttemptDbCkrealloc) /* 431 */ 05946 #endif 05947 #ifndef Tcl_AttemptSetObjLength 05948 #define Tcl_AttemptSetObjLength \ 05949 (tclStubsPtr->tcl_AttemptSetObjLength) /* 432 */ 05950 #endif 05951 #ifndef Tcl_GetChannelThread 05952 #define Tcl_GetChannelThread \ 05953 (tclStubsPtr->tcl_GetChannelThread) /* 433 */ 05954 #endif 05955 #ifndef Tcl_GetUnicodeFromObj 05956 #define Tcl_GetUnicodeFromObj \ 05957 (tclStubsPtr->tcl_GetUnicodeFromObj) /* 434 */ 05958 #endif 05959 #ifndef Tcl_GetMathFuncInfo 05960 #define Tcl_GetMathFuncInfo \ 05961 (tclStubsPtr->tcl_GetMathFuncInfo) /* 435 */ 05962 #endif 05963 #ifndef Tcl_ListMathFuncs 05964 #define Tcl_ListMathFuncs \ 05965 (tclStubsPtr->tcl_ListMathFuncs) /* 436 */ 05966 #endif 05967 #ifndef Tcl_SubstObj 05968 #define Tcl_SubstObj \ 05969 (tclStubsPtr->tcl_SubstObj) /* 437 */ 05970 #endif 05971 #ifndef Tcl_DetachChannel 05972 #define Tcl_DetachChannel \ 05973 (tclStubsPtr->tcl_DetachChannel) /* 438 */ 05974 #endif 05975 #ifndef Tcl_IsStandardChannel 05976 #define Tcl_IsStandardChannel \ 05977 (tclStubsPtr->tcl_IsStandardChannel) /* 439 */ 05978 #endif 05979 #ifndef Tcl_FSCopyFile 05980 #define Tcl_FSCopyFile \ 05981 (tclStubsPtr->tcl_FSCopyFile) /* 440 */ 05982 #endif 05983 #ifndef Tcl_FSCopyDirectory 05984 #define Tcl_FSCopyDirectory \ 05985 (tclStubsPtr->tcl_FSCopyDirectory) /* 441 */ 05986 #endif 05987 #ifndef Tcl_FSCreateDirectory 05988 #define Tcl_FSCreateDirectory \ 05989 (tclStubsPtr->tcl_FSCreateDirectory) /* 442 */ 05990 #endif 05991 #ifndef Tcl_FSDeleteFile 05992 #define Tcl_FSDeleteFile \ 05993 (tclStubsPtr->tcl_FSDeleteFile) /* 443 */ 05994 #endif 05995 #ifndef Tcl_FSLoadFile 05996 #define Tcl_FSLoadFile \ 05997 (tclStubsPtr->tcl_FSLoadFile) /* 444 */ 05998 #endif 05999 #ifndef Tcl_FSMatchInDirectory 06000 #define Tcl_FSMatchInDirectory \ 06001 (tclStubsPtr->tcl_FSMatchInDirectory) /* 445 */ 06002 #endif 06003 #ifndef Tcl_FSLink 06004 #define Tcl_FSLink \ 06005 (tclStubsPtr->tcl_FSLink) /* 446 */ 06006 #endif 06007 #ifndef Tcl_FSRemoveDirectory 06008 #define Tcl_FSRemoveDirectory \ 06009 (tclStubsPtr->tcl_FSRemoveDirectory) /* 447 */ 06010 #endif 06011 #ifndef Tcl_FSRenameFile 06012 #define Tcl_FSRenameFile \ 06013 (tclStubsPtr->tcl_FSRenameFile) /* 448 */ 06014 #endif 06015 #ifndef Tcl_FSLstat 06016 #define Tcl_FSLstat \ 06017 (tclStubsPtr->tcl_FSLstat) /* 449 */ 06018 #endif 06019 #ifndef Tcl_FSUtime 06020 #define Tcl_FSUtime \ 06021 (tclStubsPtr->tcl_FSUtime) /* 450 */ 06022 #endif 06023 #ifndef Tcl_FSFileAttrsGet 06024 #define Tcl_FSFileAttrsGet \ 06025 (tclStubsPtr->tcl_FSFileAttrsGet) /* 451 */ 06026 #endif 06027 #ifndef Tcl_FSFileAttrsSet 06028 #define Tcl_FSFileAttrsSet \ 06029 (tclStubsPtr->tcl_FSFileAttrsSet) /* 452 */ 06030 #endif 06031 #ifndef Tcl_FSFileAttrStrings 06032 #define Tcl_FSFileAttrStrings \ 06033 (tclStubsPtr->tcl_FSFileAttrStrings) /* 453 */ 06034 #endif 06035 #ifndef Tcl_FSStat 06036 #define Tcl_FSStat \ 06037 (tclStubsPtr->tcl_FSStat) /* 454 */ 06038 #endif 06039 #ifndef Tcl_FSAccess 06040 #define Tcl_FSAccess \ 06041 (tclStubsPtr->tcl_FSAccess) /* 455 */ 06042 #endif 06043 #ifndef Tcl_FSOpenFileChannel 06044 #define Tcl_FSOpenFileChannel \ 06045 (tclStubsPtr->tcl_FSOpenFileChannel) /* 456 */ 06046 #endif 06047 #ifndef Tcl_FSGetCwd 06048 #define Tcl_FSGetCwd \ 06049 (tclStubsPtr->tcl_FSGetCwd) /* 457 */ 06050 #endif 06051 #ifndef Tcl_FSChdir 06052 #define Tcl_FSChdir \ 06053 (tclStubsPtr->tcl_FSChdir) /* 458 */ 06054 #endif 06055 #ifndef Tcl_FSConvertToPathType 06056 #define Tcl_FSConvertToPathType \ 06057 (tclStubsPtr->tcl_FSConvertToPathType) /* 459 */ 06058 #endif 06059 #ifndef Tcl_FSJoinPath 06060 #define Tcl_FSJoinPath \ 06061 (tclStubsPtr->tcl_FSJoinPath) /* 460 */ 06062 #endif 06063 #ifndef Tcl_FSSplitPath 06064 #define Tcl_FSSplitPath \ 06065 (tclStubsPtr->tcl_FSSplitPath) /* 461 */ 06066 #endif 06067 #ifndef Tcl_FSEqualPaths 06068 #define Tcl_FSEqualPaths \ 06069 (tclStubsPtr->tcl_FSEqualPaths) /* 462 */ 06070 #endif 06071 #ifndef Tcl_FSGetNormalizedPath 06072 #define Tcl_FSGetNormalizedPath \ 06073 (tclStubsPtr->tcl_FSGetNormalizedPath) /* 463 */ 06074 #endif 06075 #ifndef Tcl_FSJoinToPath 06076 #define Tcl_FSJoinToPath \ 06077 (tclStubsPtr->tcl_FSJoinToPath) /* 464 */ 06078 #endif 06079 #ifndef Tcl_FSGetInternalRep 06080 #define Tcl_FSGetInternalRep \ 06081 (tclStubsPtr->tcl_FSGetInternalRep) /* 465 */ 06082 #endif 06083 #ifndef Tcl_FSGetTranslatedPath 06084 #define Tcl_FSGetTranslatedPath \ 06085 (tclStubsPtr->tcl_FSGetTranslatedPath) /* 466 */ 06086 #endif 06087 #ifndef Tcl_FSEvalFile 06088 #define Tcl_FSEvalFile \ 06089 (tclStubsPtr->tcl_FSEvalFile) /* 467 */ 06090 #endif 06091 #ifndef Tcl_FSNewNativePath 06092 #define Tcl_FSNewNativePath \ 06093 (tclStubsPtr->tcl_FSNewNativePath) /* 468 */ 06094 #endif 06095 #ifndef Tcl_FSGetNativePath 06096 #define Tcl_FSGetNativePath \ 06097 (tclStubsPtr->tcl_FSGetNativePath) /* 469 */ 06098 #endif 06099 #ifndef Tcl_FSFileSystemInfo 06100 #define Tcl_FSFileSystemInfo \ 06101 (tclStubsPtr->tcl_FSFileSystemInfo) /* 470 */ 06102 #endif 06103 #ifndef Tcl_FSPathSeparator 06104 #define Tcl_FSPathSeparator \ 06105 (tclStubsPtr->tcl_FSPathSeparator) /* 471 */ 06106 #endif 06107 #ifndef Tcl_FSListVolumes 06108 #define Tcl_FSListVolumes \ 06109 (tclStubsPtr->tcl_FSListVolumes) /* 472 */ 06110 #endif 06111 #ifndef Tcl_FSRegister 06112 #define Tcl_FSRegister \ 06113 (tclStubsPtr->tcl_FSRegister) /* 473 */ 06114 #endif 06115 #ifndef Tcl_FSUnregister 06116 #define Tcl_FSUnregister \ 06117 (tclStubsPtr->tcl_FSUnregister) /* 474 */ 06118 #endif 06119 #ifndef Tcl_FSData 06120 #define Tcl_FSData \ 06121 (tclStubsPtr->tcl_FSData) /* 475 */ 06122 #endif 06123 #ifndef Tcl_FSGetTranslatedStringPath 06124 #define Tcl_FSGetTranslatedStringPath \ 06125 (tclStubsPtr->tcl_FSGetTranslatedStringPath) /* 476 */ 06126 #endif 06127 #ifndef Tcl_FSGetFileSystemForPath 06128 #define Tcl_FSGetFileSystemForPath \ 06129 (tclStubsPtr->tcl_FSGetFileSystemForPath) /* 477 */ 06130 #endif 06131 #ifndef Tcl_FSGetPathType 06132 #define Tcl_FSGetPathType \ 06133 (tclStubsPtr->tcl_FSGetPathType) /* 478 */ 06134 #endif 06135 #ifndef Tcl_OutputBuffered 06136 #define Tcl_OutputBuffered \ 06137 (tclStubsPtr->tcl_OutputBuffered) /* 479 */ 06138 #endif 06139 #ifndef Tcl_FSMountsChanged 06140 #define Tcl_FSMountsChanged \ 06141 (tclStubsPtr->tcl_FSMountsChanged) /* 480 */ 06142 #endif 06143 #ifndef Tcl_EvalTokensStandard 06144 #define Tcl_EvalTokensStandard \ 06145 (tclStubsPtr->tcl_EvalTokensStandard) /* 481 */ 06146 #endif 06147 #ifndef Tcl_GetTime 06148 #define Tcl_GetTime \ 06149 (tclStubsPtr->tcl_GetTime) /* 482 */ 06150 #endif 06151 #ifndef Tcl_CreateObjTrace 06152 #define Tcl_CreateObjTrace \ 06153 (tclStubsPtr->tcl_CreateObjTrace) /* 483 */ 06154 #endif 06155 #ifndef Tcl_GetCommandInfoFromToken 06156 #define Tcl_GetCommandInfoFromToken \ 06157 (tclStubsPtr->tcl_GetCommandInfoFromToken) /* 484 */ 06158 #endif 06159 #ifndef Tcl_SetCommandInfoFromToken 06160 #define Tcl_SetCommandInfoFromToken \ 06161 (tclStubsPtr->tcl_SetCommandInfoFromToken) /* 485 */ 06162 #endif 06163 #ifndef Tcl_DbNewWideIntObj 06164 #define Tcl_DbNewWideIntObj \ 06165 (tclStubsPtr->tcl_DbNewWideIntObj) /* 486 */ 06166 #endif 06167 #ifndef Tcl_GetWideIntFromObj 06168 #define Tcl_GetWideIntFromObj \ 06169 (tclStubsPtr->tcl_GetWideIntFromObj) /* 487 */ 06170 #endif 06171 #ifndef Tcl_NewWideIntObj 06172 #define Tcl_NewWideIntObj \ 06173 (tclStubsPtr->tcl_NewWideIntObj) /* 488 */ 06174 #endif 06175 #ifndef Tcl_SetWideIntObj 06176 #define Tcl_SetWideIntObj \ 06177 (tclStubsPtr->tcl_SetWideIntObj) /* 489 */ 06178 #endif 06179 #ifndef Tcl_AllocStatBuf 06180 #define Tcl_AllocStatBuf \ 06181 (tclStubsPtr->tcl_AllocStatBuf) /* 490 */ 06182 #endif 06183 #ifndef Tcl_Seek 06184 #define Tcl_Seek \ 06185 (tclStubsPtr->tcl_Seek) /* 491 */ 06186 #endif 06187 #ifndef Tcl_Tell 06188 #define Tcl_Tell \ 06189 (tclStubsPtr->tcl_Tell) /* 492 */ 06190 #endif 06191 #ifndef Tcl_ChannelWideSeekProc 06192 #define Tcl_ChannelWideSeekProc \ 06193 (tclStubsPtr->tcl_ChannelWideSeekProc) /* 493 */ 06194 #endif 06195 #ifndef Tcl_DictObjPut 06196 #define Tcl_DictObjPut \ 06197 (tclStubsPtr->tcl_DictObjPut) /* 494 */ 06198 #endif 06199 #ifndef Tcl_DictObjGet 06200 #define Tcl_DictObjGet \ 06201 (tclStubsPtr->tcl_DictObjGet) /* 495 */ 06202 #endif 06203 #ifndef Tcl_DictObjRemove 06204 #define Tcl_DictObjRemove \ 06205 (tclStubsPtr->tcl_DictObjRemove) /* 496 */ 06206 #endif 06207 #ifndef Tcl_DictObjSize 06208 #define Tcl_DictObjSize \ 06209 (tclStubsPtr->tcl_DictObjSize) /* 497 */ 06210 #endif 06211 #ifndef Tcl_DictObjFirst 06212 #define Tcl_DictObjFirst \ 06213 (tclStubsPtr->tcl_DictObjFirst) /* 498 */ 06214 #endif 06215 #ifndef Tcl_DictObjNext 06216 #define Tcl_DictObjNext \ 06217 (tclStubsPtr->tcl_DictObjNext) /* 499 */ 06218 #endif 06219 #ifndef Tcl_DictObjDone 06220 #define Tcl_DictObjDone \ 06221 (tclStubsPtr->tcl_DictObjDone) /* 500 */ 06222 #endif 06223 #ifndef Tcl_DictObjPutKeyList 06224 #define Tcl_DictObjPutKeyList \ 06225 (tclStubsPtr->tcl_DictObjPutKeyList) /* 501 */ 06226 #endif 06227 #ifndef Tcl_DictObjRemoveKeyList 06228 #define Tcl_DictObjRemoveKeyList \ 06229 (tclStubsPtr->tcl_DictObjRemoveKeyList) /* 502 */ 06230 #endif 06231 #ifndef Tcl_NewDictObj 06232 #define Tcl_NewDictObj \ 06233 (tclStubsPtr->tcl_NewDictObj) /* 503 */ 06234 #endif 06235 #ifndef Tcl_DbNewDictObj 06236 #define Tcl_DbNewDictObj \ 06237 (tclStubsPtr->tcl_DbNewDictObj) /* 504 */ 06238 #endif 06239 #ifndef Tcl_RegisterConfig 06240 #define Tcl_RegisterConfig \ 06241 (tclStubsPtr->tcl_RegisterConfig) /* 505 */ 06242 #endif 06243 #ifndef Tcl_CreateNamespace 06244 #define Tcl_CreateNamespace \ 06245 (tclStubsPtr->tcl_CreateNamespace) /* 506 */ 06246 #endif 06247 #ifndef Tcl_DeleteNamespace 06248 #define Tcl_DeleteNamespace \ 06249 (tclStubsPtr->tcl_DeleteNamespace) /* 507 */ 06250 #endif 06251 #ifndef Tcl_AppendExportList 06252 #define Tcl_AppendExportList \ 06253 (tclStubsPtr->tcl_AppendExportList) /* 508 */ 06254 #endif 06255 #ifndef Tcl_Export 06256 #define Tcl_Export \ 06257 (tclStubsPtr->tcl_Export) /* 509 */ 06258 #endif 06259 #ifndef Tcl_Import 06260 #define Tcl_Import \ 06261 (tclStubsPtr->tcl_Import) /* 510 */ 06262 #endif 06263 #ifndef Tcl_ForgetImport 06264 #define Tcl_ForgetImport \ 06265 (tclStubsPtr->tcl_ForgetImport) /* 511 */ 06266 #endif 06267 #ifndef Tcl_GetCurrentNamespace 06268 #define Tcl_GetCurrentNamespace \ 06269 (tclStubsPtr->tcl_GetCurrentNamespace) /* 512 */ 06270 #endif 06271 #ifndef Tcl_GetGlobalNamespace 06272 #define Tcl_GetGlobalNamespace \ 06273 (tclStubsPtr->tcl_GetGlobalNamespace) /* 513 */ 06274 #endif 06275 #ifndef Tcl_FindNamespace 06276 #define Tcl_FindNamespace \ 06277 (tclStubsPtr->tcl_FindNamespace) /* 514 */ 06278 #endif 06279 #ifndef Tcl_FindCommand 06280 #define Tcl_FindCommand \ 06281 (tclStubsPtr->tcl_FindCommand) /* 515 */ 06282 #endif 06283 #ifndef Tcl_GetCommandFromObj 06284 #define Tcl_GetCommandFromObj \ 06285 (tclStubsPtr->tcl_GetCommandFromObj) /* 516 */ 06286 #endif 06287 #ifndef Tcl_GetCommandFullName 06288 #define Tcl_GetCommandFullName \ 06289 (tclStubsPtr->tcl_GetCommandFullName) /* 517 */ 06290 #endif 06291 #ifndef Tcl_FSEvalFileEx 06292 #define Tcl_FSEvalFileEx \ 06293 (tclStubsPtr->tcl_FSEvalFileEx) /* 518 */ 06294 #endif 06295 #ifndef Tcl_SetExitProc 06296 #define Tcl_SetExitProc \ 06297 (tclStubsPtr->tcl_SetExitProc) /* 519 */ 06298 #endif 06299 #ifndef Tcl_LimitAddHandler 06300 #define Tcl_LimitAddHandler \ 06301 (tclStubsPtr->tcl_LimitAddHandler) /* 520 */ 06302 #endif 06303 #ifndef Tcl_LimitRemoveHandler 06304 #define Tcl_LimitRemoveHandler \ 06305 (tclStubsPtr->tcl_LimitRemoveHandler) /* 521 */ 06306 #endif 06307 #ifndef Tcl_LimitReady 06308 #define Tcl_LimitReady \ 06309 (tclStubsPtr->tcl_LimitReady) /* 522 */ 06310 #endif 06311 #ifndef Tcl_LimitCheck 06312 #define Tcl_LimitCheck \ 06313 (tclStubsPtr->tcl_LimitCheck) /* 523 */ 06314 #endif 06315 #ifndef Tcl_LimitExceeded 06316 #define Tcl_LimitExceeded \ 06317 (tclStubsPtr->tcl_LimitExceeded) /* 524 */ 06318 #endif 06319 #ifndef Tcl_LimitSetCommands 06320 #define Tcl_LimitSetCommands \ 06321 (tclStubsPtr->tcl_LimitSetCommands) /* 525 */ 06322 #endif 06323 #ifndef Tcl_LimitSetTime 06324 #define Tcl_LimitSetTime \ 06325 (tclStubsPtr->tcl_LimitSetTime) /* 526 */ 06326 #endif 06327 #ifndef Tcl_LimitSetGranularity 06328 #define Tcl_LimitSetGranularity \ 06329 (tclStubsPtr->tcl_LimitSetGranularity) /* 527 */ 06330 #endif 06331 #ifndef Tcl_LimitTypeEnabled 06332 #define Tcl_LimitTypeEnabled \ 06333 (tclStubsPtr->tcl_LimitTypeEnabled) /* 528 */ 06334 #endif 06335 #ifndef Tcl_LimitTypeExceeded 06336 #define Tcl_LimitTypeExceeded \ 06337 (tclStubsPtr->tcl_LimitTypeExceeded) /* 529 */ 06338 #endif 06339 #ifndef Tcl_LimitTypeSet 06340 #define Tcl_LimitTypeSet \ 06341 (tclStubsPtr->tcl_LimitTypeSet) /* 530 */ 06342 #endif 06343 #ifndef Tcl_LimitTypeReset 06344 #define Tcl_LimitTypeReset \ 06345 (tclStubsPtr->tcl_LimitTypeReset) /* 531 */ 06346 #endif 06347 #ifndef Tcl_LimitGetCommands 06348 #define Tcl_LimitGetCommands \ 06349 (tclStubsPtr->tcl_LimitGetCommands) /* 532 */ 06350 #endif 06351 #ifndef Tcl_LimitGetTime 06352 #define Tcl_LimitGetTime \ 06353 (tclStubsPtr->tcl_LimitGetTime) /* 533 */ 06354 #endif 06355 #ifndef Tcl_LimitGetGranularity 06356 #define Tcl_LimitGetGranularity \ 06357 (tclStubsPtr->tcl_LimitGetGranularity) /* 534 */ 06358 #endif 06359 #ifndef Tcl_SaveInterpState 06360 #define Tcl_SaveInterpState \ 06361 (tclStubsPtr->tcl_SaveInterpState) /* 535 */ 06362 #endif 06363 #ifndef Tcl_RestoreInterpState 06364 #define Tcl_RestoreInterpState \ 06365 (tclStubsPtr->tcl_RestoreInterpState) /* 536 */ 06366 #endif 06367 #ifndef Tcl_DiscardInterpState 06368 #define Tcl_DiscardInterpState \ 06369 (tclStubsPtr->tcl_DiscardInterpState) /* 537 */ 06370 #endif 06371 #ifndef Tcl_SetReturnOptions 06372 #define Tcl_SetReturnOptions \ 06373 (tclStubsPtr->tcl_SetReturnOptions) /* 538 */ 06374 #endif 06375 #ifndef Tcl_GetReturnOptions 06376 #define Tcl_GetReturnOptions \ 06377 (tclStubsPtr->tcl_GetReturnOptions) /* 539 */ 06378 #endif 06379 #ifndef Tcl_IsEnsemble 06380 #define Tcl_IsEnsemble \ 06381 (tclStubsPtr->tcl_IsEnsemble) /* 540 */ 06382 #endif 06383 #ifndef Tcl_CreateEnsemble 06384 #define Tcl_CreateEnsemble \ 06385 (tclStubsPtr->tcl_CreateEnsemble) /* 541 */ 06386 #endif 06387 #ifndef Tcl_FindEnsemble 06388 #define Tcl_FindEnsemble \ 06389 (tclStubsPtr->tcl_FindEnsemble) /* 542 */ 06390 #endif 06391 #ifndef Tcl_SetEnsembleSubcommandList 06392 #define Tcl_SetEnsembleSubcommandList \ 06393 (tclStubsPtr->tcl_SetEnsembleSubcommandList) /* 543 */ 06394 #endif 06395 #ifndef Tcl_SetEnsembleMappingDict 06396 #define Tcl_SetEnsembleMappingDict \ 06397 (tclStubsPtr->tcl_SetEnsembleMappingDict) /* 544 */ 06398 #endif 06399 #ifndef Tcl_SetEnsembleUnknownHandler 06400 #define Tcl_SetEnsembleUnknownHandler \ 06401 (tclStubsPtr->tcl_SetEnsembleUnknownHandler) /* 545 */ 06402 #endif 06403 #ifndef Tcl_SetEnsembleFlags 06404 #define Tcl_SetEnsembleFlags \ 06405 (tclStubsPtr->tcl_SetEnsembleFlags) /* 546 */ 06406 #endif 06407 #ifndef Tcl_GetEnsembleSubcommandList 06408 #define Tcl_GetEnsembleSubcommandList \ 06409 (tclStubsPtr->tcl_GetEnsembleSubcommandList) /* 547 */ 06410 #endif 06411 #ifndef Tcl_GetEnsembleMappingDict 06412 #define Tcl_GetEnsembleMappingDict \ 06413 (tclStubsPtr->tcl_GetEnsembleMappingDict) /* 548 */ 06414 #endif 06415 #ifndef Tcl_GetEnsembleUnknownHandler 06416 #define Tcl_GetEnsembleUnknownHandler \ 06417 (tclStubsPtr->tcl_GetEnsembleUnknownHandler) /* 549 */ 06418 #endif 06419 #ifndef Tcl_GetEnsembleFlags 06420 #define Tcl_GetEnsembleFlags \ 06421 (tclStubsPtr->tcl_GetEnsembleFlags) /* 550 */ 06422 #endif 06423 #ifndef Tcl_GetEnsembleNamespace 06424 #define Tcl_GetEnsembleNamespace \ 06425 (tclStubsPtr->tcl_GetEnsembleNamespace) /* 551 */ 06426 #endif 06427 #ifndef Tcl_SetTimeProc 06428 #define Tcl_SetTimeProc \ 06429 (tclStubsPtr->tcl_SetTimeProc) /* 552 */ 06430 #endif 06431 #ifndef Tcl_QueryTimeProc 06432 #define Tcl_QueryTimeProc \ 06433 (tclStubsPtr->tcl_QueryTimeProc) /* 553 */ 06434 #endif 06435 #ifndef Tcl_ChannelThreadActionProc 06436 #define Tcl_ChannelThreadActionProc \ 06437 (tclStubsPtr->tcl_ChannelThreadActionProc) /* 554 */ 06438 #endif 06439 #ifndef Tcl_NewBignumObj 06440 #define Tcl_NewBignumObj \ 06441 (tclStubsPtr->tcl_NewBignumObj) /* 555 */ 06442 #endif 06443 #ifndef Tcl_DbNewBignumObj 06444 #define Tcl_DbNewBignumObj \ 06445 (tclStubsPtr->tcl_DbNewBignumObj) /* 556 */ 06446 #endif 06447 #ifndef Tcl_SetBignumObj 06448 #define Tcl_SetBignumObj \ 06449 (tclStubsPtr->tcl_SetBignumObj) /* 557 */ 06450 #endif 06451 #ifndef Tcl_GetBignumFromObj 06452 #define Tcl_GetBignumFromObj \ 06453 (tclStubsPtr->tcl_GetBignumFromObj) /* 558 */ 06454 #endif 06455 #ifndef Tcl_TakeBignumFromObj 06456 #define Tcl_TakeBignumFromObj \ 06457 (tclStubsPtr->tcl_TakeBignumFromObj) /* 559 */ 06458 #endif 06459 #ifndef Tcl_TruncateChannel 06460 #define Tcl_TruncateChannel \ 06461 (tclStubsPtr->tcl_TruncateChannel) /* 560 */ 06462 #endif 06463 #ifndef Tcl_ChannelTruncateProc 06464 #define Tcl_ChannelTruncateProc \ 06465 (tclStubsPtr->tcl_ChannelTruncateProc) /* 561 */ 06466 #endif 06467 #ifndef Tcl_SetChannelErrorInterp 06468 #define Tcl_SetChannelErrorInterp \ 06469 (tclStubsPtr->tcl_SetChannelErrorInterp) /* 562 */ 06470 #endif 06471 #ifndef Tcl_GetChannelErrorInterp 06472 #define Tcl_GetChannelErrorInterp \ 06473 (tclStubsPtr->tcl_GetChannelErrorInterp) /* 563 */ 06474 #endif 06475 #ifndef Tcl_SetChannelError 06476 #define Tcl_SetChannelError \ 06477 (tclStubsPtr->tcl_SetChannelError) /* 564 */ 06478 #endif 06479 #ifndef Tcl_GetChannelError 06480 #define Tcl_GetChannelError \ 06481 (tclStubsPtr->tcl_GetChannelError) /* 565 */ 06482 #endif 06483 #ifndef Tcl_InitBignumFromDouble 06484 #define Tcl_InitBignumFromDouble \ 06485 (tclStubsPtr->tcl_InitBignumFromDouble) /* 566 */ 06486 #endif 06487 #ifndef Tcl_GetNamespaceUnknownHandler 06488 #define Tcl_GetNamespaceUnknownHandler \ 06489 (tclStubsPtr->tcl_GetNamespaceUnknownHandler) /* 567 */ 06490 #endif 06491 #ifndef Tcl_SetNamespaceUnknownHandler 06492 #define Tcl_SetNamespaceUnknownHandler \ 06493 (tclStubsPtr->tcl_SetNamespaceUnknownHandler) /* 568 */ 06494 #endif 06495 #ifndef Tcl_GetEncodingFromObj 06496 #define Tcl_GetEncodingFromObj \ 06497 (tclStubsPtr->tcl_GetEncodingFromObj) /* 569 */ 06498 #endif 06499 #ifndef Tcl_GetEncodingSearchPath 06500 #define Tcl_GetEncodingSearchPath \ 06501 (tclStubsPtr->tcl_GetEncodingSearchPath) /* 570 */ 06502 #endif 06503 #ifndef Tcl_SetEncodingSearchPath 06504 #define Tcl_SetEncodingSearchPath \ 06505 (tclStubsPtr->tcl_SetEncodingSearchPath) /* 571 */ 06506 #endif 06507 #ifndef Tcl_GetEncodingNameFromEnvironment 06508 #define Tcl_GetEncodingNameFromEnvironment \ 06509 (tclStubsPtr->tcl_GetEncodingNameFromEnvironment) /* 572 */ 06510 #endif 06511 #ifndef Tcl_PkgRequireProc 06512 #define Tcl_PkgRequireProc \ 06513 (tclStubsPtr->tcl_PkgRequireProc) /* 573 */ 06514 #endif 06515 #ifndef Tcl_AppendObjToErrorInfo 06516 #define Tcl_AppendObjToErrorInfo \ 06517 (tclStubsPtr->tcl_AppendObjToErrorInfo) /* 574 */ 06518 #endif 06519 #ifndef Tcl_AppendLimitedToObj 06520 #define Tcl_AppendLimitedToObj \ 06521 (tclStubsPtr->tcl_AppendLimitedToObj) /* 575 */ 06522 #endif 06523 #ifndef Tcl_Format 06524 #define Tcl_Format \ 06525 (tclStubsPtr->tcl_Format) /* 576 */ 06526 #endif 06527 #ifndef Tcl_AppendFormatToObj 06528 #define Tcl_AppendFormatToObj \ 06529 (tclStubsPtr->tcl_AppendFormatToObj) /* 577 */ 06530 #endif 06531 #ifndef Tcl_ObjPrintf 06532 #define Tcl_ObjPrintf \ 06533 (tclStubsPtr->tcl_ObjPrintf) /* 578 */ 06534 #endif 06535 #ifndef Tcl_AppendPrintfToObj 06536 #define Tcl_AppendPrintfToObj \ 06537 (tclStubsPtr->tcl_AppendPrintfToObj) /* 579 */ 06538 #endif 06539 06540 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */ 06541 06542 /* !END!: Do not edit above this line. */ 06543 06544 #undef TCL_STORAGE_CLASS 06545 #define TCL_STORAGE_CLASS DLLIMPORT 06546 06547 #endif /* _TCLDECLS */ 06548
Generated on Wed Mar 12 12:18:15 2008 by
1.5.1