1 /* 2 * tclDecls.h -- 3 * 4 * Declarations of functions in the platform independent public Tcl API. 5 * 6 * Copyright (c) 1998-1999 by Scriptics Corporation. 7 * 8 * See the file "license.terms" for information on usage and redistribution 9 * of this file, and for a DISCLAIMER OF ALL WARRANTIES. 10 */ 11 12 #ifndef _TCLDECLS 13 #define _TCLDECLS 14 15 #undef TCL_STORAGE_CLASS 16 #ifdef BUILD_tcl 17 # define TCL_STORAGE_CLASS DLLEXPORT 18 #else 19 # ifdef USE_TCL_STUBS 20 # define TCL_STORAGE_CLASS 21 # else 22 # define TCL_STORAGE_CLASS DLLIMPORT 23 # endif 24 #endif 25 26 /* 27 * WARNING: This file is automatically generated by the tools/genStubs.tcl 28 * script. Any modifications to the function declarations below should be made 29 * in the generic/tcl.decls script. 30 */ 31 32 /* !BEGIN!: Do not edit below this line. */ 33 34 /* 35 * Exported function declarations: 36 */ 37 38 #ifndef Tcl_PkgProvideEx_TCL_DECLARED 39 #define Tcl_PkgProvideEx_TCL_DECLARED 40 /* 0 */ 41 EXTERN int Tcl_PkgProvideEx(Tcl_Interp *interp, 42 CONST char *name, CONST char *version, 43 ClientData clientData); 44 #endif 45 #ifndef Tcl_PkgRequireEx_TCL_DECLARED 46 #define Tcl_PkgRequireEx_TCL_DECLARED 47 /* 1 */ 48 EXTERN CONST84_RETURN char * Tcl_PkgRequireEx(Tcl_Interp *interp, 49 CONST char *name, CONST char *version, 50 int exact, ClientData *clientDataPtr); 51 #endif 52 #ifndef Tcl_Panic_TCL_DECLARED 53 #define Tcl_Panic_TCL_DECLARED 54 /* 2 */ 55 EXTERN void Tcl_Panic(CONST char *format, ...); 56 #endif 57 #ifndef Tcl_Alloc_TCL_DECLARED 58 #define Tcl_Alloc_TCL_DECLARED 59 /* 3 */ 60 EXTERN char * Tcl_Alloc(unsigned int size); 61 #endif 62 #ifndef Tcl_Free_TCL_DECLARED 63 #define Tcl_Free_TCL_DECLARED 64 /* 4 */ 65 EXTERN void Tcl_Free(char *ptr); 66 #endif 67 #ifndef Tcl_Realloc_TCL_DECLARED 68 #define Tcl_Realloc_TCL_DECLARED 69 /* 5 */ 70 EXTERN char * Tcl_Realloc(char *ptr, unsigned int size); 71 #endif 72 #ifndef Tcl_DbCkalloc_TCL_DECLARED 73 #define Tcl_DbCkalloc_TCL_DECLARED 74 /* 6 */ 75 EXTERN char * Tcl_DbCkalloc(unsigned int size, CONST char *file, 76 int line); 77 #endif 78 #ifndef Tcl_DbCkfree_TCL_DECLARED 79 #define Tcl_DbCkfree_TCL_DECLARED 80 /* 7 */ 81 EXTERN void Tcl_DbCkfree(char *ptr, CONST char *file, int line); 82 #endif 83 #ifndef Tcl_DbCkrealloc_TCL_DECLARED 84 #define Tcl_DbCkrealloc_TCL_DECLARED 85 /* 8 */ 86 EXTERN char * Tcl_DbCkrealloc(char *ptr, unsigned int size, 87 CONST char *file, int line); 88 #endif 89 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 90 #ifndef Tcl_CreateFileHandler_TCL_DECLARED 91 #define Tcl_CreateFileHandler_TCL_DECLARED 92 /* 9 */ 93 EXTERN void Tcl_CreateFileHandler(int fd, int mask, 94 Tcl_FileProc *proc, ClientData clientData); 95 #endif 96 #endif /* UNIX */ 97 #ifdef MAC_OSX_TCL /* MACOSX */ 98 #ifndef Tcl_CreateFileHandler_TCL_DECLARED 99 #define Tcl_CreateFileHandler_TCL_DECLARED 100 /* 9 */ 101 EXTERN void Tcl_CreateFileHandler(int fd, int mask, 102 Tcl_FileProc *proc, ClientData clientData); 103 #endif 104 #endif /* MACOSX */ 105 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 106 #ifndef Tcl_DeleteFileHandler_TCL_DECLARED 107 #define Tcl_DeleteFileHandler_TCL_DECLARED 108 /* 10 */ 109 EXTERN void Tcl_DeleteFileHandler(int fd); 110 #endif 111 #endif /* UNIX */ 112 #ifdef MAC_OSX_TCL /* MACOSX */ 113 #ifndef Tcl_DeleteFileHandler_TCL_DECLARED 114 #define Tcl_DeleteFileHandler_TCL_DECLARED 115 /* 10 */ 116 EXTERN void Tcl_DeleteFileHandler(int fd); 117 #endif 118 #endif /* MACOSX */ 119 #ifndef Tcl_SetTimer_TCL_DECLARED 120 #define Tcl_SetTimer_TCL_DECLARED 121 /* 11 */ 122 EXTERN void Tcl_SetTimer(Tcl_Time *timePtr); 123 #endif 124 #ifndef Tcl_Sleep_TCL_DECLARED 125 #define Tcl_Sleep_TCL_DECLARED 126 /* 12 */ 127 EXTERN void Tcl_Sleep(int ms); 128 #endif 129 #ifndef Tcl_WaitForEvent_TCL_DECLARED 130 #define Tcl_WaitForEvent_TCL_DECLARED 131 /* 13 */ 132 EXTERN int Tcl_WaitForEvent(Tcl_Time *timePtr); 133 #endif 134 #ifndef Tcl_AppendAllObjTypes_TCL_DECLARED 135 #define Tcl_AppendAllObjTypes_TCL_DECLARED 136 /* 14 */ 137 EXTERN int Tcl_AppendAllObjTypes(Tcl_Interp *interp, 138 Tcl_Obj *objPtr); 139 #endif 140 #ifndef Tcl_AppendStringsToObj_TCL_DECLARED 141 #define Tcl_AppendStringsToObj_TCL_DECLARED 142 /* 15 */ 143 EXTERN void Tcl_AppendStringsToObj(Tcl_Obj *objPtr, ...); 144 #endif 145 #ifndef Tcl_AppendToObj_TCL_DECLARED 146 #define Tcl_AppendToObj_TCL_DECLARED 147 /* 16 */ 148 EXTERN void Tcl_AppendToObj(Tcl_Obj *objPtr, CONST char *bytes, 149 int length); 150 #endif 151 #ifndef Tcl_ConcatObj_TCL_DECLARED 152 #define Tcl_ConcatObj_TCL_DECLARED 153 /* 17 */ 154 EXTERN Tcl_Obj * Tcl_ConcatObj(int objc, Tcl_Obj *CONST objv[]); 155 #endif 156 #ifndef Tcl_ConvertToType_TCL_DECLARED 157 #define Tcl_ConvertToType_TCL_DECLARED 158 /* 18 */ 159 EXTERN int Tcl_ConvertToType(Tcl_Interp *interp, 160 Tcl_Obj *objPtr, Tcl_ObjType *typePtr); 161 #endif 162 #ifndef Tcl_DbDecrRefCount_TCL_DECLARED 163 #define Tcl_DbDecrRefCount_TCL_DECLARED 164 /* 19 */ 165 EXTERN void Tcl_DbDecrRefCount(Tcl_Obj *objPtr, CONST char *file, 166 int line); 167 #endif 168 #ifndef Tcl_DbIncrRefCount_TCL_DECLARED 169 #define Tcl_DbIncrRefCount_TCL_DECLARED 170 /* 20 */ 171 EXTERN void Tcl_DbIncrRefCount(Tcl_Obj *objPtr, CONST char *file, 172 int line); 173 #endif 174 #ifndef Tcl_DbIsShared_TCL_DECLARED 175 #define Tcl_DbIsShared_TCL_DECLARED 176 /* 21 */ 177 EXTERN int Tcl_DbIsShared(Tcl_Obj *objPtr, CONST char *file, 178 int line); 179 #endif 180 #ifndef Tcl_DbNewBooleanObj_TCL_DECLARED 181 #define Tcl_DbNewBooleanObj_TCL_DECLARED 182 /* 22 */ 183 EXTERN Tcl_Obj * Tcl_DbNewBooleanObj(int boolValue, CONST char *file, 184 int line); 185 #endif 186 #ifndef Tcl_DbNewByteArrayObj_TCL_DECLARED 187 #define Tcl_DbNewByteArrayObj_TCL_DECLARED 188 /* 23 */ 189 EXTERN Tcl_Obj * Tcl_DbNewByteArrayObj(CONST unsigned char *bytes, 190 int length, CONST char *file, int line); 191 #endif 192 #ifndef Tcl_DbNewDoubleObj_TCL_DECLARED 193 #define Tcl_DbNewDoubleObj_TCL_DECLARED 194 /* 24 */ 195 EXTERN Tcl_Obj * Tcl_DbNewDoubleObj(double doubleValue, 196 CONST char *file, int line); 197 #endif 198 #ifndef Tcl_DbNewListObj_TCL_DECLARED 199 #define Tcl_DbNewListObj_TCL_DECLARED 200 /* 25 */ 201 EXTERN Tcl_Obj * Tcl_DbNewListObj(int objc, Tcl_Obj *CONST *objv, 202 CONST char *file, int line); 203 #endif 204 #ifndef Tcl_DbNewLongObj_TCL_DECLARED 205 #define Tcl_DbNewLongObj_TCL_DECLARED 206 /* 26 */ 207 EXTERN Tcl_Obj * Tcl_DbNewLongObj(long longValue, CONST char *file, 208 int line); 209 #endif 210 #ifndef Tcl_DbNewObj_TCL_DECLARED 211 #define Tcl_DbNewObj_TCL_DECLARED 212 /* 27 */ 213 EXTERN Tcl_Obj * Tcl_DbNewObj(CONST char *file, int line); 214 #endif 215 #ifndef Tcl_DbNewStringObj_TCL_DECLARED 216 #define Tcl_DbNewStringObj_TCL_DECLARED 217 /* 28 */ 218 EXTERN Tcl_Obj * Tcl_DbNewStringObj(CONST char *bytes, int length, 219 CONST char *file, int line); 220 #endif 221 #ifndef Tcl_DuplicateObj_TCL_DECLARED 222 #define Tcl_DuplicateObj_TCL_DECLARED 223 /* 29 */ 224 EXTERN Tcl_Obj * Tcl_DuplicateObj(Tcl_Obj *objPtr); 225 #endif 226 #ifndef TclFreeObj_TCL_DECLARED 227 #define TclFreeObj_TCL_DECLARED 228 /* 30 */ 229 EXTERN void TclFreeObj(Tcl_Obj *objPtr); 230 #endif 231 #ifndef Tcl_GetBoolean_TCL_DECLARED 232 #define Tcl_GetBoolean_TCL_DECLARED 233 /* 31 */ 234 EXTERN int Tcl_GetBoolean(Tcl_Interp *interp, CONST char *src, 235 int *boolPtr); 236 #endif 237 #ifndef Tcl_GetBooleanFromObj_TCL_DECLARED 238 #define Tcl_GetBooleanFromObj_TCL_DECLARED 239 /* 32 */ 240 EXTERN int Tcl_GetBooleanFromObj(Tcl_Interp *interp, 241 Tcl_Obj *objPtr, int *boolPtr); 242 #endif 243 #ifndef Tcl_GetByteArrayFromObj_TCL_DECLARED 244 #define Tcl_GetByteArrayFromObj_TCL_DECLARED 245 /* 33 */ 246 EXTERN unsigned char * Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr, 247 int *lengthPtr); 248 #endif 249 #ifndef Tcl_GetDouble_TCL_DECLARED 250 #define Tcl_GetDouble_TCL_DECLARED 251 /* 34 */ 252 EXTERN int Tcl_GetDouble(Tcl_Interp *interp, CONST char *src, 253 double *doublePtr); 254 #endif 255 #ifndef Tcl_GetDoubleFromObj_TCL_DECLARED 256 #define Tcl_GetDoubleFromObj_TCL_DECLARED 257 /* 35 */ 258 EXTERN int Tcl_GetDoubleFromObj(Tcl_Interp *interp, 259 Tcl_Obj *objPtr, double *doublePtr); 260 #endif 261 #ifndef Tcl_GetIndexFromObj_TCL_DECLARED 262 #define Tcl_GetIndexFromObj_TCL_DECLARED 263 /* 36 */ 264 EXTERN int Tcl_GetIndexFromObj(Tcl_Interp *interp, 265 Tcl_Obj *objPtr, CONST84 char **tablePtr, 266 CONST char *msg, int flags, int *indexPtr); 267 #endif 268 #ifndef Tcl_GetInt_TCL_DECLARED 269 #define Tcl_GetInt_TCL_DECLARED 270 /* 37 */ 271 EXTERN int Tcl_GetInt(Tcl_Interp *interp, CONST char *src, 272 int *intPtr); 273 #endif 274 #ifndef Tcl_GetIntFromObj_TCL_DECLARED 275 #define Tcl_GetIntFromObj_TCL_DECLARED 276 /* 38 */ 277 EXTERN int Tcl_GetIntFromObj(Tcl_Interp *interp, 278 Tcl_Obj *objPtr, int *intPtr); 279 #endif 280 #ifndef Tcl_GetLongFromObj_TCL_DECLARED 281 #define Tcl_GetLongFromObj_TCL_DECLARED 282 /* 39 */ 283 EXTERN int Tcl_GetLongFromObj(Tcl_Interp *interp, 284 Tcl_Obj *objPtr, long *longPtr); 285 #endif 286 #ifndef Tcl_GetObjType_TCL_DECLARED 287 #define Tcl_GetObjType_TCL_DECLARED 288 /* 40 */ 289 EXTERN Tcl_ObjType * Tcl_GetObjType(CONST char *typeName); 290 #endif 291 #ifndef Tcl_GetStringFromObj_TCL_DECLARED 292 #define Tcl_GetStringFromObj_TCL_DECLARED 293 /* 41 */ 294 EXTERN char * Tcl_GetStringFromObj(Tcl_Obj *objPtr, int *lengthPtr); 295 #endif 296 #ifndef Tcl_InvalidateStringRep_TCL_DECLARED 297 #define Tcl_InvalidateStringRep_TCL_DECLARED 298 /* 42 */ 299 EXTERN void Tcl_InvalidateStringRep(Tcl_Obj *objPtr); 300 #endif 301 #ifndef Tcl_ListObjAppendList_TCL_DECLARED 302 #define Tcl_ListObjAppendList_TCL_DECLARED 303 /* 43 */ 304 EXTERN int Tcl_ListObjAppendList(Tcl_Interp *interp, 305 Tcl_Obj *listPtr, Tcl_Obj *elemListPtr); 306 #endif 307 #ifndef Tcl_ListObjAppendElement_TCL_DECLARED 308 #define Tcl_ListObjAppendElement_TCL_DECLARED 309 /* 44 */ 310 EXTERN int Tcl_ListObjAppendElement(Tcl_Interp *interp, 311 Tcl_Obj *listPtr, Tcl_Obj *objPtr); 312 #endif 313 #ifndef Tcl_ListObjGetElements_TCL_DECLARED 314 #define Tcl_ListObjGetElements_TCL_DECLARED 315 /* 45 */ 316 EXTERN int Tcl_ListObjGetElements(Tcl_Interp *interp, 317 Tcl_Obj *listPtr, int *objcPtr, 318 Tcl_Obj ***objvPtr); 319 #endif 320 #ifndef Tcl_ListObjIndex_TCL_DECLARED 321 #define Tcl_ListObjIndex_TCL_DECLARED 322 /* 46 */ 323 EXTERN int Tcl_ListObjIndex(Tcl_Interp *interp, 324 Tcl_Obj *listPtr, int index, 325 Tcl_Obj **objPtrPtr); 326 #endif 327 #ifndef Tcl_ListObjLength_TCL_DECLARED 328 #define Tcl_ListObjLength_TCL_DECLARED 329 /* 47 */ 330 EXTERN int Tcl_ListObjLength(Tcl_Interp *interp, 331 Tcl_Obj *listPtr, int *lengthPtr); 332 #endif 333 #ifndef Tcl_ListObjReplace_TCL_DECLARED 334 #define Tcl_ListObjReplace_TCL_DECLARED 335 /* 48 */ 336 EXTERN int Tcl_ListObjReplace(Tcl_Interp *interp, 337 Tcl_Obj *listPtr, int first, int count, 338 int objc, Tcl_Obj *CONST objv[]); 339 #endif 340 #ifndef Tcl_NewBooleanObj_TCL_DECLARED 341 #define Tcl_NewBooleanObj_TCL_DECLARED 342 /* 49 */ 343 EXTERN Tcl_Obj * Tcl_NewBooleanObj(int boolValue); 344 #endif 345 #ifndef Tcl_NewByteArrayObj_TCL_DECLARED 346 #define Tcl_NewByteArrayObj_TCL_DECLARED 347 /* 50 */ 348 EXTERN Tcl_Obj * Tcl_NewByteArrayObj(CONST unsigned char *bytes, 349 int length); 350 #endif 351 #ifndef Tcl_NewDoubleObj_TCL_DECLARED 352 #define Tcl_NewDoubleObj_TCL_DECLARED 353 /* 51 */ 354 EXTERN Tcl_Obj * Tcl_NewDoubleObj(double doubleValue); 355 #endif 356 #ifndef Tcl_NewIntObj_TCL_DECLARED 357 #define Tcl_NewIntObj_TCL_DECLARED 358 /* 52 */ 359 EXTERN Tcl_Obj * Tcl_NewIntObj(int intValue); 360 #endif 361 #ifndef Tcl_NewListObj_TCL_DECLARED 362 #define Tcl_NewListObj_TCL_DECLARED 363 /* 53 */ 364 EXTERN Tcl_Obj * Tcl_NewListObj(int objc, Tcl_Obj *CONST objv[]); 365 #endif 366 #ifndef Tcl_NewLongObj_TCL_DECLARED 367 #define Tcl_NewLongObj_TCL_DECLARED 368 /* 54 */ 369 EXTERN Tcl_Obj * Tcl_NewLongObj(long longValue); 370 #endif 371 #ifndef Tcl_NewObj_TCL_DECLARED 372 #define Tcl_NewObj_TCL_DECLARED 373 /* 55 */ 374 EXTERN Tcl_Obj * Tcl_NewObj(void); 375 #endif 376 #ifndef Tcl_NewStringObj_TCL_DECLARED 377 #define Tcl_NewStringObj_TCL_DECLARED 378 /* 56 */ 379 EXTERN Tcl_Obj * Tcl_NewStringObj(CONST char *bytes, int length); 380 #endif 381 #ifndef Tcl_SetBooleanObj_TCL_DECLARED 382 #define Tcl_SetBooleanObj_TCL_DECLARED 383 /* 57 */ 384 EXTERN void Tcl_SetBooleanObj(Tcl_Obj *objPtr, int boolValue); 385 #endif 386 #ifndef Tcl_SetByteArrayLength_TCL_DECLARED 387 #define Tcl_SetByteArrayLength_TCL_DECLARED 388 /* 58 */ 389 EXTERN unsigned char * Tcl_SetByteArrayLength(Tcl_Obj *objPtr, int length); 390 #endif 391 #ifndef Tcl_SetByteArrayObj_TCL_DECLARED 392 #define Tcl_SetByteArrayObj_TCL_DECLARED 393 /* 59 */ 394 EXTERN void Tcl_SetByteArrayObj(Tcl_Obj *objPtr, 395 CONST unsigned char *bytes, int length); 396 #endif 397 #ifndef Tcl_SetDoubleObj_TCL_DECLARED 398 #define Tcl_SetDoubleObj_TCL_DECLARED 399 /* 60 */ 400 EXTERN void Tcl_SetDoubleObj(Tcl_Obj *objPtr, double doubleValue); 401 #endif 402 #ifndef Tcl_SetIntObj_TCL_DECLARED 403 #define Tcl_SetIntObj_TCL_DECLARED 404 /* 61 */ 405 EXTERN void Tcl_SetIntObj(Tcl_Obj *objPtr, int intValue); 406 #endif 407 #ifndef Tcl_SetListObj_TCL_DECLARED 408 #define Tcl_SetListObj_TCL_DECLARED 409 /* 62 */ 410 EXTERN void Tcl_SetListObj(Tcl_Obj *objPtr, int objc, 411 Tcl_Obj *CONST objv[]); 412 #endif 413 #ifndef Tcl_SetLongObj_TCL_DECLARED 414 #define Tcl_SetLongObj_TCL_DECLARED 415 /* 63 */ 416 EXTERN void Tcl_SetLongObj(Tcl_Obj *objPtr, long longValue); 417 #endif 418 #ifndef Tcl_SetObjLength_TCL_DECLARED 419 #define Tcl_SetObjLength_TCL_DECLARED 420 /* 64 */ 421 EXTERN void Tcl_SetObjLength(Tcl_Obj *objPtr, int length); 422 #endif 423 #ifndef Tcl_SetStringObj_TCL_DECLARED 424 #define Tcl_SetStringObj_TCL_DECLARED 425 /* 65 */ 426 EXTERN void Tcl_SetStringObj(Tcl_Obj *objPtr, CONST char *bytes, 427 int length); 428 #endif 429 #ifndef Tcl_AddErrorInfo_TCL_DECLARED 430 #define Tcl_AddErrorInfo_TCL_DECLARED 431 /* 66 */ 432 EXTERN void Tcl_AddErrorInfo(Tcl_Interp *interp, 433 CONST char *message); 434 #endif 435 #ifndef Tcl_AddObjErrorInfo_TCL_DECLARED 436 #define Tcl_AddObjErrorInfo_TCL_DECLARED 437 /* 67 */ 438 EXTERN void Tcl_AddObjErrorInfo(Tcl_Interp *interp, 439 CONST char *message, int length); 440 #endif 441 #ifndef Tcl_AllowExceptions_TCL_DECLARED 442 #define Tcl_AllowExceptions_TCL_DECLARED 443 /* 68 */ 444 EXTERN void Tcl_AllowExceptions(Tcl_Interp *interp); 445 #endif 446 #ifndef Tcl_AppendElement_TCL_DECLARED 447 #define Tcl_AppendElement_TCL_DECLARED 448 /* 69 */ 449 EXTERN void Tcl_AppendElement(Tcl_Interp *interp, 450 CONST char *element); 451 #endif 452 #ifndef Tcl_AppendResult_TCL_DECLARED 453 #define Tcl_AppendResult_TCL_DECLARED 454 /* 70 */ 455 EXTERN void Tcl_AppendResult(Tcl_Interp *interp, ...); 456 #endif 457 #ifndef Tcl_AsyncCreate_TCL_DECLARED 458 #define Tcl_AsyncCreate_TCL_DECLARED 459 /* 71 */ 460 EXTERN Tcl_AsyncHandler Tcl_AsyncCreate(Tcl_AsyncProc *proc, 461 ClientData clientData); 462 #endif 463 #ifndef Tcl_AsyncDelete_TCL_DECLARED 464 #define Tcl_AsyncDelete_TCL_DECLARED 465 /* 72 */ 466 EXTERN void Tcl_AsyncDelete(Tcl_AsyncHandler async); 467 #endif 468 #ifndef Tcl_AsyncInvoke_TCL_DECLARED 469 #define Tcl_AsyncInvoke_TCL_DECLARED 470 /* 73 */ 471 EXTERN int Tcl_AsyncInvoke(Tcl_Interp *interp, int code); 472 #endif 473 #ifndef Tcl_AsyncMark_TCL_DECLARED 474 #define Tcl_AsyncMark_TCL_DECLARED 475 /* 74 */ 476 EXTERN void Tcl_AsyncMark(Tcl_AsyncHandler async); 477 #endif 478 #ifndef Tcl_AsyncReady_TCL_DECLARED 479 #define Tcl_AsyncReady_TCL_DECLARED 480 /* 75 */ 481 EXTERN int Tcl_AsyncReady(void); 482 #endif 483 #ifndef Tcl_BackgroundError_TCL_DECLARED 484 #define Tcl_BackgroundError_TCL_DECLARED 485 /* 76 */ 486 EXTERN void Tcl_BackgroundError(Tcl_Interp *interp); 487 #endif 488 #ifndef Tcl_Backslash_TCL_DECLARED 489 #define Tcl_Backslash_TCL_DECLARED 490 /* 77 */ 491 EXTERN char Tcl_Backslash(CONST char *src, int *readPtr); 492 #endif 493 #ifndef Tcl_BadChannelOption_TCL_DECLARED 494 #define Tcl_BadChannelOption_TCL_DECLARED 495 /* 78 */ 496 EXTERN int Tcl_BadChannelOption(Tcl_Interp *interp, 497 CONST char *optionName, 498 CONST char *optionList); 499 #endif 500 #ifndef Tcl_CallWhenDeleted_TCL_DECLARED 501 #define Tcl_CallWhenDeleted_TCL_DECLARED 502 /* 79 */ 503 EXTERN void Tcl_CallWhenDeleted(Tcl_Interp *interp, 504 Tcl_InterpDeleteProc *proc, 505 ClientData clientData); 506 #endif 507 #ifndef Tcl_CancelIdleCall_TCL_DECLARED 508 #define Tcl_CancelIdleCall_TCL_DECLARED 509 /* 80 */ 510 EXTERN void Tcl_CancelIdleCall(Tcl_IdleProc *idleProc, 511 ClientData clientData); 512 #endif 513 #ifndef Tcl_Close_TCL_DECLARED 514 #define Tcl_Close_TCL_DECLARED 515 /* 81 */ 516 EXTERN int Tcl_Close(Tcl_Interp *interp, Tcl_Channel chan); 517 #endif 518 #ifndef Tcl_CommandComplete_TCL_DECLARED 519 #define Tcl_CommandComplete_TCL_DECLARED 520 /* 82 */ 521 EXTERN int Tcl_CommandComplete(CONST char *cmd); 522 #endif 523 #ifndef Tcl_Concat_TCL_DECLARED 524 #define Tcl_Concat_TCL_DECLARED 525 /* 83 */ 526 EXTERN char * Tcl_Concat(int argc, CONST84 char *CONST *argv); 527 #endif 528 #ifndef Tcl_ConvertElement_TCL_DECLARED 529 #define Tcl_ConvertElement_TCL_DECLARED 530 /* 84 */ 531 EXTERN int Tcl_ConvertElement(CONST char *src, char *dst, 532 int flags); 533 #endif 534 #ifndef Tcl_ConvertCountedElement_TCL_DECLARED 535 #define Tcl_ConvertCountedElement_TCL_DECLARED 536 /* 85 */ 537 EXTERN int Tcl_ConvertCountedElement(CONST char *src, 538 int length, char *dst, int flags); 539 #endif 540 #ifndef Tcl_CreateAlias_TCL_DECLARED 541 #define Tcl_CreateAlias_TCL_DECLARED 542 /* 86 */ 543 EXTERN int Tcl_CreateAlias(Tcl_Interp *slave, 544 CONST char *slaveCmd, Tcl_Interp *target, 545 CONST char *targetCmd, int argc, 546 CONST84 char *CONST *argv); 547 #endif 548 #ifndef Tcl_CreateAliasObj_TCL_DECLARED 549 #define Tcl_CreateAliasObj_TCL_DECLARED 550 /* 87 */ 551 EXTERN int Tcl_CreateAliasObj(Tcl_Interp *slave, 552 CONST char *slaveCmd, Tcl_Interp *target, 553 CONST char *targetCmd, int objc, 554 Tcl_Obj *CONST objv[]); 555 #endif 556 #ifndef Tcl_CreateChannel_TCL_DECLARED 557 #define Tcl_CreateChannel_TCL_DECLARED 558 /* 88 */ 559 EXTERN Tcl_Channel Tcl_CreateChannel(Tcl_ChannelType *typePtr, 560 CONST char *chanName, 561 ClientData instanceData, int mask); 562 #endif 563 #ifndef Tcl_CreateChannelHandler_TCL_DECLARED 564 #define Tcl_CreateChannelHandler_TCL_DECLARED 565 /* 89 */ 566 EXTERN void Tcl_CreateChannelHandler(Tcl_Channel chan, int mask, 567 Tcl_ChannelProc *proc, ClientData clientData); 568 #endif 569 #ifndef Tcl_CreateCloseHandler_TCL_DECLARED 570 #define Tcl_CreateCloseHandler_TCL_DECLARED 571 /* 90 */ 572 EXTERN void Tcl_CreateCloseHandler(Tcl_Channel chan, 573 Tcl_CloseProc *proc, ClientData clientData); 574 #endif 575 #ifndef Tcl_CreateCommand_TCL_DECLARED 576 #define Tcl_CreateCommand_TCL_DECLARED 577 /* 91 */ 578 EXTERN Tcl_Command Tcl_CreateCommand(Tcl_Interp *interp, 579 CONST char *cmdName, Tcl_CmdProc *proc, 580 ClientData clientData, 581 Tcl_CmdDeleteProc *deleteProc); 582 #endif 583 #ifndef Tcl_CreateEventSource_TCL_DECLARED 584 #define Tcl_CreateEventSource_TCL_DECLARED 585 /* 92 */ 586 EXTERN void Tcl_CreateEventSource(Tcl_EventSetupProc *setupProc, 587 Tcl_EventCheckProc *checkProc, 588 ClientData clientData); 589 #endif 590 #ifndef Tcl_CreateExitHandler_TCL_DECLARED 591 #define Tcl_CreateExitHandler_TCL_DECLARED 592 /* 93 */ 593 EXTERN void Tcl_CreateExitHandler(Tcl_ExitProc *proc, 594 ClientData clientData); 595 #endif 596 #ifndef Tcl_CreateInterp_TCL_DECLARED 597 #define Tcl_CreateInterp_TCL_DECLARED 598 /* 94 */ 599 EXTERN Tcl_Interp * Tcl_CreateInterp(void); 600 #endif 601 #ifndef Tcl_CreateMathFunc_TCL_DECLARED 602 #define Tcl_CreateMathFunc_TCL_DECLARED 603 /* 95 */ 604 EXTERN void Tcl_CreateMathFunc(Tcl_Interp *interp, 605 CONST char *name, int numArgs, 606 Tcl_ValueType *argTypes, Tcl_MathProc *proc, 607 ClientData clientData); 608 #endif 609 #ifndef Tcl_CreateObjCommand_TCL_DECLARED 610 #define Tcl_CreateObjCommand_TCL_DECLARED 611 /* 96 */ 612 EXTERN Tcl_Command Tcl_CreateObjCommand(Tcl_Interp *interp, 613 CONST char *cmdName, Tcl_ObjCmdProc *proc, 614 ClientData clientData, 615 Tcl_CmdDeleteProc *deleteProc); 616 #endif 617 #ifndef Tcl_CreateSlave_TCL_DECLARED 618 #define Tcl_CreateSlave_TCL_DECLARED 619 /* 97 */ 620 EXTERN Tcl_Interp * Tcl_CreateSlave(Tcl_Interp *interp, 621 CONST char *slaveName, int isSafe); 622 #endif 623 #ifndef Tcl_CreateTimerHandler_TCL_DECLARED 624 #define Tcl_CreateTimerHandler_TCL_DECLARED 625 /* 98 */ 626 EXTERN Tcl_TimerToken Tcl_CreateTimerHandler(int milliseconds, 627 Tcl_TimerProc *proc, ClientData clientData); 628 #endif 629 #ifndef Tcl_CreateTrace_TCL_DECLARED 630 #define Tcl_CreateTrace_TCL_DECLARED 631 /* 99 */ 632 EXTERN Tcl_Trace Tcl_CreateTrace(Tcl_Interp *interp, int level, 633 Tcl_CmdTraceProc *proc, 634 ClientData clientData); 635 #endif 636 #ifndef Tcl_DeleteAssocData_TCL_DECLARED 637 #define Tcl_DeleteAssocData_TCL_DECLARED 638 /* 100 */ 639 EXTERN void Tcl_DeleteAssocData(Tcl_Interp *interp, 640 CONST char *name); 641 #endif 642 #ifndef Tcl_DeleteChannelHandler_TCL_DECLARED 643 #define Tcl_DeleteChannelHandler_TCL_DECLARED 644 /* 101 */ 645 EXTERN void Tcl_DeleteChannelHandler(Tcl_Channel chan, 646 Tcl_ChannelProc *proc, ClientData clientData); 647 #endif 648 #ifndef Tcl_DeleteCloseHandler_TCL_DECLARED 649 #define Tcl_DeleteCloseHandler_TCL_DECLARED 650 /* 102 */ 651 EXTERN void Tcl_DeleteCloseHandler(Tcl_Channel chan, 652 Tcl_CloseProc *proc, ClientData clientData); 653 #endif 654 #ifndef Tcl_DeleteCommand_TCL_DECLARED 655 #define Tcl_DeleteCommand_TCL_DECLARED 656 /* 103 */ 657 EXTERN int Tcl_DeleteCommand(Tcl_Interp *interp, 658 CONST char *cmdName); 659 #endif 660 #ifndef Tcl_DeleteCommandFromToken_TCL_DECLARED 661 #define Tcl_DeleteCommandFromToken_TCL_DECLARED 662 /* 104 */ 663 EXTERN int Tcl_DeleteCommandFromToken(Tcl_Interp *interp, 664 Tcl_Command command); 665 #endif 666 #ifndef Tcl_DeleteEvents_TCL_DECLARED 667 #define Tcl_DeleteEvents_TCL_DECLARED 668 /* 105 */ 669 EXTERN void Tcl_DeleteEvents(Tcl_EventDeleteProc *proc, 670 ClientData clientData); 671 #endif 672 #ifndef Tcl_DeleteEventSource_TCL_DECLARED 673 #define Tcl_DeleteEventSource_TCL_DECLARED 674 /* 106 */ 675 EXTERN void Tcl_DeleteEventSource(Tcl_EventSetupProc *setupProc, 676 Tcl_EventCheckProc *checkProc, 677 ClientData clientData); 678 #endif 679 #ifndef Tcl_DeleteExitHandler_TCL_DECLARED 680 #define Tcl_DeleteExitHandler_TCL_DECLARED 681 /* 107 */ 682 EXTERN void Tcl_DeleteExitHandler(Tcl_ExitProc *proc, 683 ClientData clientData); 684 #endif 685 #ifndef Tcl_DeleteHashEntry_TCL_DECLARED 686 #define Tcl_DeleteHashEntry_TCL_DECLARED 687 /* 108 */ 688 EXTERN void Tcl_DeleteHashEntry(Tcl_HashEntry *entryPtr); 689 #endif 690 #ifndef Tcl_DeleteHashTable_TCL_DECLARED 691 #define Tcl_DeleteHashTable_TCL_DECLARED 692 /* 109 */ 693 EXTERN void Tcl_DeleteHashTable(Tcl_HashTable *tablePtr); 694 #endif 695 #ifndef Tcl_DeleteInterp_TCL_DECLARED 696 #define Tcl_DeleteInterp_TCL_DECLARED 697 /* 110 */ 698 EXTERN void Tcl_DeleteInterp(Tcl_Interp *interp); 699 #endif 700 #ifndef Tcl_DetachPids_TCL_DECLARED 701 #define Tcl_DetachPids_TCL_DECLARED 702 /* 111 */ 703 EXTERN void Tcl_DetachPids(int numPids, Tcl_Pid *pidPtr); 704 #endif 705 #ifndef Tcl_DeleteTimerHandler_TCL_DECLARED 706 #define Tcl_DeleteTimerHandler_TCL_DECLARED 707 /* 112 */ 708 EXTERN void Tcl_DeleteTimerHandler(Tcl_TimerToken token); 709 #endif 710 #ifndef Tcl_DeleteTrace_TCL_DECLARED 711 #define Tcl_DeleteTrace_TCL_DECLARED 712 /* 113 */ 713 EXTERN void Tcl_DeleteTrace(Tcl_Interp *interp, Tcl_Trace trace); 714 #endif 715 #ifndef Tcl_DontCallWhenDeleted_TCL_DECLARED 716 #define Tcl_DontCallWhenDeleted_TCL_DECLARED 717 /* 114 */ 718 EXTERN void Tcl_DontCallWhenDeleted(Tcl_Interp *interp, 719 Tcl_InterpDeleteProc *proc, 720 ClientData clientData); 721 #endif 722 #ifndef Tcl_DoOneEvent_TCL_DECLARED 723 #define Tcl_DoOneEvent_TCL_DECLARED 724 /* 115 */ 725 EXTERN int Tcl_DoOneEvent(int flags); 726 #endif 727 #ifndef Tcl_DoWhenIdle_TCL_DECLARED 728 #define Tcl_DoWhenIdle_TCL_DECLARED 729 /* 116 */ 730 EXTERN void Tcl_DoWhenIdle(Tcl_IdleProc *proc, 731 ClientData clientData); 732 #endif 733 #ifndef Tcl_DStringAppend_TCL_DECLARED 734 #define Tcl_DStringAppend_TCL_DECLARED 735 /* 117 */ 736 EXTERN char * Tcl_DStringAppend(Tcl_DString *dsPtr, 737 CONST char *bytes, int length); 738 #endif 739 #ifndef Tcl_DStringAppendElement_TCL_DECLARED 740 #define Tcl_DStringAppendElement_TCL_DECLARED 741 /* 118 */ 742 EXTERN char * Tcl_DStringAppendElement(Tcl_DString *dsPtr, 743 CONST char *element); 744 #endif 745 #ifndef Tcl_DStringEndSublist_TCL_DECLARED 746 #define Tcl_DStringEndSublist_TCL_DECLARED 747 /* 119 */ 748 EXTERN void Tcl_DStringEndSublist(Tcl_DString *dsPtr); 749 #endif 750 #ifndef Tcl_DStringFree_TCL_DECLARED 751 #define Tcl_DStringFree_TCL_DECLARED 752 /* 120 */ 753 EXTERN void Tcl_DStringFree(Tcl_DString *dsPtr); 754 #endif 755 #ifndef Tcl_DStringGetResult_TCL_DECLARED 756 #define Tcl_DStringGetResult_TCL_DECLARED 757 /* 121 */ 758 EXTERN void Tcl_DStringGetResult(Tcl_Interp *interp, 759 Tcl_DString *dsPtr); 760 #endif 761 #ifndef Tcl_DStringInit_TCL_DECLARED 762 #define Tcl_DStringInit_TCL_DECLARED 763 /* 122 */ 764 EXTERN void Tcl_DStringInit(Tcl_DString *dsPtr); 765 #endif 766 #ifndef Tcl_DStringResult_TCL_DECLARED 767 #define Tcl_DStringResult_TCL_DECLARED 768 /* 123 */ 769 EXTERN void Tcl_DStringResult(Tcl_Interp *interp, 770 Tcl_DString *dsPtr); 771 #endif 772 #ifndef Tcl_DStringSetLength_TCL_DECLARED 773 #define Tcl_DStringSetLength_TCL_DECLARED 774 /* 124 */ 775 EXTERN void Tcl_DStringSetLength(Tcl_DString *dsPtr, int length); 776 #endif 777 #ifndef Tcl_DStringStartSublist_TCL_DECLARED 778 #define Tcl_DStringStartSublist_TCL_DECLARED 779 /* 125 */ 780 EXTERN void Tcl_DStringStartSublist(Tcl_DString *dsPtr); 781 #endif 782 #ifndef Tcl_Eof_TCL_DECLARED 783 #define Tcl_Eof_TCL_DECLARED 784 /* 126 */ 785 EXTERN int Tcl_Eof(Tcl_Channel chan); 786 #endif 787 #ifndef Tcl_ErrnoId_TCL_DECLARED 788 #define Tcl_ErrnoId_TCL_DECLARED 789 /* 127 */ 790 EXTERN CONST84_RETURN char * Tcl_ErrnoId(void); 791 #endif 792 #ifndef Tcl_ErrnoMsg_TCL_DECLARED 793 #define Tcl_ErrnoMsg_TCL_DECLARED 794 /* 128 */ 795 EXTERN CONST84_RETURN char * Tcl_ErrnoMsg(int err); 796 #endif 797 #ifndef Tcl_Eval_TCL_DECLARED 798 #define Tcl_Eval_TCL_DECLARED 799 /* 129 */ 800 EXTERN int Tcl_Eval(Tcl_Interp *interp, CONST char *script); 801 #endif 802 #ifndef Tcl_EvalFile_TCL_DECLARED 803 #define Tcl_EvalFile_TCL_DECLARED 804 /* 130 */ 805 EXTERN int Tcl_EvalFile(Tcl_Interp *interp, 806 CONST char *fileName); 807 #endif 808 #ifndef Tcl_EvalObj_TCL_DECLARED 809 #define Tcl_EvalObj_TCL_DECLARED 810 /* 131 */ 811 EXTERN int Tcl_EvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr); 812 #endif 813 #ifndef Tcl_EventuallyFree_TCL_DECLARED 814 #define Tcl_EventuallyFree_TCL_DECLARED 815 /* 132 */ 816 EXTERN void Tcl_EventuallyFree(ClientData clientData, 817 Tcl_FreeProc *freeProc); 818 #endif 819 #ifndef Tcl_Exit_TCL_DECLARED 820 #define Tcl_Exit_TCL_DECLARED 821 /* 133 */ 822 EXTERN void Tcl_Exit(int status); 823 #endif 824 #ifndef Tcl_ExposeCommand_TCL_DECLARED 825 #define Tcl_ExposeCommand_TCL_DECLARED 826 /* 134 */ 827 EXTERN int Tcl_ExposeCommand(Tcl_Interp *interp, 828 CONST char *hiddenCmdToken, 829 CONST char *cmdName); 830 #endif 831 #ifndef Tcl_ExprBoolean_TCL_DECLARED 832 #define Tcl_ExprBoolean_TCL_DECLARED 833 /* 135 */ 834 EXTERN int Tcl_ExprBoolean(Tcl_Interp *interp, CONST char *expr, 835 int *ptr); 836 #endif 837 #ifndef Tcl_ExprBooleanObj_TCL_DECLARED 838 #define Tcl_ExprBooleanObj_TCL_DECLARED 839 /* 136 */ 840 EXTERN int Tcl_ExprBooleanObj(Tcl_Interp *interp, 841 Tcl_Obj *objPtr, int *ptr); 842 #endif 843 #ifndef Tcl_ExprDouble_TCL_DECLARED 844 #define Tcl_ExprDouble_TCL_DECLARED 845 /* 137 */ 846 EXTERN int Tcl_ExprDouble(Tcl_Interp *interp, CONST char *expr, 847 double *ptr); 848 #endif 849 #ifndef Tcl_ExprDoubleObj_TCL_DECLARED 850 #define Tcl_ExprDoubleObj_TCL_DECLARED 851 /* 138 */ 852 EXTERN int Tcl_ExprDoubleObj(Tcl_Interp *interp, 853 Tcl_Obj *objPtr, double *ptr); 854 #endif 855 #ifndef Tcl_ExprLong_TCL_DECLARED 856 #define Tcl_ExprLong_TCL_DECLARED 857 /* 139 */ 858 EXTERN int Tcl_ExprLong(Tcl_Interp *interp, CONST char *expr, 859 long *ptr); 860 #endif 861 #ifndef Tcl_ExprLongObj_TCL_DECLARED 862 #define Tcl_ExprLongObj_TCL_DECLARED 863 /* 140 */ 864 EXTERN int Tcl_ExprLongObj(Tcl_Interp *interp, Tcl_Obj *objPtr, 865 long *ptr); 866 #endif 867 #ifndef Tcl_ExprObj_TCL_DECLARED 868 #define Tcl_ExprObj_TCL_DECLARED 869 /* 141 */ 870 EXTERN int Tcl_ExprObj(Tcl_Interp *interp, Tcl_Obj *objPtr, 871 Tcl_Obj **resultPtrPtr); 872 #endif 873 #ifndef Tcl_ExprString_TCL_DECLARED 874 #define Tcl_ExprString_TCL_DECLARED 875 /* 142 */ 876 EXTERN int Tcl_ExprString(Tcl_Interp *interp, CONST char *expr); 877 #endif 878 #ifndef Tcl_Finalize_TCL_DECLARED 879 #define Tcl_Finalize_TCL_DECLARED 880 /* 143 */ 881 EXTERN void Tcl_Finalize(void); 882 #endif 883 #ifndef Tcl_FindExecutable_TCL_DECLARED 884 #define Tcl_FindExecutable_TCL_DECLARED 885 /* 144 */ 886 EXTERN void Tcl_FindExecutable(CONST char *argv0); 887 #endif 888 #ifndef Tcl_FirstHashEntry_TCL_DECLARED 889 #define Tcl_FirstHashEntry_TCL_DECLARED 890 /* 145 */ 891 EXTERN Tcl_HashEntry * Tcl_FirstHashEntry(Tcl_HashTable *tablePtr, 892 Tcl_HashSearch *searchPtr); 893 #endif 894 #ifndef Tcl_Flush_TCL_DECLARED 895 #define Tcl_Flush_TCL_DECLARED 896 /* 146 */ 897 EXTERN int Tcl_Flush(Tcl_Channel chan); 898 #endif 899 #ifndef Tcl_FreeResult_TCL_DECLARED 900 #define Tcl_FreeResult_TCL_DECLARED 901 /* 147 */ 902 EXTERN void Tcl_FreeResult(Tcl_Interp *interp); 903 #endif 904 #ifndef Tcl_GetAlias_TCL_DECLARED 905 #define Tcl_GetAlias_TCL_DECLARED 906 /* 148 */ 907 EXTERN int Tcl_GetAlias(Tcl_Interp *interp, 908 CONST char *slaveCmd, 909 Tcl_Interp **targetInterpPtr, 910 CONST84 char **targetCmdPtr, int *argcPtr, 911 CONST84 char ***argvPtr); 912 #endif 913 #ifndef Tcl_GetAliasObj_TCL_DECLARED 914 #define Tcl_GetAliasObj_TCL_DECLARED 915 /* 149 */ 916 EXTERN int Tcl_GetAliasObj(Tcl_Interp *interp, 917 CONST char *slaveCmd, 918 Tcl_Interp **targetInterpPtr, 919 CONST84 char **targetCmdPtr, int *objcPtr, 920 Tcl_Obj ***objv); 921 #endif 922 #ifndef Tcl_GetAssocData_TCL_DECLARED 923 #define Tcl_GetAssocData_TCL_DECLARED 924 /* 150 */ 925 EXTERN ClientData Tcl_GetAssocData(Tcl_Interp *interp, 926 CONST char *name, 927 Tcl_InterpDeleteProc **procPtr); 928 #endif 929 #ifndef Tcl_GetChannel_TCL_DECLARED 930 #define Tcl_GetChannel_TCL_DECLARED 931 /* 151 */ 932 EXTERN Tcl_Channel Tcl_GetChannel(Tcl_Interp *interp, 933 CONST char *chanName, int *modePtr); 934 #endif 935 #ifndef Tcl_GetChannelBufferSize_TCL_DECLARED 936 #define Tcl_GetChannelBufferSize_TCL_DECLARED 937 /* 152 */ 938 EXTERN int Tcl_GetChannelBufferSize(Tcl_Channel chan); 939 #endif 940 #ifndef Tcl_GetChannelHandle_TCL_DECLARED 941 #define Tcl_GetChannelHandle_TCL_DECLARED 942 /* 153 */ 943 EXTERN int Tcl_GetChannelHandle(Tcl_Channel chan, int direction, 944 ClientData *handlePtr); 945 #endif 946 #ifndef Tcl_GetChannelInstanceData_TCL_DECLARED 947 #define Tcl_GetChannelInstanceData_TCL_DECLARED 948 /* 154 */ 949 EXTERN ClientData Tcl_GetChannelInstanceData(Tcl_Channel chan); 950 #endif 951 #ifndef Tcl_GetChannelMode_TCL_DECLARED 952 #define Tcl_GetChannelMode_TCL_DECLARED 953 /* 155 */ 954 EXTERN int Tcl_GetChannelMode(Tcl_Channel chan); 955 #endif 956 #ifndef Tcl_GetChannelName_TCL_DECLARED 957 #define Tcl_GetChannelName_TCL_DECLARED 958 /* 156 */ 959 EXTERN CONST84_RETURN char * Tcl_GetChannelName(Tcl_Channel chan); 960 #endif 961 #ifndef Tcl_GetChannelOption_TCL_DECLARED 962 #define Tcl_GetChannelOption_TCL_DECLARED 963 /* 157 */ 964 EXTERN int Tcl_GetChannelOption(Tcl_Interp *interp, 965 Tcl_Channel chan, CONST char *optionName, 966 Tcl_DString *dsPtr); 967 #endif 968 #ifndef Tcl_GetChannelType_TCL_DECLARED 969 #define Tcl_GetChannelType_TCL_DECLARED 970 /* 158 */ 971 EXTERN Tcl_ChannelType * Tcl_GetChannelType(Tcl_Channel chan); 972 #endif 973 #ifndef Tcl_GetCommandInfo_TCL_DECLARED 974 #define Tcl_GetCommandInfo_TCL_DECLARED 975 /* 159 */ 976 EXTERN int Tcl_GetCommandInfo(Tcl_Interp *interp, 977 CONST char *cmdName, Tcl_CmdInfo *infoPtr); 978 #endif 979 #ifndef Tcl_GetCommandName_TCL_DECLARED 980 #define Tcl_GetCommandName_TCL_DECLARED 981 /* 160 */ 982 EXTERN CONST84_RETURN char * Tcl_GetCommandName(Tcl_Interp *interp, 983 Tcl_Command command); 984 #endif 985 #ifndef Tcl_GetErrno_TCL_DECLARED 986 #define Tcl_GetErrno_TCL_DECLARED 987 /* 161 */ 988 EXTERN int Tcl_GetErrno(void); 989 #endif 990 #ifndef Tcl_GetHostName_TCL_DECLARED 991 #define Tcl_GetHostName_TCL_DECLARED 992 /* 162 */ 993 EXTERN CONST84_RETURN char * Tcl_GetHostName(void); 994 #endif 995 #ifndef Tcl_GetInterpPath_TCL_DECLARED 996 #define Tcl_GetInterpPath_TCL_DECLARED 997 /* 163 */ 998 EXTERN int Tcl_GetInterpPath(Tcl_Interp *askInterp, 999 Tcl_Interp *slaveInterp); 1000 #endif 1001 #ifndef Tcl_GetMaster_TCL_DECLARED 1002 #define Tcl_GetMaster_TCL_DECLARED 1003 /* 164 */ 1004 EXTERN Tcl_Interp * Tcl_GetMaster(Tcl_Interp *interp); 1005 #endif 1006 #ifndef Tcl_GetNameOfExecutable_TCL_DECLARED 1007 #define Tcl_GetNameOfExecutable_TCL_DECLARED 1008 /* 165 */ 1009 EXTERN CONST char * Tcl_GetNameOfExecutable(void); 1010 #endif 1011 #ifndef Tcl_GetObjResult_TCL_DECLARED 1012 #define Tcl_GetObjResult_TCL_DECLARED 1013 /* 166 */ 1014 EXTERN Tcl_Obj * Tcl_GetObjResult(Tcl_Interp *interp); 1015 #endif 1016 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 1017 #ifndef Tcl_GetOpenFile_TCL_DECLARED 1018 #define Tcl_GetOpenFile_TCL_DECLARED 1019 /* 167 */ 1020 EXTERN int Tcl_GetOpenFile(Tcl_Interp *interp, 1021 CONST char *chanID, int forWriting, 1022 int checkUsage, ClientData *filePtr); 1023 #endif 1024 #endif /* UNIX */ 1025 #ifdef MAC_OSX_TCL /* MACOSX */ 1026 #ifndef Tcl_GetOpenFile_TCL_DECLARED 1027 #define Tcl_GetOpenFile_TCL_DECLARED 1028 /* 167 */ 1029 EXTERN int Tcl_GetOpenFile(Tcl_Interp *interp, 1030 CONST char *chanID, int forWriting, 1031 int checkUsage, ClientData *filePtr); 1032 #endif 1033 #endif /* MACOSX */ 1034 #ifndef Tcl_GetPathType_TCL_DECLARED 1035 #define Tcl_GetPathType_TCL_DECLARED 1036 /* 168 */ 1037 EXTERN Tcl_PathType Tcl_GetPathType(CONST char *path); 1038 #endif 1039 #ifndef Tcl_Gets_TCL_DECLARED 1040 #define Tcl_Gets_TCL_DECLARED 1041 /* 169 */ 1042 EXTERN int Tcl_Gets(Tcl_Channel chan, Tcl_DString *dsPtr); 1043 #endif 1044 #ifndef Tcl_GetsObj_TCL_DECLARED 1045 #define Tcl_GetsObj_TCL_DECLARED 1046 /* 170 */ 1047 EXTERN int Tcl_GetsObj(Tcl_Channel chan, Tcl_Obj *objPtr); 1048 #endif 1049 #ifndef Tcl_GetServiceMode_TCL_DECLARED 1050 #define Tcl_GetServiceMode_TCL_DECLARED 1051 /* 171 */ 1052 EXTERN int Tcl_GetServiceMode(void); 1053 #endif 1054 #ifndef Tcl_GetSlave_TCL_DECLARED 1055 #define Tcl_GetSlave_TCL_DECLARED 1056 /* 172 */ 1057 EXTERN Tcl_Interp * Tcl_GetSlave(Tcl_Interp *interp, 1058 CONST char *slaveName); 1059 #endif 1060 #ifndef Tcl_GetStdChannel_TCL_DECLARED 1061 #define Tcl_GetStdChannel_TCL_DECLARED 1062 /* 173 */ 1063 EXTERN Tcl_Channel Tcl_GetStdChannel(int type); 1064 #endif 1065 #ifndef Tcl_GetStringResult_TCL_DECLARED 1066 #define Tcl_GetStringResult_TCL_DECLARED 1067 /* 174 */ 1068 EXTERN CONST84_RETURN char * Tcl_GetStringResult(Tcl_Interp *interp); 1069 #endif 1070 #ifndef Tcl_GetVar_TCL_DECLARED 1071 #define Tcl_GetVar_TCL_DECLARED 1072 /* 175 */ 1073 EXTERN CONST84_RETURN char * Tcl_GetVar(Tcl_Interp *interp, 1074 CONST char *varName, int flags); 1075 #endif 1076 #ifndef Tcl_GetVar2_TCL_DECLARED 1077 #define Tcl_GetVar2_TCL_DECLARED 1078 /* 176 */ 1079 EXTERN CONST84_RETURN char * Tcl_GetVar2(Tcl_Interp *interp, 1080 CONST char *part1, CONST char *part2, 1081 int flags); 1082 #endif 1083 #ifndef Tcl_GlobalEval_TCL_DECLARED 1084 #define Tcl_GlobalEval_TCL_DECLARED 1085 /* 177 */ 1086 EXTERN int Tcl_GlobalEval(Tcl_Interp *interp, 1087 CONST char *command); 1088 #endif 1089 #ifndef Tcl_GlobalEvalObj_TCL_DECLARED 1090 #define Tcl_GlobalEvalObj_TCL_DECLARED 1091 /* 178 */ 1092 EXTERN int Tcl_GlobalEvalObj(Tcl_Interp *interp, 1093 Tcl_Obj *objPtr); 1094 #endif 1095 #ifndef Tcl_HideCommand_TCL_DECLARED 1096 #define Tcl_HideCommand_TCL_DECLARED 1097 /* 179 */ 1098 EXTERN int Tcl_HideCommand(Tcl_Interp *interp, 1099 CONST char *cmdName, 1100 CONST char *hiddenCmdToken); 1101 #endif 1102 #ifndef Tcl_Init_TCL_DECLARED 1103 #define Tcl_Init_TCL_DECLARED 1104 /* 180 */ 1105 EXTERN int Tcl_Init(Tcl_Interp *interp); 1106 #endif 1107 #ifndef Tcl_InitHashTable_TCL_DECLARED 1108 #define Tcl_InitHashTable_TCL_DECLARED 1109 /* 181 */ 1110 EXTERN void Tcl_InitHashTable(Tcl_HashTable *tablePtr, 1111 int keyType); 1112 #endif 1113 #ifndef Tcl_InputBlocked_TCL_DECLARED 1114 #define Tcl_InputBlocked_TCL_DECLARED 1115 /* 182 */ 1116 EXTERN int Tcl_InputBlocked(Tcl_Channel chan); 1117 #endif 1118 #ifndef Tcl_InputBuffered_TCL_DECLARED 1119 #define Tcl_InputBuffered_TCL_DECLARED 1120 /* 183 */ 1121 EXTERN int Tcl_InputBuffered(Tcl_Channel chan); 1122 #endif 1123 #ifndef Tcl_InterpDeleted_TCL_DECLARED 1124 #define Tcl_InterpDeleted_TCL_DECLARED 1125 /* 184 */ 1126 EXTERN int Tcl_InterpDeleted(Tcl_Interp *interp); 1127 #endif 1128 #ifndef Tcl_IsSafe_TCL_DECLARED 1129 #define Tcl_IsSafe_TCL_DECLARED 1130 /* 185 */ 1131 EXTERN int Tcl_IsSafe(Tcl_Interp *interp); 1132 #endif 1133 #ifndef Tcl_JoinPath_TCL_DECLARED 1134 #define Tcl_JoinPath_TCL_DECLARED 1135 /* 186 */ 1136 EXTERN char * Tcl_JoinPath(int argc, CONST84 char *CONST *argv, 1137 Tcl_DString *resultPtr); 1138 #endif 1139 #ifndef Tcl_LinkVar_TCL_DECLARED 1140 #define Tcl_LinkVar_TCL_DECLARED 1141 /* 187 */ 1142 EXTERN int Tcl_LinkVar(Tcl_Interp *interp, CONST char *varName, 1143 char *addr, int type); 1144 #endif 1145 /* Slot 188 is reserved */ 1146 #ifndef Tcl_MakeFileChannel_TCL_DECLARED 1147 #define Tcl_MakeFileChannel_TCL_DECLARED 1148 /* 189 */ 1149 EXTERN Tcl_Channel Tcl_MakeFileChannel(ClientData handle, int mode); 1150 #endif 1151 #ifndef Tcl_MakeSafe_TCL_DECLARED 1152 #define Tcl_MakeSafe_TCL_DECLARED 1153 /* 190 */ 1154 EXTERN int Tcl_MakeSafe(Tcl_Interp *interp); 1155 #endif 1156 #ifndef Tcl_MakeTcpClientChannel_TCL_DECLARED 1157 #define Tcl_MakeTcpClientChannel_TCL_DECLARED 1158 /* 191 */ 1159 EXTERN Tcl_Channel Tcl_MakeTcpClientChannel(ClientData tcpSocket); 1160 #endif 1161 #ifndef Tcl_Merge_TCL_DECLARED 1162 #define Tcl_Merge_TCL_DECLARED 1163 /* 192 */ 1164 EXTERN char * Tcl_Merge(int argc, CONST84 char *CONST *argv); 1165 #endif 1166 #ifndef Tcl_NextHashEntry_TCL_DECLARED 1167 #define Tcl_NextHashEntry_TCL_DECLARED 1168 /* 193 */ 1169 EXTERN Tcl_HashEntry * Tcl_NextHashEntry(Tcl_HashSearch *searchPtr); 1170 #endif 1171 #ifndef Tcl_NotifyChannel_TCL_DECLARED 1172 #define Tcl_NotifyChannel_TCL_DECLARED 1173 /* 194 */ 1174 EXTERN void Tcl_NotifyChannel(Tcl_Channel channel, int mask); 1175 #endif 1176 #ifndef Tcl_ObjGetVar2_TCL_DECLARED 1177 #define Tcl_ObjGetVar2_TCL_DECLARED 1178 /* 195 */ 1179 EXTERN Tcl_Obj * Tcl_ObjGetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr, 1180 Tcl_Obj *part2Ptr, int flags); 1181 #endif 1182 #ifndef Tcl_ObjSetVar2_TCL_DECLARED 1183 #define Tcl_ObjSetVar2_TCL_DECLARED 1184 /* 196 */ 1185 EXTERN Tcl_Obj * Tcl_ObjSetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr, 1186 Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, 1187 int flags); 1188 #endif 1189 #ifndef Tcl_OpenCommandChannel_TCL_DECLARED 1190 #define Tcl_OpenCommandChannel_TCL_DECLARED 1191 /* 197 */ 1192 EXTERN Tcl_Channel Tcl_OpenCommandChannel(Tcl_Interp *interp, int argc, 1193 CONST84 char **argv, int flags); 1194 #endif 1195 #ifndef Tcl_OpenFileChannel_TCL_DECLARED 1196 #define Tcl_OpenFileChannel_TCL_DECLARED 1197 /* 198 */ 1198 EXTERN Tcl_Channel Tcl_OpenFileChannel(Tcl_Interp *interp, 1199 CONST char *fileName, CONST char *modeString, 1200 int permissions); 1201 #endif 1202 #ifndef Tcl_OpenTcpClient_TCL_DECLARED 1203 #define Tcl_OpenTcpClient_TCL_DECLARED 1204 /* 199 */ 1205 EXTERN Tcl_Channel Tcl_OpenTcpClient(Tcl_Interp *interp, int port, 1206 CONST char *address, CONST char *myaddr, 1207 int myport, int async); 1208 #endif 1209 #ifndef Tcl_OpenTcpServer_TCL_DECLARED 1210 #define Tcl_OpenTcpServer_TCL_DECLARED 1211 /* 200 */ 1212 EXTERN Tcl_Channel Tcl_OpenTcpServer(Tcl_Interp *interp, int port, 1213 CONST char *host, 1214 Tcl_TcpAcceptProc *acceptProc, 1215 ClientData callbackData); 1216 #endif 1217 #ifndef Tcl_Preserve_TCL_DECLARED 1218 #define Tcl_Preserve_TCL_DECLARED 1219 /* 201 */ 1220 EXTERN void Tcl_Preserve(ClientData data); 1221 #endif 1222 #ifndef Tcl_PrintDouble_TCL_DECLARED 1223 #define Tcl_PrintDouble_TCL_DECLARED 1224 /* 202 */ 1225 EXTERN void Tcl_PrintDouble(Tcl_Interp *interp, double value, 1226 char *dst); 1227 #endif 1228 #ifndef Tcl_PutEnv_TCL_DECLARED 1229 #define Tcl_PutEnv_TCL_DECLARED 1230 /* 203 */ 1231 EXTERN int Tcl_PutEnv(CONST char *assignment); 1232 #endif 1233 #ifndef Tcl_PosixError_TCL_DECLARED 1234 #define Tcl_PosixError_TCL_DECLARED 1235 /* 204 */ 1236 EXTERN CONST84_RETURN char * Tcl_PosixError(Tcl_Interp *interp); 1237 #endif 1238 #ifndef Tcl_QueueEvent_TCL_DECLARED 1239 #define Tcl_QueueEvent_TCL_DECLARED 1240 /* 205 */ 1241 EXTERN void Tcl_QueueEvent(Tcl_Event *evPtr, 1242 Tcl_QueuePosition position); 1243 #endif 1244 #ifndef Tcl_Read_TCL_DECLARED 1245 #define Tcl_Read_TCL_DECLARED 1246 /* 206 */ 1247 EXTERN int Tcl_Read(Tcl_Channel chan, char *bufPtr, int toRead); 1248 #endif 1249 #ifndef Tcl_ReapDetachedProcs_TCL_DECLARED 1250 #define Tcl_ReapDetachedProcs_TCL_DECLARED 1251 /* 207 */ 1252 EXTERN void Tcl_ReapDetachedProcs(void); 1253 #endif 1254 #ifndef Tcl_RecordAndEval_TCL_DECLARED 1255 #define Tcl_RecordAndEval_TCL_DECLARED 1256 /* 208 */ 1257 EXTERN int Tcl_RecordAndEval(Tcl_Interp *interp, 1258 CONST char *cmd, int flags); 1259 #endif 1260 #ifndef Tcl_RecordAndEvalObj_TCL_DECLARED 1261 #define Tcl_RecordAndEvalObj_TCL_DECLARED 1262 /* 209 */ 1263 EXTERN int Tcl_RecordAndEvalObj(Tcl_Interp *interp, 1264 Tcl_Obj *cmdPtr, int flags); 1265 #endif 1266 #ifndef Tcl_RegisterChannel_TCL_DECLARED 1267 #define Tcl_RegisterChannel_TCL_DECLARED 1268 /* 210 */ 1269 EXTERN void Tcl_RegisterChannel(Tcl_Interp *interp, 1270 Tcl_Channel chan); 1271 #endif 1272 #ifndef Tcl_RegisterObjType_TCL_DECLARED 1273 #define Tcl_RegisterObjType_TCL_DECLARED 1274 /* 211 */ 1275 EXTERN void Tcl_RegisterObjType(Tcl_ObjType *typePtr); 1276 #endif 1277 #ifndef Tcl_RegExpCompile_TCL_DECLARED 1278 #define Tcl_RegExpCompile_TCL_DECLARED 1279 /* 212 */ 1280 EXTERN Tcl_RegExp Tcl_RegExpCompile(Tcl_Interp *interp, 1281 CONST char *pattern); 1282 #endif 1283 #ifndef Tcl_RegExpExec_TCL_DECLARED 1284 #define Tcl_RegExpExec_TCL_DECLARED 1285 /* 213 */ 1286 EXTERN int Tcl_RegExpExec(Tcl_Interp *interp, Tcl_RegExp regexp, 1287 CONST char *text, CONST char *start); 1288 #endif 1289 #ifndef Tcl_RegExpMatch_TCL_DECLARED 1290 #define Tcl_RegExpMatch_TCL_DECLARED 1291 /* 214 */ 1292 EXTERN int Tcl_RegExpMatch(Tcl_Interp *interp, CONST char *text, 1293 CONST char *pattern); 1294 #endif 1295 #ifndef Tcl_RegExpRange_TCL_DECLARED 1296 #define Tcl_RegExpRange_TCL_DECLARED 1297 /* 215 */ 1298 EXTERN void Tcl_RegExpRange(Tcl_RegExp regexp, int index, 1299 CONST84 char **startPtr, 1300 CONST84 char **endPtr); 1301 #endif 1302 #ifndef Tcl_Release_TCL_DECLARED 1303 #define Tcl_Release_TCL_DECLARED 1304 /* 216 */ 1305 EXTERN void Tcl_Release(ClientData clientData); 1306 #endif 1307 #ifndef Tcl_ResetResult_TCL_DECLARED 1308 #define Tcl_ResetResult_TCL_DECLARED 1309 /* 217 */ 1310 EXTERN void Tcl_ResetResult(Tcl_Interp *interp); 1311 #endif 1312 #ifndef Tcl_ScanElement_TCL_DECLARED 1313 #define Tcl_ScanElement_TCL_DECLARED 1314 /* 218 */ 1315 EXTERN int Tcl_ScanElement(CONST char *src, int *flagPtr); 1316 #endif 1317 #ifndef Tcl_ScanCountedElement_TCL_DECLARED 1318 #define Tcl_ScanCountedElement_TCL_DECLARED 1319 /* 219 */ 1320 EXTERN int Tcl_ScanCountedElement(CONST char *src, int length, 1321 int *flagPtr); 1322 #endif 1323 #ifndef Tcl_SeekOld_TCL_DECLARED 1324 #define Tcl_SeekOld_TCL_DECLARED 1325 /* 220 */ 1326 EXTERN int Tcl_SeekOld(Tcl_Channel chan, int offset, int mode); 1327 #endif 1328 #ifndef Tcl_ServiceAll_TCL_DECLARED 1329 #define Tcl_ServiceAll_TCL_DECLARED 1330 /* 221 */ 1331 EXTERN int Tcl_ServiceAll(void); 1332 #endif 1333 #ifndef Tcl_ServiceEvent_TCL_DECLARED 1334 #define Tcl_ServiceEvent_TCL_DECLARED 1335 /* 222 */ 1336 EXTERN int Tcl_ServiceEvent(int flags); 1337 #endif 1338 #ifndef Tcl_SetAssocData_TCL_DECLARED 1339 #define Tcl_SetAssocData_TCL_DECLARED 1340 /* 223 */ 1341 EXTERN void Tcl_SetAssocData(Tcl_Interp *interp, 1342 CONST char *name, Tcl_InterpDeleteProc *proc, 1343 ClientData clientData); 1344 #endif 1345 #ifndef Tcl_SetChannelBufferSize_TCL_DECLARED 1346 #define Tcl_SetChannelBufferSize_TCL_DECLARED 1347 /* 224 */ 1348 EXTERN void Tcl_SetChannelBufferSize(Tcl_Channel chan, int sz); 1349 #endif 1350 #ifndef Tcl_SetChannelOption_TCL_DECLARED 1351 #define Tcl_SetChannelOption_TCL_DECLARED 1352 /* 225 */ 1353 EXTERN int Tcl_SetChannelOption(Tcl_Interp *interp, 1354 Tcl_Channel chan, CONST char *optionName, 1355 CONST char *newValue); 1356 #endif 1357 #ifndef Tcl_SetCommandInfo_TCL_DECLARED 1358 #define Tcl_SetCommandInfo_TCL_DECLARED 1359 /* 226 */ 1360 EXTERN int Tcl_SetCommandInfo(Tcl_Interp *interp, 1361 CONST char *cmdName, 1362 CONST Tcl_CmdInfo *infoPtr); 1363 #endif 1364 #ifndef Tcl_SetErrno_TCL_DECLARED 1365 #define Tcl_SetErrno_TCL_DECLARED 1366 /* 227 */ 1367 EXTERN void Tcl_SetErrno(int err); 1368 #endif 1369 #ifndef Tcl_SetErrorCode_TCL_DECLARED 1370 #define Tcl_SetErrorCode_TCL_DECLARED 1371 /* 228 */ 1372 EXTERN void Tcl_SetErrorCode(Tcl_Interp *interp, ...); 1373 #endif 1374 #ifndef Tcl_SetMaxBlockTime_TCL_DECLARED 1375 #define Tcl_SetMaxBlockTime_TCL_DECLARED 1376 /* 229 */ 1377 EXTERN void Tcl_SetMaxBlockTime(Tcl_Time *timePtr); 1378 #endif 1379 #ifndef Tcl_SetPanicProc_TCL_DECLARED 1380 #define Tcl_SetPanicProc_TCL_DECLARED 1381 /* 230 */ 1382 EXTERN void Tcl_SetPanicProc(Tcl_PanicProc *panicProc); 1383 #endif 1384 #ifndef Tcl_SetRecursionLimit_TCL_DECLARED 1385 #define Tcl_SetRecursionLimit_TCL_DECLARED 1386 /* 231 */ 1387 EXTERN int Tcl_SetRecursionLimit(Tcl_Interp *interp, int depth); 1388 #endif 1389 #ifndef Tcl_SetResult_TCL_DECLARED 1390 #define Tcl_SetResult_TCL_DECLARED 1391 /* 232 */ 1392 EXTERN void Tcl_SetResult(Tcl_Interp *interp, char *result, 1393 Tcl_FreeProc *freeProc); 1394 #endif 1395 #ifndef Tcl_SetServiceMode_TCL_DECLARED 1396 #define Tcl_SetServiceMode_TCL_DECLARED 1397 /* 233 */ 1398 EXTERN int Tcl_SetServiceMode(int mode); 1399 #endif 1400 #ifndef Tcl_SetObjErrorCode_TCL_DECLARED 1401 #define Tcl_SetObjErrorCode_TCL_DECLARED 1402 /* 234 */ 1403 EXTERN void Tcl_SetObjErrorCode(Tcl_Interp *interp, 1404 Tcl_Obj *errorObjPtr); 1405 #endif 1406 #ifndef Tcl_SetObjResult_TCL_DECLARED 1407 #define Tcl_SetObjResult_TCL_DECLARED 1408 /* 235 */ 1409 EXTERN void Tcl_SetObjResult(Tcl_Interp *interp, 1410 Tcl_Obj *resultObjPtr); 1411 #endif 1412 #ifndef Tcl_SetStdChannel_TCL_DECLARED 1413 #define Tcl_SetStdChannel_TCL_DECLARED 1414 /* 236 */ 1415 EXTERN void Tcl_SetStdChannel(Tcl_Channel channel, int type); 1416 #endif 1417 #ifndef Tcl_SetVar_TCL_DECLARED 1418 #define Tcl_SetVar_TCL_DECLARED 1419 /* 237 */ 1420 EXTERN CONST84_RETURN char * Tcl_SetVar(Tcl_Interp *interp, 1421 CONST char *varName, CONST char *newValue, 1422 int flags); 1423 #endif 1424 #ifndef Tcl_SetVar2_TCL_DECLARED 1425 #define Tcl_SetVar2_TCL_DECLARED 1426 /* 238 */ 1427 EXTERN CONST84_RETURN char * Tcl_SetVar2(Tcl_Interp *interp, 1428 CONST char *part1, CONST char *part2, 1429 CONST char *newValue, int flags); 1430 #endif 1431 #ifndef Tcl_SignalId_TCL_DECLARED 1432 #define Tcl_SignalId_TCL_DECLARED 1433 /* 239 */ 1434 EXTERN CONST84_RETURN char * Tcl_SignalId(int sig); 1435 #endif 1436 #ifndef Tcl_SignalMsg_TCL_DECLARED 1437 #define Tcl_SignalMsg_TCL_DECLARED 1438 /* 240 */ 1439 EXTERN CONST84_RETURN char * Tcl_SignalMsg(int sig); 1440 #endif 1441 #ifndef Tcl_SourceRCFile_TCL_DECLARED 1442 #define Tcl_SourceRCFile_TCL_DECLARED 1443 /* 241 */ 1444 EXTERN void Tcl_SourceRCFile(Tcl_Interp *interp); 1445 #endif 1446 #ifndef Tcl_SplitList_TCL_DECLARED 1447 #define Tcl_SplitList_TCL_DECLARED 1448 /* 242 */ 1449 EXTERN int Tcl_SplitList(Tcl_Interp *interp, 1450 CONST char *listStr, int *argcPtr, 1451 CONST84 char ***argvPtr); 1452 #endif 1453 #ifndef Tcl_SplitPath_TCL_DECLARED 1454 #define Tcl_SplitPath_TCL_DECLARED 1455 /* 243 */ 1456 EXTERN void Tcl_SplitPath(CONST char *path, int *argcPtr, 1457 CONST84 char ***argvPtr); 1458 #endif 1459 #ifndef Tcl_StaticPackage_TCL_DECLARED 1460 #define Tcl_StaticPackage_TCL_DECLARED 1461 /* 244 */ 1462 EXTERN void Tcl_StaticPackage(Tcl_Interp *interp, 1463 CONST char *pkgName, 1464 Tcl_PackageInitProc *initProc, 1465 Tcl_PackageInitProc *safeInitProc); 1466 #endif 1467 #ifndef Tcl_StringMatch_TCL_DECLARED 1468 #define Tcl_StringMatch_TCL_DECLARED 1469 /* 245 */ 1470 EXTERN int Tcl_StringMatch(CONST char *str, CONST char *pattern); 1471 #endif 1472 #ifndef Tcl_TellOld_TCL_DECLARED 1473 #define Tcl_TellOld_TCL_DECLARED 1474 /* 246 */ 1475 EXTERN int Tcl_TellOld(Tcl_Channel chan); 1476 #endif 1477 #ifndef Tcl_TraceVar_TCL_DECLARED 1478 #define Tcl_TraceVar_TCL_DECLARED 1479 /* 247 */ 1480 EXTERN int Tcl_TraceVar(Tcl_Interp *interp, CONST char *varName, 1481 int flags, Tcl_VarTraceProc *proc, 1482 ClientData clientData); 1483 #endif 1484 #ifndef Tcl_TraceVar2_TCL_DECLARED 1485 #define Tcl_TraceVar2_TCL_DECLARED 1486 /* 248 */ 1487 EXTERN int Tcl_TraceVar2(Tcl_Interp *interp, CONST char *part1, 1488 CONST char *part2, int flags, 1489 Tcl_VarTraceProc *proc, 1490 ClientData clientData); 1491 #endif 1492 #ifndef Tcl_TranslateFileName_TCL_DECLARED 1493 #define Tcl_TranslateFileName_TCL_DECLARED 1494 /* 249 */ 1495 EXTERN char * Tcl_TranslateFileName(Tcl_Interp *interp, 1496 CONST char *name, Tcl_DString *bufferPtr); 1497 #endif 1498 #ifndef Tcl_Ungets_TCL_DECLARED 1499 #define Tcl_Ungets_TCL_DECLARED 1500 /* 250 */ 1501 EXTERN int Tcl_Ungets(Tcl_Channel chan, CONST char *str, 1502 int len, int atHead); 1503 #endif 1504 #ifndef Tcl_UnlinkVar_TCL_DECLARED 1505 #define Tcl_UnlinkVar_TCL_DECLARED 1506 /* 251 */ 1507 EXTERN void Tcl_UnlinkVar(Tcl_Interp *interp, 1508 CONST char *varName); 1509 #endif 1510 #ifndef Tcl_UnregisterChannel_TCL_DECLARED 1511 #define Tcl_UnregisterChannel_TCL_DECLARED 1512 /* 252 */ 1513 EXTERN int Tcl_UnregisterChannel(Tcl_Interp *interp, 1514 Tcl_Channel chan); 1515 #endif 1516 #ifndef Tcl_UnsetVar_TCL_DECLARED 1517 #define Tcl_UnsetVar_TCL_DECLARED 1518 /* 253 */ 1519 EXTERN int Tcl_UnsetVar(Tcl_Interp *interp, CONST char *varName, 1520 int flags); 1521 #endif 1522 #ifndef Tcl_UnsetVar2_TCL_DECLARED 1523 #define Tcl_UnsetVar2_TCL_DECLARED 1524 /* 254 */ 1525 EXTERN int Tcl_UnsetVar2(Tcl_Interp *interp, CONST char *part1, 1526 CONST char *part2, int flags); 1527 #endif 1528 #ifndef Tcl_UntraceVar_TCL_DECLARED 1529 #define Tcl_UntraceVar_TCL_DECLARED 1530 /* 255 */ 1531 EXTERN void Tcl_UntraceVar(Tcl_Interp *interp, 1532 CONST char *varName, int flags, 1533 Tcl_VarTraceProc *proc, 1534 ClientData clientData); 1535 #endif 1536 #ifndef Tcl_UntraceVar2_TCL_DECLARED 1537 #define Tcl_UntraceVar2_TCL_DECLARED 1538 /* 256 */ 1539 EXTERN void Tcl_UntraceVar2(Tcl_Interp *interp, 1540 CONST char *part1, CONST char *part2, 1541 int flags, Tcl_VarTraceProc *proc, 1542 ClientData clientData); 1543 #endif 1544 #ifndef Tcl_UpdateLinkedVar_TCL_DECLARED 1545 #define Tcl_UpdateLinkedVar_TCL_DECLARED 1546 /* 257 */ 1547 EXTERN void Tcl_UpdateLinkedVar(Tcl_Interp *interp, 1548 CONST char *varName); 1549 #endif 1550 #ifndef Tcl_UpVar_TCL_DECLARED 1551 #define Tcl_UpVar_TCL_DECLARED 1552 /* 258 */ 1553 EXTERN int Tcl_UpVar(Tcl_Interp *interp, CONST char *frameName, 1554 CONST char *varName, CONST char *localName, 1555 int flags); 1556 #endif 1557 #ifndef Tcl_UpVar2_TCL_DECLARED 1558 #define Tcl_UpVar2_TCL_DECLARED 1559 /* 259 */ 1560 EXTERN int Tcl_UpVar2(Tcl_Interp *interp, CONST char *frameName, 1561 CONST char *part1, CONST char *part2, 1562 CONST char *localName, int flags); 1563 #endif 1564 #ifndef Tcl_VarEval_TCL_DECLARED 1565 #define Tcl_VarEval_TCL_DECLARED 1566 /* 260 */ 1567 EXTERN int Tcl_VarEval(Tcl_Interp *interp, ...); 1568 #endif 1569 #ifndef Tcl_VarTraceInfo_TCL_DECLARED 1570 #define Tcl_VarTraceInfo_TCL_DECLARED 1571 /* 261 */ 1572 EXTERN ClientData Tcl_VarTraceInfo(Tcl_Interp *interp, 1573 CONST char *varName, int flags, 1574 Tcl_VarTraceProc *procPtr, 1575 ClientData prevClientData); 1576 #endif 1577 #ifndef Tcl_VarTraceInfo2_TCL_DECLARED 1578 #define Tcl_VarTraceInfo2_TCL_DECLARED 1579 /* 262 */ 1580 EXTERN ClientData Tcl_VarTraceInfo2(Tcl_Interp *interp, 1581 CONST char *part1, CONST char *part2, 1582 int flags, Tcl_VarTraceProc *procPtr, 1583 ClientData prevClientData); 1584 #endif 1585 #ifndef Tcl_Write_TCL_DECLARED 1586 #define Tcl_Write_TCL_DECLARED 1587 /* 263 */ 1588 EXTERN int Tcl_Write(Tcl_Channel chan, CONST char *s, int slen); 1589 #endif 1590 #ifndef Tcl_WrongNumArgs_TCL_DECLARED 1591 #define Tcl_WrongNumArgs_TCL_DECLARED 1592 /* 264 */ 1593 EXTERN void Tcl_WrongNumArgs(Tcl_Interp *interp, int objc, 1594 Tcl_Obj *CONST objv[], CONST char *message); 1595 #endif 1596 #ifndef Tcl_DumpActiveMemory_TCL_DECLARED 1597 #define Tcl_DumpActiveMemory_TCL_DECLARED 1598 /* 265 */ 1599 EXTERN int Tcl_DumpActiveMemory(CONST char *fileName); 1600 #endif 1601 #ifndef Tcl_ValidateAllMemory_TCL_DECLARED 1602 #define Tcl_ValidateAllMemory_TCL_DECLARED 1603 /* 266 */ 1604 EXTERN void Tcl_ValidateAllMemory(CONST char *file, int line); 1605 #endif 1606 #ifndef Tcl_AppendResultVA_TCL_DECLARED 1607 #define Tcl_AppendResultVA_TCL_DECLARED 1608 /* 267 */ 1609 EXTERN void Tcl_AppendResultVA(Tcl_Interp *interp, 1610 va_list argList); 1611 #endif 1612 #ifndef Tcl_AppendStringsToObjVA_TCL_DECLARED 1613 #define Tcl_AppendStringsToObjVA_TCL_DECLARED 1614 /* 268 */ 1615 EXTERN void Tcl_AppendStringsToObjVA(Tcl_Obj *objPtr, 1616 va_list argList); 1617 #endif 1618 #ifndef Tcl_HashStats_TCL_DECLARED 1619 #define Tcl_HashStats_TCL_DECLARED 1620 /* 269 */ 1621 EXTERN char * Tcl_HashStats(Tcl_HashTable *tablePtr); 1622 #endif 1623 #ifndef Tcl_ParseVar_TCL_DECLARED 1624 #define Tcl_ParseVar_TCL_DECLARED 1625 /* 270 */ 1626 EXTERN CONST84_RETURN char * Tcl_ParseVar(Tcl_Interp *interp, 1627 CONST char *start, CONST84 char **termPtr); 1628 #endif 1629 #ifndef Tcl_PkgPresent_TCL_DECLARED 1630 #define Tcl_PkgPresent_TCL_DECLARED 1631 /* 271 */ 1632 EXTERN CONST84_RETURN char * Tcl_PkgPresent(Tcl_Interp *interp, 1633 CONST char *name, CONST char *version, 1634 int exact); 1635 #endif 1636 #ifndef Tcl_PkgPresentEx_TCL_DECLARED 1637 #define Tcl_PkgPresentEx_TCL_DECLARED 1638 /* 272 */ 1639 EXTERN CONST84_RETURN char * Tcl_PkgPresentEx(Tcl_Interp *interp, 1640 CONST char *name, CONST char *version, 1641 int exact, ClientData *clientDataPtr); 1642 #endif 1643 #ifndef Tcl_PkgProvide_TCL_DECLARED 1644 #define Tcl_PkgProvide_TCL_DECLARED 1645 /* 273 */ 1646 EXTERN int Tcl_PkgProvide(Tcl_Interp *interp, CONST char *name, 1647 CONST char *version); 1648 #endif 1649 #ifndef Tcl_PkgRequire_TCL_DECLARED 1650 #define Tcl_PkgRequire_TCL_DECLARED 1651 /* 274 */ 1652 EXTERN CONST84_RETURN char * Tcl_PkgRequire(Tcl_Interp *interp, 1653 CONST char *name, CONST char *version, 1654 int exact); 1655 #endif 1656 #ifndef Tcl_SetErrorCodeVA_TCL_DECLARED 1657 #define Tcl_SetErrorCodeVA_TCL_DECLARED 1658 /* 275 */ 1659 EXTERN void Tcl_SetErrorCodeVA(Tcl_Interp *interp, 1660 va_list argList); 1661 #endif 1662 #ifndef Tcl_VarEvalVA_TCL_DECLARED 1663 #define Tcl_VarEvalVA_TCL_DECLARED 1664 /* 276 */ 1665 EXTERN int Tcl_VarEvalVA(Tcl_Interp *interp, va_list argList); 1666 #endif 1667 #ifndef Tcl_WaitPid_TCL_DECLARED 1668 #define Tcl_WaitPid_TCL_DECLARED 1669 /* 277 */ 1670 EXTERN Tcl_Pid Tcl_WaitPid(Tcl_Pid pid, int *statPtr, int options); 1671 #endif 1672 #ifndef Tcl_PanicVA_TCL_DECLARED 1673 #define Tcl_PanicVA_TCL_DECLARED 1674 /* 278 */ 1675 EXTERN void Tcl_PanicVA(CONST char *format, va_list argList); 1676 #endif 1677 #ifndef Tcl_GetVersion_TCL_DECLARED 1678 #define Tcl_GetVersion_TCL_DECLARED 1679 /* 279 */ 1680 EXTERN void Tcl_GetVersion(int *major, int *minor, 1681 int *patchLevel, int *type); 1682 #endif 1683 #ifndef Tcl_InitMemory_TCL_DECLARED 1684 #define Tcl_InitMemory_TCL_DECLARED 1685 /* 280 */ 1686 EXTERN void Tcl_InitMemory(Tcl_Interp *interp); 1687 #endif 1688 #ifndef Tcl_StackChannel_TCL_DECLARED 1689 #define Tcl_StackChannel_TCL_DECLARED 1690 /* 281 */ 1691 EXTERN Tcl_Channel Tcl_StackChannel(Tcl_Interp *interp, 1692 Tcl_ChannelType *typePtr, 1693 ClientData instanceData, int mask, 1694 Tcl_Channel prevChan); 1695 #endif 1696 #ifndef Tcl_UnstackChannel_TCL_DECLARED 1697 #define Tcl_UnstackChannel_TCL_DECLARED 1698 /* 282 */ 1699 EXTERN int Tcl_UnstackChannel(Tcl_Interp *interp, 1700 Tcl_Channel chan); 1701 #endif 1702 #ifndef Tcl_GetStackedChannel_TCL_DECLARED 1703 #define Tcl_GetStackedChannel_TCL_DECLARED 1704 /* 283 */ 1705 EXTERN Tcl_Channel Tcl_GetStackedChannel(Tcl_Channel chan); 1706 #endif 1707 #ifndef Tcl_SetMainLoop_TCL_DECLARED 1708 #define Tcl_SetMainLoop_TCL_DECLARED 1709 /* 284 */ 1710 EXTERN void Tcl_SetMainLoop(Tcl_MainLoopProc *proc); 1711 #endif 1712 /* Slot 285 is reserved */ 1713 #ifndef Tcl_AppendObjToObj_TCL_DECLARED 1714 #define Tcl_AppendObjToObj_TCL_DECLARED 1715 /* 286 */ 1716 EXTERN void Tcl_AppendObjToObj(Tcl_Obj *objPtr, 1717 Tcl_Obj *appendObjPtr); 1718 #endif 1719 #ifndef Tcl_CreateEncoding_TCL_DECLARED 1720 #define Tcl_CreateEncoding_TCL_DECLARED 1721 /* 287 */ 1722 EXTERN Tcl_Encoding Tcl_CreateEncoding(CONST Tcl_EncodingType *typePtr); 1723 #endif 1724 #ifndef Tcl_CreateThreadExitHandler_TCL_DECLARED 1725 #define Tcl_CreateThreadExitHandler_TCL_DECLARED 1726 /* 288 */ 1727 EXTERN void Tcl_CreateThreadExitHandler(Tcl_ExitProc *proc, 1728 ClientData clientData); 1729 #endif 1730 #ifndef Tcl_DeleteThreadExitHandler_TCL_DECLARED 1731 #define Tcl_DeleteThreadExitHandler_TCL_DECLARED 1732 /* 289 */ 1733 EXTERN void Tcl_DeleteThreadExitHandler(Tcl_ExitProc *proc, 1734 ClientData clientData); 1735 #endif 1736 #ifndef Tcl_DiscardResult_TCL_DECLARED 1737 #define Tcl_DiscardResult_TCL_DECLARED 1738 /* 290 */ 1739 EXTERN void Tcl_DiscardResult(Tcl_SavedResult *statePtr); 1740 #endif 1741 #ifndef Tcl_EvalEx_TCL_DECLARED 1742 #define Tcl_EvalEx_TCL_DECLARED 1743 /* 291 */ 1744 EXTERN int Tcl_EvalEx(Tcl_Interp *interp, CONST char *script, 1745 int numBytes, int flags); 1746 #endif 1747 #ifndef Tcl_EvalObjv_TCL_DECLARED 1748 #define Tcl_EvalObjv_TCL_DECLARED 1749 /* 292 */ 1750 EXTERN int Tcl_EvalObjv(Tcl_Interp *interp, int objc, 1751 Tcl_Obj *CONST objv[], int flags); 1752 #endif 1753 #ifndef Tcl_EvalObjEx_TCL_DECLARED 1754 #define Tcl_EvalObjEx_TCL_DECLARED 1755 /* 293 */ 1756 EXTERN int Tcl_EvalObjEx(Tcl_Interp *interp, Tcl_Obj *objPtr, 1757 int flags); 1758 #endif 1759 #ifndef Tcl_ExitThread_TCL_DECLARED 1760 #define Tcl_ExitThread_TCL_DECLARED 1761 /* 294 */ 1762 EXTERN void Tcl_ExitThread(int status); 1763 #endif 1764 #ifndef Tcl_ExternalToUtf_TCL_DECLARED 1765 #define Tcl_ExternalToUtf_TCL_DECLARED 1766 /* 295 */ 1767 EXTERN int Tcl_ExternalToUtf(Tcl_Interp *interp, 1768 Tcl_Encoding encoding, CONST char *src, 1769 int srcLen, int flags, 1770 Tcl_EncodingState *statePtr, char *dst, 1771 int dstLen, int *srcReadPtr, 1772 int *dstWrotePtr, int *dstCharsPtr); 1773 #endif 1774 #ifndef Tcl_ExternalToUtfDString_TCL_DECLARED 1775 #define Tcl_ExternalToUtfDString_TCL_DECLARED 1776 /* 296 */ 1777 EXTERN char * Tcl_ExternalToUtfDString(Tcl_Encoding encoding, 1778 CONST char *src, int srcLen, 1779 Tcl_DString *dsPtr); 1780 #endif 1781 #ifndef Tcl_FinalizeThread_TCL_DECLARED 1782 #define Tcl_FinalizeThread_TCL_DECLARED 1783 /* 297 */ 1784 EXTERN void Tcl_FinalizeThread(void); 1785 #endif 1786 #ifndef Tcl_FinalizeNotifier_TCL_DECLARED 1787 #define Tcl_FinalizeNotifier_TCL_DECLARED 1788 /* 298 */ 1789 EXTERN void Tcl_FinalizeNotifier(ClientData clientData); 1790 #endif 1791 #ifndef Tcl_FreeEncoding_TCL_DECLARED 1792 #define Tcl_FreeEncoding_TCL_DECLARED 1793 /* 299 */ 1794 EXTERN void Tcl_FreeEncoding(Tcl_Encoding encoding); 1795 #endif 1796 #ifndef Tcl_GetCurrentThread_TCL_DECLARED 1797 #define Tcl_GetCurrentThread_TCL_DECLARED 1798 /* 300 */ 1799 EXTERN Tcl_ThreadId Tcl_GetCurrentThread(void); 1800 #endif 1801 #ifndef Tcl_GetEncoding_TCL_DECLARED 1802 #define Tcl_GetEncoding_TCL_DECLARED 1803 /* 301 */ 1804 EXTERN Tcl_Encoding Tcl_GetEncoding(Tcl_Interp *interp, CONST char *name); 1805 #endif 1806 #ifndef Tcl_GetEncodingName_TCL_DECLARED 1807 #define Tcl_GetEncodingName_TCL_DECLARED 1808 /* 302 */ 1809 EXTERN CONST84_RETURN char * Tcl_GetEncodingName(Tcl_Encoding encoding); 1810 #endif 1811 #ifndef Tcl_GetEncodingNames_TCL_DECLARED 1812 #define Tcl_GetEncodingNames_TCL_DECLARED 1813 /* 303 */ 1814 EXTERN void Tcl_GetEncodingNames(Tcl_Interp *interp); 1815 #endif 1816 #ifndef Tcl_GetIndexFromObjStruct_TCL_DECLARED 1817 #define Tcl_GetIndexFromObjStruct_TCL_DECLARED 1818 /* 304 */ 1819 EXTERN int Tcl_GetIndexFromObjStruct(Tcl_Interp *interp, 1820 Tcl_Obj *objPtr, CONST VOID *tablePtr, 1821 int offset, CONST char *msg, int flags, 1822 int *indexPtr); 1823 #endif 1824 #ifndef Tcl_GetThreadData_TCL_DECLARED 1825 #define Tcl_GetThreadData_TCL_DECLARED 1826 /* 305 */ 1827 EXTERN VOID * Tcl_GetThreadData(Tcl_ThreadDataKey *keyPtr, 1828 int size); 1829 #endif 1830 #ifndef Tcl_GetVar2Ex_TCL_DECLARED 1831 #define Tcl_GetVar2Ex_TCL_DECLARED 1832 /* 306 */ 1833 EXTERN Tcl_Obj * Tcl_GetVar2Ex(Tcl_Interp *interp, CONST char *part1, 1834 CONST char *part2, int flags); 1835 #endif 1836 #ifndef Tcl_InitNotifier_TCL_DECLARED 1837 #define Tcl_InitNotifier_TCL_DECLARED 1838 /* 307 */ 1839 EXTERN ClientData Tcl_InitNotifier(void); 1840 #endif 1841 #ifndef Tcl_MutexLock_TCL_DECLARED 1842 #define Tcl_MutexLock_TCL_DECLARED 1843 /* 308 */ 1844 EXTERN void Tcl_MutexLock(Tcl_Mutex *mutexPtr); 1845 #endif 1846 #ifndef Tcl_MutexUnlock_TCL_DECLARED 1847 #define Tcl_MutexUnlock_TCL_DECLARED 1848 /* 309 */ 1849 EXTERN void Tcl_MutexUnlock(Tcl_Mutex *mutexPtr); 1850 #endif 1851 #ifndef Tcl_ConditionNotify_TCL_DECLARED 1852 #define Tcl_ConditionNotify_TCL_DECLARED 1853 /* 310 */ 1854 EXTERN void Tcl_ConditionNotify(Tcl_Condition *condPtr); 1855 #endif 1856 #ifndef Tcl_ConditionWait_TCL_DECLARED 1857 #define Tcl_ConditionWait_TCL_DECLARED 1858 /* 311 */ 1859 EXTERN void Tcl_ConditionWait(Tcl_Condition *condPtr, 1860 Tcl_Mutex *mutexPtr, Tcl_Time *timePtr); 1861 #endif 1862 #ifndef Tcl_NumUtfChars_TCL_DECLARED 1863 #define Tcl_NumUtfChars_TCL_DECLARED 1864 /* 312 */ 1865 EXTERN int Tcl_NumUtfChars(CONST char *src, int length); 1866 #endif 1867 #ifndef Tcl_ReadChars_TCL_DECLARED 1868 #define Tcl_ReadChars_TCL_DECLARED 1869 /* 313 */ 1870 EXTERN int Tcl_ReadChars(Tcl_Channel channel, Tcl_Obj *objPtr, 1871 int charsToRead, int appendFlag); 1872 #endif 1873 #ifndef Tcl_RestoreResult_TCL_DECLARED 1874 #define Tcl_RestoreResult_TCL_DECLARED 1875 /* 314 */ 1876 EXTERN void Tcl_RestoreResult(Tcl_Interp *interp, 1877 Tcl_SavedResult *statePtr); 1878 #endif 1879 #ifndef Tcl_SaveResult_TCL_DECLARED 1880 #define Tcl_SaveResult_TCL_DECLARED 1881 /* 315 */ 1882 EXTERN void Tcl_SaveResult(Tcl_Interp *interp, 1883 Tcl_SavedResult *statePtr); 1884 #endif 1885 #ifndef Tcl_SetSystemEncoding_TCL_DECLARED 1886 #define Tcl_SetSystemEncoding_TCL_DECLARED 1887 /* 316 */ 1888 EXTERN int Tcl_SetSystemEncoding(Tcl_Interp *interp, 1889 CONST char *name); 1890 #endif 1891 #ifndef Tcl_SetVar2Ex_TCL_DECLARED 1892 #define Tcl_SetVar2Ex_TCL_DECLARED 1893 /* 317 */ 1894 EXTERN Tcl_Obj * Tcl_SetVar2Ex(Tcl_Interp *interp, CONST char *part1, 1895 CONST char *part2, Tcl_Obj *newValuePtr, 1896 int flags); 1897 #endif 1898 #ifndef Tcl_ThreadAlert_TCL_DECLARED 1899 #define Tcl_ThreadAlert_TCL_DECLARED 1900 /* 318 */ 1901 EXTERN void Tcl_ThreadAlert(Tcl_ThreadId threadId); 1902 #endif 1903 #ifndef Tcl_ThreadQueueEvent_TCL_DECLARED 1904 #define Tcl_ThreadQueueEvent_TCL_DECLARED 1905 /* 319 */ 1906 EXTERN void Tcl_ThreadQueueEvent(Tcl_ThreadId threadId, 1907 Tcl_Event *evPtr, Tcl_QueuePosition position); 1908 #endif 1909 #ifndef Tcl_UniCharAtIndex_TCL_DECLARED 1910 #define Tcl_UniCharAtIndex_TCL_DECLARED 1911 /* 320 */ 1912 EXTERN Tcl_UniChar Tcl_UniCharAtIndex(CONST char *src, int index); 1913 #endif 1914 #ifndef Tcl_UniCharToLower_TCL_DECLARED 1915 #define Tcl_UniCharToLower_TCL_DECLARED 1916 /* 321 */ 1917 EXTERN Tcl_UniChar Tcl_UniCharToLower(int ch); 1918 #endif 1919 #ifndef Tcl_UniCharToTitle_TCL_DECLARED 1920 #define Tcl_UniCharToTitle_TCL_DECLARED 1921 /* 322 */ 1922 EXTERN Tcl_UniChar Tcl_UniCharToTitle(int ch); 1923 #endif 1924 #ifndef Tcl_UniCharToUpper_TCL_DECLARED 1925 #define Tcl_UniCharToUpper_TCL_DECLARED 1926 /* 323 */ 1927 EXTERN Tcl_UniChar Tcl_UniCharToUpper(int ch); 1928 #endif 1929 #ifndef Tcl_UniCharToUtf_TCL_DECLARED 1930 #define Tcl_UniCharToUtf_TCL_DECLARED 1931 /* 324 */ 1932 EXTERN int Tcl_UniCharToUtf(int ch, char *buf); 1933 #endif 1934 #ifndef Tcl_UtfAtIndex_TCL_DECLARED 1935 #define Tcl_UtfAtIndex_TCL_DECLARED 1936 /* 325 */ 1937 EXTERN CONST84_RETURN char * Tcl_UtfAtIndex(CONST char *src, int index); 1938 #endif 1939 #ifndef Tcl_UtfCharComplete_TCL_DECLARED 1940 #define Tcl_UtfCharComplete_TCL_DECLARED 1941 /* 326 */ 1942 EXTERN int Tcl_UtfCharComplete(CONST char *src, int length); 1943 #endif 1944 #ifndef Tcl_UtfBackslash_TCL_DECLARED 1945 #define Tcl_UtfBackslash_TCL_DECLARED 1946 /* 327 */ 1947 EXTERN int Tcl_UtfBackslash(CONST char *src, int *readPtr, 1948 char *dst); 1949 #endif 1950 #ifndef Tcl_UtfFindFirst_TCL_DECLARED 1951 #define Tcl_UtfFindFirst_TCL_DECLARED 1952 /* 328 */ 1953 EXTERN CONST84_RETURN char * Tcl_UtfFindFirst(CONST char *src, int ch); 1954 #endif 1955 #ifndef Tcl_UtfFindLast_TCL_DECLARED 1956 #define Tcl_UtfFindLast_TCL_DECLARED 1957 /* 329 */ 1958 EXTERN CONST84_RETURN char * Tcl_UtfFindLast(CONST char *src, int ch); 1959 #endif 1960 #ifndef Tcl_UtfNext_TCL_DECLARED 1961 #define Tcl_UtfNext_TCL_DECLARED 1962 /* 330 */ 1963 EXTERN CONST84_RETURN char * Tcl_UtfNext(CONST char *src); 1964 #endif 1965 #ifndef Tcl_UtfPrev_TCL_DECLARED 1966 #define Tcl_UtfPrev_TCL_DECLARED 1967 /* 331 */ 1968 EXTERN CONST84_RETURN char * Tcl_UtfPrev(CONST char *src, CONST char *start); 1969 #endif 1970 #ifndef Tcl_UtfToExternal_TCL_DECLARED 1971 #define Tcl_UtfToExternal_TCL_DECLARED 1972 /* 332 */ 1973 EXTERN int Tcl_UtfToExternal(Tcl_Interp *interp, 1974 Tcl_Encoding encoding, CONST char *src, 1975 int srcLen, int flags, 1976 Tcl_EncodingState *statePtr, char *dst, 1977 int dstLen, int *srcReadPtr, 1978 int *dstWrotePtr, int *dstCharsPtr); 1979 #endif 1980 #ifndef Tcl_UtfToExternalDString_TCL_DECLARED 1981 #define Tcl_UtfToExternalDString_TCL_DECLARED 1982 /* 333 */ 1983 EXTERN char * Tcl_UtfToExternalDString(Tcl_Encoding encoding, 1984 CONST char *src, int srcLen, 1985 Tcl_DString *dsPtr); 1986 #endif 1987 #ifndef Tcl_UtfToLower_TCL_DECLARED 1988 #define Tcl_UtfToLower_TCL_DECLARED 1989 /* 334 */ 1990 EXTERN int Tcl_UtfToLower(char *src); 1991 #endif 1992 #ifndef Tcl_UtfToTitle_TCL_DECLARED 1993 #define Tcl_UtfToTitle_TCL_DECLARED 1994 /* 335 */ 1995 EXTERN int Tcl_UtfToTitle(char *src); 1996 #endif 1997 #ifndef Tcl_UtfToUniChar_TCL_DECLARED 1998 #define Tcl_UtfToUniChar_TCL_DECLARED 1999 /* 336 */ 2000 EXTERN int Tcl_UtfToUniChar(CONST char *src, Tcl_UniChar *chPtr); 2001 #endif 2002 #ifndef Tcl_UtfToUpper_TCL_DECLARED 2003 #define Tcl_UtfToUpper_TCL_DECLARED 2004 /* 337 */ 2005 EXTERN int Tcl_UtfToUpper(char *src); 2006 #endif 2007 #ifndef Tcl_WriteChars_TCL_DECLARED 2008 #define Tcl_WriteChars_TCL_DECLARED 2009 /* 338 */ 2010 EXTERN int Tcl_WriteChars(Tcl_Channel chan, CONST char *src, 2011 int srcLen); 2012 #endif 2013 #ifndef Tcl_WriteObj_TCL_DECLARED 2014 #define Tcl_WriteObj_TCL_DECLARED 2015 /* 339 */ 2016 EXTERN int Tcl_WriteObj(Tcl_Channel chan, Tcl_Obj *objPtr); 2017 #endif 2018 #ifndef Tcl_GetString_TCL_DECLARED 2019 #define Tcl_GetString_TCL_DECLARED 2020 /* 340 */ 2021 EXTERN char * Tcl_GetString(Tcl_Obj *objPtr); 2022 #endif 2023 #ifndef Tcl_GetDefaultEncodingDir_TCL_DECLARED 2024 #define Tcl_GetDefaultEncodingDir_TCL_DECLARED 2025 /* 341 */ 2026 EXTERN CONST84_RETURN char * Tcl_GetDefaultEncodingDir(void); 2027 #endif 2028 #ifndef Tcl_SetDefaultEncodingDir_TCL_DECLARED 2029 #define Tcl_SetDefaultEncodingDir_TCL_DECLARED 2030 /* 342 */ 2031 EXTERN void Tcl_SetDefaultEncodingDir(CONST char *path); 2032 #endif 2033 #ifndef Tcl_AlertNotifier_TCL_DECLARED 2034 #define Tcl_AlertNotifier_TCL_DECLARED 2035 /* 343 */ 2036 EXTERN void Tcl_AlertNotifier(ClientData clientData); 2037 #endif 2038 #ifndef Tcl_ServiceModeHook_TCL_DECLARED 2039 #define Tcl_ServiceModeHook_TCL_DECLARED 2040 /* 344 */ 2041 EXTERN void Tcl_ServiceModeHook(int mode); 2042 #endif 2043 #ifndef Tcl_UniCharIsAlnum_TCL_DECLARED 2044 #define Tcl_UniCharIsAlnum_TCL_DECLARED 2045 /* 345 */ 2046 EXTERN int Tcl_UniCharIsAlnum(int ch); 2047 #endif 2048 #ifndef Tcl_UniCharIsAlpha_TCL_DECLARED 2049 #define Tcl_UniCharIsAlpha_TCL_DECLARED 2050 /* 346 */ 2051 EXTERN int Tcl_UniCharIsAlpha(int ch); 2052 #endif 2053 #ifndef Tcl_UniCharIsDigit_TCL_DECLARED 2054 #define Tcl_UniCharIsDigit_TCL_DECLARED 2055 /* 347 */ 2056 EXTERN int Tcl_UniCharIsDigit(int ch); 2057 #endif 2058 #ifndef Tcl_UniCharIsLower_TCL_DECLARED 2059 #define Tcl_UniCharIsLower_TCL_DECLARED 2060 /* 348 */ 2061 EXTERN int Tcl_UniCharIsLower(int ch); 2062 #endif 2063 #ifndef Tcl_UniCharIsSpace_TCL_DECLARED 2064 #define Tcl_UniCharIsSpace_TCL_DECLARED 2065 /* 349 */ 2066 EXTERN int Tcl_UniCharIsSpace(int ch); 2067 #endif 2068 #ifndef Tcl_UniCharIsUpper_TCL_DECLARED 2069 #define Tcl_UniCharIsUpper_TCL_DECLARED 2070 /* 350 */ 2071 EXTERN int Tcl_UniCharIsUpper(int ch); 2072 #endif 2073 #ifndef Tcl_UniCharIsWordChar_TCL_DECLARED 2074 #define Tcl_UniCharIsWordChar_TCL_DECLARED 2075 /* 351 */ 2076 EXTERN int Tcl_UniCharIsWordChar(int ch); 2077 #endif 2078 #ifndef Tcl_UniCharLen_TCL_DECLARED 2079 #define Tcl_UniCharLen_TCL_DECLARED 2080 /* 352 */ 2081 EXTERN int Tcl_UniCharLen(CONST Tcl_UniChar *uniStr); 2082 #endif 2083 #ifndef Tcl_UniCharNcmp_TCL_DECLARED 2084 #define Tcl_UniCharNcmp_TCL_DECLARED 2085 /* 353 */ 2086 EXTERN int Tcl_UniCharNcmp(CONST Tcl_UniChar *ucs, 2087 CONST Tcl_UniChar *uct, 2088 unsigned long numChars); 2089 #endif 2090 #ifndef Tcl_UniCharToUtfDString_TCL_DECLARED 2091 #define Tcl_UniCharToUtfDString_TCL_DECLARED 2092 /* 354 */ 2093 EXTERN char * Tcl_UniCharToUtfDString(CONST Tcl_UniChar *uniStr, 2094 int uniLength, Tcl_DString *dsPtr); 2095 #endif 2096 #ifndef Tcl_UtfToUniCharDString_TCL_DECLARED 2097 #define Tcl_UtfToUniCharDString_TCL_DECLARED 2098 /* 355 */ 2099 EXTERN Tcl_UniChar * Tcl_UtfToUniCharDString(CONST char *src, int length, 2100 Tcl_DString *dsPtr); 2101 #endif 2102 #ifndef Tcl_GetRegExpFromObj_TCL_DECLARED 2103 #define Tcl_GetRegExpFromObj_TCL_DECLARED 2104 /* 356 */ 2105 EXTERN Tcl_RegExp Tcl_GetRegExpFromObj(Tcl_Interp *interp, 2106 Tcl_Obj *patObj, int flags); 2107 #endif 2108 #ifndef Tcl_EvalTokens_TCL_DECLARED 2109 #define Tcl_EvalTokens_TCL_DECLARED 2110 /* 357 */ 2111 EXTERN Tcl_Obj * Tcl_EvalTokens(Tcl_Interp *interp, 2112 Tcl_Token *tokenPtr, int count); 2113 #endif 2114 #ifndef Tcl_FreeParse_TCL_DECLARED 2115 #define Tcl_FreeParse_TCL_DECLARED 2116 /* 358 */ 2117 EXTERN void Tcl_FreeParse(Tcl_Parse *parsePtr); 2118 #endif 2119 #ifndef Tcl_LogCommandInfo_TCL_DECLARED 2120 #define Tcl_LogCommandInfo_TCL_DECLARED 2121 /* 359 */ 2122 EXTERN void Tcl_LogCommandInfo(Tcl_Interp *interp, 2123 CONST char *script, CONST char *command, 2124 int length); 2125 #endif 2126 #ifndef Tcl_ParseBraces_TCL_DECLARED 2127 #define Tcl_ParseBraces_TCL_DECLARED 2128 /* 360 */ 2129 EXTERN int Tcl_ParseBraces(Tcl_Interp *interp, 2130 CONST char *start, int numBytes, 2131 Tcl_Parse *parsePtr, int append, 2132 CONST84 char **termPtr); 2133 #endif 2134 #ifndef Tcl_ParseCommand_TCL_DECLARED 2135 #define Tcl_ParseCommand_TCL_DECLARED 2136 /* 361 */ 2137 EXTERN int Tcl_ParseCommand(Tcl_Interp *interp, 2138 CONST char *start, int numBytes, int nested, 2139 Tcl_Parse *parsePtr); 2140 #endif 2141 #ifndef Tcl_ParseExpr_TCL_DECLARED 2142 #define Tcl_ParseExpr_TCL_DECLARED 2143 /* 362 */ 2144 EXTERN int Tcl_ParseExpr(Tcl_Interp *interp, CONST char *start, 2145 int numBytes, Tcl_Parse *parsePtr); 2146 #endif 2147 #ifndef Tcl_ParseQuotedString_TCL_DECLARED 2148 #define Tcl_ParseQuotedString_TCL_DECLARED 2149 /* 363 */ 2150 EXTERN int Tcl_ParseQuotedString(Tcl_Interp *interp, 2151 CONST char *start, int numBytes, 2152 Tcl_Parse *parsePtr, int append, 2153 CONST84 char **termPtr); 2154 #endif 2155 #ifndef Tcl_ParseVarName_TCL_DECLARED 2156 #define Tcl_ParseVarName_TCL_DECLARED 2157 /* 364 */ 2158 EXTERN int Tcl_ParseVarName(Tcl_Interp *interp, 2159 CONST char *start, int numBytes, 2160 Tcl_Parse *parsePtr, int append); 2161 #endif 2162 #ifndef Tcl_GetCwd_TCL_DECLARED 2163 #define Tcl_GetCwd_TCL_DECLARED 2164 /* 365 */ 2165 EXTERN char * Tcl_GetCwd(Tcl_Interp *interp, Tcl_DString *cwdPtr); 2166 #endif 2167 #ifndef Tcl_Chdir_TCL_DECLARED 2168 #define Tcl_Chdir_TCL_DECLARED 2169 /* 366 */ 2170 EXTERN int Tcl_Chdir(CONST char *dirName); 2171 #endif 2172 #ifndef Tcl_Access_TCL_DECLARED 2173 #define Tcl_Access_TCL_DECLARED 2174 /* 367 */ 2175 EXTERN int Tcl_Access(CONST char *path, int mode); 2176 #endif 2177 #ifndef Tcl_Stat_TCL_DECLARED 2178 #define Tcl_Stat_TCL_DECLARED 2179 /* 368 */ 2180 EXTERN int Tcl_Stat(CONST char *path, struct stat *bufPtr); 2181 #endif 2182 #ifndef Tcl_UtfNcmp_TCL_DECLARED 2183 #define Tcl_UtfNcmp_TCL_DECLARED 2184 /* 369 */ 2185 EXTERN int Tcl_UtfNcmp(CONST char *s1, CONST char *s2, 2186 unsigned long n); 2187 #endif 2188 #ifndef Tcl_UtfNcasecmp_TCL_DECLARED 2189 #define Tcl_UtfNcasecmp_TCL_DECLARED 2190 /* 370 */ 2191 EXTERN int Tcl_UtfNcasecmp(CONST char *s1, CONST char *s2, 2192 unsigned long n); 2193 #endif 2194 #ifndef Tcl_StringCaseMatch_TCL_DECLARED 2195 #define Tcl_StringCaseMatch_TCL_DECLARED 2196 /* 371 */ 2197 EXTERN int Tcl_StringCaseMatch(CONST char *str, 2198 CONST char *pattern, int nocase); 2199 #endif 2200 #ifndef Tcl_UniCharIsControl_TCL_DECLARED 2201 #define Tcl_UniCharIsControl_TCL_DECLARED 2202 /* 372 */ 2203 EXTERN int Tcl_UniCharIsControl(int ch); 2204 #endif 2205 #ifndef Tcl_UniCharIsGraph_TCL_DECLARED 2206 #define Tcl_UniCharIsGraph_TCL_DECLARED 2207 /* 373 */ 2208 EXTERN int Tcl_UniCharIsGraph(int ch); 2209 #endif 2210 #ifndef Tcl_UniCharIsPrint_TCL_DECLARED 2211 #define Tcl_UniCharIsPrint_TCL_DECLARED 2212 /* 374 */ 2213 EXTERN int Tcl_UniCharIsPrint(int ch); 2214 #endif 2215 #ifndef Tcl_UniCharIsPunct_TCL_DECLARED 2216 #define Tcl_UniCharIsPunct_TCL_DECLARED 2217 /* 375 */ 2218 EXTERN int Tcl_UniCharIsPunct(int ch); 2219 #endif 2220 #ifndef Tcl_RegExpExecObj_TCL_DECLARED 2221 #define Tcl_RegExpExecObj_TCL_DECLARED 2222 /* 376 */ 2223 EXTERN int Tcl_RegExpExecObj(Tcl_Interp *interp, 2224 Tcl_RegExp regexp, Tcl_Obj *textObj, 2225 int offset, int nmatches, int flags); 2226 #endif 2227 #ifndef Tcl_RegExpGetInfo_TCL_DECLARED 2228 #define Tcl_RegExpGetInfo_TCL_DECLARED 2229 /* 377 */ 2230 EXTERN void Tcl_RegExpGetInfo(Tcl_RegExp regexp, 2231 Tcl_RegExpInfo *infoPtr); 2232 #endif 2233 #ifndef Tcl_NewUnicodeObj_TCL_DECLARED 2234 #define Tcl_NewUnicodeObj_TCL_DECLARED 2235 /* 378 */ 2236 EXTERN Tcl_Obj * Tcl_NewUnicodeObj(CONST Tcl_UniChar *unicode, 2237 int numChars); 2238 #endif 2239 #ifndef Tcl_SetUnicodeObj_TCL_DECLARED 2240 #define Tcl_SetUnicodeObj_TCL_DECLARED 2241 /* 379 */ 2242 EXTERN void Tcl_SetUnicodeObj(Tcl_Obj *objPtr, 2243 CONST Tcl_UniChar *unicode, int numChars); 2244 #endif 2245 #ifndef Tcl_GetCharLength_TCL_DECLARED 2246 #define Tcl_GetCharLength_TCL_DECLARED 2247 /* 380 */ 2248 EXTERN int Tcl_GetCharLength(Tcl_Obj *objPtr); 2249 #endif 2250 #ifndef Tcl_GetUniChar_TCL_DECLARED 2251 #define Tcl_GetUniChar_TCL_DECLARED 2252 /* 381 */ 2253 EXTERN Tcl_UniChar Tcl_GetUniChar(Tcl_Obj *objPtr, int index); 2254 #endif 2255 #ifndef Tcl_GetUnicode_TCL_DECLARED 2256 #define Tcl_GetUnicode_TCL_DECLARED 2257 /* 382 */ 2258 EXTERN Tcl_UniChar * Tcl_GetUnicode(Tcl_Obj *objPtr); 2259 #endif 2260 #ifndef Tcl_GetRange_TCL_DECLARED 2261 #define Tcl_GetRange_TCL_DECLARED 2262 /* 383 */ 2263 EXTERN Tcl_Obj * Tcl_GetRange(Tcl_Obj *objPtr, int first, int last); 2264 #endif 2265 #ifndef Tcl_AppendUnicodeToObj_TCL_DECLARED 2266 #define Tcl_AppendUnicodeToObj_TCL_DECLARED 2267 /* 384 */ 2268 EXTERN void Tcl_AppendUnicodeToObj(Tcl_Obj *objPtr, 2269 CONST Tcl_UniChar *unicode, int length); 2270 #endif 2271 #ifndef Tcl_RegExpMatchObj_TCL_DECLARED 2272 #define Tcl_RegExpMatchObj_TCL_DECLARED 2273 /* 385 */ 2274 EXTERN int Tcl_RegExpMatchObj(Tcl_Interp *interp, 2275 Tcl_Obj *textObj, Tcl_Obj *patternObj); 2276 #endif 2277 #ifndef Tcl_SetNotifier_TCL_DECLARED 2278 #define Tcl_SetNotifier_TCL_DECLARED 2279 /* 386 */ 2280 EXTERN void Tcl_SetNotifier(Tcl_NotifierProcs *notifierProcPtr); 2281 #endif 2282 #ifndef Tcl_GetAllocMutex_TCL_DECLARED 2283 #define Tcl_GetAllocMutex_TCL_DECLARED 2284 /* 387 */ 2285 EXTERN Tcl_Mutex * Tcl_GetAllocMutex(void); 2286 #endif 2287 #ifndef Tcl_GetChannelNames_TCL_DECLARED 2288 #define Tcl_GetChannelNames_TCL_DECLARED 2289 /* 388 */ 2290 EXTERN int Tcl_GetChannelNames(Tcl_Interp *interp); 2291 #endif 2292 #ifndef Tcl_GetChannelNamesEx_TCL_DECLARED 2293 #define Tcl_GetChannelNamesEx_TCL_DECLARED 2294 /* 389 */ 2295 EXTERN int Tcl_GetChannelNamesEx(Tcl_Interp *interp, 2296 CONST char *pattern); 2297 #endif 2298 #ifndef Tcl_ProcObjCmd_TCL_DECLARED 2299 #define Tcl_ProcObjCmd_TCL_DECLARED 2300 /* 390 */ 2301 EXTERN int Tcl_ProcObjCmd(ClientData clientData, 2302 Tcl_Interp *interp, int objc, 2303 Tcl_Obj *CONST objv[]); 2304 #endif 2305 #ifndef Tcl_ConditionFinalize_TCL_DECLARED 2306 #define Tcl_ConditionFinalize_TCL_DECLARED 2307 /* 391 */ 2308 EXTERN void Tcl_ConditionFinalize(Tcl_Condition *condPtr); 2309 #endif 2310 #ifndef Tcl_MutexFinalize_TCL_DECLARED 2311 #define Tcl_MutexFinalize_TCL_DECLARED 2312 /* 392 */ 2313 EXTERN void Tcl_MutexFinalize(Tcl_Mutex *mutex); 2314 #endif 2315 #ifndef Tcl_CreateThread_TCL_DECLARED 2316 #define Tcl_CreateThread_TCL_DECLARED 2317 /* 393 */ 2318 EXTERN int Tcl_CreateThread(Tcl_ThreadId *idPtr, 2319 Tcl_ThreadCreateProc proc, 2320 ClientData clientData, int stackSize, 2321 int flags); 2322 #endif 2323 #ifndef Tcl_ReadRaw_TCL_DECLARED 2324 #define Tcl_ReadRaw_TCL_DECLARED 2325 /* 394 */ 2326 EXTERN int Tcl_ReadRaw(Tcl_Channel chan, char *dst, 2327 int bytesToRead); 2328 #endif 2329 #ifndef Tcl_WriteRaw_TCL_DECLARED 2330 #define Tcl_WriteRaw_TCL_DECLARED 2331 /* 395 */ 2332 EXTERN int Tcl_WriteRaw(Tcl_Channel chan, CONST char *src, 2333 int srcLen); 2334 #endif 2335 #ifndef Tcl_GetTopChannel_TCL_DECLARED 2336 #define Tcl_GetTopChannel_TCL_DECLARED 2337 /* 396 */ 2338 EXTERN Tcl_Channel Tcl_GetTopChannel(Tcl_Channel chan); 2339 #endif 2340 #ifndef Tcl_ChannelBuffered_TCL_DECLARED 2341 #define Tcl_ChannelBuffered_TCL_DECLARED 2342 /* 397 */ 2343 EXTERN int Tcl_ChannelBuffered(Tcl_Channel chan); 2344 #endif 2345 #ifndef Tcl_ChannelName_TCL_DECLARED 2346 #define Tcl_ChannelName_TCL_DECLARED 2347 /* 398 */ 2348 EXTERN CONST84_RETURN char * Tcl_ChannelName( 2349 CONST Tcl_ChannelType *chanTypePtr); 2350 #endif 2351 #ifndef Tcl_ChannelVersion_TCL_DECLARED 2352 #define Tcl_ChannelVersion_TCL_DECLARED 2353 /* 399 */ 2354 EXTERN Tcl_ChannelTypeVersion Tcl_ChannelVersion( 2355 CONST Tcl_ChannelType *chanTypePtr); 2356 #endif 2357 #ifndef Tcl_ChannelBlockModeProc_TCL_DECLARED 2358 #define Tcl_ChannelBlockModeProc_TCL_DECLARED 2359 /* 400 */ 2360 EXTERN Tcl_DriverBlockModeProc * Tcl_ChannelBlockModeProc( 2361 CONST Tcl_ChannelType *chanTypePtr); 2362 #endif 2363 #ifndef Tcl_ChannelCloseProc_TCL_DECLARED 2364 #define Tcl_ChannelCloseProc_TCL_DECLARED 2365 /* 401 */ 2366 EXTERN Tcl_DriverCloseProc * Tcl_ChannelCloseProc( 2367 CONST Tcl_ChannelType *chanTypePtr); 2368 #endif 2369 #ifndef Tcl_ChannelClose2Proc_TCL_DECLARED 2370 #define Tcl_ChannelClose2Proc_TCL_DECLARED 2371 /* 402 */ 2372 EXTERN Tcl_DriverClose2Proc * Tcl_ChannelClose2Proc( 2373 CONST Tcl_ChannelType *chanTypePtr); 2374 #endif 2375 #ifndef Tcl_ChannelInputProc_TCL_DECLARED 2376 #define Tcl_ChannelInputProc_TCL_DECLARED 2377 /* 403 */ 2378 EXTERN Tcl_DriverInputProc * Tcl_ChannelInputProc( 2379 CONST Tcl_ChannelType *chanTypePtr); 2380 #endif 2381 #ifndef Tcl_ChannelOutputProc_TCL_DECLARED 2382 #define Tcl_ChannelOutputProc_TCL_DECLARED 2383 /* 404 */ 2384 EXTERN Tcl_DriverOutputProc * Tcl_ChannelOutputProc( 2385 CONST Tcl_ChannelType *chanTypePtr); 2386 #endif 2387 #ifndef Tcl_ChannelSeekProc_TCL_DECLARED 2388 #define Tcl_ChannelSeekProc_TCL_DECLARED 2389 /* 405 */ 2390 EXTERN Tcl_DriverSeekProc * Tcl_ChannelSeekProc( 2391 CONST Tcl_ChannelType *chanTypePtr); 2392 #endif 2393 #ifndef Tcl_ChannelSetOptionProc_TCL_DECLARED 2394 #define Tcl_ChannelSetOptionProc_TCL_DECLARED 2395 /* 406 */ 2396 EXTERN Tcl_DriverSetOptionProc * Tcl_ChannelSetOptionProc( 2397 CONST Tcl_ChannelType *chanTypePtr); 2398 #endif 2399 #ifndef Tcl_ChannelGetOptionProc_TCL_DECLARED 2400 #define Tcl_ChannelGetOptionProc_TCL_DECLARED 2401 /* 407 */ 2402 EXTERN Tcl_DriverGetOptionProc * Tcl_ChannelGetOptionProc( 2403 CONST Tcl_ChannelType *chanTypePtr); 2404 #endif 2405 #ifndef Tcl_ChannelWatchProc_TCL_DECLARED 2406 #define Tcl_ChannelWatchProc_TCL_DECLARED 2407 /* 408 */ 2408 EXTERN Tcl_DriverWatchProc * Tcl_ChannelWatchProc( 2409 CONST Tcl_ChannelType *chanTypePtr); 2410 #endif 2411 #ifndef Tcl_ChannelGetHandleProc_TCL_DECLARED 2412 #define Tcl_ChannelGetHandleProc_TCL_DECLARED 2413 /* 409 */ 2414 EXTERN Tcl_DriverGetHandleProc * Tcl_ChannelGetHandleProc( 2415 CONST Tcl_ChannelType *chanTypePtr); 2416 #endif 2417 #ifndef Tcl_ChannelFlushProc_TCL_DECLARED 2418 #define Tcl_ChannelFlushProc_TCL_DECLARED 2419 /* 410 */ 2420 EXTERN Tcl_DriverFlushProc * Tcl_ChannelFlushProc( 2421 CONST Tcl_ChannelType *chanTypePtr); 2422 #endif 2423 #ifndef Tcl_ChannelHandlerProc_TCL_DECLARED 2424 #define Tcl_ChannelHandlerProc_TCL_DECLARED 2425 /* 411 */ 2426 EXTERN Tcl_DriverHandlerProc * Tcl_ChannelHandlerProc( 2427 CONST Tcl_ChannelType *chanTypePtr); 2428 #endif 2429 #ifndef Tcl_JoinThread_TCL_DECLARED 2430 #define Tcl_JoinThread_TCL_DECLARED 2431 /* 412 */ 2432 EXTERN int Tcl_JoinThread(Tcl_ThreadId threadId, int *result); 2433 #endif 2434 #ifndef Tcl_IsChannelShared_TCL_DECLARED 2435 #define Tcl_IsChannelShared_TCL_DECLARED 2436 /* 413 */ 2437 EXTERN int Tcl_IsChannelShared(Tcl_Channel channel); 2438 #endif 2439 #ifndef Tcl_IsChannelRegistered_TCL_DECLARED 2440 #define Tcl_IsChannelRegistered_TCL_DECLARED 2441 /* 414 */ 2442 EXTERN int Tcl_IsChannelRegistered(Tcl_Interp *interp, 2443 Tcl_Channel channel); 2444 #endif 2445 #ifndef Tcl_CutChannel_TCL_DECLARED 2446 #define Tcl_CutChannel_TCL_DECLARED 2447 /* 415 */ 2448 EXTERN void Tcl_CutChannel(Tcl_Channel channel); 2449 #endif 2450 #ifndef Tcl_SpliceChannel_TCL_DECLARED 2451 #define Tcl_SpliceChannel_TCL_DECLARED 2452 /* 416 */ 2453 EXTERN void Tcl_SpliceChannel(Tcl_Channel channel); 2454 #endif 2455 #ifndef Tcl_ClearChannelHandlers_TCL_DECLARED 2456 #define Tcl_ClearChannelHandlers_TCL_DECLARED 2457 /* 417 */ 2458 EXTERN void Tcl_ClearChannelHandlers(Tcl_Channel channel); 2459 #endif 2460 #ifndef Tcl_IsChannelExisting_TCL_DECLARED 2461 #define Tcl_IsChannelExisting_TCL_DECLARED 2462 /* 418 */ 2463 EXTERN int Tcl_IsChannelExisting(CONST char *channelName); 2464 #endif 2465 #ifndef Tcl_UniCharNcasecmp_TCL_DECLARED 2466 #define Tcl_UniCharNcasecmp_TCL_DECLARED 2467 /* 419 */ 2468 EXTERN int Tcl_UniCharNcasecmp(CONST Tcl_UniChar *ucs, 2469 CONST Tcl_UniChar *uct, 2470 unsigned long numChars); 2471 #endif 2472 #ifndef Tcl_UniCharCaseMatch_TCL_DECLARED 2473 #define Tcl_UniCharCaseMatch_TCL_DECLARED 2474 /* 420 */ 2475 EXTERN int Tcl_UniCharCaseMatch(CONST Tcl_UniChar *uniStr, 2476 CONST Tcl_UniChar *uniPattern, int nocase); 2477 #endif 2478 #ifndef Tcl_FindHashEntry_TCL_DECLARED 2479 #define Tcl_FindHashEntry_TCL_DECLARED 2480 /* 421 */ 2481 EXTERN Tcl_HashEntry * Tcl_FindHashEntry(Tcl_HashTable *tablePtr, 2482 CONST char *key); 2483 #endif 2484 #ifndef Tcl_CreateHashEntry_TCL_DECLARED 2485 #define Tcl_CreateHashEntry_TCL_DECLARED 2486 /* 422 */ 2487 EXTERN Tcl_HashEntry * Tcl_CreateHashEntry(Tcl_HashTable *tablePtr, 2488 CONST char *key, int *newPtr); 2489 #endif 2490 #ifndef Tcl_InitCustomHashTable_TCL_DECLARED 2491 #define Tcl_InitCustomHashTable_TCL_DECLARED 2492 /* 423 */ 2493 EXTERN void Tcl_InitCustomHashTable(Tcl_HashTable *tablePtr, 2494 int keyType, Tcl_HashKeyType *typePtr); 2495 #endif 2496 #ifndef Tcl_InitObjHashTable_TCL_DECLARED 2497 #define Tcl_InitObjHashTable_TCL_DECLARED 2498 /* 424 */ 2499 EXTERN void Tcl_InitObjHashTable(Tcl_HashTable *tablePtr); 2500 #endif 2501 #ifndef Tcl_CommandTraceInfo_TCL_DECLARED 2502 #define Tcl_CommandTraceInfo_TCL_DECLARED 2503 /* 425 */ 2504 EXTERN ClientData Tcl_CommandTraceInfo(Tcl_Interp *interp, 2505 CONST char *varName, int flags, 2506 Tcl_CommandTraceProc *procPtr, 2507 ClientData prevClientData); 2508 #endif 2509 #ifndef Tcl_TraceCommand_TCL_DECLARED 2510 #define Tcl_TraceCommand_TCL_DECLARED 2511 /* 426 */ 2512 EXTERN int Tcl_TraceCommand(Tcl_Interp *interp, 2513 CONST char *varName, int flags, 2514 Tcl_CommandTraceProc *proc, 2515 ClientData clientData); 2516 #endif 2517 #ifndef Tcl_UntraceCommand_TCL_DECLARED 2518 #define Tcl_UntraceCommand_TCL_DECLARED 2519 /* 427 */ 2520 EXTERN void Tcl_UntraceCommand(Tcl_Interp *interp, 2521 CONST char *varName, int flags, 2522 Tcl_CommandTraceProc *proc, 2523 ClientData clientData); 2524 #endif 2525 #ifndef Tcl_AttemptAlloc_TCL_DECLARED 2526 #define Tcl_AttemptAlloc_TCL_DECLARED 2527 /* 428 */ 2528 EXTERN char * Tcl_AttemptAlloc(unsigned int size); 2529 #endif 2530 #ifndef Tcl_AttemptDbCkalloc_TCL_DECLARED 2531 #define Tcl_AttemptDbCkalloc_TCL_DECLARED 2532 /* 429 */ 2533 EXTERN char * Tcl_AttemptDbCkalloc(unsigned int size, 2534 CONST char *file, int line); 2535 #endif 2536 #ifndef Tcl_AttemptRealloc_TCL_DECLARED 2537 #define Tcl_AttemptRealloc_TCL_DECLARED 2538 /* 430 */ 2539 EXTERN char * Tcl_AttemptRealloc(char *ptr, unsigned int size); 2540 #endif 2541 #ifndef Tcl_AttemptDbCkrealloc_TCL_DECLARED 2542 #define Tcl_AttemptDbCkrealloc_TCL_DECLARED 2543 /* 431 */ 2544 EXTERN char * Tcl_AttemptDbCkrealloc(char *ptr, unsigned int size, 2545 CONST char *file, int line); 2546 #endif 2547 #ifndef Tcl_AttemptSetObjLength_TCL_DECLARED 2548 #define Tcl_AttemptSetObjLength_TCL_DECLARED 2549 /* 432 */ 2550 EXTERN int Tcl_AttemptSetObjLength(Tcl_Obj *objPtr, int length); 2551 #endif 2552 #ifndef Tcl_GetChannelThread_TCL_DECLARED 2553 #define Tcl_GetChannelThread_TCL_DECLARED 2554 /* 433 */ 2555 EXTERN Tcl_ThreadId Tcl_GetChannelThread(Tcl_Channel channel); 2556 #endif 2557 #ifndef Tcl_GetUnicodeFromObj_TCL_DECLARED 2558 #define Tcl_GetUnicodeFromObj_TCL_DECLARED 2559 /* 434 */ 2560 EXTERN Tcl_UniChar * Tcl_GetUnicodeFromObj(Tcl_Obj *objPtr, 2561 int *lengthPtr); 2562 #endif 2563 #ifndef Tcl_GetMathFuncInfo_TCL_DECLARED 2564 #define Tcl_GetMathFuncInfo_TCL_DECLARED 2565 /* 435 */ 2566 EXTERN int Tcl_GetMathFuncInfo(Tcl_Interp *interp, 2567 CONST char *name, int *numArgsPtr, 2568 Tcl_ValueType **argTypesPtr, 2569 Tcl_MathProc **procPtr, 2570 ClientData *clientDataPtr); 2571 #endif 2572 #ifndef Tcl_ListMathFuncs_TCL_DECLARED 2573 #define Tcl_ListMathFuncs_TCL_DECLARED 2574 /* 436 */ 2575 EXTERN Tcl_Obj * Tcl_ListMathFuncs(Tcl_Interp *interp, 2576 CONST char *pattern); 2577 #endif 2578 #ifndef Tcl_SubstObj_TCL_DECLARED 2579 #define Tcl_SubstObj_TCL_DECLARED 2580 /* 437 */ 2581 EXTERN Tcl_Obj * Tcl_SubstObj(Tcl_Interp *interp, Tcl_Obj *objPtr, 2582 int flags); 2583 #endif 2584 #ifndef Tcl_DetachChannel_TCL_DECLARED 2585 #define Tcl_DetachChannel_TCL_DECLARED 2586 /* 438 */ 2587 EXTERN int Tcl_DetachChannel(Tcl_Interp *interp, 2588 Tcl_Channel channel); 2589 #endif 2590 #ifndef Tcl_IsStandardChannel_TCL_DECLARED 2591 #define Tcl_IsStandardChannel_TCL_DECLARED 2592 /* 439 */ 2593 EXTERN int Tcl_IsStandardChannel(Tcl_Channel channel); 2594 #endif 2595 #ifndef Tcl_FSCopyFile_TCL_DECLARED 2596 #define Tcl_FSCopyFile_TCL_DECLARED 2597 /* 440 */ 2598 EXTERN int Tcl_FSCopyFile(Tcl_Obj *srcPathPtr, 2599 Tcl_Obj *destPathPtr); 2600 #endif 2601 #ifndef Tcl_FSCopyDirectory_TCL_DECLARED 2602 #define Tcl_FSCopyDirectory_TCL_DECLARED 2603 /* 441 */ 2604 EXTERN int Tcl_FSCopyDirectory(Tcl_Obj *srcPathPtr, 2605 Tcl_Obj *destPathPtr, Tcl_Obj **errorPtr); 2606 #endif 2607 #ifndef Tcl_FSCreateDirectory_TCL_DECLARED 2608 #define Tcl_FSCreateDirectory_TCL_DECLARED 2609 /* 442 */ 2610 EXTERN int Tcl_FSCreateDirectory(Tcl_Obj *pathPtr); 2611 #endif 2612 #ifndef Tcl_FSDeleteFile_TCL_DECLARED 2613 #define Tcl_FSDeleteFile_TCL_DECLARED 2614 /* 443 */ 2615 EXTERN int Tcl_FSDeleteFile(Tcl_Obj *pathPtr); 2616 #endif 2617 #ifndef Tcl_FSLoadFile_TCL_DECLARED 2618 #define Tcl_FSLoadFile_TCL_DECLARED 2619 /* 444 */ 2620 EXTERN int Tcl_FSLoadFile(Tcl_Interp *interp, Tcl_Obj *pathPtr, 2621 CONST char *sym1, CONST char *sym2, 2622 Tcl_PackageInitProc **proc1Ptr, 2623 Tcl_PackageInitProc **proc2Ptr, 2624 Tcl_LoadHandle *handlePtr, 2625 Tcl_FSUnloadFileProc **unloadProcPtr); 2626 #endif 2627 #ifndef Tcl_FSMatchInDirectory_TCL_DECLARED 2628 #define Tcl_FSMatchInDirectory_TCL_DECLARED 2629 /* 445 */ 2630 EXTERN int Tcl_FSMatchInDirectory(Tcl_Interp *interp, 2631 Tcl_Obj *result, Tcl_Obj *pathPtr, 2632 CONST char *pattern, Tcl_GlobTypeData *types); 2633 #endif 2634 #ifndef Tcl_FSLink_TCL_DECLARED 2635 #define Tcl_FSLink_TCL_DECLARED 2636 /* 446 */ 2637 EXTERN Tcl_Obj * Tcl_FSLink(Tcl_Obj *pathPtr, Tcl_Obj *toPtr, 2638 int linkAction); 2639 #endif 2640 #ifndef Tcl_FSRemoveDirectory_TCL_DECLARED 2641 #define Tcl_FSRemoveDirectory_TCL_DECLARED 2642 /* 447 */ 2643 EXTERN int Tcl_FSRemoveDirectory(Tcl_Obj *pathPtr, 2644 int recursive, Tcl_Obj **errorPtr); 2645 #endif 2646 #ifndef Tcl_FSRenameFile_TCL_DECLARED 2647 #define Tcl_FSRenameFile_TCL_DECLARED 2648 /* 448 */ 2649 EXTERN int Tcl_FSRenameFile(Tcl_Obj *srcPathPtr, 2650 Tcl_Obj *destPathPtr); 2651 #endif 2652 #ifndef Tcl_FSLstat_TCL_DECLARED 2653 #define Tcl_FSLstat_TCL_DECLARED 2654 /* 449 */ 2655 EXTERN int Tcl_FSLstat(Tcl_Obj *pathPtr, Tcl_StatBuf *buf); 2656 #endif 2657 #ifndef Tcl_FSUtime_TCL_DECLARED 2658 #define Tcl_FSUtime_TCL_DECLARED 2659 /* 450 */ 2660 EXTERN int Tcl_FSUtime(Tcl_Obj *pathPtr, struct utimbuf *tval); 2661 #endif 2662 #ifndef Tcl_FSFileAttrsGet_TCL_DECLARED 2663 #define Tcl_FSFileAttrsGet_TCL_DECLARED 2664 /* 451 */ 2665 EXTERN int Tcl_FSFileAttrsGet(Tcl_Interp *interp, int index, 2666 Tcl_Obj *pathPtr, Tcl_Obj **objPtrRef); 2667 #endif 2668 #ifndef Tcl_FSFileAttrsSet_TCL_DECLARED 2669 #define Tcl_FSFileAttrsSet_TCL_DECLARED 2670 /* 452 */ 2671 EXTERN int Tcl_FSFileAttrsSet(Tcl_Interp *interp, int index, 2672 Tcl_Obj *pathPtr, Tcl_Obj *objPtr); 2673 #endif 2674 #ifndef Tcl_FSFileAttrStrings_TCL_DECLARED 2675 #define Tcl_FSFileAttrStrings_TCL_DECLARED 2676 /* 453 */ 2677 EXTERN CONST char ** Tcl_FSFileAttrStrings(Tcl_Obj *pathPtr, 2678 Tcl_Obj **objPtrRef); 2679 #endif 2680 #ifndef Tcl_FSStat_TCL_DECLARED 2681 #define Tcl_FSStat_TCL_DECLARED 2682 /* 454 */ 2683 EXTERN int Tcl_FSStat(Tcl_Obj *pathPtr, Tcl_StatBuf *buf); 2684 #endif 2685 #ifndef Tcl_FSAccess_TCL_DECLARED 2686 #define Tcl_FSAccess_TCL_DECLARED 2687 /* 455 */ 2688 EXTERN int Tcl_FSAccess(Tcl_Obj *pathPtr, int mode); 2689 #endif 2690 #ifndef Tcl_FSOpenFileChannel_TCL_DECLARED 2691 #define Tcl_FSOpenFileChannel_TCL_DECLARED 2692 /* 456 */ 2693 EXTERN Tcl_Channel Tcl_FSOpenFileChannel(Tcl_Interp *interp, 2694 Tcl_Obj *pathPtr, CONST char *modeString, 2695 int permissions); 2696 #endif 2697 #ifndef Tcl_FSGetCwd_TCL_DECLARED 2698 #define Tcl_FSGetCwd_TCL_DECLARED 2699 /* 457 */ 2700 EXTERN Tcl_Obj * Tcl_FSGetCwd(Tcl_Interp *interp); 2701 #endif 2702 #ifndef Tcl_FSChdir_TCL_DECLARED 2703 #define Tcl_FSChdir_TCL_DECLARED 2704 /* 458 */ 2705 EXTERN int Tcl_FSChdir(Tcl_Obj *pathPtr); 2706 #endif 2707 #ifndef Tcl_FSConvertToPathType_TCL_DECLARED 2708 #define Tcl_FSConvertToPathType_TCL_DECLARED 2709 /* 459 */ 2710 EXTERN int Tcl_FSConvertToPathType(Tcl_Interp *interp, 2711 Tcl_Obj *pathPtr); 2712 #endif 2713 #ifndef Tcl_FSJoinPath_TCL_DECLARED 2714 #define Tcl_FSJoinPath_TCL_DECLARED 2715 /* 460 */ 2716 EXTERN Tcl_Obj * Tcl_FSJoinPath(Tcl_Obj *listObj, int elements); 2717 #endif 2718 #ifndef Tcl_FSSplitPath_TCL_DECLARED 2719 #define Tcl_FSSplitPath_TCL_DECLARED 2720 /* 461 */ 2721 EXTERN Tcl_Obj * Tcl_FSSplitPath(Tcl_Obj *pathPtr, int *lenPtr); 2722 #endif 2723 #ifndef Tcl_FSEqualPaths_TCL_DECLARED 2724 #define Tcl_FSEqualPaths_TCL_DECLARED 2725 /* 462 */ 2726 EXTERN int Tcl_FSEqualPaths(Tcl_Obj *firstPtr, 2727 Tcl_Obj *secondPtr); 2728 #endif 2729 #ifndef Tcl_FSGetNormalizedPath_TCL_DECLARED 2730 #define Tcl_FSGetNormalizedPath_TCL_DECLARED 2731 /* 463 */ 2732 EXTERN Tcl_Obj * Tcl_FSGetNormalizedPath(Tcl_Interp *interp, 2733 Tcl_Obj *pathPtr); 2734 #endif 2735 #ifndef Tcl_FSJoinToPath_TCL_DECLARED 2736 #define Tcl_FSJoinToPath_TCL_DECLARED 2737 /* 464 */ 2738 EXTERN Tcl_Obj * Tcl_FSJoinToPath(Tcl_Obj *pathPtr, int objc, 2739 Tcl_Obj *CONST objv[]); 2740 #endif 2741 #ifndef Tcl_FSGetInternalRep_TCL_DECLARED 2742 #define Tcl_FSGetInternalRep_TCL_DECLARED 2743 /* 465 */ 2744 EXTERN ClientData Tcl_FSGetInternalRep(Tcl_Obj *pathPtr, 2745 Tcl_Filesystem *fsPtr); 2746 #endif 2747 #ifndef Tcl_FSGetTranslatedPath_TCL_DECLARED 2748 #define Tcl_FSGetTranslatedPath_TCL_DECLARED 2749 /* 466 */ 2750 EXTERN Tcl_Obj * Tcl_FSGetTranslatedPath(Tcl_Interp *interp, 2751 Tcl_Obj *pathPtr); 2752 #endif 2753 #ifndef Tcl_FSEvalFile_TCL_DECLARED 2754 #define Tcl_FSEvalFile_TCL_DECLARED 2755 /* 467 */ 2756 EXTERN int Tcl_FSEvalFile(Tcl_Interp *interp, Tcl_Obj *fileName); 2757 #endif 2758 #ifndef Tcl_FSNewNativePath_TCL_DECLARED 2759 #define Tcl_FSNewNativePath_TCL_DECLARED 2760 /* 468 */ 2761 EXTERN Tcl_Obj * Tcl_FSNewNativePath(Tcl_Filesystem *fromFilesystem, 2762 ClientData clientData); 2763 #endif 2764 #ifndef Tcl_FSGetNativePath_TCL_DECLARED 2765 #define Tcl_FSGetNativePath_TCL_DECLARED 2766 /* 469 */ 2767 EXTERN CONST char * Tcl_FSGetNativePath(Tcl_Obj *pathPtr); 2768 #endif 2769 #ifndef Tcl_FSFileSystemInfo_TCL_DECLARED 2770 #define Tcl_FSFileSystemInfo_TCL_DECLARED 2771 /* 470 */ 2772 EXTERN Tcl_Obj * Tcl_FSFileSystemInfo(Tcl_Obj *pathPtr); 2773 #endif 2774 #ifndef Tcl_FSPathSeparator_TCL_DECLARED 2775 #define Tcl_FSPathSeparator_TCL_DECLARED 2776 /* 471 */ 2777 EXTERN Tcl_Obj * Tcl_FSPathSeparator(Tcl_Obj *pathPtr); 2778 #endif 2779 #ifndef Tcl_FSListVolumes_TCL_DECLARED 2780 #define Tcl_FSListVolumes_TCL_DECLARED 2781 /* 472 */ 2782 EXTERN Tcl_Obj * Tcl_FSListVolumes(void); 2783 #endif 2784 #ifndef Tcl_FSRegister_TCL_DECLARED 2785 #define Tcl_FSRegister_TCL_DECLARED 2786 /* 473 */ 2787 EXTERN int Tcl_FSRegister(ClientData clientData, 2788 Tcl_Filesystem *fsPtr); 2789 #endif 2790 #ifndef Tcl_FSUnregister_TCL_DECLARED 2791 #define Tcl_FSUnregister_TCL_DECLARED 2792 /* 474 */ 2793 EXTERN int Tcl_FSUnregister(Tcl_Filesystem *fsPtr); 2794 #endif 2795 #ifndef Tcl_FSData_TCL_DECLARED 2796 #define Tcl_FSData_TCL_DECLARED 2797 /* 475 */ 2798 EXTERN ClientData Tcl_FSData(Tcl_Filesystem *fsPtr); 2799 #endif 2800 #ifndef Tcl_FSGetTranslatedStringPath_TCL_DECLARED 2801 #define Tcl_FSGetTranslatedStringPath_TCL_DECLARED 2802 /* 476 */ 2803 EXTERN CONST char * Tcl_FSGetTranslatedStringPath(Tcl_Interp *interp, 2804 Tcl_Obj *pathPtr); 2805 #endif 2806 #ifndef Tcl_FSGetFileSystemForPath_TCL_DECLARED 2807 #define Tcl_FSGetFileSystemForPath_TCL_DECLARED 2808 /* 477 */ 2809 EXTERN Tcl_Filesystem * Tcl_FSGetFileSystemForPath(Tcl_Obj *pathPtr); 2810 #endif 2811 #ifndef Tcl_FSGetPathType_TCL_DECLARED 2812 #define Tcl_FSGetPathType_TCL_DECLARED 2813 /* 478 */ 2814 EXTERN Tcl_PathType Tcl_FSGetPathType(Tcl_Obj *pathPtr); 2815 #endif 2816 #ifndef Tcl_OutputBuffered_TCL_DECLARED 2817 #define Tcl_OutputBuffered_TCL_DECLARED 2818 /* 479 */ 2819 EXTERN int Tcl_OutputBuffered(Tcl_Channel chan); 2820 #endif 2821 #ifndef Tcl_FSMountsChanged_TCL_DECLARED 2822 #define Tcl_FSMountsChanged_TCL_DECLARED 2823 /* 480 */ 2824 EXTERN void Tcl_FSMountsChanged(Tcl_Filesystem *fsPtr); 2825 #endif 2826 #ifndef Tcl_EvalTokensStandard_TCL_DECLARED 2827 #define Tcl_EvalTokensStandard_TCL_DECLARED 2828 /* 481 */ 2829 EXTERN int Tcl_EvalTokensStandard(Tcl_Interp *interp, 2830 Tcl_Token *tokenPtr, int count); 2831 #endif 2832 #ifndef Tcl_GetTime_TCL_DECLARED 2833 #define Tcl_GetTime_TCL_DECLARED 2834 /* 482 */ 2835 EXTERN void Tcl_GetTime(Tcl_Time *timeBuf); 2836 #endif 2837 #ifndef Tcl_CreateObjTrace_TCL_DECLARED 2838 #define Tcl_CreateObjTrace_TCL_DECLARED 2839 /* 483 */ 2840 EXTERN Tcl_Trace Tcl_CreateObjTrace(Tcl_Interp *interp, int level, 2841 int flags, Tcl_CmdObjTraceProc *objProc, 2842 ClientData clientData, 2843 Tcl_CmdObjTraceDeleteProc *delProc); 2844 #endif 2845 #ifndef Tcl_GetCommandInfoFromToken_TCL_DECLARED 2846 #define Tcl_GetCommandInfoFromToken_TCL_DECLARED 2847 /* 484 */ 2848 EXTERN int Tcl_GetCommandInfoFromToken(Tcl_Command token, 2849 Tcl_CmdInfo *infoPtr); 2850 #endif 2851 #ifndef Tcl_SetCommandInfoFromToken_TCL_DECLARED 2852 #define Tcl_SetCommandInfoFromToken_TCL_DECLARED 2853 /* 485 */ 2854 EXTERN int Tcl_SetCommandInfoFromToken(Tcl_Command token, 2855 CONST Tcl_CmdInfo *infoPtr); 2856 #endif 2857 #ifndef Tcl_DbNewWideIntObj_TCL_DECLARED 2858 #define Tcl_DbNewWideIntObj_TCL_DECLARED 2859 /* 486 */ 2860 EXTERN Tcl_Obj * Tcl_DbNewWideIntObj(Tcl_WideInt wideValue, 2861 CONST char *file, int line); 2862 #endif 2863 #ifndef Tcl_GetWideIntFromObj_TCL_DECLARED 2864 #define Tcl_GetWideIntFromObj_TCL_DECLARED 2865 /* 487 */ 2866 EXTERN int Tcl_GetWideIntFromObj(Tcl_Interp *interp, 2867 Tcl_Obj *objPtr, Tcl_WideInt *widePtr); 2868 #endif 2869 #ifndef Tcl_NewWideIntObj_TCL_DECLARED 2870 #define Tcl_NewWideIntObj_TCL_DECLARED 2871 /* 488 */ 2872 EXTERN Tcl_Obj * Tcl_NewWideIntObj(Tcl_WideInt wideValue); 2873 #endif 2874 #ifndef Tcl_SetWideIntObj_TCL_DECLARED 2875 #define Tcl_SetWideIntObj_TCL_DECLARED 2876 /* 489 */ 2877 EXTERN void Tcl_SetWideIntObj(Tcl_Obj *objPtr, 2878 Tcl_WideInt wideValue); 2879 #endif 2880 #ifndef Tcl_AllocStatBuf_TCL_DECLARED 2881 #define Tcl_AllocStatBuf_TCL_DECLARED 2882 /* 490 */ 2883 EXTERN Tcl_StatBuf * Tcl_AllocStatBuf(void); 2884 #endif 2885 #ifndef Tcl_Seek_TCL_DECLARED 2886 #define Tcl_Seek_TCL_DECLARED 2887 /* 491 */ 2888 EXTERN Tcl_WideInt Tcl_Seek(Tcl_Channel chan, Tcl_WideInt offset, 2889 int mode); 2890 #endif 2891 #ifndef Tcl_Tell_TCL_DECLARED 2892 #define Tcl_Tell_TCL_DECLARED 2893 /* 492 */ 2894 EXTERN Tcl_WideInt Tcl_Tell(Tcl_Channel chan); 2895 #endif 2896 #ifndef Tcl_ChannelWideSeekProc_TCL_DECLARED 2897 #define Tcl_ChannelWideSeekProc_TCL_DECLARED 2898 /* 493 */ 2899 EXTERN Tcl_DriverWideSeekProc * Tcl_ChannelWideSeekProc( 2900 CONST Tcl_ChannelType *chanTypePtr); 2901 #endif 2902 #ifndef Tcl_DictObjPut_TCL_DECLARED 2903 #define Tcl_DictObjPut_TCL_DECLARED 2904 /* 494 */ 2905 EXTERN int Tcl_DictObjPut(Tcl_Interp *interp, Tcl_Obj *dictPtr, 2906 Tcl_Obj *keyPtr, Tcl_Obj *valuePtr); 2907 #endif 2908 #ifndef Tcl_DictObjGet_TCL_DECLARED 2909 #define Tcl_DictObjGet_TCL_DECLARED 2910 /* 495 */ 2911 EXTERN int Tcl_DictObjGet(Tcl_Interp *interp, Tcl_Obj *dictPtr, 2912 Tcl_Obj *keyPtr, Tcl_Obj **valuePtrPtr); 2913 #endif 2914 #ifndef Tcl_DictObjRemove_TCL_DECLARED 2915 #define Tcl_DictObjRemove_TCL_DECLARED 2916 /* 496 */ 2917 EXTERN int Tcl_DictObjRemove(Tcl_Interp *interp, 2918 Tcl_Obj *dictPtr, Tcl_Obj *keyPtr); 2919 #endif 2920 #ifndef Tcl_DictObjSize_TCL_DECLARED 2921 #define Tcl_DictObjSize_TCL_DECLARED 2922 /* 497 */ 2923 EXTERN int Tcl_DictObjSize(Tcl_Interp *interp, Tcl_Obj *dictPtr, 2924 int *sizePtr); 2925 #endif 2926 #ifndef Tcl_DictObjFirst_TCL_DECLARED 2927 #define Tcl_DictObjFirst_TCL_DECLARED 2928 /* 498 */ 2929 EXTERN int Tcl_DictObjFirst(Tcl_Interp *interp, 2930 Tcl_Obj *dictPtr, Tcl_DictSearch *searchPtr, 2931 Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr, 2932 int *donePtr); 2933 #endif 2934 #ifndef Tcl_DictObjNext_TCL_DECLARED 2935 #define Tcl_DictObjNext_TCL_DECLARED 2936 /* 499 */ 2937 EXTERN void Tcl_DictObjNext(Tcl_DictSearch *searchPtr, 2938 Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr, 2939 int *donePtr); 2940 #endif 2941 #ifndef Tcl_DictObjDone_TCL_DECLARED 2942 #define Tcl_DictObjDone_TCL_DECLARED 2943 /* 500 */ 2944 EXTERN void Tcl_DictObjDone(Tcl_DictSearch *searchPtr); 2945 #endif 2946 #ifndef Tcl_DictObjPutKeyList_TCL_DECLARED 2947 #define Tcl_DictObjPutKeyList_TCL_DECLARED 2948 /* 501 */ 2949 EXTERN int Tcl_DictObjPutKeyList(Tcl_Interp *interp, 2950 Tcl_Obj *dictPtr, int keyc, 2951 Tcl_Obj *CONST *keyv, Tcl_Obj *valuePtr); 2952 #endif 2953 #ifndef Tcl_DictObjRemoveKeyList_TCL_DECLARED 2954 #define Tcl_DictObjRemoveKeyList_TCL_DECLARED 2955 /* 502 */ 2956 EXTERN int Tcl_DictObjRemoveKeyList(Tcl_Interp *interp, 2957 Tcl_Obj *dictPtr, int keyc, 2958 Tcl_Obj *CONST *keyv); 2959 #endif 2960 #ifndef Tcl_NewDictObj_TCL_DECLARED 2961 #define Tcl_NewDictObj_TCL_DECLARED 2962 /* 503 */ 2963 EXTERN Tcl_Obj * Tcl_NewDictObj(void); 2964 #endif 2965 #ifndef Tcl_DbNewDictObj_TCL_DECLARED 2966 #define Tcl_DbNewDictObj_TCL_DECLARED 2967 /* 504 */ 2968 EXTERN Tcl_Obj * Tcl_DbNewDictObj(CONST char *file, int line); 2969 #endif 2970 #ifndef Tcl_RegisterConfig_TCL_DECLARED 2971 #define Tcl_RegisterConfig_TCL_DECLARED 2972 /* 505 */ 2973 EXTERN void Tcl_RegisterConfig(Tcl_Interp *interp, 2974 CONST char *pkgName, 2975 Tcl_Config *configuration, 2976 CONST char *valEncoding); 2977 #endif 2978 #ifndef Tcl_CreateNamespace_TCL_DECLARED 2979 #define Tcl_CreateNamespace_TCL_DECLARED 2980 /* 506 */ 2981 EXTERN Tcl_Namespace * Tcl_CreateNamespace(Tcl_Interp *interp, 2982 CONST char *name, ClientData clientData, 2983 Tcl_NamespaceDeleteProc *deleteProc); 2984 #endif 2985 #ifndef Tcl_DeleteNamespace_TCL_DECLARED 2986 #define Tcl_DeleteNamespace_TCL_DECLARED 2987 /* 507 */ 2988 EXTERN void Tcl_DeleteNamespace(Tcl_Namespace *nsPtr); 2989 #endif 2990 #ifndef Tcl_AppendExportList_TCL_DECLARED 2991 #define Tcl_AppendExportList_TCL_DECLARED 2992 /* 508 */ 2993 EXTERN int Tcl_AppendExportList(Tcl_Interp *interp, 2994 Tcl_Namespace *nsPtr, Tcl_Obj *objPtr); 2995 #endif 2996 #ifndef Tcl_Export_TCL_DECLARED 2997 #define Tcl_Export_TCL_DECLARED 2998 /* 509 */ 2999 EXTERN int Tcl_Export(Tcl_Interp *interp, Tcl_Namespace *nsPtr, 3000 CONST char *pattern, int resetListFirst); 3001 #endif 3002 #ifndef Tcl_Import_TCL_DECLARED 3003 #define Tcl_Import_TCL_DECLARED 3004 /* 510 */ 3005 EXTERN int Tcl_Import(Tcl_Interp *interp, Tcl_Namespace *nsPtr, 3006 CONST char *pattern, int allowOverwrite); 3007 #endif 3008 #ifndef Tcl_ForgetImport_TCL_DECLARED 3009 #define Tcl_ForgetImport_TCL_DECLARED 3010 /* 511 */ 3011 EXTERN int Tcl_ForgetImport(Tcl_Interp *interp, 3012 Tcl_Namespace *nsPtr, CONST char *pattern); 3013 #endif 3014 #ifndef Tcl_GetCurrentNamespace_TCL_DECLARED 3015 #define Tcl_GetCurrentNamespace_TCL_DECLARED 3016 /* 512 */ 3017 EXTERN Tcl_Namespace * Tcl_GetCurrentNamespace(Tcl_Interp *interp); 3018 #endif 3019 #ifndef Tcl_GetGlobalNamespace_TCL_DECLARED 3020 #define Tcl_GetGlobalNamespace_TCL_DECLARED 3021 /* 513 */ 3022 EXTERN Tcl_Namespace * Tcl_GetGlobalNamespace(Tcl_Interp *interp); 3023 #endif 3024 #ifndef Tcl_FindNamespace_TCL_DECLARED 3025 #define Tcl_FindNamespace_TCL_DECLARED 3026 /* 514 */ 3027 EXTERN Tcl_Namespace * Tcl_FindNamespace(Tcl_Interp *interp, 3028 CONST char *name, 3029 Tcl_Namespace *contextNsPtr, int flags); 3030 #endif 3031 #ifndef Tcl_FindCommand_TCL_DECLARED 3032 #define Tcl_FindCommand_TCL_DECLARED 3033 /* 515 */ 3034 EXTERN Tcl_Command Tcl_FindCommand(Tcl_Interp *interp, CONST char *name, 3035 Tcl_Namespace *contextNsPtr, int flags); 3036 #endif 3037 #ifndef Tcl_GetCommandFromObj_TCL_DECLARED 3038 #define Tcl_GetCommandFromObj_TCL_DECLARED 3039 /* 516 */ 3040 EXTERN Tcl_Command Tcl_GetCommandFromObj(Tcl_Interp *interp, 3041 Tcl_Obj *objPtr); 3042 #endif 3043 #ifndef Tcl_GetCommandFullName_TCL_DECLARED 3044 #define Tcl_GetCommandFullName_TCL_DECLARED 3045 /* 517 */ 3046 EXTERN void Tcl_GetCommandFullName(Tcl_Interp *interp, 3047 Tcl_Command command, Tcl_Obj *objPtr); 3048 #endif 3049 #ifndef Tcl_FSEvalFileEx_TCL_DECLARED 3050 #define Tcl_FSEvalFileEx_TCL_DECLARED 3051 /* 518 */ 3052 EXTERN int Tcl_FSEvalFileEx(Tcl_Interp *interp, 3053 Tcl_Obj *fileName, CONST char *encodingName); 3054 #endif 3055 #ifndef Tcl_SetExitProc_TCL_DECLARED 3056 #define Tcl_SetExitProc_TCL_DECLARED 3057 /* 519 */ 3058 EXTERN Tcl_ExitProc * Tcl_SetExitProc(Tcl_ExitProc *proc); 3059 #endif 3060 #ifndef Tcl_LimitAddHandler_TCL_DECLARED 3061 #define Tcl_LimitAddHandler_TCL_DECLARED 3062 /* 520 */ 3063 EXTERN void Tcl_LimitAddHandler(Tcl_Interp *interp, int type, 3064 Tcl_LimitHandlerProc *handlerProc, 3065 ClientData clientData, 3066 Tcl_LimitHandlerDeleteProc *deleteProc); 3067 #endif 3068 #ifndef Tcl_LimitRemoveHandler_TCL_DECLARED 3069 #define Tcl_LimitRemoveHandler_TCL_DECLARED 3070 /* 521 */ 3071 EXTERN void Tcl_LimitRemoveHandler(Tcl_Interp *interp, int type, 3072 Tcl_LimitHandlerProc *handlerProc, 3073 ClientData clientData); 3074 #endif 3075 #ifndef Tcl_LimitReady_TCL_DECLARED 3076 #define Tcl_LimitReady_TCL_DECLARED 3077 /* 522 */ 3078 EXTERN int Tcl_LimitReady(Tcl_Interp *interp); 3079 #endif 3080 #ifndef Tcl_LimitCheck_TCL_DECLARED 3081 #define Tcl_LimitCheck_TCL_DECLARED 3082 /* 523 */ 3083 EXTERN int Tcl_LimitCheck(Tcl_Interp *interp); 3084 #endif 3085 #ifndef Tcl_LimitExceeded_TCL_DECLARED 3086 #define Tcl_LimitExceeded_TCL_DECLARED 3087 /* 524 */ 3088 EXTERN int Tcl_LimitExceeded(Tcl_Interp *interp); 3089 #endif 3090 #ifndef Tcl_LimitSetCommands_TCL_DECLARED 3091 #define Tcl_LimitSetCommands_TCL_DECLARED 3092 /* 525 */ 3093 EXTERN void Tcl_LimitSetCommands(Tcl_Interp *interp, 3094 int commandLimit); 3095 #endif 3096 #ifndef Tcl_LimitSetTime_TCL_DECLARED 3097 #define Tcl_LimitSetTime_TCL_DECLARED 3098 /* 526 */ 3099 EXTERN void Tcl_LimitSetTime(Tcl_Interp *interp, 3100 Tcl_Time *timeLimitPtr); 3101 #endif 3102 #ifndef Tcl_LimitSetGranularity_TCL_DECLARED 3103 #define Tcl_LimitSetGranularity_TCL_DECLARED 3104 /* 527 */ 3105 EXTERN void Tcl_LimitSetGranularity(Tcl_Interp *interp, int type, 3106 int granularity); 3107 #endif 3108 #ifndef Tcl_LimitTypeEnabled_TCL_DECLARED 3109 #define Tcl_LimitTypeEnabled_TCL_DECLARED 3110 /* 528 */ 3111 EXTERN int Tcl_LimitTypeEnabled(Tcl_Interp *interp, int type); 3112 #endif 3113 #ifndef Tcl_LimitTypeExceeded_TCL_DECLARED 3114 #define Tcl_LimitTypeExceeded_TCL_DECLARED 3115 /* 529 */ 3116 EXTERN int Tcl_LimitTypeExceeded(Tcl_Interp *interp, int type); 3117 #endif 3118 #ifndef Tcl_LimitTypeSet_TCL_DECLARED 3119 #define Tcl_LimitTypeSet_TCL_DECLARED 3120 /* 530 */ 3121 EXTERN void Tcl_LimitTypeSet(Tcl_Interp *interp, int type); 3122 #endif 3123 #ifndef Tcl_LimitTypeReset_TCL_DECLARED 3124 #define Tcl_LimitTypeReset_TCL_DECLARED 3125 /* 531 */ 3126 EXTERN void Tcl_LimitTypeReset(Tcl_Interp *interp, int type); 3127 #endif 3128 #ifndef Tcl_LimitGetCommands_TCL_DECLARED 3129 #define Tcl_LimitGetCommands_TCL_DECLARED 3130 /* 532 */ 3131 EXTERN int Tcl_LimitGetCommands(Tcl_Interp *interp); 3132 #endif 3133 #ifndef Tcl_LimitGetTime_TCL_DECLARED 3134 #define Tcl_LimitGetTime_TCL_DECLARED 3135 /* 533 */ 3136 EXTERN void Tcl_LimitGetTime(Tcl_Interp *interp, 3137 Tcl_Time *timeLimitPtr); 3138 #endif 3139 #ifndef Tcl_LimitGetGranularity_TCL_DECLARED 3140 #define Tcl_LimitGetGranularity_TCL_DECLARED 3141 /* 534 */ 3142 EXTERN int Tcl_LimitGetGranularity(Tcl_Interp *interp, int type); 3143 #endif 3144 #ifndef Tcl_SaveInterpState_TCL_DECLARED 3145 #define Tcl_SaveInterpState_TCL_DECLARED 3146 /* 535 */ 3147 EXTERN Tcl_InterpState Tcl_SaveInterpState(Tcl_Interp *interp, int status); 3148 #endif 3149 #ifndef Tcl_RestoreInterpState_TCL_DECLARED 3150 #define Tcl_RestoreInterpState_TCL_DECLARED 3151 /* 536 */ 3152 EXTERN int Tcl_RestoreInterpState(Tcl_Interp *interp, 3153 Tcl_InterpState state); 3154 #endif 3155 #ifndef Tcl_DiscardInterpState_TCL_DECLARED 3156 #define Tcl_DiscardInterpState_TCL_DECLARED 3157 /* 537 */ 3158 EXTERN void Tcl_DiscardInterpState(Tcl_InterpState state); 3159 #endif 3160 #ifndef Tcl_SetReturnOptions_TCL_DECLARED 3161 #define Tcl_SetReturnOptions_TCL_DECLARED 3162 /* 538 */ 3163 EXTERN int Tcl_SetReturnOptions(Tcl_Interp *interp, 3164 Tcl_Obj *options); 3165 #endif 3166 #ifndef Tcl_GetReturnOptions_TCL_DECLARED 3167 #define Tcl_GetReturnOptions_TCL_DECLARED 3168 /* 539 */ 3169 EXTERN Tcl_Obj * Tcl_GetReturnOptions(Tcl_Interp *interp, int result); 3170 #endif 3171 #ifndef Tcl_IsEnsemble_TCL_DECLARED 3172 #define Tcl_IsEnsemble_TCL_DECLARED 3173 /* 540 */ 3174 EXTERN int Tcl_IsEnsemble(Tcl_Command token); 3175 #endif 3176 #ifndef Tcl_CreateEnsemble_TCL_DECLARED 3177 #define Tcl_CreateEnsemble_TCL_DECLARED 3178 /* 541 */ 3179 EXTERN Tcl_Command Tcl_CreateEnsemble(Tcl_Interp *interp, 3180 CONST char *name, 3181 Tcl_Namespace *namespacePtr, int flags); 3182 #endif 3183 #ifndef Tcl_FindEnsemble_TCL_DECLARED 3184 #define Tcl_FindEnsemble_TCL_DECLARED 3185 /* 542 */ 3186 EXTERN Tcl_Command Tcl_FindEnsemble(Tcl_Interp *interp, 3187 Tcl_Obj *cmdNameObj, int flags); 3188 #endif 3189 #ifndef Tcl_SetEnsembleSubcommandList_TCL_DECLARED 3190 #define Tcl_SetEnsembleSubcommandList_TCL_DECLARED 3191 /* 543 */ 3192 EXTERN int Tcl_SetEnsembleSubcommandList(Tcl_Interp *interp, 3193 Tcl_Command token, Tcl_Obj *subcmdList); 3194 #endif 3195 #ifndef Tcl_SetEnsembleMappingDict_TCL_DECLARED 3196 #define Tcl_SetEnsembleMappingDict_TCL_DECLARED 3197 /* 544 */ 3198 EXTERN int Tcl_SetEnsembleMappingDict(Tcl_Interp *interp, 3199 Tcl_Command token, Tcl_Obj *mapDict); 3200 #endif 3201 #ifndef Tcl_SetEnsembleUnknownHandler_TCL_DECLARED 3202 #define Tcl_SetEnsembleUnknownHandler_TCL_DECLARED 3203 /* 545 */ 3204 EXTERN int Tcl_SetEnsembleUnknownHandler(Tcl_Interp *interp, 3205 Tcl_Command token, Tcl_Obj *unknownList); 3206 #endif 3207 #ifndef Tcl_SetEnsembleFlags_TCL_DECLARED 3208 #define Tcl_SetEnsembleFlags_TCL_DECLARED 3209 /* 546 */ 3210 EXTERN int Tcl_SetEnsembleFlags(Tcl_Interp *interp, 3211 Tcl_Command token, int flags); 3212 #endif 3213 #ifndef Tcl_GetEnsembleSubcommandList_TCL_DECLARED 3214 #define Tcl_GetEnsembleSubcommandList_TCL_DECLARED 3215 /* 547 */ 3216 EXTERN int Tcl_GetEnsembleSubcommandList(Tcl_Interp *interp, 3217 Tcl_Command token, Tcl_Obj **subcmdListPtr); 3218 #endif 3219 #ifndef Tcl_GetEnsembleMappingDict_TCL_DECLARED 3220 #define Tcl_GetEnsembleMappingDict_TCL_DECLARED 3221 /* 548 */ 3222 EXTERN int Tcl_GetEnsembleMappingDict(Tcl_Interp *interp, 3223 Tcl_Command token, Tcl_Obj **mapDictPtr); 3224 #endif 3225 #ifndef Tcl_GetEnsembleUnknownHandler_TCL_DECLARED 3226 #define Tcl_GetEnsembleUnknownHandler_TCL_DECLARED 3227 /* 549 */ 3228 EXTERN int Tcl_GetEnsembleUnknownHandler(Tcl_Interp *interp, 3229 Tcl_Command token, Tcl_Obj **unknownListPtr); 3230 #endif 3231 #ifndef Tcl_GetEnsembleFlags_TCL_DECLARED 3232 #define Tcl_GetEnsembleFlags_TCL_DECLARED 3233 /* 550 */ 3234 EXTERN int Tcl_GetEnsembleFlags(Tcl_Interp *interp, 3235 Tcl_Command token, int *flagsPtr); 3236 #endif 3237 #ifndef Tcl_GetEnsembleNamespace_TCL_DECLARED 3238 #define Tcl_GetEnsembleNamespace_TCL_DECLARED 3239 /* 551 */ 3240 EXTERN int Tcl_GetEnsembleNamespace(Tcl_Interp *interp, 3241 Tcl_Command token, 3242 Tcl_Namespace **namespacePtrPtr); 3243 #endif 3244 #ifndef Tcl_SetTimeProc_TCL_DECLARED 3245 #define Tcl_SetTimeProc_TCL_DECLARED 3246 /* 552 */ 3247 EXTERN void Tcl_SetTimeProc(Tcl_GetTimeProc *getProc, 3248 Tcl_ScaleTimeProc *scaleProc, 3249 ClientData clientData); 3250 #endif 3251 #ifndef Tcl_QueryTimeProc_TCL_DECLARED 3252 #define Tcl_QueryTimeProc_TCL_DECLARED 3253 /* 553 */ 3254 EXTERN void Tcl_QueryTimeProc(Tcl_GetTimeProc **getProc, 3255 Tcl_ScaleTimeProc **scaleProc, 3256 ClientData *clientData); 3257 #endif 3258 #ifndef Tcl_ChannelThreadActionProc_TCL_DECLARED 3259 #define Tcl_ChannelThreadActionProc_TCL_DECLARED 3260 /* 554 */ 3261 EXTERN Tcl_DriverThreadActionProc * Tcl_ChannelThreadActionProc( 3262 CONST Tcl_ChannelType *chanTypePtr); 3263 #endif 3264 #ifndef Tcl_NewBignumObj_TCL_DECLARED 3265 #define Tcl_NewBignumObj_TCL_DECLARED 3266 /* 555 */ 3267 EXTERN Tcl_Obj * Tcl_NewBignumObj(mp_int *value); 3268 #endif 3269 #ifndef Tcl_DbNewBignumObj_TCL_DECLARED 3270 #define Tcl_DbNewBignumObj_TCL_DECLARED 3271 /* 556 */ 3272 EXTERN Tcl_Obj * Tcl_DbNewBignumObj(mp_int *value, CONST char *file, 3273 int line); 3274 #endif 3275 #ifndef Tcl_SetBignumObj_TCL_DECLARED 3276 #define Tcl_SetBignumObj_TCL_DECLARED 3277 /* 557 */ 3278 EXTERN void Tcl_SetBignumObj(Tcl_Obj *obj, mp_int *value); 3279 #endif 3280 #ifndef Tcl_GetBignumFromObj_TCL_DECLARED 3281 #define Tcl_GetBignumFromObj_TCL_DECLARED 3282 /* 558 */ 3283 EXTERN int Tcl_GetBignumFromObj(Tcl_Interp *interp, 3284 Tcl_Obj *obj, mp_int *value); 3285 #endif 3286 #ifndef Tcl_TakeBignumFromObj_TCL_DECLARED 3287 #define Tcl_TakeBignumFromObj_TCL_DECLARED 3288 /* 559 */ 3289 EXTERN int Tcl_TakeBignumFromObj(Tcl_Interp *interp, 3290 Tcl_Obj *obj, mp_int *value); 3291 #endif 3292 #ifndef Tcl_TruncateChannel_TCL_DECLARED 3293 #define Tcl_TruncateChannel_TCL_DECLARED 3294 /* 560 */ 3295 EXTERN int Tcl_TruncateChannel(Tcl_Channel chan, 3296 Tcl_WideInt length); 3297 #endif 3298 #ifndef Tcl_ChannelTruncateProc_TCL_DECLARED 3299 #define Tcl_ChannelTruncateProc_TCL_DECLARED 3300 /* 561 */ 3301 EXTERN Tcl_DriverTruncateProc * Tcl_ChannelTruncateProc( 3302 CONST Tcl_ChannelType *chanTypePtr); 3303 #endif 3304 #ifndef Tcl_SetChannelErrorInterp_TCL_DECLARED 3305 #define Tcl_SetChannelErrorInterp_TCL_DECLARED 3306 /* 562 */ 3307 EXTERN void Tcl_SetChannelErrorInterp(Tcl_Interp *interp, 3308 Tcl_Obj *msg); 3309 #endif 3310 #ifndef Tcl_GetChannelErrorInterp_TCL_DECLARED 3311 #define Tcl_GetChannelErrorInterp_TCL_DECLARED 3312 /* 563 */ 3313 EXTERN void Tcl_GetChannelErrorInterp(Tcl_Interp *interp, 3314 Tcl_Obj **msg); 3315 #endif 3316 #ifndef Tcl_SetChannelError_TCL_DECLARED 3317 #define Tcl_SetChannelError_TCL_DECLARED 3318 /* 564 */ 3319 EXTERN void Tcl_SetChannelError(Tcl_Channel chan, Tcl_Obj *msg); 3320 #endif 3321 #ifndef Tcl_GetChannelError_TCL_DECLARED 3322 #define Tcl_GetChannelError_TCL_DECLARED 3323 /* 565 */ 3324 EXTERN void Tcl_GetChannelError(Tcl_Channel chan, Tcl_Obj **msg); 3325 #endif 3326 #ifndef Tcl_InitBignumFromDouble_TCL_DECLARED 3327 #define Tcl_InitBignumFromDouble_TCL_DECLARED 3328 /* 566 */ 3329 EXTERN int Tcl_InitBignumFromDouble(Tcl_Interp *interp, 3330 double initval, mp_int *toInit); 3331 #endif 3332 #ifndef Tcl_GetNamespaceUnknownHandler_TCL_DECLARED 3333 #define Tcl_GetNamespaceUnknownHandler_TCL_DECLARED 3334 /* 567 */ 3335 EXTERN Tcl_Obj * Tcl_GetNamespaceUnknownHandler(Tcl_Interp *interp, 3336 Tcl_Namespace *nsPtr); 3337 #endif 3338 #ifndef Tcl_SetNamespaceUnknownHandler_TCL_DECLARED 3339 #define Tcl_SetNamespaceUnknownHandler_TCL_DECLARED 3340 /* 568 */ 3341 EXTERN int Tcl_SetNamespaceUnknownHandler(Tcl_Interp *interp, 3342 Tcl_Namespace *nsPtr, Tcl_Obj *handlerPtr); 3343 #endif 3344 #ifndef Tcl_GetEncodingFromObj_TCL_DECLARED 3345 #define Tcl_GetEncodingFromObj_TCL_DECLARED 3346 /* 569 */ 3347 EXTERN int Tcl_GetEncodingFromObj(Tcl_Interp *interp, 3348 Tcl_Obj *objPtr, Tcl_Encoding *encodingPtr); 3349 #endif 3350 #ifndef Tcl_GetEncodingSearchPath_TCL_DECLARED 3351 #define Tcl_GetEncodingSearchPath_TCL_DECLARED 3352 /* 570 */ 3353 EXTERN Tcl_Obj * Tcl_GetEncodingSearchPath(void); 3354 #endif 3355 #ifndef Tcl_SetEncodingSearchPath_TCL_DECLARED 3356 #define Tcl_SetEncodingSearchPath_TCL_DECLARED 3357 /* 571 */ 3358 EXTERN int Tcl_SetEncodingSearchPath(Tcl_Obj *searchPath); 3359 #endif 3360 #ifndef Tcl_GetEncodingNameFromEnvironment_TCL_DECLARED 3361 #define Tcl_GetEncodingNameFromEnvironment_TCL_DECLARED 3362 /* 572 */ 3363 EXTERN CONST char * Tcl_GetEncodingNameFromEnvironment( 3364 Tcl_DString *bufPtr); 3365 #endif 3366 #ifndef Tcl_PkgRequireProc_TCL_DECLARED 3367 #define Tcl_PkgRequireProc_TCL_DECLARED 3368 /* 573 */ 3369 EXTERN int Tcl_PkgRequireProc(Tcl_Interp *interp, 3370 CONST char *name, int objc, 3371 Tcl_Obj *CONST objv[], 3372 ClientData *clientDataPtr); 3373 #endif 3374 #ifndef Tcl_AppendObjToErrorInfo_TCL_DECLARED 3375 #define Tcl_AppendObjToErrorInfo_TCL_DECLARED 3376 /* 574 */ 3377 EXTERN void Tcl_AppendObjToErrorInfo(Tcl_Interp *interp, 3378 Tcl_Obj *objPtr); 3379 #endif 3380 #ifndef Tcl_AppendLimitedToObj_TCL_DECLARED 3381 #define Tcl_AppendLimitedToObj_TCL_DECLARED 3382 /* 575 */ 3383 EXTERN void Tcl_AppendLimitedToObj(Tcl_Obj *objPtr, 3384 CONST char *bytes, int length, int limit, 3385 CONST char *ellipsis); 3386 #endif 3387 #ifndef Tcl_Format_TCL_DECLARED 3388 #define Tcl_Format_TCL_DECLARED 3389 /* 576 */ 3390 EXTERN Tcl_Obj * Tcl_Format(Tcl_Interp *interp, CONST char *format, 3391 int objc, Tcl_Obj *CONST objv[]); 3392 #endif 3393 #ifndef Tcl_AppendFormatToObj_TCL_DECLARED 3394 #define Tcl_AppendFormatToObj_TCL_DECLARED 3395 /* 577 */ 3396 EXTERN int Tcl_AppendFormatToObj(Tcl_Interp *interp, 3397 Tcl_Obj *objPtr, CONST char *format, 3398 int objc, Tcl_Obj *CONST objv[]); 3399 #endif 3400 #ifndef Tcl_ObjPrintf_TCL_DECLARED 3401 #define Tcl_ObjPrintf_TCL_DECLARED 3402 /* 578 */ 3403 EXTERN Tcl_Obj * Tcl_ObjPrintf(CONST char *format, ...); 3404 #endif 3405 #ifndef Tcl_AppendPrintfToObj_TCL_DECLARED 3406 #define Tcl_AppendPrintfToObj_TCL_DECLARED 3407 /* 579 */ 3408 EXTERN void Tcl_AppendPrintfToObj(Tcl_Obj *objPtr, 3409 CONST char *format, ...); 3410 #endif 3411 /* Slot 580 is reserved */ 3412 /* Slot 581 is reserved */ 3413 /* Slot 582 is reserved */ 3414 /* Slot 583 is reserved */ 3415 /* Slot 584 is reserved */ 3416 /* Slot 585 is reserved */ 3417 /* Slot 586 is reserved */ 3418 /* Slot 587 is reserved */ 3419 /* Slot 588 is reserved */ 3420 /* Slot 589 is reserved */ 3421 /* Slot 590 is reserved */ 3422 /* Slot 591 is reserved */ 3423 /* Slot 592 is reserved */ 3424 /* Slot 593 is reserved */ 3425 /* Slot 594 is reserved */ 3426 /* Slot 595 is reserved */ 3427 /* Slot 596 is reserved */ 3428 /* Slot 597 is reserved */ 3429 /* Slot 598 is reserved */ 3430 /* Slot 599 is reserved */ 3431 /* Slot 600 is reserved */ 3432 /* Slot 601 is reserved */ 3433 /* Slot 602 is reserved */ 3434 /* Slot 603 is reserved */ 3435 /* Slot 604 is reserved */ 3436 /* Slot 605 is reserved */ 3437 /* Slot 606 is reserved */ 3438 /* Slot 607 is reserved */ 3439 /* Slot 608 is reserved */ 3440 /* Slot 609 is reserved */ 3441 /* Slot 610 is reserved */ 3442 /* Slot 611 is reserved */ 3443 /* Slot 612 is reserved */ 3444 /* Slot 613 is reserved */ 3445 /* Slot 614 is reserved */ 3446 /* Slot 615 is reserved */ 3447 /* Slot 616 is reserved */ 3448 /* Slot 617 is reserved */ 3449 /* Slot 618 is reserved */ 3450 /* Slot 619 is reserved */ 3451 /* Slot 620 is reserved */ 3452 /* Slot 621 is reserved */ 3453 /* Slot 622 is reserved */ 3454 /* Slot 623 is reserved */ 3455 /* Slot 624 is reserved */ 3456 /* Slot 625 is reserved */ 3457 /* Slot 626 is reserved */ 3458 /* Slot 627 is reserved */ 3459 /* Slot 628 is reserved */ 3460 /* Slot 629 is reserved */ 3461 #ifndef TclUnusedStubEntry_TCL_DECLARED 3462 #define TclUnusedStubEntry_TCL_DECLARED 3463 /* 630 */ 3464 EXTERN void TclUnusedStubEntry(void); 3465 #endif 3466 3467 typedef struct TclStubHooks { 3468 struct TclPlatStubs *tclPlatStubs; 3469 struct TclIntStubs *tclIntStubs; 3470 struct TclIntPlatStubs *tclIntPlatStubs; 3471 } TclStubHooks; 3472 3473 typedef struct TclStubs { 3474 int magic; 3475 struct TclStubHooks *hooks; 3476 3477 int (*tcl_PkgProvideEx) (Tcl_Interp *interp, CONST char *name, CONST char *version, ClientData clientData); /* 0 */ 3478 CONST84_RETURN char * (*tcl_PkgRequireEx) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact, ClientData *clientDataPtr); /* 1 */ 3479 void (*tcl_Panic) (CONST char *format, ...); /* 2 */ 3480 char * (*tcl_Alloc) (unsigned int size); /* 3 */ 3481 void (*tcl_Free) (char *ptr); /* 4 */ 3482 char * (*tcl_Realloc) (char *ptr, unsigned int size); /* 5 */ 3483 char * (*tcl_DbCkalloc) (unsigned int size, CONST char *file, int line); /* 6 */ 3484 void (*tcl_DbCkfree) (char *ptr, CONST char *file, int line); /* 7 */ 3485 char * (*tcl_DbCkrealloc) (char *ptr, unsigned int size, CONST char *file, int line); /* 8 */ 3486 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 3487 void (*tcl_CreateFileHandler) (int fd, int mask, Tcl_FileProc *proc, ClientData clientData); /* 9 */ 3488 #endif /* UNIX */ 3489 #if defined(__WIN32__) /* WIN */ 3490 VOID *reserved9; 3491 #endif /* WIN */ 3492 #ifdef MAC_OSX_TCL /* MACOSX */ 3493 void (*tcl_CreateFileHandler) (int fd, int mask, Tcl_FileProc *proc, ClientData clientData); /* 9 */ 3494 #endif /* MACOSX */ 3495 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 3496 void (*tcl_DeleteFileHandler) (int fd); /* 10 */ 3497 #endif /* UNIX */ 3498 #if defined(__WIN32__) /* WIN */ 3499 VOID *reserved10; 3500 #endif /* WIN */ 3501 #ifdef MAC_OSX_TCL /* MACOSX */ 3502 void (*tcl_DeleteFileHandler) (int fd); /* 10 */ 3503 #endif /* MACOSX */ 3504 void (*tcl_SetTimer) (Tcl_Time *timePtr); /* 11 */ 3505 void (*tcl_Sleep) (int ms); /* 12 */ 3506 int (*tcl_WaitForEvent) (Tcl_Time *timePtr); /* 13 */ 3507 int (*tcl_AppendAllObjTypes) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 14 */ 3508 void (*tcl_AppendStringsToObj) (Tcl_Obj *objPtr, ...); /* 15 */ 3509 void (*tcl_AppendToObj) (Tcl_Obj *objPtr, CONST char *bytes, int length); /* 16 */ 3510 Tcl_Obj * (*tcl_ConcatObj) (int objc, Tcl_Obj *CONST objv[]); /* 17 */ 3511 int (*tcl_ConvertToType) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_ObjType *typePtr); /* 18 */ 3512 void (*tcl_DbDecrRefCount) (Tcl_Obj *objPtr, CONST char *file, int line); /* 19 */ 3513 void (*tcl_DbIncrRefCount) (Tcl_Obj *objPtr, CONST char *file, int line); /* 20 */ 3514 int (*tcl_DbIsShared) (Tcl_Obj *objPtr, CONST char *file, int line); /* 21 */ 3515 Tcl_Obj * (*tcl_DbNewBooleanObj) (int boolValue, CONST char *file, int line); /* 22 */ 3516 Tcl_Obj * (*tcl_DbNewByteArrayObj) (CONST unsigned char *bytes, int length, CONST char *file, int line); /* 23 */ 3517 Tcl_Obj * (*tcl_DbNewDoubleObj) (double doubleValue, CONST char *file, int line); /* 24 */ 3518 Tcl_Obj * (*tcl_DbNewListObj) (int objc, Tcl_Obj *CONST *objv, CONST char *file, int line); /* 25 */ 3519 Tcl_Obj * (*tcl_DbNewLongObj) (long longValue, CONST char *file, int line); /* 26 */ 3520 Tcl_Obj * (*tcl_DbNewObj) (CONST char *file, int line); /* 27 */ 3521 Tcl_Obj * (*tcl_DbNewStringObj) (CONST char *bytes, int length, CONST char *file, int line); /* 28 */ 3522 Tcl_Obj * (*tcl_DuplicateObj) (Tcl_Obj *objPtr); /* 29 */ 3523 void (*tclFreeObj) (Tcl_Obj *objPtr); /* 30 */ 3524 int (*tcl_GetBoolean) (Tcl_Interp *interp, CONST char *src, int *boolPtr); /* 31 */ 3525 int (*tcl_GetBooleanFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *boolPtr); /* 32 */ 3526 unsigned char * (*tcl_GetByteArrayFromObj) (Tcl_Obj *objPtr, int *lengthPtr); /* 33 */ 3527 int (*tcl_GetDouble) (Tcl_Interp *interp, CONST char *src, double *doublePtr); /* 34 */ 3528 int (*tcl_GetDoubleFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, double *doublePtr); /* 35 */ 3529 int (*tcl_GetIndexFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, CONST84 char **tablePtr, CONST char *msg, int flags, int *indexPtr); /* 36 */ 3530 int (*tcl_GetInt) (Tcl_Interp *interp, CONST char *src, int *intPtr); /* 37 */ 3531 int (*tcl_GetIntFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *intPtr); /* 38 */ 3532 int (*tcl_GetLongFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, long *longPtr); /* 39 */ 3533 Tcl_ObjType * (*tcl_GetObjType) (CONST char *typeName); /* 40 */ 3534 char * (*tcl_GetStringFromObj) (Tcl_Obj *objPtr, int *lengthPtr); /* 41 */ 3535 void (*tcl_InvalidateStringRep) (Tcl_Obj *objPtr); /* 42 */ 3536 int (*tcl_ListObjAppendList) (Tcl_Interp *interp, Tcl_Obj *listPtr, Tcl_Obj *elemListPtr); /* 43 */ 3537 int (*tcl_ListObjAppendElement) (Tcl_Interp *interp, Tcl_Obj *listPtr, Tcl_Obj *objPtr); /* 44 */ 3538 int (*tcl_ListObjGetElements) (Tcl_Interp *interp, Tcl_Obj *listPtr, int *objcPtr, Tcl_Obj ***objvPtr); /* 45 */ 3539 int (*tcl_ListObjIndex) (Tcl_Interp *interp, Tcl_Obj *listPtr, int index, Tcl_Obj **objPtrPtr); /* 46 */ 3540 int (*tcl_ListObjLength) (Tcl_Interp *interp, Tcl_Obj *listPtr, int *lengthPtr); /* 47 */ 3541 int (*tcl_ListObjReplace) (Tcl_Interp *interp, Tcl_Obj *listPtr, int first, int count, int objc, Tcl_Obj *CONST objv[]); /* 48 */ 3542 Tcl_Obj * (*tcl_NewBooleanObj) (int boolValue); /* 49 */ 3543 Tcl_Obj * (*tcl_NewByteArrayObj) (CONST unsigned char *bytes, int length); /* 50 */ 3544 Tcl_Obj * (*tcl_NewDoubleObj) (double doubleValue); /* 51 */ 3545 Tcl_Obj * (*tcl_NewIntObj) (int intValue); /* 52 */ 3546 Tcl_Obj * (*tcl_NewListObj) (int objc, Tcl_Obj *CONST objv[]); /* 53 */ 3547 Tcl_Obj * (*tcl_NewLongObj) (long longValue); /* 54 */ 3548 Tcl_Obj * (*tcl_NewObj) (void); /* 55 */ 3549 Tcl_Obj * (*tcl_NewStringObj) (CONST char *bytes, int length); /* 56 */ 3550 void (*tcl_SetBooleanObj) (Tcl_Obj *objPtr, int boolValue); /* 57 */ 3551 unsigned char * (*tcl_SetByteArrayLength) (Tcl_Obj *objPtr, int length); /* 58 */ 3552 void (*tcl_SetByteArrayObj) (Tcl_Obj *objPtr, CONST unsigned char *bytes, int length); /* 59 */ 3553 void (*tcl_SetDoubleObj) (Tcl_Obj *objPtr, double doubleValue); /* 60 */ 3554 void (*tcl_SetIntObj) (Tcl_Obj *objPtr, int intValue); /* 61 */ 3555 void (*tcl_SetListObj) (Tcl_Obj *objPtr, int objc, Tcl_Obj *CONST objv[]); /* 62 */ 3556 void (*tcl_SetLongObj) (Tcl_Obj *objPtr, long longValue); /* 63 */ 3557 void (*tcl_SetObjLength) (Tcl_Obj *objPtr, int length); /* 64 */ 3558 void (*tcl_SetStringObj) (Tcl_Obj *objPtr, CONST char *bytes, int length); /* 65 */ 3559 void (*tcl_AddErrorInfo) (Tcl_Interp *interp, CONST char *message); /* 66 */ 3560 void (*tcl_AddObjErrorInfo) (Tcl_Interp *interp, CONST char *message, int length); /* 67 */ 3561 void (*tcl_AllowExceptions) (Tcl_Interp *interp); /* 68 */ 3562 void (*tcl_AppendElement) (Tcl_Interp *interp, CONST char *element); /* 69 */ 3563 void (*tcl_AppendResult) (Tcl_Interp *interp, ...); /* 70 */ 3564 Tcl_AsyncHandler (*tcl_AsyncCreate) (Tcl_AsyncProc *proc, ClientData clientData); /* 71 */ 3565 void (*tcl_AsyncDelete) (Tcl_AsyncHandler async); /* 72 */ 3566 int (*tcl_AsyncInvoke) (Tcl_Interp *interp, int code); /* 73 */ 3567 void (*tcl_AsyncMark) (Tcl_AsyncHandler async); /* 74 */ 3568 int (*tcl_AsyncReady) (void); /* 75 */ 3569 void (*tcl_BackgroundError) (Tcl_Interp *interp); /* 76 */ 3570 char (*tcl_Backslash) (CONST char *src, int *readPtr); /* 77 */ 3571 int (*tcl_BadChannelOption) (Tcl_Interp *interp, CONST char *optionName, CONST char *optionList); /* 78 */ 3572 void (*tcl_CallWhenDeleted) (Tcl_Interp *interp, Tcl_InterpDeleteProc *proc, ClientData clientData); /* 79 */ 3573 void (*tcl_CancelIdleCall) (Tcl_IdleProc *idleProc, ClientData clientData); /* 80 */ 3574 int (*tcl_Close) (Tcl_Interp *interp, Tcl_Channel chan); /* 81 */ 3575 int (*tcl_CommandComplete) (CONST char *cmd); /* 82 */ 3576 char * (*tcl_Concat) (int argc, CONST84 char *CONST *argv); /* 83 */ 3577 int (*tcl_ConvertElement) (CONST char *src, char *dst, int flags); /* 84 */ 3578 int (*tcl_ConvertCountedElement) (CONST char *src, int length, char *dst, int flags); /* 85 */ 3579 int (*tcl_CreateAlias) (Tcl_Interp *slave, CONST char *slaveCmd, Tcl_Interp *target, CONST char *targetCmd, int argc, CONST84 char *CONST *argv); /* 86 */ 3580 int (*tcl_CreateAliasObj) (Tcl_Interp *slave, CONST char *slaveCmd, Tcl_Interp *target, CONST char *targetCmd, int objc, Tcl_Obj *CONST objv[]); /* 87 */ 3581 Tcl_Channel (*tcl_CreateChannel) (Tcl_ChannelType *typePtr, CONST char *chanName, ClientData instanceData, int mask); /* 88 */ 3582 void (*tcl_CreateChannelHandler) (Tcl_Channel chan, int mask, Tcl_ChannelProc *proc, ClientData clientData); /* 89 */ 3583 void (*tcl_CreateCloseHandler) (Tcl_Channel chan, Tcl_CloseProc *proc, ClientData clientData); /* 90 */ 3584 Tcl_Command (*tcl_CreateCommand) (Tcl_Interp *interp, CONST char *cmdName, Tcl_CmdProc *proc, ClientData clientData, Tcl_CmdDeleteProc *deleteProc); /* 91 */ 3585 void (*tcl_CreateEventSource) (Tcl_EventSetupProc *setupProc, Tcl_EventCheckProc *checkProc, ClientData clientData); /* 92 */ 3586 void (*tcl_CreateExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 93 */ 3587 Tcl_Interp * (*tcl_CreateInterp) (void); /* 94 */ 3588 void (*tcl_CreateMathFunc) (Tcl_Interp *interp, CONST char *name, int numArgs, Tcl_ValueType *argTypes, Tcl_MathProc *proc, ClientData clientData); /* 95 */ 3589 Tcl_Command (*tcl_CreateObjCommand) (Tcl_Interp *interp, CONST char *cmdName, Tcl_ObjCmdProc *proc, ClientData clientData, Tcl_CmdDeleteProc *deleteProc); /* 96 */ 3590 Tcl_Interp * (*tcl_CreateSlave) (Tcl_Interp *interp, CONST char *slaveName, int isSafe); /* 97 */ 3591 Tcl_TimerToken (*tcl_CreateTimerHandler) (int milliseconds, Tcl_TimerProc *proc, ClientData clientData); /* 98 */ 3592 Tcl_Trace (*tcl_CreateTrace) (Tcl_Interp *interp, int level, Tcl_CmdTraceProc *proc, ClientData clientData); /* 99 */ 3593 void (*tcl_DeleteAssocData) (Tcl_Interp *interp, CONST char *name); /* 100 */ 3594 void (*tcl_DeleteChannelHandler) (Tcl_Channel chan, Tcl_ChannelProc *proc, ClientData clientData); /* 101 */ 3595 void (*tcl_DeleteCloseHandler) (Tcl_Channel chan, Tcl_CloseProc *proc, ClientData clientData); /* 102 */ 3596 int (*tcl_DeleteCommand) (Tcl_Interp *interp, CONST char *cmdName); /* 103 */ 3597 int (*tcl_DeleteCommandFromToken) (Tcl_Interp *interp, Tcl_Command command); /* 104 */ 3598 void (*tcl_DeleteEvents) (Tcl_EventDeleteProc *proc, ClientData clientData); /* 105 */ 3599 void (*tcl_DeleteEventSource) (Tcl_EventSetupProc *setupProc, Tcl_EventCheckProc *checkProc, ClientData clientData); /* 106 */ 3600 void (*tcl_DeleteExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 107 */ 3601 void (*tcl_DeleteHashEntry) (Tcl_HashEntry *entryPtr); /* 108 */ 3602 void (*tcl_DeleteHashTable) (Tcl_HashTable *tablePtr); /* 109 */ 3603 void (*tcl_DeleteInterp) (Tcl_Interp *interp); /* 110 */ 3604 void (*tcl_DetachPids) (int numPids, Tcl_Pid *pidPtr); /* 111 */ 3605 void (*tcl_DeleteTimerHandler) (Tcl_TimerToken token); /* 112 */ 3606 void (*tcl_DeleteTrace) (Tcl_Interp *interp, Tcl_Trace trace); /* 113 */ 3607 void (*tcl_DontCallWhenDeleted) (Tcl_Interp *interp, Tcl_InterpDeleteProc *proc, ClientData clientData); /* 114 */ 3608 int (*tcl_DoOneEvent) (int flags); /* 115 */ 3609 void (*tcl_DoWhenIdle) (Tcl_IdleProc *proc, ClientData clientData); /* 116 */ 3610 char * (*tcl_DStringAppend) (Tcl_DString *dsPtr, CONST char *bytes, int length); /* 117 */ 3611 char * (*tcl_DStringAppendElement) (Tcl_DString *dsPtr, CONST char *element); /* 118 */ 3612 void (*tcl_DStringEndSublist) (Tcl_DString *dsPtr); /* 119 */ 3613 void (*tcl_DStringFree) (Tcl_DString *dsPtr); /* 120 */ 3614 void (*tcl_DStringGetResult) (Tcl_Interp *interp, Tcl_DString *dsPtr); /* 121 */ 3615 void (*tcl_DStringInit) (Tcl_DString *dsPtr); /* 122 */ 3616 void (*tcl_DStringResult) (Tcl_Interp *interp, Tcl_DString *dsPtr); /* 123 */ 3617 void (*tcl_DStringSetLength) (Tcl_DString *dsPtr, int length); /* 124 */ 3618 void (*tcl_DStringStartSublist) (Tcl_DString *dsPtr); /* 125 */ 3619 int (*tcl_Eof) (Tcl_Channel chan); /* 126 */ 3620 CONST84_RETURN char * (*tcl_ErrnoId) (void); /* 127 */ 3621 CONST84_RETURN char * (*tcl_ErrnoMsg) (int err); /* 128 */ 3622 int (*tcl_Eval) (Tcl_Interp *interp, CONST char *script); /* 129 */ 3623 int (*tcl_EvalFile) (Tcl_Interp *interp, CONST char *fileName); /* 130 */ 3624 int (*tcl_EvalObj) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 131 */ 3625 void (*tcl_EventuallyFree) (ClientData clientData, Tcl_FreeProc *freeProc); /* 132 */ 3626 void (*tcl_Exit) (int status); /* 133 */ 3627 int (*tcl_ExposeCommand) (Tcl_Interp *interp, CONST char *hiddenCmdToken, CONST char *cmdName); /* 134 */ 3628 int (*tcl_ExprBoolean) (Tcl_Interp *interp, CONST char *expr, int *ptr); /* 135 */ 3629 int (*tcl_ExprBooleanObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *ptr); /* 136 */ 3630 int (*tcl_ExprDouble) (Tcl_Interp *interp, CONST char *expr, double *ptr); /* 137 */ 3631 int (*tcl_ExprDoubleObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, double *ptr); /* 138 */ 3632 int (*tcl_ExprLong) (Tcl_Interp *interp, CONST char *expr, long *ptr); /* 139 */ 3633 int (*tcl_ExprLongObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, long *ptr); /* 140 */ 3634 int (*tcl_ExprObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_Obj **resultPtrPtr); /* 141 */ 3635 int (*tcl_ExprString) (Tcl_Interp *interp, CONST char *expr); /* 142 */ 3636 void (*tcl_Finalize) (void); /* 143 */ 3637 void (*tcl_FindExecutable) (CONST char *argv0); /* 144 */ 3638 Tcl_HashEntry * (*tcl_FirstHashEntry) (Tcl_HashTable *tablePtr, Tcl_HashSearch *searchPtr); /* 145 */ 3639 int (*tcl_Flush) (Tcl_Channel chan); /* 146 */ 3640 void (*tcl_FreeResult) (Tcl_Interp *interp); /* 147 */ 3641 int (*tcl_GetAlias) (Tcl_Interp *interp, CONST char *slaveCmd, Tcl_Interp **targetInterpPtr, CONST84 char **targetCmdPtr, int *argcPtr, CONST84 char ***argvPtr); /* 148 */ 3642 int (*tcl_GetAliasObj) (Tcl_Interp *interp, CONST char *slaveCmd, Tcl_Interp **targetInterpPtr, CONST84 char **targetCmdPtr, int *objcPtr, Tcl_Obj ***objv); /* 149 */ 3643 ClientData (*tcl_GetAssocData) (Tcl_Interp *interp, CONST char *name, Tcl_InterpDeleteProc **procPtr); /* 150 */ 3644 Tcl_Channel (*tcl_GetChannel) (Tcl_Interp *interp, CONST char *chanName, int *modePtr); /* 151 */ 3645 int (*tcl_GetChannelBufferSize) (Tcl_Channel chan); /* 152 */ 3646 int (*tcl_GetChannelHandle) (Tcl_Channel chan, int direction, ClientData *handlePtr); /* 153 */ 3647 ClientData (*tcl_GetChannelInstanceData) (Tcl_Channel chan); /* 154 */ 3648 int (*tcl_GetChannelMode) (Tcl_Channel chan); /* 155 */ 3649 CONST84_RETURN char * (*tcl_GetChannelName) (Tcl_Channel chan); /* 156 */ 3650 int (*tcl_GetChannelOption) (Tcl_Interp *interp, Tcl_Channel chan, CONST char *optionName, Tcl_DString *dsPtr); /* 157 */ 3651 Tcl_ChannelType * (*tcl_GetChannelType) (Tcl_Channel chan); /* 158 */ 3652 int (*tcl_GetCommandInfo) (Tcl_Interp *interp, CONST char *cmdName, Tcl_CmdInfo *infoPtr); /* 159 */ 3653 CONST84_RETURN char * (*tcl_GetCommandName) (Tcl_Interp *interp, Tcl_Command command); /* 160 */ 3654 int (*tcl_GetErrno) (void); /* 161 */ 3655 CONST84_RETURN char * (*tcl_GetHostName) (void); /* 162 */ 3656 int (*tcl_GetInterpPath) (Tcl_Interp *askInterp, Tcl_Interp *slaveInterp); /* 163 */ 3657 Tcl_Interp * (*tcl_GetMaster) (Tcl_Interp *interp); /* 164 */ 3658 CONST char * (*tcl_GetNameOfExecutable) (void); /* 165 */ 3659 Tcl_Obj * (*tcl_GetObjResult) (Tcl_Interp *interp); /* 166 */ 3660 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 3661 int (*tcl_GetOpenFile) (Tcl_Interp *interp, CONST char *chanID, int forWriting, int checkUsage, ClientData *filePtr); /* 167 */ 3662 #endif /* UNIX */ 3663 #if defined(__WIN32__) /* WIN */ 3664 VOID *reserved167; 3665 #endif /* WIN */ 3666 #ifdef MAC_OSX_TCL /* MACOSX */ 3667 int (*tcl_GetOpenFile) (Tcl_Interp *interp, CONST char *chanID, int forWriting, int checkUsage, ClientData *filePtr); /* 167 */ 3668 #endif /* MACOSX */ 3669 Tcl_PathType (*tcl_GetPathType) (CONST char *path); /* 168 */ 3670 int (*tcl_Gets) (Tcl_Channel chan, Tcl_DString *dsPtr); /* 169 */ 3671 int (*tcl_GetsObj) (Tcl_Channel chan, Tcl_Obj *objPtr); /* 170 */ 3672 int (*tcl_GetServiceMode) (void); /* 171 */ 3673 Tcl_Interp * (*tcl_GetSlave) (Tcl_Interp *interp, CONST char *slaveName); /* 172 */ 3674 Tcl_Channel (*tcl_GetStdChannel) (int type); /* 173 */ 3675 CONST84_RETURN char * (*tcl_GetStringResult) (Tcl_Interp *interp); /* 174 */ 3676 CONST84_RETURN char * (*tcl_GetVar) (Tcl_Interp *interp, CONST char *varName, int flags); /* 175 */ 3677 CONST84_RETURN char * (*tcl_GetVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags); /* 176 */ 3678 int (*tcl_GlobalEval) (Tcl_Interp *interp, CONST char *command); /* 177 */ 3679 int (*tcl_GlobalEvalObj) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 178 */ 3680 int (*tcl_HideCommand) (Tcl_Interp *interp, CONST char *cmdName, CONST char *hiddenCmdToken); /* 179 */ 3681 int (*tcl_Init) (Tcl_Interp *interp); /* 180 */ 3682 void (*tcl_InitHashTable) (Tcl_HashTable *tablePtr, int keyType); /* 181 */ 3683 int (*tcl_InputBlocked) (Tcl_Channel chan); /* 182 */ 3684 int (*tcl_InputBuffered) (Tcl_Channel chan); /* 183 */ 3685 int (*tcl_InterpDeleted) (Tcl_Interp *interp); /* 184 */ 3686 int (*tcl_IsSafe) (Tcl_Interp *interp); /* 185 */ 3687 char * (*tcl_JoinPath) (int argc, CONST84 char *CONST *argv, Tcl_DString *resultPtr); /* 186 */ 3688 int (*tcl_LinkVar) (Tcl_Interp *interp, CONST char *varName, char *addr, int type); /* 187 */ 3689 VOID *reserved188; 3690 Tcl_Channel (*tcl_MakeFileChannel) (ClientData handle, int mode); /* 189 */ 3691 int (*tcl_MakeSafe) (Tcl_Interp *interp); /* 190 */ 3692 Tcl_Channel (*tcl_MakeTcpClientChannel) (ClientData tcpSocket); /* 191 */ 3693 char * (*tcl_Merge) (int argc, CONST84 char *CONST *argv); /* 192 */ 3694 Tcl_HashEntry * (*tcl_NextHashEntry) (Tcl_HashSearch *searchPtr); /* 193 */ 3695 void (*tcl_NotifyChannel) (Tcl_Channel channel, int mask); /* 194 */ 3696 Tcl_Obj * (*tcl_ObjGetVar2) (Tcl_Interp *interp, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, int flags); /* 195 */ 3697 Tcl_Obj * (*tcl_ObjSetVar2) (Tcl_Interp *interp, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, int flags); /* 196 */ 3698 Tcl_Channel (*tcl_OpenCommandChannel) (Tcl_Interp *interp, int argc, CONST84 char **argv, int flags); /* 197 */ 3699 Tcl_Channel (*tcl_OpenFileChannel) (Tcl_Interp *interp, CONST char *fileName, CONST char *modeString, int permissions); /* 198 */ 3700 Tcl_Channel (*tcl_OpenTcpClient) (Tcl_Interp *interp, int port, CONST char *address, CONST char *myaddr, int myport, int async); /* 199 */ 3701 Tcl_Channel (*tcl_OpenTcpServer) (Tcl_Interp *interp, int port, CONST char *host, Tcl_TcpAcceptProc *acceptProc, ClientData callbackData); /* 200 */ 3702 void (*tcl_Preserve) (ClientData data); /* 201 */ 3703 void (*tcl_PrintDouble) (Tcl_Interp *interp, double value, char *dst); /* 202 */ 3704 int (*tcl_PutEnv) (CONST char *assignment); /* 203 */ 3705 CONST84_RETURN char * (*tcl_PosixError) (Tcl_Interp *interp); /* 204 */ 3706 void (*tcl_QueueEvent) (Tcl_Event *evPtr, Tcl_QueuePosition position); /* 205 */ 3707 int (*tcl_Read) (Tcl_Channel chan, char *bufPtr, int toRead); /* 206 */ 3708 void (*tcl_ReapDetachedProcs) (void); /* 207 */ 3709 int (*tcl_RecordAndEval) (Tcl_Interp *interp, CONST char *cmd, int flags); /* 208 */ 3710 int (*tcl_RecordAndEvalObj) (Tcl_Interp *interp, Tcl_Obj *cmdPtr, int flags); /* 209 */ 3711 void (*tcl_RegisterChannel) (Tcl_Interp *interp, Tcl_Channel chan); /* 210 */ 3712 void (*tcl_RegisterObjType) (Tcl_ObjType *typePtr); /* 211 */ 3713 Tcl_RegExp (*tcl_RegExpCompile) (Tcl_Interp *interp, CONST char *pattern); /* 212 */ 3714 int (*tcl_RegExpExec) (Tcl_Interp *interp, Tcl_RegExp regexp, CONST char *text, CONST char *start); /* 213 */ 3715 int (*tcl_RegExpMatch) (Tcl_Interp *interp, CONST char *text, CONST char *pattern); /* 214 */ 3716 void (*tcl_RegExpRange) (Tcl_RegExp regexp, int index, CONST84 char **startPtr, CONST84 char **endPtr); /* 215 */ 3717 void (*tcl_Release) (ClientData clientData); /* 216 */ 3718 void (*tcl_ResetResult) (Tcl_Interp *interp); /* 217 */ 3719 int (*tcl_ScanElement) (CONST char *src, int *flagPtr); /* 218 */ 3720 int (*tcl_ScanCountedElement) (CONST char *src, int length, int *flagPtr); /* 219 */ 3721 int (*tcl_SeekOld) (Tcl_Channel chan, int offset, int mode); /* 220 */ 3722 int (*tcl_ServiceAll) (void); /* 221 */ 3723 int (*tcl_ServiceEvent) (int flags); /* 222 */ 3724 void (*tcl_SetAssocData) (Tcl_Interp *interp, CONST char *name, Tcl_InterpDeleteProc *proc, ClientData clientData); /* 223 */ 3725 void (*tcl_SetChannelBufferSize) (Tcl_Channel chan, int sz); /* 224 */ 3726 int (*tcl_SetChannelOption) (Tcl_Interp *interp, Tcl_Channel chan, CONST char *optionName, CONST char *newValue); /* 225 */ 3727 int (*tcl_SetCommandInfo) (Tcl_Interp *interp, CONST char *cmdName, CONST Tcl_CmdInfo *infoPtr); /* 226 */ 3728 void (*tcl_SetErrno) (int err); /* 227 */ 3729 void (*tcl_SetErrorCode) (Tcl_Interp *interp, ...); /* 228 */ 3730 void (*tcl_SetMaxBlockTime) (Tcl_Time *timePtr); /* 229 */ 3731 void (*tcl_SetPanicProc) (Tcl_PanicProc *panicProc); /* 230 */ 3732 int (*tcl_SetRecursionLimit) (Tcl_Interp *interp, int depth); /* 231 */ 3733 void (*tcl_SetResult) (Tcl_Interp *interp, char *result, Tcl_FreeProc *freeProc); /* 232 */ 3734 int (*tcl_SetServiceMode) (int mode); /* 233 */ 3735 void (*tcl_SetObjErrorCode) (Tcl_Interp *interp, Tcl_Obj *errorObjPtr); /* 234 */ 3736 void (*tcl_SetObjResult) (Tcl_Interp *interp, Tcl_Obj *resultObjPtr); /* 235 */ 3737 void (*tcl_SetStdChannel) (Tcl_Channel channel, int type); /* 236 */ 3738 CONST84_RETURN char * (*tcl_SetVar) (Tcl_Interp *interp, CONST char *varName, CONST char *newValue, int flags); /* 237 */ 3739 CONST84_RETURN char * (*tcl_SetVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, CONST char *newValue, int flags); /* 238 */ 3740 CONST84_RETURN char * (*tcl_SignalId) (int sig); /* 239 */ 3741 CONST84_RETURN char * (*tcl_SignalMsg) (int sig); /* 240 */ 3742 void (*tcl_SourceRCFile) (Tcl_Interp *interp); /* 241 */ 3743 int (*tcl_SplitList) (Tcl_Interp *interp, CONST char *listStr, int *argcPtr, CONST84 char ***argvPtr); /* 242 */ 3744 void (*tcl_SplitPath) (CONST char *path, int *argcPtr, CONST84 char ***argvPtr); /* 243 */ 3745 void (*tcl_StaticPackage) (Tcl_Interp *interp, CONST char *pkgName, Tcl_PackageInitProc *initProc, Tcl_PackageInitProc *safeInitProc); /* 244 */ 3746 int (*tcl_StringMatch) (CONST char *str, CONST char *pattern); /* 245 */ 3747 int (*tcl_TellOld) (Tcl_Channel chan); /* 246 */ 3748 int (*tcl_TraceVar) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 247 */ 3749 int (*tcl_TraceVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 248 */ 3750 char * (*tcl_TranslateFileName) (Tcl_Interp *interp, CONST char *name, Tcl_DString *bufferPtr); /* 249 */ 3751 int (*tcl_Ungets) (Tcl_Channel chan, CONST char *str, int len, int atHead); /* 250 */ 3752 void (*tcl_UnlinkVar) (Tcl_Interp *interp, CONST char *varName); /* 251 */ 3753 int (*tcl_UnregisterChannel) (Tcl_Interp *interp, Tcl_Channel chan); /* 252 */ 3754 int (*tcl_UnsetVar) (Tcl_Interp *interp, CONST char *varName, int flags); /* 253 */ 3755 int (*tcl_UnsetVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags); /* 254 */ 3756 void (*tcl_UntraceVar) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 255 */ 3757 void (*tcl_UntraceVar2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags, Tcl_VarTraceProc *proc, ClientData clientData); /* 256 */ 3758 void (*tcl_UpdateLinkedVar) (Tcl_Interp *interp, CONST char *varName); /* 257 */ 3759 int (*tcl_UpVar) (Tcl_Interp *interp, CONST char *frameName, CONST char *varName, CONST char *localName, int flags); /* 258 */ 3760 int (*tcl_UpVar2) (Tcl_Interp *interp, CONST char *frameName, CONST char *part1, CONST char *part2, CONST char *localName, int flags); /* 259 */ 3761 int (*tcl_VarEval) (Tcl_Interp *interp, ...); /* 260 */ 3762 ClientData (*tcl_VarTraceInfo) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_VarTraceProc *procPtr, ClientData prevClientData); /* 261 */ 3763 ClientData (*tcl_VarTraceInfo2) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags, Tcl_VarTraceProc *procPtr, ClientData prevClientData); /* 262 */ 3764 int (*tcl_Write) (Tcl_Channel chan, CONST char *s, int slen); /* 263 */ 3765 void (*tcl_WrongNumArgs) (Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[], CONST char *message); /* 264 */ 3766 int (*tcl_DumpActiveMemory) (CONST char *fileName); /* 265 */ 3767 void (*tcl_ValidateAllMemory) (CONST char *file, int line); /* 266 */ 3768 void (*tcl_AppendResultVA) (Tcl_Interp *interp, va_list argList); /* 267 */ 3769 void (*tcl_AppendStringsToObjVA) (Tcl_Obj *objPtr, va_list argList); /* 268 */ 3770 char * (*tcl_HashStats) (Tcl_HashTable *tablePtr); /* 269 */ 3771 CONST84_RETURN char * (*tcl_ParseVar) (Tcl_Interp *interp, CONST char *start, CONST84 char **termPtr); /* 270 */ 3772 CONST84_RETURN char * (*tcl_PkgPresent) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact); /* 271 */ 3773 CONST84_RETURN char * (*tcl_PkgPresentEx) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact, ClientData *clientDataPtr); /* 272 */ 3774 int (*tcl_PkgProvide) (Tcl_Interp *interp, CONST char *name, CONST char *version); /* 273 */ 3775 CONST84_RETURN char * (*tcl_PkgRequire) (Tcl_Interp *interp, CONST char *name, CONST char *version, int exact); /* 274 */ 3776 void (*tcl_SetErrorCodeVA) (Tcl_Interp *interp, va_list argList); /* 275 */ 3777 int (*tcl_VarEvalVA) (Tcl_Interp *interp, va_list argList); /* 276 */ 3778 Tcl_Pid (*tcl_WaitPid) (Tcl_Pid pid, int *statPtr, int options); /* 277 */ 3779 void (*tcl_PanicVA) (CONST char *format, va_list argList); /* 278 */ 3780 void (*tcl_GetVersion) (int *major, int *minor, int *patchLevel, int *type); /* 279 */ 3781 void (*tcl_InitMemory) (Tcl_Interp *interp); /* 280 */ 3782 Tcl_Channel (*tcl_StackChannel) (Tcl_Interp *interp, Tcl_ChannelType *typePtr, ClientData instanceData, int mask, Tcl_Channel prevChan); /* 281 */ 3783 int (*tcl_UnstackChannel) (Tcl_Interp *interp, Tcl_Channel chan); /* 282 */ 3784 Tcl_Channel (*tcl_GetStackedChannel) (Tcl_Channel chan); /* 283 */ 3785 void (*tcl_SetMainLoop) (Tcl_MainLoopProc *proc); /* 284 */ 3786 VOID *reserved285; 3787 void (*tcl_AppendObjToObj) (Tcl_Obj *objPtr, Tcl_Obj *appendObjPtr); /* 286 */ 3788 Tcl_Encoding (*tcl_CreateEncoding) (CONST Tcl_EncodingType *typePtr); /* 287 */ 3789 void (*tcl_CreateThreadExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 288 */ 3790 void (*tcl_DeleteThreadExitHandler) (Tcl_ExitProc *proc, ClientData clientData); /* 289 */ 3791 void (*tcl_DiscardResult) (Tcl_SavedResult *statePtr); /* 290 */ 3792 int (*tcl_EvalEx) (Tcl_Interp *interp, CONST char *script, int numBytes, int flags); /* 291 */ 3793 int (*tcl_EvalObjv) (Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[], int flags); /* 292 */ 3794 int (*tcl_EvalObjEx) (Tcl_Interp *interp, Tcl_Obj *objPtr, int flags); /* 293 */ 3795 void (*tcl_ExitThread) (int status); /* 294 */ 3796 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 */ 3797 char * (*tcl_ExternalToUtfDString) (Tcl_Encoding encoding, CONST char *src, int srcLen, Tcl_DString *dsPtr); /* 296 */ 3798 void (*tcl_FinalizeThread) (void); /* 297 */ 3799 void (*tcl_FinalizeNotifier) (ClientData clientData); /* 298 */ 3800 void (*tcl_FreeEncoding) (Tcl_Encoding encoding); /* 299 */ 3801 Tcl_ThreadId (*tcl_GetCurrentThread) (void); /* 300 */ 3802 Tcl_Encoding (*tcl_GetEncoding) (Tcl_Interp *interp, CONST char *name); /* 301 */ 3803 CONST84_RETURN char * (*tcl_GetEncodingName) (Tcl_Encoding encoding); /* 302 */ 3804 void (*tcl_GetEncodingNames) (Tcl_Interp *interp); /* 303 */ 3805 int (*tcl_GetIndexFromObjStruct) (Tcl_Interp *interp, Tcl_Obj *objPtr, CONST VOID *tablePtr, int offset, CONST char *msg, int flags, int *indexPtr); /* 304 */ 3806 VOID * (*tcl_GetThreadData) (Tcl_ThreadDataKey *keyPtr, int size); /* 305 */ 3807 Tcl_Obj * (*tcl_GetVar2Ex) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, int flags); /* 306 */ 3808 ClientData (*tcl_InitNotifier) (void); /* 307 */ 3809 void (*tcl_MutexLock) (Tcl_Mutex *mutexPtr); /* 308 */ 3810 void (*tcl_MutexUnlock) (Tcl_Mutex *mutexPtr); /* 309 */ 3811 void (*tcl_ConditionNotify) (Tcl_Condition *condPtr); /* 310 */ 3812 void (*tcl_ConditionWait) (Tcl_Condition *condPtr, Tcl_Mutex *mutexPtr, Tcl_Time *timePtr); /* 311 */ 3813 int (*tcl_NumUtfChars) (CONST char *src, int length); /* 312 */ 3814 int (*tcl_ReadChars) (Tcl_Channel channel, Tcl_Obj *objPtr, int charsToRead, int appendFlag); /* 313 */ 3815 void (*tcl_RestoreResult) (Tcl_Interp *interp, Tcl_SavedResult *statePtr); /* 314 */ 3816 void (*tcl_SaveResult) (Tcl_Interp *interp, Tcl_SavedResult *statePtr); /* 315 */ 3817 int (*tcl_SetSystemEncoding) (Tcl_Interp *interp, CONST char *name); /* 316 */ 3818 Tcl_Obj * (*tcl_SetVar2Ex) (Tcl_Interp *interp, CONST char *part1, CONST char *part2, Tcl_Obj *newValuePtr, int flags); /* 317 */ 3819 void (*tcl_ThreadAlert) (Tcl_ThreadId threadId); /* 318 */ 3820 void (*tcl_ThreadQueueEvent) (Tcl_ThreadId threadId, Tcl_Event *evPtr, Tcl_QueuePosition position); /* 319 */ 3821 Tcl_UniChar (*tcl_UniCharAtIndex) (CONST char *src, int index); /* 320 */ 3822 Tcl_UniChar (*tcl_UniCharToLower) (int ch); /* 321 */ 3823 Tcl_UniChar (*tcl_UniCharToTitle) (int ch); /* 322 */ 3824 Tcl_UniChar (*tcl_UniCharToUpper) (int ch); /* 323 */ 3825 int (*tcl_UniCharToUtf) (int ch, char *buf); /* 324 */ 3826 CONST84_RETURN char * (*tcl_UtfAtIndex) (CONST char *src, int index); /* 325 */ 3827 int (*tcl_UtfCharComplete) (CONST char *src, int length); /* 326 */ 3828 int (*tcl_UtfBackslash) (CONST char *src, int *readPtr, char *dst); /* 327 */ 3829 CONST84_RETURN char * (*tcl_UtfFindFirst) (CONST char *src, int ch); /* 328 */ 3830 CONST84_RETURN char * (*tcl_UtfFindLast) (CONST char *src, int ch); /* 329 */ 3831 CONST84_RETURN char * (*tcl_UtfNext) (CONST char *src); /* 330 */ 3832 CONST84_RETURN char * (*tcl_UtfPrev) (CONST char *src, CONST char *start); /* 331 */ 3833 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 */ 3834 char * (*tcl_UtfToExternalDString) (Tcl_Encoding encoding, CONST char *src, int srcLen, Tcl_DString *dsPtr); /* 333 */ 3835 int (*tcl_UtfToLower) (char *src); /* 334 */ 3836 int (*tcl_UtfToTitle) (char *src); /* 335 */ 3837 int (*tcl_UtfToUniChar) (CONST char *src, Tcl_UniChar *chPtr); /* 336 */ 3838 int (*tcl_UtfToUpper) (char *src); /* 337 */ 3839 int (*tcl_WriteChars) (Tcl_Channel chan, CONST char *src, int srcLen); /* 338 */ 3840 int (*tcl_WriteObj) (Tcl_Channel chan, Tcl_Obj *objPtr); /* 339 */ 3841 char * (*tcl_GetString) (Tcl_Obj *objPtr); /* 340 */ 3842 CONST84_RETURN char * (*tcl_GetDefaultEncodingDir) (void); /* 341 */ 3843 void (*tcl_SetDefaultEncodingDir) (CONST char *path); /* 342 */ 3844 void (*tcl_AlertNotifier) (ClientData clientData); /* 343 */ 3845 void (*tcl_ServiceModeHook) (int mode); /* 344 */ 3846 int (*tcl_UniCharIsAlnum) (int ch); /* 345 */ 3847 int (*tcl_UniCharIsAlpha) (int ch); /* 346 */ 3848 int (*tcl_UniCharIsDigit) (int ch); /* 347 */ 3849 int (*tcl_UniCharIsLower) (int ch); /* 348 */ 3850 int (*tcl_UniCharIsSpace) (int ch); /* 349 */ 3851 int (*tcl_UniCharIsUpper) (int ch); /* 350 */ 3852 int (*tcl_UniCharIsWordChar) (int ch); /* 351 */ 3853 int (*tcl_UniCharLen) (CONST Tcl_UniChar *uniStr); /* 352 */ 3854 int (*tcl_UniCharNcmp) (CONST Tcl_UniChar *ucs, CONST Tcl_UniChar *uct, unsigned long numChars); /* 353 */ 3855 char * (*tcl_UniCharToUtfDString) (CONST Tcl_UniChar *uniStr, int uniLength, Tcl_DString *dsPtr); /* 354 */ 3856 Tcl_UniChar * (*tcl_UtfToUniCharDString) (CONST char *src, int length, Tcl_DString *dsPtr); /* 355 */ 3857 Tcl_RegExp (*tcl_GetRegExpFromObj) (Tcl_Interp *interp, Tcl_Obj *patObj, int flags); /* 356 */ 3858 Tcl_Obj * (*tcl_EvalTokens) (Tcl_Interp *interp, Tcl_Token *tokenPtr, int count); /* 357 */ 3859 void (*tcl_FreeParse) (Tcl_Parse *parsePtr); /* 358 */ 3860 void (*tcl_LogCommandInfo) (Tcl_Interp *interp, CONST char *script, CONST char *command, int length); /* 359 */ 3861 int (*tcl_ParseBraces) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr, int append, CONST84 char **termPtr); /* 360 */ 3862 int (*tcl_ParseCommand) (Tcl_Interp *interp, CONST char *start, int numBytes, int nested, Tcl_Parse *parsePtr); /* 361 */ 3863 int (*tcl_ParseExpr) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr); /* 362 */ 3864 int (*tcl_ParseQuotedString) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr, int append, CONST84 char **termPtr); /* 363 */ 3865 int (*tcl_ParseVarName) (Tcl_Interp *interp, CONST char *start, int numBytes, Tcl_Parse *parsePtr, int append); /* 364 */ 3866 char * (*tcl_GetCwd) (Tcl_Interp *interp, Tcl_DString *cwdPtr); /* 365 */ 3867 int (*tcl_Chdir) (CONST char *dirName); /* 366 */ 3868 int (*tcl_Access) (CONST char *path, int mode); /* 367 */ 3869 int (*tcl_Stat) (CONST char *path, struct stat *bufPtr); /* 368 */ 3870 int (*tcl_UtfNcmp) (CONST char *s1, CONST char *s2, unsigned long n); /* 369 */ 3871 int (*tcl_UtfNcasecmp) (CONST char *s1, CONST char *s2, unsigned long n); /* 370 */ 3872 int (*tcl_StringCaseMatch) (CONST char *str, CONST char *pattern, int nocase); /* 371 */ 3873 int (*tcl_UniCharIsControl) (int ch); /* 372 */ 3874 int (*tcl_UniCharIsGraph) (int ch); /* 373 */ 3875 int (*tcl_UniCharIsPrint) (int ch); /* 374 */ 3876 int (*tcl_UniCharIsPunct) (int ch); /* 375 */ 3877 int (*tcl_RegExpExecObj) (Tcl_Interp *interp, Tcl_RegExp regexp, Tcl_Obj *textObj, int offset, int nmatches, int flags); /* 376 */ 3878 void (*tcl_RegExpGetInfo) (Tcl_RegExp regexp, Tcl_RegExpInfo *infoPtr); /* 377 */ 3879 Tcl_Obj * (*tcl_NewUnicodeObj) (CONST Tcl_UniChar *unicode, int numChars); /* 378 */ 3880 void (*tcl_SetUnicodeObj) (Tcl_Obj *objPtr, CONST Tcl_UniChar *unicode, int numChars); /* 379 */ 3881 int (*tcl_GetCharLength) (Tcl_Obj *objPtr); /* 380 */ 3882 Tcl_UniChar (*tcl_GetUniChar) (Tcl_Obj *objPtr, int index); /* 381 */ 3883 Tcl_UniChar * (*tcl_GetUnicode) (Tcl_Obj *objPtr); /* 382 */ 3884 Tcl_Obj * (*tcl_GetRange) (Tcl_Obj *objPtr, int first, int last); /* 383 */ 3885 void (*tcl_AppendUnicodeToObj) (Tcl_Obj *objPtr, CONST Tcl_UniChar *unicode, int length); /* 384 */ 3886 int (*tcl_RegExpMatchObj) (Tcl_Interp *interp, Tcl_Obj *textObj, Tcl_Obj *patternObj); /* 385 */ 3887 void (*tcl_SetNotifier) (Tcl_NotifierProcs *notifierProcPtr); /* 386 */ 3888 Tcl_Mutex * (*tcl_GetAllocMutex) (void); /* 387 */ 3889 int (*tcl_GetChannelNames) (Tcl_Interp *interp); /* 388 */ 3890 int (*tcl_GetChannelNamesEx) (Tcl_Interp *interp, CONST char *pattern); /* 389 */ 3891 int (*tcl_ProcObjCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]); /* 390 */ 3892 void (*tcl_ConditionFinalize) (Tcl_Condition *condPtr); /* 391 */ 3893 void (*tcl_MutexFinalize) (Tcl_Mutex *mutex); /* 392 */ 3894 int (*tcl_CreateThread) (Tcl_ThreadId *idPtr, Tcl_ThreadCreateProc proc, ClientData clientData, int stackSize, int flags); /* 393 */ 3895 int (*tcl_ReadRaw) (Tcl_Channel chan, char *dst, int bytesToRead); /* 394 */ 3896 int (*tcl_WriteRaw) (Tcl_Channel chan, CONST char *src, int srcLen); /* 395 */ 3897 Tcl_Channel (*tcl_GetTopChannel) (Tcl_Channel chan); /* 396 */ 3898 int (*tcl_ChannelBuffered) (Tcl_Channel chan); /* 397 */ 3899 CONST84_RETURN char * (*tcl_ChannelName) (CONST Tcl_ChannelType *chanTypePtr); /* 398 */ 3900 Tcl_ChannelTypeVersion (*tcl_ChannelVersion) (CONST Tcl_ChannelType *chanTypePtr); /* 399 */ 3901 Tcl_DriverBlockModeProc * (*tcl_ChannelBlockModeProc) (CONST Tcl_ChannelType *chanTypePtr); /* 400 */ 3902 Tcl_DriverCloseProc * (*tcl_ChannelCloseProc) (CONST Tcl_ChannelType *chanTypePtr); /* 401 */ 3903 Tcl_DriverClose2Proc * (*tcl_ChannelClose2Proc) (CONST Tcl_ChannelType *chanTypePtr); /* 402 */ 3904 Tcl_DriverInputProc * (*tcl_ChannelInputProc) (CONST Tcl_ChannelType *chanTypePtr); /* 403 */ 3905 Tcl_DriverOutputProc * (*tcl_ChannelOutputProc) (CONST Tcl_ChannelType *chanTypePtr); /* 404 */ 3906 Tcl_DriverSeekProc * (*tcl_ChannelSeekProc) (CONST Tcl_ChannelType *chanTypePtr); /* 405 */ 3907 Tcl_DriverSetOptionProc * (*tcl_ChannelSetOptionProc) (CONST Tcl_ChannelType *chanTypePtr); /* 406 */ 3908 Tcl_DriverGetOptionProc * (*tcl_ChannelGetOptionProc) (CONST Tcl_ChannelType *chanTypePtr); /* 407 */ 3909 Tcl_DriverWatchProc * (*tcl_ChannelWatchProc) (CONST Tcl_ChannelType *chanTypePtr); /* 408 */ 3910 Tcl_DriverGetHandleProc * (*tcl_ChannelGetHandleProc) (CONST Tcl_ChannelType *chanTypePtr); /* 409 */ 3911 Tcl_DriverFlushProc * (*tcl_ChannelFlushProc) (CONST Tcl_ChannelType *chanTypePtr); /* 410 */ 3912 Tcl_DriverHandlerProc * (*tcl_ChannelHandlerProc) (CONST Tcl_ChannelType *chanTypePtr); /* 411 */ 3913 int (*tcl_JoinThread) (Tcl_ThreadId threadId, int *result); /* 412 */ 3914 int (*tcl_IsChannelShared) (Tcl_Channel channel); /* 413 */ 3915 int (*tcl_IsChannelRegistered) (Tcl_Interp *interp, Tcl_Channel channel); /* 414 */ 3916 void (*tcl_CutChannel) (Tcl_Channel channel); /* 415 */ 3917 void (*tcl_SpliceChannel) (Tcl_Channel channel); /* 416 */ 3918 void (*tcl_ClearChannelHandlers) (Tcl_Channel channel); /* 417 */ 3919 int (*tcl_IsChannelExisting) (CONST char *channelName); /* 418 */ 3920 int (*tcl_UniCharNcasecmp) (CONST Tcl_UniChar *ucs, CONST Tcl_UniChar *uct, unsigned long numChars); /* 419 */ 3921 int (*tcl_UniCharCaseMatch) (CONST Tcl_UniChar *uniStr, CONST Tcl_UniChar *uniPattern, int nocase); /* 420 */ 3922 Tcl_HashEntry * (*tcl_FindHashEntry) (Tcl_HashTable *tablePtr, CONST char *key); /* 421 */ 3923 Tcl_HashEntry * (*tcl_CreateHashEntry) (Tcl_HashTable *tablePtr, CONST char *key, int *newPtr); /* 422 */ 3924 void (*tcl_InitCustomHashTable) (Tcl_HashTable *tablePtr, int keyType, Tcl_HashKeyType *typePtr); /* 423 */ 3925 void (*tcl_InitObjHashTable) (Tcl_HashTable *tablePtr); /* 424 */ 3926 ClientData (*tcl_CommandTraceInfo) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_CommandTraceProc *procPtr, ClientData prevClientData); /* 425 */ 3927 int (*tcl_TraceCommand) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_CommandTraceProc *proc, ClientData clientData); /* 426 */ 3928 void (*tcl_UntraceCommand) (Tcl_Interp *interp, CONST char *varName, int flags, Tcl_CommandTraceProc *proc, ClientData clientData); /* 427 */ 3929 char * (*tcl_AttemptAlloc) (unsigned int size); /* 428 */ 3930 char * (*tcl_AttemptDbCkalloc) (unsigned int size, CONST char *file, int line); /* 429 */ 3931 char * (*tcl_AttemptRealloc) (char *ptr, unsigned int size); /* 430 */ 3932 char * (*tcl_AttemptDbCkrealloc) (char *ptr, unsigned int size, CONST char *file, int line); /* 431 */ 3933 int (*tcl_AttemptSetObjLength) (Tcl_Obj *objPtr, int length); /* 432 */ 3934 Tcl_ThreadId (*tcl_GetChannelThread) (Tcl_Channel channel); /* 433 */ 3935 Tcl_UniChar * (*tcl_GetUnicodeFromObj) (Tcl_Obj *objPtr, int *lengthPtr); /* 434 */ 3936 int (*tcl_GetMathFuncInfo) (Tcl_Interp *interp, CONST char *name, int *numArgsPtr, Tcl_ValueType **argTypesPtr, Tcl_MathProc **procPtr, ClientData *clientDataPtr); /* 435 */ 3937 Tcl_Obj * (*tcl_ListMathFuncs) (Tcl_Interp *interp, CONST char *pattern); /* 436 */ 3938 Tcl_Obj * (*tcl_SubstObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int flags); /* 437 */ 3939 int (*tcl_DetachChannel) (Tcl_Interp *interp, Tcl_Channel channel); /* 438 */ 3940 int (*tcl_IsStandardChannel) (Tcl_Channel channel); /* 439 */ 3941 int (*tcl_FSCopyFile) (Tcl_Obj *srcPathPtr, Tcl_Obj *destPathPtr); /* 440 */ 3942 int (*tcl_FSCopyDirectory) (Tcl_Obj *srcPathPtr, Tcl_Obj *destPathPtr, Tcl_Obj **errorPtr); /* 441 */ 3943 int (*tcl_FSCreateDirectory) (Tcl_Obj *pathPtr); /* 442 */ 3944 int (*tcl_FSDeleteFile) (Tcl_Obj *pathPtr); /* 443 */ 3945 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 */ 3946 int (*tcl_FSMatchInDirectory) (Tcl_Interp *interp, Tcl_Obj *result, Tcl_Obj *pathPtr, CONST char *pattern, Tcl_GlobTypeData *types); /* 445 */ 3947 Tcl_Obj * (*tcl_FSLink) (Tcl_Obj *pathPtr, Tcl_Obj *toPtr, int linkAction); /* 446 */ 3948 int (*tcl_FSRemoveDirectory) (Tcl_Obj *pathPtr, int recursive, Tcl_Obj **errorPtr); /* 447 */ 3949 int (*tcl_FSRenameFile) (Tcl_Obj *srcPathPtr, Tcl_Obj *destPathPtr); /* 448 */ 3950 int (*tcl_FSLstat) (Tcl_Obj *pathPtr, Tcl_StatBuf *buf); /* 449 */ 3951 int (*tcl_FSUtime) (Tcl_Obj *pathPtr, struct utimbuf *tval); /* 450 */ 3952 int (*tcl_FSFileAttrsGet) (Tcl_Interp *interp, int index, Tcl_Obj *pathPtr, Tcl_Obj **objPtrRef); /* 451 */ 3953 int (*tcl_FSFileAttrsSet) (Tcl_Interp *interp, int index, Tcl_Obj *pathPtr, Tcl_Obj *objPtr); /* 452 */ 3954 CONST char ** (*tcl_FSFileAttrStrings) (Tcl_Obj *pathPtr, Tcl_Obj **objPtrRef); /* 453 */ 3955 int (*tcl_FSStat) (Tcl_Obj *pathPtr, Tcl_StatBuf *buf); /* 454 */ 3956 int (*tcl_FSAccess) (Tcl_Obj *pathPtr, int mode); /* 455 */ 3957 Tcl_Channel (*tcl_FSOpenFileChannel) (Tcl_Interp *interp, Tcl_Obj *pathPtr, CONST char *modeString, int permissions); /* 456 */ 3958 Tcl_Obj * (*tcl_FSGetCwd) (Tcl_Interp *interp); /* 457 */ 3959 int (*tcl_FSChdir) (Tcl_Obj *pathPtr); /* 458 */ 3960 int (*tcl_FSConvertToPathType) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 459 */ 3961 Tcl_Obj * (*tcl_FSJoinPath) (Tcl_Obj *listObj, int elements); /* 460 */ 3962 Tcl_Obj * (*tcl_FSSplitPath) (Tcl_Obj *pathPtr, int *lenPtr); /* 461 */ 3963 int (*tcl_FSEqualPaths) (Tcl_Obj *firstPtr, Tcl_Obj *secondPtr); /* 462 */ 3964 Tcl_Obj * (*tcl_FSGetNormalizedPath) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 463 */ 3965 Tcl_Obj * (*tcl_FSJoinToPath) (Tcl_Obj *pathPtr, int objc, Tcl_Obj *CONST objv[]); /* 464 */ 3966 ClientData (*tcl_FSGetInternalRep) (Tcl_Obj *pathPtr, Tcl_Filesystem *fsPtr); /* 465 */ 3967 Tcl_Obj * (*tcl_FSGetTranslatedPath) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 466 */ 3968 int (*tcl_FSEvalFile) (Tcl_Interp *interp, Tcl_Obj *fileName); /* 467 */ 3969 Tcl_Obj * (*tcl_FSNewNativePath) (Tcl_Filesystem *fromFilesystem, ClientData clientData); /* 468 */ 3970 CONST char * (*tcl_FSGetNativePath) (Tcl_Obj *pathPtr); /* 469 */ 3971 Tcl_Obj * (*tcl_FSFileSystemInfo) (Tcl_Obj *pathPtr); /* 470 */ 3972 Tcl_Obj * (*tcl_FSPathSeparator) (Tcl_Obj *pathPtr); /* 471 */ 3973 Tcl_Obj * (*tcl_FSListVolumes) (void); /* 472 */ 3974 int (*tcl_FSRegister) (ClientData clientData, Tcl_Filesystem *fsPtr); /* 473 */ 3975 int (*tcl_FSUnregister) (Tcl_Filesystem *fsPtr); /* 474 */ 3976 ClientData (*tcl_FSData) (Tcl_Filesystem *fsPtr); /* 475 */ 3977 CONST char * (*tcl_FSGetTranslatedStringPath) (Tcl_Interp *interp, Tcl_Obj *pathPtr); /* 476 */ 3978 Tcl_Filesystem * (*tcl_FSGetFileSystemForPath) (Tcl_Obj *pathPtr); /* 477 */ 3979 Tcl_PathType (*tcl_FSGetPathType) (Tcl_Obj *pathPtr); /* 478 */ 3980 int (*tcl_OutputBuffered) (Tcl_Channel chan); /* 479 */ 3981 void (*tcl_FSMountsChanged) (Tcl_Filesystem *fsPtr); /* 480 */ 3982 int (*tcl_EvalTokensStandard) (Tcl_Interp *interp, Tcl_Token *tokenPtr, int count); /* 481 */ 3983 void (*tcl_GetTime) (Tcl_Time *timeBuf); /* 482 */ 3984 Tcl_Trace (*tcl_CreateObjTrace) (Tcl_Interp *interp, int level, int flags, Tcl_CmdObjTraceProc *objProc, ClientData clientData, Tcl_CmdObjTraceDeleteProc *delProc); /* 483 */ 3985 int (*tcl_GetCommandInfoFromToken) (Tcl_Command token, Tcl_CmdInfo *infoPtr); /* 484 */ 3986 int (*tcl_SetCommandInfoFromToken) (Tcl_Command token, CONST Tcl_CmdInfo *infoPtr); /* 485 */ 3987 Tcl_Obj * (*tcl_DbNewWideIntObj) (Tcl_WideInt wideValue, CONST char *file, int line); /* 486 */ 3988 int (*tcl_GetWideIntFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_WideInt *widePtr); /* 487 */ 3989 Tcl_Obj * (*tcl_NewWideIntObj) (Tcl_WideInt wideValue); /* 488 */ 3990 void (*tcl_SetWideIntObj) (Tcl_Obj *objPtr, Tcl_WideInt wideValue); /* 489 */ 3991 Tcl_StatBuf * (*tcl_AllocStatBuf) (void); /* 490 */ 3992 Tcl_WideInt (*tcl_Seek) (Tcl_Channel chan, Tcl_WideInt offset, int mode); /* 491 */ 3993 Tcl_WideInt (*tcl_Tell) (Tcl_Channel chan); /* 492 */ 3994 Tcl_DriverWideSeekProc * (*tcl_ChannelWideSeekProc) (CONST Tcl_ChannelType *chanTypePtr); /* 493 */ 3995 int (*tcl_DictObjPut) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_Obj *keyPtr, Tcl_Obj *valuePtr); /* 494 */ 3996 int (*tcl_DictObjGet) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_Obj *keyPtr, Tcl_Obj **valuePtrPtr); /* 495 */ 3997 int (*tcl_DictObjRemove) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_Obj *keyPtr); /* 496 */ 3998 int (*tcl_DictObjSize) (Tcl_Interp *interp, Tcl_Obj *dictPtr, int *sizePtr); /* 497 */ 3999 int (*tcl_DictObjFirst) (Tcl_Interp *interp, Tcl_Obj *dictPtr, Tcl_DictSearch *searchPtr, Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr, int *donePtr); /* 498 */ 4000 void (*tcl_DictObjNext) (Tcl_DictSearch *searchPtr, Tcl_Obj **keyPtrPtr, Tcl_Obj **valuePtrPtr, int *donePtr); /* 499 */ 4001 void (*tcl_DictObjDone) (Tcl_DictSearch *searchPtr); /* 500 */ 4002 int (*tcl_DictObjPutKeyList) (Tcl_Interp *interp, Tcl_Obj *dictPtr, int keyc, Tcl_Obj *CONST *keyv, Tcl_Obj *valuePtr); /* 501 */ 4003 int (*tcl_DictObjRemoveKeyList) (Tcl_Interp *interp, Tcl_Obj *dictPtr, int keyc, Tcl_Obj *CONST *keyv); /* 502 */ 4004 Tcl_Obj * (*tcl_NewDictObj) (void); /* 503 */ 4005 Tcl_Obj * (*tcl_DbNewDictObj) (CONST char *file, int line); /* 504 */ 4006 void (*tcl_RegisterConfig) (Tcl_Interp *interp, CONST char *pkgName, Tcl_Config *configuration, CONST char *valEncoding); /* 505 */ 4007 Tcl_Namespace * (*tcl_CreateNamespace) (Tcl_Interp *interp, CONST char *name, ClientData clientData, Tcl_NamespaceDeleteProc *deleteProc); /* 506 */ 4008 void (*tcl_DeleteNamespace) (Tcl_Namespace *nsPtr); /* 507 */ 4009 int (*tcl_AppendExportList) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, Tcl_Obj *objPtr); /* 508 */ 4010 int (*tcl_Export) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, CONST char *pattern, int resetListFirst); /* 509 */ 4011 int (*tcl_Import) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, CONST char *pattern, int allowOverwrite); /* 510 */ 4012 int (*tcl_ForgetImport) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, CONST char *pattern); /* 511 */ 4013 Tcl_Namespace * (*tcl_GetCurrentNamespace) (Tcl_Interp *interp); /* 512 */ 4014 Tcl_Namespace * (*tcl_GetGlobalNamespace) (Tcl_Interp *interp); /* 513 */ 4015 Tcl_Namespace * (*tcl_FindNamespace) (Tcl_Interp *interp, CONST char *name, Tcl_Namespace *contextNsPtr, int flags); /* 514 */ 4016 Tcl_Command (*tcl_FindCommand) (Tcl_Interp *interp, CONST char *name, Tcl_Namespace *contextNsPtr, int flags); /* 515 */ 4017 Tcl_Command (*tcl_GetCommandFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 516 */ 4018 void (*tcl_GetCommandFullName) (Tcl_Interp *interp, Tcl_Command command, Tcl_Obj *objPtr); /* 517 */ 4019 int (*tcl_FSEvalFileEx) (Tcl_Interp *interp, Tcl_Obj *fileName, CONST char *encodingName); /* 518 */ 4020 Tcl_ExitProc * (*tcl_SetExitProc) (Tcl_ExitProc *proc); /* 519 */ 4021 void (*tcl_LimitAddHandler) (Tcl_Interp *interp, int type, Tcl_LimitHandlerProc *handlerProc, ClientData clientData, Tcl_LimitHandlerDeleteProc *deleteProc); /* 520 */ 4022 void (*tcl_LimitRemoveHandler) (Tcl_Interp *interp, int type, Tcl_LimitHandlerProc *handlerProc, ClientData clientData); /* 521 */ 4023 int (*tcl_LimitReady) (Tcl_Interp *interp); /* 522 */ 4024 int (*tcl_LimitCheck) (Tcl_Interp *interp); /* 523 */ 4025 int (*tcl_LimitExceeded) (Tcl_Interp *interp); /* 524 */ 4026 void (*tcl_LimitSetCommands) (Tcl_Interp *interp, int commandLimit); /* 525 */ 4027 void (*tcl_LimitSetTime) (Tcl_Interp *interp, Tcl_Time *timeLimitPtr); /* 526 */ 4028 void (*tcl_LimitSetGranularity) (Tcl_Interp *interp, int type, int granularity); /* 527 */ 4029 int (*tcl_LimitTypeEnabled) (Tcl_Interp *interp, int type); /* 528 */ 4030 int (*tcl_LimitTypeExceeded) (Tcl_Interp *interp, int type); /* 529 */ 4031 void (*tcl_LimitTypeSet) (Tcl_Interp *interp, int type); /* 530 */ 4032 void (*tcl_LimitTypeReset) (Tcl_Interp *interp, int type); /* 531 */ 4033 int (*tcl_LimitGetCommands) (Tcl_Interp *interp); /* 532 */ 4034 void (*tcl_LimitGetTime) (Tcl_Interp *interp, Tcl_Time *timeLimitPtr); /* 533 */ 4035 int (*tcl_LimitGetGranularity) (Tcl_Interp *interp, int type); /* 534 */ 4036 Tcl_InterpState (*tcl_SaveInterpState) (Tcl_Interp *interp, int status); /* 535 */ 4037 int (*tcl_RestoreInterpState) (Tcl_Interp *interp, Tcl_InterpState state); /* 536 */ 4038 void (*tcl_DiscardInterpState) (Tcl_InterpState state); /* 537 */ 4039 int (*tcl_SetReturnOptions) (Tcl_Interp *interp, Tcl_Obj *options); /* 538 */ 4040 Tcl_Obj * (*tcl_GetReturnOptions) (Tcl_Interp *interp, int result); /* 539 */ 4041 int (*tcl_IsEnsemble) (Tcl_Command token); /* 540 */ 4042 Tcl_Command (*tcl_CreateEnsemble) (Tcl_Interp *interp, CONST char *name, Tcl_Namespace *namespacePtr, int flags); /* 541 */ 4043 Tcl_Command (*tcl_FindEnsemble) (Tcl_Interp *interp, Tcl_Obj *cmdNameObj, int flags); /* 542 */ 4044 int (*tcl_SetEnsembleSubcommandList) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj *subcmdList); /* 543 */ 4045 int (*tcl_SetEnsembleMappingDict) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj *mapDict); /* 544 */ 4046 int (*tcl_SetEnsembleUnknownHandler) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj *unknownList); /* 545 */ 4047 int (*tcl_SetEnsembleFlags) (Tcl_Interp *interp, Tcl_Command token, int flags); /* 546 */ 4048 int (*tcl_GetEnsembleSubcommandList) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj **subcmdListPtr); /* 547 */ 4049 int (*tcl_GetEnsembleMappingDict) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj **mapDictPtr); /* 548 */ 4050 int (*tcl_GetEnsembleUnknownHandler) (Tcl_Interp *interp, Tcl_Command token, Tcl_Obj **unknownListPtr); /* 549 */ 4051 int (*tcl_GetEnsembleFlags) (Tcl_Interp *interp, Tcl_Command token, int *flagsPtr); /* 550 */ 4052 int (*tcl_GetEnsembleNamespace) (Tcl_Interp *interp, Tcl_Command token, Tcl_Namespace **namespacePtrPtr); /* 551 */ 4053 void (*tcl_SetTimeProc) (Tcl_GetTimeProc *getProc, Tcl_ScaleTimeProc *scaleProc, ClientData clientData); /* 552 */ 4054 void (*tcl_QueryTimeProc) (Tcl_GetTimeProc **getProc, Tcl_ScaleTimeProc **scaleProc, ClientData *clientData); /* 553 */ 4055 Tcl_DriverThreadActionProc * (*tcl_ChannelThreadActionProc) (CONST Tcl_ChannelType *chanTypePtr); /* 554 */ 4056 Tcl_Obj * (*tcl_NewBignumObj) (mp_int *value); /* 555 */ 4057 Tcl_Obj * (*tcl_DbNewBignumObj) (mp_int *value, CONST char *file, int line); /* 556 */ 4058 void (*tcl_SetBignumObj) (Tcl_Obj *obj, mp_int *value); /* 557 */ 4059 int (*tcl_GetBignumFromObj) (Tcl_Interp *interp, Tcl_Obj *obj, mp_int *value); /* 558 */ 4060 int (*tcl_TakeBignumFromObj) (Tcl_Interp *interp, Tcl_Obj *obj, mp_int *value); /* 559 */ 4061 int (*tcl_TruncateChannel) (Tcl_Channel chan, Tcl_WideInt length); /* 560 */ 4062 Tcl_DriverTruncateProc * (*tcl_ChannelTruncateProc) (CONST Tcl_ChannelType *chanTypePtr); /* 561 */ 4063 void (*tcl_SetChannelErrorInterp) (Tcl_Interp *interp, Tcl_Obj *msg); /* 562 */ 4064 void (*tcl_GetChannelErrorInterp) (Tcl_Interp *interp, Tcl_Obj **msg); /* 563 */ 4065 void (*tcl_SetChannelError) (Tcl_Channel chan, Tcl_Obj *msg); /* 564 */ 4066 void (*tcl_GetChannelError) (Tcl_Channel chan, Tcl_Obj **msg); /* 565 */ 4067 int (*tcl_InitBignumFromDouble) (Tcl_Interp *interp, double initval, mp_int *toInit); /* 566 */ 4068 Tcl_Obj * (*tcl_GetNamespaceUnknownHandler) (Tcl_Interp *interp, Tcl_Namespace *nsPtr); /* 567 */ 4069 int (*tcl_SetNamespaceUnknownHandler) (Tcl_Interp *interp, Tcl_Namespace *nsPtr, Tcl_Obj *handlerPtr); /* 568 */ 4070 int (*tcl_GetEncodingFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_Encoding *encodingPtr); /* 569 */ 4071 Tcl_Obj * (*tcl_GetEncodingSearchPath) (void); /* 570 */ 4072 int (*tcl_SetEncodingSearchPath) (Tcl_Obj *searchPath); /* 571 */ 4073 CONST char * (*tcl_GetEncodingNameFromEnvironment) (Tcl_DString *bufPtr); /* 572 */ 4074 int (*tcl_PkgRequireProc) (Tcl_Interp *interp, CONST char *name, int objc, Tcl_Obj *CONST objv[], ClientData *clientDataPtr); /* 573 */ 4075 void (*tcl_AppendObjToErrorInfo) (Tcl_Interp *interp, Tcl_Obj *objPtr); /* 574 */ 4076 void (*tcl_AppendLimitedToObj) (Tcl_Obj *objPtr, CONST char *bytes, int length, int limit, CONST char *ellipsis); /* 575 */ 4077 Tcl_Obj * (*tcl_Format) (Tcl_Interp *interp, CONST char *format, int objc, Tcl_Obj *CONST objv[]); /* 576 */ 4078 int (*tcl_AppendFormatToObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, CONST char *format, int objc, Tcl_Obj *CONST objv[]); /* 577 */ 4079 Tcl_Obj * (*tcl_ObjPrintf) (CONST char *format, ...); /* 578 */ 4080 void (*tcl_AppendPrintfToObj) (Tcl_Obj *objPtr, CONST char *format, ...); /* 579 */ 4081 VOID *reserved580; 4082 VOID *reserved581; 4083 VOID *reserved582; 4084 VOID *reserved583; 4085 VOID *reserved584; 4086 VOID *reserved585; 4087 VOID *reserved586; 4088 VOID *reserved587; 4089 VOID *reserved588; 4090 VOID *reserved589; 4091 VOID *reserved590; 4092 VOID *reserved591; 4093 VOID *reserved592; 4094 VOID *reserved593; 4095 VOID *reserved594; 4096 VOID *reserved595; 4097 VOID *reserved596; 4098 VOID *reserved597; 4099 VOID *reserved598; 4100 VOID *reserved599; 4101 VOID *reserved600; 4102 VOID *reserved601; 4103 VOID *reserved602; 4104 VOID *reserved603; 4105 VOID *reserved604; 4106 VOID *reserved605; 4107 VOID *reserved606; 4108 VOID *reserved607; 4109 VOID *reserved608; 4110 VOID *reserved609; 4111 VOID *reserved610; 4112 VOID *reserved611; 4113 VOID *reserved612; 4114 VOID *reserved613; 4115 VOID *reserved614; 4116 VOID *reserved615; 4117 VOID *reserved616; 4118 VOID *reserved617; 4119 VOID *reserved618; 4120 VOID *reserved619; 4121 VOID *reserved620; 4122 VOID *reserved621; 4123 VOID *reserved622; 4124 VOID *reserved623; 4125 VOID *reserved624; 4126 VOID *reserved625; 4127 VOID *reserved626; 4128 VOID *reserved627; 4129 VOID *reserved628; 4130 VOID *reserved629; 4131 void (*tclUnusedStubEntry) (void); /* 630 */ 4132 } TclStubs; 4133 4134 #ifdef __cplusplus 4135 extern "C" { 4136 #endif 4137 extern TclStubs *tclStubsPtr; 4138 #ifdef __cplusplus 4139 } 4140 #endif 4141 4142 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) 4143 4144 /* 4145 * Inline function declarations: 4146 */ 4147 4148 #ifndef Tcl_PkgProvideEx 4149 #define Tcl_PkgProvideEx \ 4150 (tclStubsPtr->tcl_PkgProvideEx) /* 0 */ 4151 #endif 4152 #ifndef Tcl_PkgRequireEx 4153 #define Tcl_PkgRequireEx \ 4154 (tclStubsPtr->tcl_PkgRequireEx) /* 1 */ 4155 #endif 4156 #ifndef Tcl_Panic 4157 #define Tcl_Panic \ 4158 (tclStubsPtr->tcl_Panic) /* 2 */ 4159 #endif 4160 #ifndef Tcl_Alloc 4161 #define Tcl_Alloc \ 4162 (tclStubsPtr->tcl_Alloc) /* 3 */ 4163 #endif 4164 #ifndef Tcl_Free 4165 #define Tcl_Free \ 4166 (tclStubsPtr->tcl_Free) /* 4 */ 4167 #endif 4168 #ifndef Tcl_Realloc 4169 #define Tcl_Realloc \ 4170 (tclStubsPtr->tcl_Realloc) /* 5 */ 4171 #endif 4172 #ifndef Tcl_DbCkalloc 4173 #define Tcl_DbCkalloc \ 4174 (tclStubsPtr->tcl_DbCkalloc) /* 6 */ 4175 #endif 4176 #ifndef Tcl_DbCkfree 4177 #define Tcl_DbCkfree \ 4178 (tclStubsPtr->tcl_DbCkfree) /* 7 */ 4179 #endif 4180 #ifndef Tcl_DbCkrealloc 4181 #define Tcl_DbCkrealloc \ 4182 (tclStubsPtr->tcl_DbCkrealloc) /* 8 */ 4183 #endif 4184 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 4185 #ifndef Tcl_CreateFileHandler 4186 #define Tcl_CreateFileHandler \ 4187 (tclStubsPtr->tcl_CreateFileHandler) /* 9 */ 4188 #endif 4189 #endif /* UNIX */ 4190 #ifdef MAC_OSX_TCL /* MACOSX */ 4191 #ifndef Tcl_CreateFileHandler 4192 #define Tcl_CreateFileHandler \ 4193 (tclStubsPtr->tcl_CreateFileHandler) /* 9 */ 4194 #endif 4195 #endif /* MACOSX */ 4196 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 4197 #ifndef Tcl_DeleteFileHandler 4198 #define Tcl_DeleteFileHandler \ 4199 (tclStubsPtr->tcl_DeleteFileHandler) /* 10 */ 4200 #endif 4201 #endif /* UNIX */ 4202 #ifdef MAC_OSX_TCL /* MACOSX */ 4203 #ifndef Tcl_DeleteFileHandler 4204 #define Tcl_DeleteFileHandler \ 4205 (tclStubsPtr->tcl_DeleteFileHandler) /* 10 */ 4206 #endif 4207 #endif /* MACOSX */ 4208 #ifndef Tcl_SetTimer 4209 #define Tcl_SetTimer \ 4210 (tclStubsPtr->tcl_SetTimer) /* 11 */ 4211 #endif 4212 #ifndef Tcl_Sleep 4213 #define Tcl_Sleep \ 4214 (tclStubsPtr->tcl_Sleep) /* 12 */ 4215 #endif 4216 #ifndef Tcl_WaitForEvent 4217 #define Tcl_WaitForEvent \ 4218 (tclStubsPtr->tcl_WaitForEvent) /* 13 */ 4219 #endif 4220 #ifndef Tcl_AppendAllObjTypes 4221 #define Tcl_AppendAllObjTypes \ 4222 (tclStubsPtr->tcl_AppendAllObjTypes) /* 14 */ 4223 #endif 4224 #ifndef Tcl_AppendStringsToObj 4225 #define Tcl_AppendStringsToObj \ 4226 (tclStubsPtr->tcl_AppendStringsToObj) /* 15 */ 4227 #endif 4228 #ifndef Tcl_AppendToObj 4229 #define Tcl_AppendToObj \ 4230 (tclStubsPtr->tcl_AppendToObj) /* 16 */ 4231 #endif 4232 #ifndef Tcl_ConcatObj 4233 #define Tcl_ConcatObj \ 4234 (tclStubsPtr->tcl_ConcatObj) /* 17 */ 4235 #endif 4236 #ifndef Tcl_ConvertToType 4237 #define Tcl_ConvertToType \ 4238 (tclStubsPtr->tcl_ConvertToType) /* 18 */ 4239 #endif 4240 #ifndef Tcl_DbDecrRefCount 4241 #define Tcl_DbDecrRefCount \ 4242 (tclStubsPtr->tcl_DbDecrRefCount) /* 19 */ 4243 #endif 4244 #ifndef Tcl_DbIncrRefCount 4245 #define Tcl_DbIncrRefCount \ 4246 (tclStubsPtr->tcl_DbIncrRefCount) /* 20 */ 4247 #endif 4248 #ifndef Tcl_DbIsShared 4249 #define Tcl_DbIsShared \ 4250 (tclStubsPtr->tcl_DbIsShared) /* 21 */ 4251 #endif 4252 #ifndef Tcl_DbNewBooleanObj 4253 #define Tcl_DbNewBooleanObj \ 4254 (tclStubsPtr->tcl_DbNewBooleanObj) /* 22 */ 4255 #endif 4256 #ifndef Tcl_DbNewByteArrayObj 4257 #define Tcl_DbNewByteArrayObj \ 4258 (tclStubsPtr->tcl_DbNewByteArrayObj) /* 23 */ 4259 #endif 4260 #ifndef Tcl_DbNewDoubleObj 4261 #define Tcl_DbNewDoubleObj \ 4262 (tclStubsPtr->tcl_DbNewDoubleObj) /* 24 */ 4263 #endif 4264 #ifndef Tcl_DbNewListObj 4265 #define Tcl_DbNewListObj \ 4266 (tclStubsPtr->tcl_DbNewListObj) /* 25 */ 4267 #endif 4268 #ifndef Tcl_DbNewLongObj 4269 #define Tcl_DbNewLongObj \ 4270 (tclStubsPtr->tcl_DbNewLongObj) /* 26 */ 4271 #endif 4272 #ifndef Tcl_DbNewObj 4273 #define Tcl_DbNewObj \ 4274 (tclStubsPtr->tcl_DbNewObj) /* 27 */ 4275 #endif 4276 #ifndef Tcl_DbNewStringObj 4277 #define Tcl_DbNewStringObj \ 4278 (tclStubsPtr->tcl_DbNewStringObj) /* 28 */ 4279 #endif 4280 #ifndef Tcl_DuplicateObj 4281 #define Tcl_DuplicateObj \ 4282 (tclStubsPtr->tcl_DuplicateObj) /* 29 */ 4283 #endif 4284 #ifndef TclFreeObj 4285 #define TclFreeObj \ 4286 (tclStubsPtr->tclFreeObj) /* 30 */ 4287 #endif 4288 #ifndef Tcl_GetBoolean 4289 #define Tcl_GetBoolean \ 4290 (tclStubsPtr->tcl_GetBoolean) /* 31 */ 4291 #endif 4292 #ifndef Tcl_GetBooleanFromObj 4293 #define Tcl_GetBooleanFromObj \ 4294 (tclStubsPtr->tcl_GetBooleanFromObj) /* 32 */ 4295 #endif 4296 #ifndef Tcl_GetByteArrayFromObj 4297 #define Tcl_GetByteArrayFromObj \ 4298 (tclStubsPtr->tcl_GetByteArrayFromObj) /* 33 */ 4299 #endif 4300 #ifndef Tcl_GetDouble 4301 #define Tcl_GetDouble \ 4302 (tclStubsPtr->tcl_GetDouble) /* 34 */ 4303 #endif 4304 #ifndef Tcl_GetDoubleFromObj 4305 #define Tcl_GetDoubleFromObj \ 4306 (tclStubsPtr->tcl_GetDoubleFromObj) /* 35 */ 4307 #endif 4308 #ifndef Tcl_GetIndexFromObj 4309 #define Tcl_GetIndexFromObj \ 4310 (tclStubsPtr->tcl_GetIndexFromObj) /* 36 */ 4311 #endif 4312 #ifndef Tcl_GetInt 4313 #define Tcl_GetInt \ 4314 (tclStubsPtr->tcl_GetInt) /* 37 */ 4315 #endif 4316 #ifndef Tcl_GetIntFromObj 4317 #define Tcl_GetIntFromObj \ 4318 (tclStubsPtr->tcl_GetIntFromObj) /* 38 */ 4319 #endif 4320 #ifndef Tcl_GetLongFromObj 4321 #define Tcl_GetLongFromObj \ 4322 (tclStubsPtr->tcl_GetLongFromObj) /* 39 */ 4323 #endif 4324 #ifndef Tcl_GetObjType 4325 #define Tcl_GetObjType \ 4326 (tclStubsPtr->tcl_GetObjType) /* 40 */ 4327 #endif 4328 #ifndef Tcl_GetStringFromObj 4329 #define Tcl_GetStringFromObj \ 4330 (tclStubsPtr->tcl_GetStringFromObj) /* 41 */ 4331 #endif 4332 #ifndef Tcl_InvalidateStringRep 4333 #define Tcl_InvalidateStringRep \ 4334 (tclStubsPtr->tcl_InvalidateStringRep) /* 42 */ 4335 #endif 4336 #ifndef Tcl_ListObjAppendList 4337 #define Tcl_ListObjAppendList \ 4338 (tclStubsPtr->tcl_ListObjAppendList) /* 43 */ 4339 #endif 4340 #ifndef Tcl_ListObjAppendElement 4341 #define Tcl_ListObjAppendElement \ 4342 (tclStubsPtr->tcl_ListObjAppendElement) /* 44 */ 4343 #endif 4344 #ifndef Tcl_ListObjGetElements 4345 #define Tcl_ListObjGetElements \ 4346 (tclStubsPtr->tcl_ListObjGetElements) /* 45 */ 4347 #endif 4348 #ifndef Tcl_ListObjIndex 4349 #define Tcl_ListObjIndex \ 4350 (tclStubsPtr->tcl_ListObjIndex) /* 46 */ 4351 #endif 4352 #ifndef Tcl_ListObjLength 4353 #define Tcl_ListObjLength \ 4354 (tclStubsPtr->tcl_ListObjLength) /* 47 */ 4355 #endif 4356 #ifndef Tcl_ListObjReplace 4357 #define Tcl_ListObjReplace \ 4358 (tclStubsPtr->tcl_ListObjReplace) /* 48 */ 4359 #endif 4360 #ifndef Tcl_NewBooleanObj 4361 #define Tcl_NewBooleanObj \ 4362 (tclStubsPtr->tcl_NewBooleanObj) /* 49 */ 4363 #endif 4364 #ifndef Tcl_NewByteArrayObj 4365 #define Tcl_NewByteArrayObj \ 4366 (tclStubsPtr->tcl_NewByteArrayObj) /* 50 */ 4367 #endif 4368 #ifndef Tcl_NewDoubleObj 4369 #define Tcl_NewDoubleObj \ 4370 (tclStubsPtr->tcl_NewDoubleObj) /* 51 */ 4371 #endif 4372 #ifndef Tcl_NewIntObj 4373 #define Tcl_NewIntObj \ 4374 (tclStubsPtr->tcl_NewIntObj) /* 52 */ 4375 #endif 4376 #ifndef Tcl_NewListObj 4377 #define Tcl_NewListObj \ 4378 (tclStubsPtr->tcl_NewListObj) /* 53 */ 4379 #endif 4380 #ifndef Tcl_NewLongObj 4381 #define Tcl_NewLongObj \ 4382 (tclStubsPtr->tcl_NewLongObj) /* 54 */ 4383 #endif 4384 #ifndef Tcl_NewObj 4385 #define Tcl_NewObj \ 4386 (tclStubsPtr->tcl_NewObj) /* 55 */ 4387 #endif 4388 #ifndef Tcl_NewStringObj 4389 #define Tcl_NewStringObj \ 4390 (tclStubsPtr->tcl_NewStringObj) /* 56 */ 4391 #endif 4392 #ifndef Tcl_SetBooleanObj 4393 #define Tcl_SetBooleanObj \ 4394 (tclStubsPtr->tcl_SetBooleanObj) /* 57 */ 4395 #endif 4396 #ifndef Tcl_SetByteArrayLength 4397 #define Tcl_SetByteArrayLength \ 4398 (tclStubsPtr->tcl_SetByteArrayLength) /* 58 */ 4399 #endif 4400 #ifndef Tcl_SetByteArrayObj 4401 #define Tcl_SetByteArrayObj \ 4402 (tclStubsPtr->tcl_SetByteArrayObj) /* 59 */ 4403 #endif 4404 #ifndef Tcl_SetDoubleObj 4405 #define Tcl_SetDoubleObj \ 4406 (tclStubsPtr->tcl_SetDoubleObj) /* 60 */ 4407 #endif 4408 #ifndef Tcl_SetIntObj 4409 #define Tcl_SetIntObj \ 4410 (tclStubsPtr->tcl_SetIntObj) /* 61 */ 4411 #endif 4412 #ifndef Tcl_SetListObj 4413 #define Tcl_SetListObj \ 4414 (tclStubsPtr->tcl_SetListObj) /* 62 */ 4415 #endif 4416 #ifndef Tcl_SetLongObj 4417 #define Tcl_SetLongObj \ 4418 (tclStubsPtr->tcl_SetLongObj) /* 63 */ 4419 #endif 4420 #ifndef Tcl_SetObjLength 4421 #define Tcl_SetObjLength \ 4422 (tclStubsPtr->tcl_SetObjLength) /* 64 */ 4423 #endif 4424 #ifndef Tcl_SetStringObj 4425 #define Tcl_SetStringObj \ 4426 (tclStubsPtr->tcl_SetStringObj) /* 65 */ 4427 #endif 4428 #ifndef Tcl_AddErrorInfo 4429 #define Tcl_AddErrorInfo \ 4430 (tclStubsPtr->tcl_AddErrorInfo) /* 66 */ 4431 #endif 4432 #ifndef Tcl_AddObjErrorInfo 4433 #define Tcl_AddObjErrorInfo \ 4434 (tclStubsPtr->tcl_AddObjErrorInfo) /* 67 */ 4435 #endif 4436 #ifndef Tcl_AllowExceptions 4437 #define Tcl_AllowExceptions \ 4438 (tclStubsPtr->tcl_AllowExceptions) /* 68 */ 4439 #endif 4440 #ifndef Tcl_AppendElement 4441 #define Tcl_AppendElement \ 4442 (tclStubsPtr->tcl_AppendElement) /* 69 */ 4443 #endif 4444 #ifndef Tcl_AppendResult 4445 #define Tcl_AppendResult \ 4446 (tclStubsPtr->tcl_AppendResult) /* 70 */ 4447 #endif 4448 #ifndef Tcl_AsyncCreate 4449 #define Tcl_AsyncCreate \ 4450 (tclStubsPtr->tcl_AsyncCreate) /* 71 */ 4451 #endif 4452 #ifndef Tcl_AsyncDelete 4453 #define Tcl_AsyncDelete \ 4454 (tclStubsPtr->tcl_AsyncDelete) /* 72 */ 4455 #endif 4456 #ifndef Tcl_AsyncInvoke 4457 #define Tcl_AsyncInvoke \ 4458 (tclStubsPtr->tcl_AsyncInvoke) /* 73 */ 4459 #endif 4460 #ifndef Tcl_AsyncMark 4461 #define Tcl_AsyncMark \ 4462 (tclStubsPtr->tcl_AsyncMark) /* 74 */ 4463 #endif 4464 #ifndef Tcl_AsyncReady 4465 #define Tcl_AsyncReady \ 4466 (tclStubsPtr->tcl_AsyncReady) /* 75 */ 4467 #endif 4468 #ifndef Tcl_BackgroundError 4469 #define Tcl_BackgroundError \ 4470 (tclStubsPtr->tcl_BackgroundError) /* 76 */ 4471 #endif 4472 #ifndef Tcl_Backslash 4473 #define Tcl_Backslash \ 4474 (tclStubsPtr->tcl_Backslash) /* 77 */ 4475 #endif 4476 #ifndef Tcl_BadChannelOption 4477 #define Tcl_BadChannelOption \ 4478 (tclStubsPtr->tcl_BadChannelOption) /* 78 */ 4479 #endif 4480 #ifndef Tcl_CallWhenDeleted 4481 #define Tcl_CallWhenDeleted \ 4482 (tclStubsPtr->tcl_CallWhenDeleted) /* 79 */ 4483 #endif 4484 #ifndef Tcl_CancelIdleCall 4485 #define Tcl_CancelIdleCall \ 4486 (tclStubsPtr->tcl_CancelIdleCall) /* 80 */ 4487 #endif 4488 #ifndef Tcl_Close 4489 #define Tcl_Close \ 4490 (tclStubsPtr->tcl_Close) /* 81 */ 4491 #endif 4492 #ifndef Tcl_CommandComplete 4493 #define Tcl_CommandComplete \ 4494 (tclStubsPtr->tcl_CommandComplete) /* 82 */ 4495 #endif 4496 #ifndef Tcl_Concat 4497 #define Tcl_Concat \ 4498 (tclStubsPtr->tcl_Concat) /* 83 */ 4499 #endif 4500 #ifndef Tcl_ConvertElement 4501 #define Tcl_ConvertElement \ 4502 (tclStubsPtr->tcl_ConvertElement) /* 84 */ 4503 #endif 4504 #ifndef Tcl_ConvertCountedElement 4505 #define Tcl_ConvertCountedElement \ 4506 (tclStubsPtr->tcl_ConvertCountedElement) /* 85 */ 4507 #endif 4508 #ifndef Tcl_CreateAlias 4509 #define Tcl_CreateAlias \ 4510 (tclStubsPtr->tcl_CreateAlias) /* 86 */ 4511 #endif 4512 #ifndef Tcl_CreateAliasObj 4513 #define Tcl_CreateAliasObj \ 4514 (tclStubsPtr->tcl_CreateAliasObj) /* 87 */ 4515 #endif 4516 #ifndef Tcl_CreateChannel 4517 #define Tcl_CreateChannel \ 4518 (tclStubsPtr->tcl_CreateChannel) /* 88 */ 4519 #endif 4520 #ifndef Tcl_CreateChannelHandler 4521 #define Tcl_CreateChannelHandler \ 4522 (tclStubsPtr->tcl_CreateChannelHandler) /* 89 */ 4523 #endif 4524 #ifndef Tcl_CreateCloseHandler 4525 #define Tcl_CreateCloseHandler \ 4526 (tclStubsPtr->tcl_CreateCloseHandler) /* 90 */ 4527 #endif 4528 #ifndef Tcl_CreateCommand 4529 #define Tcl_CreateCommand \ 4530 (tclStubsPtr->tcl_CreateCommand) /* 91 */ 4531 #endif 4532 #ifndef Tcl_CreateEventSource 4533 #define Tcl_CreateEventSource \ 4534 (tclStubsPtr->tcl_CreateEventSource) /* 92 */ 4535 #endif 4536 #ifndef Tcl_CreateExitHandler 4537 #define Tcl_CreateExitHandler \ 4538 (tclStubsPtr->tcl_CreateExitHandler) /* 93 */ 4539 #endif 4540 #ifndef Tcl_CreateInterp 4541 #define Tcl_CreateInterp \ 4542 (tclStubsPtr->tcl_CreateInterp) /* 94 */ 4543 #endif 4544 #ifndef Tcl_CreateMathFunc 4545 #define Tcl_CreateMathFunc \ 4546 (tclStubsPtr->tcl_CreateMathFunc) /* 95 */ 4547 #endif 4548 #ifndef Tcl_CreateObjCommand 4549 #define Tcl_CreateObjCommand \ 4550 (tclStubsPtr->tcl_CreateObjCommand) /* 96 */ 4551 #endif 4552 #ifndef Tcl_CreateSlave 4553 #define Tcl_CreateSlave \ 4554 (tclStubsPtr->tcl_CreateSlave) /* 97 */ 4555 #endif 4556 #ifndef Tcl_CreateTimerHandler 4557 #define Tcl_CreateTimerHandler \ 4558 (tclStubsPtr->tcl_CreateTimerHandler) /* 98 */ 4559 #endif 4560 #ifndef Tcl_CreateTrace 4561 #define Tcl_CreateTrace \ 4562 (tclStubsPtr->tcl_CreateTrace) /* 99 */ 4563 #endif 4564 #ifndef Tcl_DeleteAssocData 4565 #define Tcl_DeleteAssocData \ 4566 (tclStubsPtr->tcl_DeleteAssocData) /* 100 */ 4567 #endif 4568 #ifndef Tcl_DeleteChannelHandler 4569 #define Tcl_DeleteChannelHandler \ 4570 (tclStubsPtr->tcl_DeleteChannelHandler) /* 101 */ 4571 #endif 4572 #ifndef Tcl_DeleteCloseHandler 4573 #define Tcl_DeleteCloseHandler \ 4574 (tclStubsPtr->tcl_DeleteCloseHandler) /* 102 */ 4575 #endif 4576 #ifndef Tcl_DeleteCommand 4577 #define Tcl_DeleteCommand \ 4578 (tclStubsPtr->tcl_DeleteCommand) /* 103 */ 4579 #endif 4580 #ifndef Tcl_DeleteCommandFromToken 4581 #define Tcl_DeleteCommandFromToken \ 4582 (tclStubsPtr->tcl_DeleteCommandFromToken) /* 104 */ 4583 #endif 4584 #ifndef Tcl_DeleteEvents 4585 #define Tcl_DeleteEvents \ 4586 (tclStubsPtr->tcl_DeleteEvents) /* 105 */ 4587 #endif 4588 #ifndef Tcl_DeleteEventSource 4589 #define Tcl_DeleteEventSource \ 4590 (tclStubsPtr->tcl_DeleteEventSource) /* 106 */ 4591 #endif 4592 #ifndef Tcl_DeleteExitHandler 4593 #define Tcl_DeleteExitHandler \ 4594 (tclStubsPtr->tcl_DeleteExitHandler) /* 107 */ 4595 #endif 4596 #ifndef Tcl_DeleteHashEntry 4597 #define Tcl_DeleteHashEntry \ 4598 (tclStubsPtr->tcl_DeleteHashEntry) /* 108 */ 4599 #endif 4600 #ifndef Tcl_DeleteHashTable 4601 #define Tcl_DeleteHashTable \ 4602 (tclStubsPtr->tcl_DeleteHashTable) /* 109 */ 4603 #endif 4604 #ifndef Tcl_DeleteInterp 4605 #define Tcl_DeleteInterp \ 4606 (tclStubsPtr->tcl_DeleteInterp) /* 110 */ 4607 #endif 4608 #ifndef Tcl_DetachPids 4609 #define Tcl_DetachPids \ 4610 (tclStubsPtr->tcl_DetachPids) /* 111 */ 4611 #endif 4612 #ifndef Tcl_DeleteTimerHandler 4613 #define Tcl_DeleteTimerHandler \ 4614 (tclStubsPtr->tcl_DeleteTimerHandler) /* 112 */ 4615 #endif 4616 #ifndef Tcl_DeleteTrace 4617 #define Tcl_DeleteTrace \ 4618 (tclStubsPtr->tcl_DeleteTrace) /* 113 */ 4619 #endif 4620 #ifndef Tcl_DontCallWhenDeleted 4621 #define Tcl_DontCallWhenDeleted \ 4622 (tclStubsPtr->tcl_DontCallWhenDeleted) /* 114 */ 4623 #endif 4624 #ifndef Tcl_DoOneEvent 4625 #define Tcl_DoOneEvent \ 4626 (tclStubsPtr->tcl_DoOneEvent) /* 115 */ 4627 #endif 4628 #ifndef Tcl_DoWhenIdle 4629 #define Tcl_DoWhenIdle \ 4630 (tclStubsPtr->tcl_DoWhenIdle) /* 116 */ 4631 #endif 4632 #ifndef Tcl_DStringAppend 4633 #define Tcl_DStringAppend \ 4634 (tclStubsPtr->tcl_DStringAppend) /* 117 */ 4635 #endif 4636 #ifndef Tcl_DStringAppendElement 4637 #define Tcl_DStringAppendElement \ 4638 (tclStubsPtr->tcl_DStringAppendElement) /* 118 */ 4639 #endif 4640 #ifndef Tcl_DStringEndSublist 4641 #define Tcl_DStringEndSublist \ 4642 (tclStubsPtr->tcl_DStringEndSublist) /* 119 */ 4643 #endif 4644 #ifndef Tcl_DStringFree 4645 #define Tcl_DStringFree \ 4646 (tclStubsPtr->tcl_DStringFree) /* 120 */ 4647 #endif 4648 #ifndef Tcl_DStringGetResult 4649 #define Tcl_DStringGetResult \ 4650 (tclStubsPtr->tcl_DStringGetResult) /* 121 */ 4651 #endif 4652 #ifndef Tcl_DStringInit 4653 #define Tcl_DStringInit \ 4654 (tclStubsPtr->tcl_DStringInit) /* 122 */ 4655 #endif 4656 #ifndef Tcl_DStringResult 4657 #define Tcl_DStringResult \ 4658 (tclStubsPtr->tcl_DStringResult) /* 123 */ 4659 #endif 4660 #ifndef Tcl_DStringSetLength 4661 #define Tcl_DStringSetLength \ 4662 (tclStubsPtr->tcl_DStringSetLength) /* 124 */ 4663 #endif 4664 #ifndef Tcl_DStringStartSublist 4665 #define Tcl_DStringStartSublist \ 4666 (tclStubsPtr->tcl_DStringStartSublist) /* 125 */ 4667 #endif 4668 #ifndef Tcl_Eof 4669 #define Tcl_Eof \ 4670 (tclStubsPtr->tcl_Eof) /* 126 */ 4671 #endif 4672 #ifndef Tcl_ErrnoId 4673 #define Tcl_ErrnoId \ 4674 (tclStubsPtr->tcl_ErrnoId) /* 127 */ 4675 #endif 4676 #ifndef Tcl_ErrnoMsg 4677 #define Tcl_ErrnoMsg \ 4678 (tclStubsPtr->tcl_ErrnoMsg) /* 128 */ 4679 #endif 4680 #ifndef Tcl_Eval 4681 #define Tcl_Eval \ 4682 (tclStubsPtr->tcl_Eval) /* 129 */ 4683 #endif 4684 #ifndef Tcl_EvalFile 4685 #define Tcl_EvalFile \ 4686 (tclStubsPtr->tcl_EvalFile) /* 130 */ 4687 #endif 4688 #ifndef Tcl_EvalObj 4689 #define Tcl_EvalObj \ 4690 (tclStubsPtr->tcl_EvalObj) /* 131 */ 4691 #endif 4692 #ifndef Tcl_EventuallyFree 4693 #define Tcl_EventuallyFree \ 4694 (tclStubsPtr->tcl_EventuallyFree) /* 132 */ 4695 #endif 4696 #ifndef Tcl_Exit 4697 #define Tcl_Exit \ 4698 (tclStubsPtr->tcl_Exit) /* 133 */ 4699 #endif 4700 #ifndef Tcl_ExposeCommand 4701 #define Tcl_ExposeCommand \ 4702 (tclStubsPtr->tcl_ExposeCommand) /* 134 */ 4703 #endif 4704 #ifndef Tcl_ExprBoolean 4705 #define Tcl_ExprBoolean \ 4706 (tclStubsPtr->tcl_ExprBoolean) /* 135 */ 4707 #endif 4708 #ifndef Tcl_ExprBooleanObj 4709 #define Tcl_ExprBooleanObj \ 4710 (tclStubsPtr->tcl_ExprBooleanObj) /* 136 */ 4711 #endif 4712 #ifndef Tcl_ExprDouble 4713 #define Tcl_ExprDouble \ 4714 (tclStubsPtr->tcl_ExprDouble) /* 137 */ 4715 #endif 4716 #ifndef Tcl_ExprDoubleObj 4717 #define Tcl_ExprDoubleObj \ 4718 (tclStubsPtr->tcl_ExprDoubleObj) /* 138 */ 4719 #endif 4720 #ifndef Tcl_ExprLong 4721 #define Tcl_ExprLong \ 4722 (tclStubsPtr->tcl_ExprLong) /* 139 */ 4723 #endif 4724 #ifndef Tcl_ExprLongObj 4725 #define Tcl_ExprLongObj \ 4726 (tclStubsPtr->tcl_ExprLongObj) /* 140 */ 4727 #endif 4728 #ifndef Tcl_ExprObj 4729 #define Tcl_ExprObj \ 4730 (tclStubsPtr->tcl_ExprObj) /* 141 */ 4731 #endif 4732 #ifndef Tcl_ExprString 4733 #define Tcl_ExprString \ 4734 (tclStubsPtr->tcl_ExprString) /* 142 */ 4735 #endif 4736 #ifndef Tcl_Finalize 4737 #define Tcl_Finalize \ 4738 (tclStubsPtr->tcl_Finalize) /* 143 */ 4739 #endif 4740 #ifndef Tcl_FindExecutable 4741 #define Tcl_FindExecutable \ 4742 (tclStubsPtr->tcl_FindExecutable) /* 144 */ 4743 #endif 4744 #ifndef Tcl_FirstHashEntry 4745 #define Tcl_FirstHashEntry \ 4746 (tclStubsPtr->tcl_FirstHashEntry) /* 145 */ 4747 #endif 4748 #ifndef Tcl_Flush 4749 #define Tcl_Flush \ 4750 (tclStubsPtr->tcl_Flush) /* 146 */ 4751 #endif 4752 #ifndef Tcl_FreeResult 4753 #define Tcl_FreeResult \ 4754 (tclStubsPtr->tcl_FreeResult) /* 147 */ 4755 #endif 4756 #ifndef Tcl_GetAlias 4757 #define Tcl_GetAlias \ 4758 (tclStubsPtr->tcl_GetAlias) /* 148 */ 4759 #endif 4760 #ifndef Tcl_GetAliasObj 4761 #define Tcl_GetAliasObj \ 4762 (tclStubsPtr->tcl_GetAliasObj) /* 149 */ 4763 #endif 4764 #ifndef Tcl_GetAssocData 4765 #define Tcl_GetAssocData \ 4766 (tclStubsPtr->tcl_GetAssocData) /* 150 */ 4767 #endif 4768 #ifndef Tcl_GetChannel 4769 #define Tcl_GetChannel \ 4770 (tclStubsPtr->tcl_GetChannel) /* 151 */ 4771 #endif 4772 #ifndef Tcl_GetChannelBufferSize 4773 #define Tcl_GetChannelBufferSize \ 4774 (tclStubsPtr->tcl_GetChannelBufferSize) /* 152 */ 4775 #endif 4776 #ifndef Tcl_GetChannelHandle 4777 #define Tcl_GetChannelHandle \ 4778 (tclStubsPtr->tcl_GetChannelHandle) /* 153 */ 4779 #endif 4780 #ifndef Tcl_GetChannelInstanceData 4781 #define Tcl_GetChannelInstanceData \ 4782 (tclStubsPtr->tcl_GetChannelInstanceData) /* 154 */ 4783 #endif 4784 #ifndef Tcl_GetChannelMode 4785 #define Tcl_GetChannelMode \ 4786 (tclStubsPtr->tcl_GetChannelMode) /* 155 */ 4787 #endif 4788 #ifndef Tcl_GetChannelName 4789 #define Tcl_GetChannelName \ 4790 (tclStubsPtr->tcl_GetChannelName) /* 156 */ 4791 #endif 4792 #ifndef Tcl_GetChannelOption 4793 #define Tcl_GetChannelOption \ 4794 (tclStubsPtr->tcl_GetChannelOption) /* 157 */ 4795 #endif 4796 #ifndef Tcl_GetChannelType 4797 #define Tcl_GetChannelType \ 4798 (tclStubsPtr->tcl_GetChannelType) /* 158 */ 4799 #endif 4800 #ifndef Tcl_GetCommandInfo 4801 #define Tcl_GetCommandInfo \ 4802 (tclStubsPtr->tcl_GetCommandInfo) /* 159 */ 4803 #endif 4804 #ifndef Tcl_GetCommandName 4805 #define Tcl_GetCommandName \ 4806 (tclStubsPtr->tcl_GetCommandName) /* 160 */ 4807 #endif 4808 #ifndef Tcl_GetErrno 4809 #define Tcl_GetErrno \ 4810 (tclStubsPtr->tcl_GetErrno) /* 161 */ 4811 #endif 4812 #ifndef Tcl_GetHostName 4813 #define Tcl_GetHostName \ 4814 (tclStubsPtr->tcl_GetHostName) /* 162 */ 4815 #endif 4816 #ifndef Tcl_GetInterpPath 4817 #define Tcl_GetInterpPath \ 4818 (tclStubsPtr->tcl_GetInterpPath) /* 163 */ 4819 #endif 4820 #ifndef Tcl_GetMaster 4821 #define Tcl_GetMaster \ 4822 (tclStubsPtr->tcl_GetMaster) /* 164 */ 4823 #endif 4824 #ifndef Tcl_GetNameOfExecutable 4825 #define Tcl_GetNameOfExecutable \ 4826 (tclStubsPtr->tcl_GetNameOfExecutable) /* 165 */ 4827 #endif 4828 #ifndef Tcl_GetObjResult 4829 #define Tcl_GetObjResult \ 4830 (tclStubsPtr->tcl_GetObjResult) /* 166 */ 4831 #endif 4832 #if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */ 4833 #ifndef Tcl_GetOpenFile 4834 #define Tcl_GetOpenFile \ 4835 (tclStubsPtr->tcl_GetOpenFile) /* 167 */ 4836 #endif 4837 #endif /* UNIX */ 4838 #ifdef MAC_OSX_TCL /* MACOSX */ 4839 #ifndef Tcl_GetOpenFile 4840 #define Tcl_GetOpenFile \ 4841 (tclStubsPtr->tcl_GetOpenFile) /* 167 */ 4842 #endif 4843 #endif /* MACOSX */ 4844 #ifndef Tcl_GetPathType 4845 #define Tcl_GetPathType \ 4846 (tclStubsPtr->tcl_GetPathType) /* 168 */ 4847 #endif 4848 #ifndef Tcl_Gets 4849 #define Tcl_Gets \ 4850 (tclStubsPtr->tcl_Gets) /* 169 */ 4851 #endif 4852 #ifndef Tcl_GetsObj 4853 #define Tcl_GetsObj \ 4854 (tclStubsPtr->tcl_GetsObj) /* 170 */ 4855 #endif 4856 #ifndef Tcl_GetServiceMode 4857 #define Tcl_GetServiceMode \ 4858 (tclStubsPtr->tcl_GetServiceMode) /* 171 */ 4859 #endif 4860 #ifndef Tcl_GetSlave 4861 #define Tcl_GetSlave \ 4862 (tclStubsPtr->tcl_GetSlave) /* 172 */ 4863 #endif 4864 #ifndef Tcl_GetStdChannel 4865 #define Tcl_GetStdChannel \ 4866 (tclStubsPtr->tcl_GetStdChannel) /* 173 */ 4867 #endif 4868 #ifndef Tcl_GetStringResult 4869 #define Tcl_GetStringResult \ 4870 (tclStubsPtr->tcl_GetStringResult) /* 174 */ 4871 #endif 4872 #ifndef Tcl_GetVar 4873 #define Tcl_GetVar \ 4874 (tclStubsPtr->tcl_GetVar) /* 175 */ 4875 #endif 4876 #ifndef Tcl_GetVar2 4877 #define Tcl_GetVar2 \ 4878 (tclStubsPtr->tcl_GetVar2) /* 176 */ 4879 #endif 4880 #ifndef Tcl_GlobalEval 4881 #define Tcl_GlobalEval \ 4882 (tclStubsPtr->tcl_GlobalEval) /* 177 */ 4883 #endif 4884 #ifndef Tcl_GlobalEvalObj 4885 #define Tcl_GlobalEvalObj \ 4886 (tclStubsPtr->tcl_GlobalEvalObj) /* 178 */ 4887 #endif 4888 #ifndef Tcl_HideCommand 4889 #define Tcl_HideCommand \ 4890 (tclStubsPtr->tcl_HideCommand) /* 179 */ 4891 #endif 4892 #ifndef Tcl_Init 4893 #define Tcl_Init \ 4894 (tclStubsPtr->tcl_Init) /* 180 */ 4895 #endif 4896 #ifndef Tcl_InitHashTable 4897 #define Tcl_InitHashTable \ 4898 (tclStubsPtr->tcl_InitHashTable) /* 181 */ 4899 #endif 4900 #ifndef Tcl_InputBlocked 4901 #define Tcl_InputBlocked \ 4902 (tclStubsPtr->tcl_InputBlocked) /* 182 */ 4903 #endif 4904 #ifndef Tcl_InputBuffered 4905 #define Tcl_InputBuffered \ 4906 (tclStubsPtr->tcl_InputBuffered) /* 183 */ 4907 #endif 4908 #ifndef Tcl_InterpDeleted 4909 #define Tcl_InterpDeleted \ 4910 (tclStubsPtr->tcl_InterpDeleted) /* 184 */ 4911 #endif 4912 #ifndef Tcl_IsSafe 4913 #define Tcl_IsSafe \ 4914 (tclStubsPtr->tcl_IsSafe) /* 185 */ 4915 #endif 4916 #ifndef Tcl_JoinPath 4917 #define Tcl_JoinPath \ 4918 (tclStubsPtr->tcl_JoinPath) /* 186 */ 4919 #endif 4920 #ifndef Tcl_LinkVar 4921 #define Tcl_LinkVar \ 4922 (tclStubsPtr->tcl_LinkVar) /* 187 */ 4923 #endif 4924 /* Slot 188 is reserved */ 4925 #ifndef Tcl_MakeFileChannel 4926 #define Tcl_MakeFileChannel \ 4927 (tclStubsPtr->tcl_MakeFileChannel) /* 189 */ 4928 #endif 4929 #ifndef Tcl_MakeSafe 4930 #define Tcl_MakeSafe \ 4931 (tclStubsPtr->tcl_MakeSafe) /* 190 */ 4932 #endif 4933 #ifndef Tcl_MakeTcpClientChannel 4934 #define Tcl_MakeTcpClientChannel \ 4935 (tclStubsPtr->tcl_MakeTcpClientChannel) /* 191 */ 4936 #endif 4937 #ifndef Tcl_Merge 4938 #define Tcl_Merge \ 4939 (tclStubsPtr->tcl_Merge) /* 192 */ 4940 #endif 4941 #ifndef Tcl_NextHashEntry 4942 #define Tcl_NextHashEntry \ 4943 (tclStubsPtr->tcl_NextHashEntry) /* 193 */ 4944 #endif 4945 #ifndef Tcl_NotifyChannel 4946 #define Tcl_NotifyChannel \ 4947 (tclStubsPtr->tcl_NotifyChannel) /* 194 */ 4948 #endif 4949 #ifndef Tcl_ObjGetVar2 4950 #define Tcl_ObjGetVar2 \ 4951 (tclStubsPtr->tcl_ObjGetVar2) /* 195 */ 4952 #endif 4953 #ifndef Tcl_ObjSetVar2 4954 #define Tcl_ObjSetVar2 \ 4955 (tclStubsPtr->tcl_ObjSetVar2) /* 196 */ 4956 #endif 4957 #ifndef Tcl_OpenCommandChannel 4958 #define Tcl_OpenCommandChannel \ 4959 (tclStubsPtr->tcl_OpenCommandChannel) /* 197 */ 4960 #endif 4961 #ifndef Tcl_OpenFileChannel 4962 #define Tcl_OpenFileChannel \ 4963 (tclStubsPtr->tcl_OpenFileChannel) /* 198 */ 4964 #endif 4965 #ifndef Tcl_OpenTcpClient 4966 #define Tcl_OpenTcpClient \ 4967 (tclStubsPtr->tcl_OpenTcpClient) /* 199 */ 4968 #endif 4969 #ifndef Tcl_OpenTcpServer 4970 #define Tcl_OpenTcpServer \ 4971 (tclStubsPtr->tcl_OpenTcpServer) /* 200 */ 4972 #endif 4973 #ifndef Tcl_Preserve 4974 #define Tcl_Preserve \ 4975 (tclStubsPtr->tcl_Preserve) /* 201 */ 4976 #endif 4977 #ifndef Tcl_PrintDouble 4978 #define Tcl_PrintDouble \ 4979 (tclStubsPtr->tcl_PrintDouble) /* 202 */ 4980 #endif 4981 #ifndef Tcl_PutEnv 4982 #define Tcl_PutEnv \ 4983 (tclStubsPtr->tcl_PutEnv) /* 203 */ 4984 #endif 4985 #ifndef Tcl_PosixError 4986 #define Tcl_PosixError \ 4987 (tclStubsPtr->tcl_PosixError) /* 204 */ 4988 #endif 4989 #ifndef Tcl_QueueEvent 4990 #define Tcl_QueueEvent \ 4991 (tclStubsPtr->tcl_QueueEvent) /* 205 */ 4992 #endif 4993 #ifndef Tcl_Read 4994 #define Tcl_Read \ 4995 (tclStubsPtr->tcl_Read) /* 206 */ 4996 #endif 4997 #ifndef Tcl_ReapDetachedProcs 4998 #define Tcl_ReapDetachedProcs \ 4999 (tclStubsPtr->tcl_ReapDetachedProcs) /* 207 */ 5000 #endif 5001 #ifndef Tcl_RecordAndEval 5002 #define Tcl_RecordAndEval \ 5003 (tclStubsPtr->tcl_RecordAndEval) /* 208 */ 5004 #endif 5005 #ifndef Tcl_RecordAndEvalObj 5006 #define Tcl_RecordAndEvalObj \ 5007 (tclStubsPtr->tcl_RecordAndEvalObj) /* 209 */ 5008 #endif 5009 #ifndef Tcl_RegisterChannel 5010 #define Tcl_RegisterChannel \ 5011 (tclStubsPtr->tcl_RegisterChannel) /* 210 */ 5012 #endif 5013 #ifndef Tcl_RegisterObjType 5014 #define Tcl_RegisterObjType \ 5015 (tclStubsPtr->tcl_RegisterObjType) /* 211 */ 5016 #endif 5017 #ifndef Tcl_RegExpCompile 5018 #define Tcl_RegExpCompile \ 5019 (tclStubsPtr->tcl_RegExpCompile) /* 212 */ 5020 #endif 5021 #ifndef Tcl_RegExpExec 5022 #define Tcl_RegExpExec \ 5023 (tclStubsPtr->tcl_RegExpExec) /* 213 */ 5024 #endif 5025 #ifndef Tcl_RegExpMatch 5026 #define Tcl_RegExpMatch \ 5027 (tclStubsPtr->tcl_RegExpMatch) /* 214 */ 5028 #endif 5029 #ifndef Tcl_RegExpRange 5030 #define Tcl_RegExpRange \ 5031 (tclStubsPtr->tcl_RegExpRange) /* 215 */ 5032 #endif 5033 #ifndef Tcl_Release 5034 #define Tcl_Release \ 5035 (tclStubsPtr->tcl_Release) /* 216 */ 5036 #endif 5037 #ifndef Tcl_ResetResult 5038 #define Tcl_ResetResult \ 5039 (tclStubsPtr->tcl_ResetResult) /* 217 */ 5040 #endif 5041 #ifndef Tcl_ScanElement 5042 #define Tcl_ScanElement \ 5043 (tclStubsPtr->tcl_ScanElement) /* 218 */ 5044 #endif 5045 #ifndef Tcl_ScanCountedElement 5046 #define Tcl_ScanCountedElement \ 5047 (tclStubsPtr->tcl_ScanCountedElement) /* 219 */ 5048 #endif 5049 #ifndef Tcl_SeekOld 5050 #define Tcl_SeekOld \ 5051 (tclStubsPtr->tcl_SeekOld) /* 220 */ 5052 #endif 5053 #ifndef Tcl_ServiceAll 5054 #define Tcl_ServiceAll \ 5055 (tclStubsPtr->tcl_ServiceAll) /* 221 */ 5056 #endif 5057 #ifndef Tcl_ServiceEvent 5058 #define Tcl_ServiceEvent \ 5059 (tclStubsPtr->tcl_ServiceEvent) /* 222 */ 5060 #endif 5061 #ifndef Tcl_SetAssocData 5062 #define Tcl_SetAssocData \ 5063 (tclStubsPtr->tcl_SetAssocData) /* 223 */ 5064 #endif 5065 #ifndef Tcl_SetChannelBufferSize 5066 #define Tcl_SetChannelBufferSize \ 5067 (tclStubsPtr->tcl_SetChannelBufferSize) /* 224 */ 5068 #endif 5069 #ifndef Tcl_SetChannelOption 5070 #define Tcl_SetChannelOption \ 5071 (tclStubsPtr->tcl_SetChannelOption) /* 225 */ 5072 #endif 5073 #ifndef Tcl_SetCommandInfo 5074 #define Tcl_SetCommandInfo \ 5075 (tclStubsPtr->tcl_SetCommandInfo) /* 226 */ 5076 #endif 5077 #ifndef Tcl_SetErrno 5078 #define Tcl_SetErrno \ 5079 (tclStubsPtr->tcl_SetErrno) /* 227 */ 5080 #endif 5081 #ifndef Tcl_SetErrorCode 5082 #define Tcl_SetErrorCode \ 5083 (tclStubsPtr->tcl_SetErrorCode) /* 228 */ 5084 #endif 5085 #ifndef Tcl_SetMaxBlockTime 5086 #define Tcl_SetMaxBlockTime \ 5087 (tclStubsPtr->tcl_SetMaxBlockTime) /* 229 */ 5088 #endif 5089 #ifndef Tcl_SetPanicProc 5090 #define Tcl_SetPanicProc \ 5091 (tclStubsPtr->tcl_SetPanicProc) /* 230 */ 5092 #endif 5093 #ifndef Tcl_SetRecursionLimit 5094 #define Tcl_SetRecursionLimit \ 5095 (tclStubsPtr->tcl_SetRecursionLimit) /* 231 */ 5096 #endif 5097 #ifndef Tcl_SetResult 5098 #define Tcl_SetResult \ 5099 (tclStubsPtr->tcl_SetResult) /* 232 */ 5100 #endif 5101 #ifndef Tcl_SetServiceMode 5102 #define Tcl_SetServiceMode \ 5103 (tclStubsPtr->tcl_SetServiceMode) /* 233 */ 5104 #endif 5105 #ifndef Tcl_SetObjErrorCode 5106 #define Tcl_SetObjErrorCode \ 5107 (tclStubsPtr->tcl_SetObjErrorCode) /* 234 */ 5108 #endif 5109 #ifndef Tcl_SetObjResult 5110 #define Tcl_SetObjResult \ 5111 (tclStubsPtr->tcl_SetObjResult) /* 235 */ 5112 #endif 5113 #ifndef Tcl_SetStdChannel 5114 #define Tcl_SetStdChannel \ 5115 (tclStubsPtr->tcl_SetStdChannel) /* 236 */ 5116 #endif 5117 #ifndef Tcl_SetVar 5118 #define Tcl_SetVar \ 5119 (tclStubsPtr->tcl_SetVar) /* 237 */ 5120 #endif 5121 #ifndef Tcl_SetVar2 5122 #define Tcl_SetVar2 \ 5123 (tclStubsPtr->tcl_SetVar2) /* 238 */ 5124 #endif 5125 #ifndef Tcl_SignalId 5126 #define Tcl_SignalId \ 5127 (tclStubsPtr->tcl_SignalId) /* 239 */ 5128 #endif 5129 #ifndef Tcl_SignalMsg 5130 #define Tcl_SignalMsg \ 5131 (tclStubsPtr->tcl_SignalMsg) /* 240 */ 5132 #endif 5133 #ifndef Tcl_SourceRCFile 5134 #define Tcl_SourceRCFile \ 5135 (tclStubsPtr->tcl_SourceRCFile) /* 241 */ 5136 #endif 5137 #ifndef Tcl_SplitList 5138 #define Tcl_SplitList \ 5139 (tclStubsPtr->tcl_SplitList) /* 242 */ 5140 #endif 5141 #ifndef Tcl_SplitPath 5142 #define Tcl_SplitPath \ 5143 (tclStubsPtr->tcl_SplitPath) /* 243 */ 5144 #endif 5145 #ifndef Tcl_StaticPackage 5146 #define Tcl_StaticPackage \ 5147 (tclStubsPtr->tcl_StaticPackage) /* 244 */ 5148 #endif 5149 #ifndef Tcl_StringMatch 5150 #define Tcl_StringMatch \ 5151 (tclStubsPtr->tcl_StringMatch) /* 245 */ 5152 #endif 5153 #ifndef Tcl_TellOld 5154 #define Tcl_TellOld \ 5155 (tclStubsPtr->tcl_TellOld) /* 246 */ 5156 #endif 5157 #ifndef Tcl_TraceVar 5158 #define Tcl_TraceVar \ 5159 (tclStubsPtr->tcl_TraceVar) /* 247 */ 5160 #endif 5161 #ifndef Tcl_TraceVar2 5162 #define Tcl_TraceVar2 \ 5163 (tclStubsPtr->tcl_TraceVar2) /* 248 */ 5164 #endif 5165 #ifndef Tcl_TranslateFileName 5166 #define Tcl_TranslateFileName \ 5167 (tclStubsPtr->tcl_TranslateFileName) /* 249 */ 5168 #endif 5169 #ifndef Tcl_Ungets 5170 #define Tcl_Ungets \ 5171 (tclStubsPtr->tcl_Ungets) /* 250 */ 5172 #endif 5173 #ifndef Tcl_UnlinkVar 5174 #define Tcl_UnlinkVar \ 5175 (tclStubsPtr->tcl_UnlinkVar) /* 251 */ 5176 #endif 5177 #ifndef Tcl_UnregisterChannel 5178 #define Tcl_UnregisterChannel \ 5179 (tclStubsPtr->tcl_UnregisterChannel) /* 252 */ 5180 #endif 5181 #ifndef Tcl_UnsetVar 5182 #define Tcl_UnsetVar \ 5183 (tclStubsPtr->tcl_UnsetVar) /* 253 */ 5184 #endif 5185 #ifndef Tcl_UnsetVar2 5186 #define Tcl_UnsetVar2 \ 5187 (tclStubsPtr->tcl_UnsetVar2) /* 254 */ 5188 #endif 5189 #ifndef Tcl_UntraceVar 5190 #define Tcl_UntraceVar \ 5191 (tclStubsPtr->tcl_UntraceVar) /* 255 */ 5192 #endif 5193 #ifndef Tcl_UntraceVar2 5194 #define Tcl_UntraceVar2 \ 5195 (tclStubsPtr->tcl_UntraceVar2) /* 256 */ 5196 #endif 5197 #ifndef Tcl_UpdateLinkedVar 5198 #define Tcl_UpdateLinkedVar \ 5199 (tclStubsPtr->tcl_UpdateLinkedVar) /* 257 */ 5200 #endif 5201 #ifndef Tcl_UpVar 5202 #define Tcl_UpVar \ 5203 (tclStubsPtr->tcl_UpVar) /* 258 */ 5204 #endif 5205 #ifndef Tcl_UpVar2 5206 #define Tcl_UpVar2 \ 5207 (tclStubsPtr->tcl_UpVar2) /* 259 */ 5208 #endif 5209 #ifndef Tcl_VarEval 5210 #define Tcl_VarEval \ 5211 (tclStubsPtr->tcl_VarEval) /* 260 */ 5212 #endif 5213 #ifndef Tcl_VarTraceInfo 5214 #define Tcl_VarTraceInfo \ 5215 (tclStubsPtr->tcl_VarTraceInfo) /* 261 */ 5216 #endif 5217 #ifndef Tcl_VarTraceInfo2 5218 #define Tcl_VarTraceInfo2 \ 5219 (tclStubsPtr->tcl_VarTraceInfo2) /* 262 */ 5220 #endif 5221 #ifndef Tcl_Write 5222 #define Tcl_Write \ 5223 (tclStubsPtr->tcl_Write) /* 263 */ 5224 #endif 5225 #ifndef Tcl_WrongNumArgs 5226 #define Tcl_WrongNumArgs \ 5227 (tclStubsPtr->tcl_WrongNumArgs) /* 264 */ 5228 #endif 5229 #ifndef Tcl_DumpActiveMemory 5230 #define Tcl_DumpActiveMemory \ 5231 (tclStubsPtr->tcl_DumpActiveMemory) /* 265 */ 5232 #endif 5233 #ifndef Tcl_ValidateAllMemory 5234 #define Tcl_ValidateAllMemory \ 5235 (tclStubsPtr->tcl_ValidateAllMemory) /* 266 */ 5236 #endif 5237 #ifndef Tcl_AppendResultVA 5238 #define Tcl_AppendResultVA \ 5239 (tclStubsPtr->tcl_AppendResultVA) /* 267 */ 5240 #endif 5241 #ifndef Tcl_AppendStringsToObjVA 5242 #define Tcl_AppendStringsToObjVA \ 5243 (tclStubsPtr->tcl_AppendStringsToObjVA) /* 268 */ 5244 #endif 5245 #ifndef Tcl_HashStats 5246 #define Tcl_HashStats \ 5247 (tclStubsPtr->tcl_HashStats) /* 269 */ 5248 #endif 5249 #ifndef Tcl_ParseVar 5250 #define Tcl_ParseVar \ 5251 (tclStubsPtr->tcl_ParseVar) /* 270 */ 5252 #endif 5253 #ifndef Tcl_PkgPresent 5254 #define Tcl_PkgPresent \ 5255 (tclStubsPtr->tcl_PkgPresent) /* 271 */ 5256 #endif 5257 #ifndef Tcl_PkgPresentEx 5258 #define Tcl_PkgPresentEx \ 5259 (tclStubsPtr->tcl_PkgPresentEx) /* 272 */ 5260 #endif 5261 #ifndef Tcl_PkgProvide 5262 #define Tcl_PkgProvide \ 5263 (tclStubsPtr->tcl_PkgProvide) /* 273 */ 5264 #endif 5265 #ifndef Tcl_PkgRequire 5266 #define Tcl_PkgRequire \ 5267 (tclStubsPtr->tcl_PkgRequire) /* 274 */ 5268 #endif 5269 #ifndef Tcl_SetErrorCodeVA 5270 #define Tcl_SetErrorCodeVA \ 5271 (tclStubsPtr->tcl_SetErrorCodeVA) /* 275 */ 5272 #endif 5273 #ifndef Tcl_VarEvalVA 5274 #define Tcl_VarEvalVA \ 5275 (tclStubsPtr->tcl_VarEvalVA) /* 276 */ 5276 #endif 5277 #ifndef Tcl_WaitPid 5278 #define Tcl_WaitPid \ 5279 (tclStubsPtr->tcl_WaitPid) /* 277 */ 5280 #endif 5281 #ifndef Tcl_PanicVA 5282 #define Tcl_PanicVA \ 5283 (tclStubsPtr->tcl_PanicVA) /* 278 */ 5284 #endif 5285 #ifndef Tcl_GetVersion 5286 #define Tcl_GetVersion \ 5287 (tclStubsPtr->tcl_GetVersion) /* 279 */ 5288 #endif 5289 #ifndef Tcl_InitMemory 5290 #define Tcl_InitMemory \ 5291 (tclStubsPtr->tcl_InitMemory) /* 280 */ 5292 #endif 5293 #ifndef Tcl_StackChannel 5294 #define Tcl_StackChannel \ 5295 (tclStubsPtr->tcl_StackChannel) /* 281 */ 5296 #endif 5297 #ifndef Tcl_UnstackChannel 5298 #define Tcl_UnstackChannel \ 5299 (tclStubsPtr->tcl_UnstackChannel) /* 282 */ 5300 #endif 5301 #ifndef Tcl_GetStackedChannel 5302 #define Tcl_GetStackedChannel \ 5303 (tclStubsPtr->tcl_GetStackedChannel) /* 283 */ 5304 #endif 5305 #ifndef Tcl_SetMainLoop 5306 #define Tcl_SetMainLoop \ 5307 (tclStubsPtr->tcl_SetMainLoop) /* 284 */ 5308 #endif 5309 /* Slot 285 is reserved */ 5310 #ifndef Tcl_AppendObjToObj 5311 #define Tcl_AppendObjToObj \ 5312 (tclStubsPtr->tcl_AppendObjToObj) /* 286 */ 5313 #endif 5314 #ifndef Tcl_CreateEncoding 5315 #define Tcl_CreateEncoding \ 5316 (tclStubsPtr->tcl_CreateEncoding) /* 287 */ 5317 #endif 5318 #ifndef Tcl_CreateThreadExitHandler 5319 #define Tcl_CreateThreadExitHandler \ 5320 (tclStubsPtr->tcl_CreateThreadExitHandler) /* 288 */ 5321 #endif 5322 #ifndef Tcl_DeleteThreadExitHandler 5323 #define Tcl_DeleteThreadExitHandler \ 5324 (tclStubsPtr->tcl_DeleteThreadExitHandler) /* 289 */ 5325 #endif 5326 #ifndef Tcl_DiscardResult 5327 #define Tcl_DiscardResult \ 5328 (tclStubsPtr->tcl_DiscardResult) /* 290 */ 5329 #endif 5330 #ifndef Tcl_EvalEx 5331 #define Tcl_EvalEx \ 5332 (tclStubsPtr->tcl_EvalEx) /* 291 */ 5333 #endif 5334 #ifndef Tcl_EvalObjv 5335 #define Tcl_EvalObjv \ 5336 (tclStubsPtr->tcl_EvalObjv) /* 292 */ 5337 #endif 5338 #ifndef Tcl_EvalObjEx 5339 #define Tcl_EvalObjEx \ 5340 (tclStubsPtr->tcl_EvalObjEx) /* 293 */ 5341 #endif 5342 #ifndef Tcl_ExitThread 5343 #define Tcl_ExitThread \ 5344 (tclStubsPtr->tcl_ExitThread) /* 294 */ 5345 #endif 5346 #ifndef Tcl_ExternalToUtf 5347 #define Tcl_ExternalToUtf \ 5348 (tclStubsPtr->tcl_ExternalToUtf) /* 295 */ 5349 #endif 5350 #ifndef Tcl_ExternalToUtfDString 5351 #define Tcl_ExternalToUtfDString \ 5352 (tclStubsPtr->tcl_ExternalToUtfDString) /* 296 */ 5353 #endif 5354 #ifndef Tcl_FinalizeThread 5355 #define Tcl_FinalizeThread \ 5356 (tclStubsPtr->tcl_FinalizeThread) /* 297 */ 5357 #endif 5358 #ifndef Tcl_FinalizeNotifier 5359 #define Tcl_FinalizeNotifier \ 5360 (tclStubsPtr->tcl_FinalizeNotifier) /* 298 */ 5361 #endif 5362 #ifndef Tcl_FreeEncoding 5363 #define Tcl_FreeEncoding \ 5364 (tclStubsPtr->tcl_FreeEncoding) /* 299 */ 5365 #endif 5366 #ifndef Tcl_GetCurrentThread 5367 #define Tcl_GetCurrentThread \ 5368 (tclStubsPtr->tcl_GetCurrentThread) /* 300 */ 5369 #endif 5370 #ifndef Tcl_GetEncoding 5371 #define Tcl_GetEncoding \ 5372 (tclStubsPtr->tcl_GetEncoding) /* 301 */ 5373 #endif 5374 #ifndef Tcl_GetEncodingName 5375 #define Tcl_GetEncodingName \ 5376 (tclStubsPtr->tcl_GetEncodingName) /* 302 */ 5377 #endif 5378 #ifndef Tcl_GetEncodingNames 5379 #define Tcl_GetEncodingNames \ 5380 (tclStubsPtr->tcl_GetEncodingNames) /* 303 */ 5381 #endif 5382 #ifndef Tcl_GetIndexFromObjStruct 5383 #define Tcl_GetIndexFromObjStruct \ 5384 (tclStubsPtr->tcl_GetIndexFromObjStruct) /* 304 */ 5385 #endif 5386 #ifndef Tcl_GetThreadData 5387 #define Tcl_GetThreadData \ 5388 (tclStubsPtr->tcl_GetThreadData) /* 305 */ 5389 #endif 5390 #ifndef Tcl_GetVar2Ex 5391 #define Tcl_GetVar2Ex \ 5392 (tclStubsPtr->tcl_GetVar2Ex) /* 306 */ 5393 #endif 5394 #ifndef Tcl_InitNotifier 5395 #define Tcl_InitNotifier \ 5396 (tclStubsPtr->tcl_InitNotifier) /* 307 */ 5397 #endif 5398 #ifndef Tcl_MutexLock 5399 #define Tcl_MutexLock \ 5400 (tclStubsPtr->tcl_MutexLock) /* 308 */ 5401 #endif 5402 #ifndef Tcl_MutexUnlock 5403 #define Tcl_MutexUnlock \ 5404 (tclStubsPtr->tcl_MutexUnlock) /* 309 */ 5405 #endif 5406 #ifndef Tcl_ConditionNotify 5407 #define Tcl_ConditionNotify \ 5408 (tclStubsPtr->tcl_ConditionNotify) /* 310 */ 5409 #endif 5410 #ifndef Tcl_ConditionWait 5411 #define Tcl_ConditionWait \ 5412 (tclStubsPtr->tcl_ConditionWait) /* 311 */ 5413 #endif 5414 #ifndef Tcl_NumUtfChars 5415 #define Tcl_NumUtfChars \ 5416 (tclStubsPtr->tcl_NumUtfChars) /* 312 */ 5417 #endif 5418 #ifndef Tcl_ReadChars 5419 #define Tcl_ReadChars \ 5420 (tclStubsPtr->tcl_ReadChars) /* 313 */ 5421 #endif 5422 #ifndef Tcl_RestoreResult 5423 #define Tcl_RestoreResult \ 5424 (tclStubsPtr->tcl_RestoreResult) /* 314 */ 5425 #endif 5426 #ifndef Tcl_SaveResult 5427 #define Tcl_SaveResult \ 5428 (tclStubsPtr->tcl_SaveResult) /* 315 */ 5429 #endif 5430 #ifndef Tcl_SetSystemEncoding 5431 #define Tcl_SetSystemEncoding \ 5432 (tclStubsPtr->tcl_SetSystemEncoding) /* 316 */ 5433 #endif 5434 #ifndef Tcl_SetVar2Ex 5435 #define Tcl_SetVar2Ex \ 5436 (tclStubsPtr->tcl_SetVar2Ex) /* 317 */ 5437 #endif 5438 #ifndef Tcl_ThreadAlert 5439 #define Tcl_ThreadAlert \ 5440 (tclStubsPtr->tcl_ThreadAlert) /* 318 */ 5441 #endif 5442 #ifndef Tcl_ThreadQueueEvent 5443 #define Tcl_ThreadQueueEvent \ 5444 (tclStubsPtr->tcl_ThreadQueueEvent) /* 319 */ 5445 #endif 5446 #ifndef Tcl_UniCharAtIndex 5447 #define Tcl_UniCharAtIndex \ 5448 (tclStubsPtr->tcl_UniCharAtIndex) /* 320 */ 5449 #endif 5450 #ifndef Tcl_UniCharToLower 5451 #define Tcl_UniCharToLower \ 5452 (tclStubsPtr->tcl_UniCharToLower) /* 321 */ 5453 #endif 5454 #ifndef Tcl_UniCharToTitle 5455 #define Tcl_UniCharToTitle \ 5456 (tclStubsPtr->tcl_UniCharToTitle) /* 322 */ 5457 #endif 5458 #ifndef Tcl_UniCharToUpper 5459 #define Tcl_UniCharToUpper \ 5460 (tclStubsPtr->tcl_UniCharToUpper) /* 323 */ 5461 #endif 5462 #ifndef Tcl_UniCharToUtf 5463 #define Tcl_UniCharToUtf \ 5464 (tclStubsPtr->tcl_UniCharToUtf) /* 324 */ 5465 #endif 5466 #ifndef Tcl_UtfAtIndex 5467 #define Tcl_UtfAtIndex \ 5468 (tclStubsPtr->tcl_UtfAtIndex) /* 325 */ 5469 #endif 5470 #ifndef Tcl_UtfCharComplete 5471 #define Tcl_UtfCharComplete \ 5472 (tclStubsPtr->tcl_UtfCharComplete) /* 326 */ 5473 #endif 5474 #ifndef Tcl_UtfBackslash 5475 #define Tcl_UtfBackslash \ 5476 (tclStubsPtr->tcl_UtfBackslash) /* 327 */ 5477 #endif 5478 #ifndef Tcl_UtfFindFirst 5479 #define Tcl_UtfFindFirst \ 5480 (tclStubsPtr->tcl_UtfFindFirst) /* 328 */ 5481 #endif 5482 #ifndef Tcl_UtfFindLast 5483 #define Tcl_UtfFindLast \ 5484 (tclStubsPtr->tcl_UtfFindLast) /* 329 */ 5485 #endif 5486 #ifndef Tcl_UtfNext 5487 #define Tcl_UtfNext \ 5488 (tclStubsPtr->tcl_UtfNext) /* 330 */ 5489 #endif 5490 #ifndef Tcl_UtfPrev 5491 #define Tcl_UtfPrev \ 5492 (tclStubsPtr->tcl_UtfPrev) /* 331 */ 5493 #endif 5494 #ifndef Tcl_UtfToExternal 5495 #define Tcl_UtfToExternal \ 5496 (tclStubsPtr->tcl_UtfToExternal) /* 332 */ 5497 #endif 5498 #ifndef Tcl_UtfToExternalDString 5499 #define Tcl_UtfToExternalDString \ 5500 (tclStubsPtr->tcl_UtfToExternalDString) /* 333 */ 5501 #endif 5502 #ifndef Tcl_UtfToLower 5503 #define Tcl_UtfToLower \ 5504 (tclStubsPtr->tcl_UtfToLower) /* 334 */ 5505 #endif 5506 #ifndef Tcl_UtfToTitle 5507 #define Tcl_UtfToTitle \ 5508 (tclStubsPtr->tcl_UtfToTitle) /* 335 */ 5509 #endif 5510 #ifndef Tcl_UtfToUniChar 5511 #define Tcl_UtfToUniChar \ 5512 (tclStubsPtr->tcl_UtfToUniChar) /* 336 */ 5513 #endif 5514 #ifndef Tcl_UtfToUpper 5515 #define Tcl_UtfToUpper \ 5516 (tclStubsPtr->tcl_UtfToUpper) /* 337 */ 5517 #endif 5518 #ifndef Tcl_WriteChars 5519 #define Tcl_WriteChars \ 5520 (tclStubsPtr->tcl_WriteChars) /* 338 */ 5521 #endif 5522 #ifndef Tcl_WriteObj 5523 #define Tcl_WriteObj \ 5524 (tclStubsPtr->tcl_WriteObj) /* 339 */ 5525 #endif 5526 #ifndef Tcl_GetString 5527 #define Tcl_GetString \ 5528 (tclStubsPtr->tcl_GetString) /* 340 */ 5529 #endif 5530 #ifndef Tcl_GetDefaultEncodingDir 5531 #define Tcl_GetDefaultEncodingDir \ 5532 (tclStubsPtr->tcl_GetDefaultEncodingDir) /* 341 */ 5533 #endif 5534 #ifndef Tcl_SetDefaultEncodingDir 5535 #define Tcl_SetDefaultEncodingDir \ 5536 (tclStubsPtr->tcl_SetDefaultEncodingDir) /* 342 */ 5537 #endif 5538 #ifndef Tcl_AlertNotifier 5539 #define Tcl_AlertNotifier \ 5540 (tclStubsPtr->tcl_AlertNotifier) /* 343 */ 5541 #endif 5542 #ifndef Tcl_ServiceModeHook 5543 #define Tcl_ServiceModeHook \ 5544 (tclStubsPtr->tcl_ServiceModeHook) /* 344 */ 5545 #endif 5546 #ifndef Tcl_UniCharIsAlnum 5547 #define Tcl_UniCharIsAlnum \ 5548 (tclStubsPtr->tcl_UniCharIsAlnum) /* 345 */ 5549 #endif 5550 #ifndef Tcl_UniCharIsAlpha 5551 #define Tcl_UniCharIsAlpha \ 5552 (tclStubsPtr->tcl_UniCharIsAlpha) /* 346 */ 5553 #endif 5554 #ifndef Tcl_UniCharIsDigit 5555 #define Tcl_UniCharIsDigit \ 5556 (tclStubsPtr->tcl_UniCharIsDigit) /* 347 */ 5557 #endif 5558 #ifndef Tcl_UniCharIsLower 5559 #define Tcl_UniCharIsLower \ 5560 (tclStubsPtr->tcl_UniCharIsLower) /* 348 */ 5561 #endif 5562 #ifndef Tcl_UniCharIsSpace 5563 #define Tcl_UniCharIsSpace \ 5564 (tclStubsPtr->tcl_UniCharIsSpace) /* 349 */ 5565 #endif 5566 #ifndef Tcl_UniCharIsUpper 5567 #define Tcl_UniCharIsUpper \ 5568 (tclStubsPtr->tcl_UniCharIsUpper) /* 350 */ 5569 #endif 5570 #ifndef Tcl_UniCharIsWordChar 5571 #define Tcl_UniCharIsWordChar \ 5572 (tclStubsPtr->tcl_UniCharIsWordChar) /* 351 */ 5573 #endif 5574 #ifndef Tcl_UniCharLen 5575 #define Tcl_UniCharLen \ 5576 (tclStubsPtr->tcl_UniCharLen) /* 352 */ 5577 #endif 5578 #ifndef Tcl_UniCharNcmp 5579 #define Tcl_UniCharNcmp \ 5580 (tclStubsPtr->tcl_UniCharNcmp) /* 353 */ 5581 #endif 5582 #ifndef Tcl_UniCharToUtfDString 5583 #define Tcl_UniCharToUtfDString \ 5584 (tclStubsPtr->tcl_UniCharToUtfDString) /* 354 */ 5585 #endif 5586 #ifndef Tcl_UtfToUniCharDString 5587 #define Tcl_UtfToUniCharDString \ 5588 (tclStubsPtr->tcl_UtfToUniCharDString) /* 355 */ 5589 #endif 5590 #ifndef Tcl_GetRegExpFromObj 5591 #define Tcl_GetRegExpFromObj \ 5592 (tclStubsPtr->tcl_GetRegExpFromObj) /* 356 */ 5593 #endif 5594 #ifndef Tcl_EvalTokens 5595 #define Tcl_EvalTokens \ 5596 (tclStubsPtr->tcl_EvalTokens) /* 357 */ 5597 #endif 5598 #ifndef Tcl_FreeParse 5599 #define Tcl_FreeParse \ 5600 (tclStubsPtr->tcl_FreeParse) /* 358 */ 5601 #endif 5602 #ifndef Tcl_LogCommandInfo 5603 #define Tcl_LogCommandInfo \ 5604 (tclStubsPtr->tcl_LogCommandInfo) /* 359 */ 5605 #endif 5606 #ifndef Tcl_ParseBraces 5607 #define Tcl_ParseBraces \ 5608 (tclStubsPtr->tcl_ParseBraces) /* 360 */ 5609 #endif 5610 #ifndef Tcl_ParseCommand 5611 #define Tcl_ParseCommand \ 5612 (tclStubsPtr->tcl_ParseCommand) /* 361 */ 5613 #endif 5614 #ifndef Tcl_ParseExpr 5615 #define Tcl_ParseExpr \ 5616 (tclStubsPtr->tcl_ParseExpr) /* 362 */ 5617 #endif 5618 #ifndef Tcl_ParseQuotedString 5619 #define Tcl_ParseQuotedString \ 5620 (tclStubsPtr->tcl_ParseQuotedString) /* 363 */ 5621 #endif 5622 #ifndef Tcl_ParseVarName 5623 #define Tcl_ParseVarName \ 5624 (tclStubsPtr->tcl_ParseVarName) /* 364 */ 5625 #endif 5626 #ifndef Tcl_GetCwd 5627 #define Tcl_GetCwd \ 5628 (tclStubsPtr->tcl_GetCwd) /* 365 */ 5629 #endif 5630 #ifndef Tcl_Chdir 5631 #define Tcl_Chdir \ 5632 (tclStubsPtr->tcl_Chdir) /* 366 */ 5633 #endif 5634 #ifndef Tcl_Access 5635 #define Tcl_Access \ 5636 (tclStubsPtr->tcl_Access) /* 367 */ 5637 #endif 5638 #ifndef Tcl_Stat 5639 #define Tcl_Stat \ 5640 (tclStubsPtr->tcl_Stat) /* 368 */ 5641 #endif 5642 #ifndef Tcl_UtfNcmp 5643 #define Tcl_UtfNcmp \ 5644 (tclStubsPtr->tcl_UtfNcmp) /* 369 */ 5645 #endif 5646 #ifndef Tcl_UtfNcasecmp 5647 #define Tcl_UtfNcasecmp \ 5648 (tclStubsPtr->tcl_UtfNcasecmp) /* 370 */ 5649 #endif 5650 #ifndef Tcl_StringCaseMatch 5651 #define Tcl_StringCaseMatch \ 5652 (tclStubsPtr->tcl_StringCaseMatch) /* 371 */ 5653 #endif 5654 #ifndef Tcl_UniCharIsControl 5655 #define Tcl_UniCharIsControl \ 5656 (tclStubsPtr->tcl_UniCharIsControl) /* 372 */ 5657 #endif 5658 #ifndef Tcl_UniCharIsGraph 5659 #define Tcl_UniCharIsGraph \ 5660 (tclStubsPtr->tcl_UniCharIsGraph) /* 373 */ 5661 #endif 5662 #ifndef Tcl_UniCharIsPrint 5663 #define Tcl_UniCharIsPrint \ 5664 (tclStubsPtr->tcl_UniCharIsPrint) /* 374 */ 5665 #endif 5666 #ifndef Tcl_UniCharIsPunct 5667 #define Tcl_UniCharIsPunct \ 5668 (tclStubsPtr->tcl_UniCharIsPunct) /* 375 */ 5669 #endif 5670 #ifndef Tcl_RegExpExecObj 5671 #define Tcl_RegExpExecObj \ 5672 (tclStubsPtr->tcl_RegExpExecObj) /* 376 */ 5673 #endif 5674 #ifndef Tcl_RegExpGetInfo 5675 #define Tcl_RegExpGetInfo \ 5676 (tclStubsPtr->tcl_RegExpGetInfo) /* 377 */ 5677 #endif 5678 #ifndef Tcl_NewUnicodeObj 5679 #define Tcl_NewUnicodeObj \ 5680 (tclStubsPtr->tcl_NewUnicodeObj) /* 378 */ 5681 #endif 5682 #ifndef Tcl_SetUnicodeObj 5683 #define Tcl_SetUnicodeObj \ 5684 (tclStubsPtr->tcl_SetUnicodeObj) /* 379 */ 5685 #endif 5686 #ifndef Tcl_GetCharLength 5687 #define Tcl_GetCharLength \ 5688 (tclStubsPtr->tcl_GetCharLength) /* 380 */ 5689 #endif 5690 #ifndef Tcl_GetUniChar 5691 #define Tcl_GetUniChar \ 5692 (tclStubsPtr->tcl_GetUniChar) /* 381 */ 5693 #endif 5694 #ifndef Tcl_GetUnicode 5695 #define Tcl_GetUnicode \ 5696 (tclStubsPtr->tcl_GetUnicode) /* 382 */ 5697 #endif 5698 #ifndef Tcl_GetRange 5699 #define Tcl_GetRange \ 5700 (tclStubsPtr->tcl_GetRange) /* 383 */ 5701 #endif 5702 #ifndef Tcl_AppendUnicodeToObj 5703 #define Tcl_AppendUnicodeToObj \ 5704 (tclStubsPtr->tcl_AppendUnicodeToObj) /* 384 */ 5705 #endif 5706 #ifndef Tcl_RegExpMatchObj 5707 #define Tcl_RegExpMatchObj \ 5708 (tclStubsPtr->tcl_RegExpMatchObj) /* 385 */ 5709 #endif 5710 #ifndef Tcl_SetNotifier 5711 #define Tcl_SetNotifier \ 5712 (tclStubsPtr->tcl_SetNotifier) /* 386 */ 5713 #endif 5714 #ifndef Tcl_GetAllocMutex 5715 #define Tcl_GetAllocMutex \ 5716 (tclStubsPtr->tcl_GetAllocMutex) /* 387 */ 5717 #endif 5718 #ifndef Tcl_GetChannelNames 5719 #define Tcl_GetChannelNames \ 5720 (tclStubsPtr->tcl_GetChannelNames) /* 388 */ 5721 #endif 5722 #ifndef Tcl_GetChannelNamesEx 5723 #define Tcl_GetChannelNamesEx \ 5724 (tclStubsPtr->tcl_GetChannelNamesEx) /* 389 */ 5725 #endif 5726 #ifndef Tcl_ProcObjCmd 5727 #define Tcl_ProcObjCmd \ 5728 (tclStubsPtr->tcl_ProcObjCmd) /* 390 */ 5729 #endif 5730 #ifndef Tcl_ConditionFinalize 5731 #define Tcl_ConditionFinalize \ 5732 (tclStubsPtr->tcl_ConditionFinalize) /* 391 */ 5733 #endif 5734 #ifndef Tcl_MutexFinalize 5735 #define Tcl_MutexFinalize \ 5736 (tclStubsPtr->tcl_MutexFinalize) /* 392 */ 5737 #endif 5738 #ifndef Tcl_CreateThread 5739 #define Tcl_CreateThread \ 5740 (tclStubsPtr->tcl_CreateThread) /* 393 */ 5741 #endif 5742 #ifndef Tcl_ReadRaw 5743 #define Tcl_ReadRaw \ 5744 (tclStubsPtr->tcl_ReadRaw) /* 394 */ 5745 #endif 5746 #ifndef Tcl_WriteRaw 5747 #define Tcl_WriteRaw \ 5748 (tclStubsPtr->tcl_WriteRaw) /* 395 */ 5749 #endif 5750 #ifndef Tcl_GetTopChannel 5751 #define Tcl_GetTopChannel \ 5752 (tclStubsPtr->tcl_GetTopChannel) /* 396 */ 5753 #endif 5754 #ifndef Tcl_ChannelBuffered 5755 #define Tcl_ChannelBuffered \ 5756 (tclStubsPtr->tcl_ChannelBuffered) /* 397 */ 5757 #endif 5758 #ifndef Tcl_ChannelName 5759 #define Tcl_ChannelName \ 5760 (tclStubsPtr->tcl_ChannelName) /* 398 */ 5761 #endif 5762 #ifndef Tcl_ChannelVersion 5763 #define Tcl_ChannelVersion \ 5764 (tclStubsPtr->tcl_ChannelVersion) /* 399 */ 5765 #endif 5766 #ifndef Tcl_ChannelBlockModeProc 5767 #define Tcl_ChannelBlockModeProc \ 5768 (tclStubsPtr->tcl_ChannelBlockModeProc) /* 400 */ 5769 #endif 5770 #ifndef Tcl_ChannelCloseProc 5771 #define Tcl_ChannelCloseProc \ 5772 (tclStubsPtr->tcl_ChannelCloseProc) /* 401 */ 5773 #endif 5774 #ifndef Tcl_ChannelClose2Proc 5775 #define Tcl_ChannelClose2Proc \ 5776 (tclStubsPtr->tcl_ChannelClose2Proc) /* 402 */ 5777 #endif 5778 #ifndef Tcl_ChannelInputProc 5779 #define Tcl_ChannelInputProc \ 5780 (tclStubsPtr->tcl_ChannelInputProc) /* 403 */ 5781 #endif 5782 #ifndef Tcl_ChannelOutputProc 5783 #define Tcl_ChannelOutputProc \ 5784 (tclStubsPtr->tcl_ChannelOutputProc) /* 404 */ 5785 #endif 5786 #ifndef Tcl_ChannelSeekProc 5787 #define Tcl_ChannelSeekProc \ 5788 (tclStubsPtr->tcl_ChannelSeekProc) /* 405 */ 5789 #endif 5790 #ifndef Tcl_ChannelSetOptionProc 5791 #define Tcl_ChannelSetOptionProc \ 5792 (tclStubsPtr->tcl_ChannelSetOptionProc) /* 406 */ 5793 #endif 5794 #ifndef Tcl_ChannelGetOptionProc 5795 #define Tcl_ChannelGetOptionProc \ 5796 (tclStubsPtr->tcl_ChannelGetOptionProc) /* 407 */ 5797 #endif 5798 #ifndef Tcl_ChannelWatchProc 5799 #define Tcl_ChannelWatchProc \ 5800 (tclStubsPtr->tcl_ChannelWatchProc) /* 408 */ 5801 #endif 5802 #ifndef Tcl_ChannelGetHandleProc 5803 #define Tcl_ChannelGetHandleProc \ 5804 (tclStubsPtr->tcl_ChannelGetHandleProc) /* 409 */ 5805 #endif 5806 #ifndef Tcl_ChannelFlushProc 5807 #define Tcl_ChannelFlushProc \ 5808 (tclStubsPtr->tcl_ChannelFlushProc) /* 410 */ 5809 #endif 5810 #ifndef Tcl_ChannelHandlerProc 5811 #define Tcl_ChannelHandlerProc \ 5812 (tclStubsPtr->tcl_ChannelHandlerProc) /* 411 */ 5813 #endif 5814 #ifndef Tcl_JoinThread 5815 #define Tcl_JoinThread \ 5816 (tclStubsPtr->tcl_JoinThread) /* 412 */ 5817 #endif 5818 #ifndef Tcl_IsChannelShared 5819 #define Tcl_IsChannelShared \ 5820 (tclStubsPtr->tcl_IsChannelShared) /* 413 */ 5821 #endif 5822 #ifndef Tcl_IsChannelRegistered 5823 #define Tcl_IsChannelRegistered \ 5824 (tclStubsPtr->tcl_IsChannelRegistered) /* 414 */ 5825 #endif 5826 #ifndef Tcl_CutChannel 5827 #define Tcl_CutChannel \ 5828 (tclStubsPtr->tcl_CutChannel) /* 415 */ 5829 #endif 5830 #ifndef Tcl_SpliceChannel 5831 #define Tcl_SpliceChannel \ 5832 (tclStubsPtr->tcl_SpliceChannel) /* 416 */ 5833 #endif 5834 #ifndef Tcl_ClearChannelHandlers 5835 #define Tcl_ClearChannelHandlers \ 5836 (tclStubsPtr->tcl_ClearChannelHandlers) /* 417 */ 5837 #endif 5838 #ifndef Tcl_IsChannelExisting 5839 #define Tcl_IsChannelExisting \ 5840 (tclStubsPtr->tcl_IsChannelExisting) /* 418 */ 5841 #endif 5842 #ifndef Tcl_UniCharNcasecmp 5843 #define Tcl_UniCharNcasecmp \ 5844 (tclStubsPtr->tcl_UniCharNcasecmp) /* 419 */ 5845 #endif 5846 #ifndef Tcl_UniCharCaseMatch 5847 #define Tcl_UniCharCaseMatch \ 5848 (tclStubsPtr->tcl_UniCharCaseMatch) /* 420 */ 5849 #endif 5850 #ifndef Tcl_FindHashEntry 5851 #define Tcl_FindHashEntry \ 5852 (tclStubsPtr->tcl_FindHashEntry) /* 421 */ 5853 #endif 5854 #ifndef Tcl_CreateHashEntry 5855 #define Tcl_CreateHashEntry \ 5856 (tclStubsPtr->tcl_CreateHashEntry) /* 422 */ 5857 #endif 5858 #ifndef Tcl_InitCustomHashTable 5859 #define Tcl_InitCustomHashTable \ 5860 (tclStubsPtr->tcl_InitCustomHashTable) /* 423 */ 5861 #endif 5862 #ifndef Tcl_InitObjHashTable 5863 #define Tcl_InitObjHashTable \ 5864 (tclStubsPtr->tcl_InitObjHashTable) /* 424 */ 5865 #endif 5866 #ifndef Tcl_CommandTraceInfo 5867 #define Tcl_CommandTraceInfo \ 5868 (tclStubsPtr->tcl_CommandTraceInfo) /* 425 */ 5869 #endif 5870 #ifndef Tcl_TraceCommand 5871 #define Tcl_TraceCommand \ 5872 (tclStubsPtr->tcl_TraceCommand) /* 426 */ 5873 #endif 5874 #ifndef Tcl_UntraceCommand 5875 #define Tcl_UntraceCommand \ 5876 (tclStubsPtr->tcl_UntraceCommand) /* 427 */ 5877 #endif 5878 #ifndef Tcl_AttemptAlloc 5879 #define Tcl_AttemptAlloc \ 5880 (tclStubsPtr->tcl_AttemptAlloc) /* 428 */ 5881 #endif 5882 #ifndef Tcl_AttemptDbCkalloc 5883 #define Tcl_AttemptDbCkalloc \ 5884 (tclStubsPtr->tcl_AttemptDbCkalloc) /* 429 */ 5885 #endif 5886 #ifndef Tcl_AttemptRealloc 5887 #define Tcl_AttemptRealloc \ 5888 (tclStubsPtr->tcl_AttemptRealloc) /* 430 */ 5889 #endif 5890 #ifndef Tcl_AttemptDbCkrealloc 5891 #define Tcl_AttemptDbCkrealloc \ 5892 (tclStubsPtr->tcl_AttemptDbCkrealloc) /* 431 */ 5893 #endif 5894 #ifndef Tcl_AttemptSetObjLength 5895 #define Tcl_AttemptSetObjLength \ 5896 (tclStubsPtr->tcl_AttemptSetObjLength) /* 432 */ 5897 #endif 5898 #ifndef Tcl_GetChannelThread 5899 #define Tcl_GetChannelThread \ 5900 (tclStubsPtr->tcl_GetChannelThread) /* 433 */ 5901 #endif 5902 #ifndef Tcl_GetUnicodeFromObj 5903 #define Tcl_GetUnicodeFromObj \ 5904 (tclStubsPtr->tcl_GetUnicodeFromObj) /* 434 */ 5905 #endif 5906 #ifndef Tcl_GetMathFuncInfo 5907 #define Tcl_GetMathFuncInfo \ 5908 (tclStubsPtr->tcl_GetMathFuncInfo) /* 435 */ 5909 #endif 5910 #ifndef Tcl_ListMathFuncs 5911 #define Tcl_ListMathFuncs \ 5912 (tclStubsPtr->tcl_ListMathFuncs) /* 436 */ 5913 #endif 5914 #ifndef Tcl_SubstObj 5915 #define Tcl_SubstObj \ 5916 (tclStubsPtr->tcl_SubstObj) /* 437 */ 5917 #endif 5918 #ifndef Tcl_DetachChannel 5919 #define Tcl_DetachChannel \ 5920 (tclStubsPtr->tcl_DetachChannel) /* 438 */ 5921 #endif 5922 #ifndef Tcl_IsStandardChannel 5923 #define Tcl_IsStandardChannel \ 5924 (tclStubsPtr->tcl_IsStandardChannel) /* 439 */ 5925 #endif 5926 #ifndef Tcl_FSCopyFile 5927 #define Tcl_FSCopyFile \ 5928 (tclStubsPtr->tcl_FSCopyFile) /* 440 */ 5929 #endif 5930 #ifndef Tcl_FSCopyDirectory 5931 #define Tcl_FSCopyDirectory \ 5932 (tclStubsPtr->tcl_FSCopyDirectory) /* 441 */ 5933 #endif 5934 #ifndef Tcl_FSCreateDirectory 5935 #define Tcl_FSCreateDirectory \ 5936 (tclStubsPtr->tcl_FSCreateDirectory) /* 442 */ 5937 #endif 5938 #ifndef Tcl_FSDeleteFile 5939 #define Tcl_FSDeleteFile \ 5940 (tclStubsPtr->tcl_FSDeleteFile) /* 443 */ 5941 #endif 5942 #ifndef Tcl_FSLoadFile 5943 #define Tcl_FSLoadFile \ 5944 (tclStubsPtr->tcl_FSLoadFile) /* 444 */ 5945 #endif 5946 #ifndef Tcl_FSMatchInDirectory 5947 #define Tcl_FSMatchInDirectory \ 5948 (tclStubsPtr->tcl_FSMatchInDirectory) /* 445 */ 5949 #endif 5950 #ifndef Tcl_FSLink 5951 #define Tcl_FSLink \ 5952 (tclStubsPtr->tcl_FSLink) /* 446 */ 5953 #endif 5954 #ifndef Tcl_FSRemoveDirectory 5955 #define Tcl_FSRemoveDirectory \ 5956 (tclStubsPtr->tcl_FSRemoveDirectory) /* 447 */ 5957 #endif 5958 #ifndef Tcl_FSRenameFile 5959 #define Tcl_FSRenameFile \ 5960 (tclStubsPtr->tcl_FSRenameFile) /* 448 */ 5961 #endif 5962 #ifndef Tcl_FSLstat 5963 #define Tcl_FSLstat \ 5964 (tclStubsPtr->tcl_FSLstat) /* 449 */ 5965 #endif 5966 #ifndef Tcl_FSUtime 5967 #define Tcl_FSUtime \ 5968 (tclStubsPtr->tcl_FSUtime) /* 450 */ 5969 #endif 5970 #ifndef Tcl_FSFileAttrsGet 5971 #define Tcl_FSFileAttrsGet \ 5972 (tclStubsPtr->tcl_FSFileAttrsGet) /* 451 */ 5973 #endif 5974 #ifndef Tcl_FSFileAttrsSet 5975 #define Tcl_FSFileAttrsSet \ 5976 (tclStubsPtr->tcl_FSFileAttrsSet) /* 452 */ 5977 #endif 5978 #ifndef Tcl_FSFileAttrStrings 5979 #define Tcl_FSFileAttrStrings \ 5980 (tclStubsPtr->tcl_FSFileAttrStrings) /* 453 */ 5981 #endif 5982 #ifndef Tcl_FSStat 5983 #define Tcl_FSStat \ 5984 (tclStubsPtr->tcl_FSStat) /* 454 */ 5985 #endif 5986 #ifndef Tcl_FSAccess 5987 #define Tcl_FSAccess \ 5988 (tclStubsPtr->tcl_FSAccess) /* 455 */ 5989 #endif 5990 #ifndef Tcl_FSOpenFileChannel 5991 #define Tcl_FSOpenFileChannel \ 5992 (tclStubsPtr->tcl_FSOpenFileChannel) /* 456 */ 5993 #endif 5994 #ifndef Tcl_FSGetCwd 5995 #define Tcl_FSGetCwd \ 5996 (tclStubsPtr->tcl_FSGetCwd) /* 457 */ 5997 #endif 5998 #ifndef Tcl_FSChdir 5999 #define Tcl_FSChdir \ 6000 (tclStubsPtr->tcl_FSChdir) /* 458 */ 6001 #endif 6002 #ifndef Tcl_FSConvertToPathType 6003 #define Tcl_FSConvertToPathType \ 6004 (tclStubsPtr->tcl_FSConvertToPathType) /* 459 */ 6005 #endif 6006 #ifndef Tcl_FSJoinPath 6007 #define Tcl_FSJoinPath \ 6008 (tclStubsPtr->tcl_FSJoinPath) /* 460 */ 6009 #endif 6010 #ifndef Tcl_FSSplitPath 6011 #define Tcl_FSSplitPath \ 6012 (tclStubsPtr->tcl_FSSplitPath) /* 461 */ 6013 #endif 6014 #ifndef Tcl_FSEqualPaths 6015 #define Tcl_FSEqualPaths \ 6016 (tclStubsPtr->tcl_FSEqualPaths) /* 462 */ 6017 #endif 6018 #ifndef Tcl_FSGetNormalizedPath 6019 #define Tcl_FSGetNormalizedPath \ 6020 (tclStubsPtr->tcl_FSGetNormalizedPath) /* 463 */ 6021 #endif 6022 #ifndef Tcl_FSJoinToPath 6023 #define Tcl_FSJoinToPath \ 6024 (tclStubsPtr->tcl_FSJoinToPath) /* 464 */ 6025 #endif 6026 #ifndef Tcl_FSGetInternalRep 6027 #define Tcl_FSGetInternalRep \ 6028 (tclStubsPtr->tcl_FSGetInternalRep) /* 465 */ 6029 #endif 6030 #ifndef Tcl_FSGetTranslatedPath 6031 #define Tcl_FSGetTranslatedPath \ 6032 (tclStubsPtr->tcl_FSGetTranslatedPath) /* 466 */ 6033 #endif 6034 #ifndef Tcl_FSEvalFile 6035 #define Tcl_FSEvalFile \ 6036 (tclStubsPtr->tcl_FSEvalFile) /* 467 */ 6037 #endif 6038 #ifndef Tcl_FSNewNativePath 6039 #define Tcl_FSNewNativePath \ 6040 (tclStubsPtr->tcl_FSNewNativePath) /* 468 */ 6041 #endif 6042 #ifndef Tcl_FSGetNativePath 6043 #define Tcl_FSGetNativePath \ 6044 (tclStubsPtr->tcl_FSGetNativePath) /* 469 */ 6045 #endif 6046 #ifndef Tcl_FSFileSystemInfo 6047 #define Tcl_FSFileSystemInfo \ 6048 (tclStubsPtr->tcl_FSFileSystemInfo) /* 470 */ 6049 #endif 6050 #ifndef Tcl_FSPathSeparator 6051 #define Tcl_FSPathSeparator \ 6052 (tclStubsPtr->tcl_FSPathSeparator) /* 471 */ 6053 #endif 6054 #ifndef Tcl_FSListVolumes 6055 #define Tcl_FSListVolumes \ 6056 (tclStubsPtr->tcl_FSListVolumes) /* 472 */ 6057 #endif 6058 #ifndef Tcl_FSRegister 6059 #define Tcl_FSRegister \ 6060 (tclStubsPtr->tcl_FSRegister) /* 473 */ 6061 #endif 6062 #ifndef Tcl_FSUnregister 6063 #define Tcl_FSUnregister \ 6064 (tclStubsPtr->tcl_FSUnregister) /* 474 */ 6065 #endif 6066 #ifndef Tcl_FSData 6067 #define Tcl_FSData \ 6068 (tclStubsPtr->tcl_FSData) /* 475 */ 6069 #endif 6070 #ifndef Tcl_FSGetTranslatedStringPath 6071 #define Tcl_FSGetTranslatedStringPath \ 6072 (tclStubsPtr->tcl_FSGetTranslatedStringPath) /* 476 */ 6073 #endif 6074 #ifndef Tcl_FSGetFileSystemForPath 6075 #define Tcl_FSGetFileSystemForPath \ 6076 (tclStubsPtr->tcl_FSGetFileSystemForPath) /* 477 */ 6077 #endif 6078 #ifndef Tcl_FSGetPathType 6079 #define Tcl_FSGetPathType \ 6080 (tclStubsPtr->tcl_FSGetPathType) /* 478 */ 6081 #endif 6082 #ifndef Tcl_OutputBuffered 6083 #define Tcl_OutputBuffered \ 6084 (tclStubsPtr->tcl_OutputBuffered) /* 479 */ 6085 #endif 6086 #ifndef Tcl_FSMountsChanged 6087 #define Tcl_FSMountsChanged \ 6088 (tclStubsPtr->tcl_FSMountsChanged) /* 480 */ 6089 #endif 6090 #ifndef Tcl_EvalTokensStandard 6091 #define Tcl_EvalTokensStandard \ 6092 (tclStubsPtr->tcl_EvalTokensStandard) /* 481 */ 6093 #endif 6094 #ifndef Tcl_GetTime 6095 #define Tcl_GetTime \ 6096 (tclStubsPtr->tcl_GetTime) /* 482 */ 6097 #endif 6098 #ifndef Tcl_CreateObjTrace 6099 #define Tcl_CreateObjTrace \ 6100 (tclStubsPtr->tcl_CreateObjTrace) /* 483 */ 6101 #endif 6102 #ifndef Tcl_GetCommandInfoFromToken 6103 #define Tcl_GetCommandInfoFromToken \ 6104 (tclStubsPtr->tcl_GetCommandInfoFromToken) /* 484 */ 6105 #endif 6106 #ifndef Tcl_SetCommandInfoFromToken 6107 #define Tcl_SetCommandInfoFromToken \ 6108 (tclStubsPtr->tcl_SetCommandInfoFromToken) /* 485 */ 6109 #endif 6110 #ifndef Tcl_DbNewWideIntObj 6111 #define Tcl_DbNewWideIntObj \ 6112 (tclStubsPtr->tcl_DbNewWideIntObj) /* 486 */ 6113 #endif 6114 #ifndef Tcl_GetWideIntFromObj 6115 #define Tcl_GetWideIntFromObj \ 6116 (tclStubsPtr->tcl_GetWideIntFromObj) /* 487 */ 6117 #endif 6118 #ifndef Tcl_NewWideIntObj 6119 #define Tcl_NewWideIntObj \ 6120 (tclStubsPtr->tcl_NewWideIntObj) /* 488 */ 6121 #endif 6122 #ifndef Tcl_SetWideIntObj 6123 #define Tcl_SetWideIntObj \ 6124 (tclStubsPtr->tcl_SetWideIntObj) /* 489 */ 6125 #endif 6126 #ifndef Tcl_AllocStatBuf 6127 #define Tcl_AllocStatBuf \ 6128 (tclStubsPtr->tcl_AllocStatBuf) /* 490 */ 6129 #endif 6130 #ifndef Tcl_Seek 6131 #define Tcl_Seek \ 6132 (tclStubsPtr->tcl_Seek) /* 491 */ 6133 #endif 6134 #ifndef Tcl_Tell 6135 #define Tcl_Tell \ 6136 (tclStubsPtr->tcl_Tell) /* 492 */ 6137 #endif 6138 #ifndef Tcl_ChannelWideSeekProc 6139 #define Tcl_ChannelWideSeekProc \ 6140 (tclStubsPtr->tcl_ChannelWideSeekProc) /* 493 */ 6141 #endif 6142 #ifndef Tcl_DictObjPut 6143 #define Tcl_DictObjPut \ 6144 (tclStubsPtr->tcl_DictObjPut) /* 494 */ 6145 #endif 6146 #ifndef Tcl_DictObjGet 6147 #define Tcl_DictObjGet \ 6148 (tclStubsPtr->tcl_DictObjGet) /* 495 */ 6149 #endif 6150 #ifndef Tcl_DictObjRemove 6151 #define Tcl_DictObjRemove \ 6152 (tclStubsPtr->tcl_DictObjRemove) /* 496 */ 6153 #endif 6154 #ifndef Tcl_DictObjSize 6155 #define Tcl_DictObjSize \ 6156 (tclStubsPtr->tcl_DictObjSize) /* 497 */ 6157 #endif 6158 #ifndef Tcl_DictObjFirst 6159 #define Tcl_DictObjFirst \ 6160 (tclStubsPtr->tcl_DictObjFirst) /* 498 */ 6161 #endif 6162 #ifndef Tcl_DictObjNext 6163 #define Tcl_DictObjNext \ 6164 (tclStubsPtr->tcl_DictObjNext) /* 499 */ 6165 #endif 6166 #ifndef Tcl_DictObjDone 6167 #define Tcl_DictObjDone \ 6168 (tclStubsPtr->tcl_DictObjDone) /* 500 */ 6169 #endif 6170 #ifndef Tcl_DictObjPutKeyList 6171 #define Tcl_DictObjPutKeyList \ 6172 (tclStubsPtr->tcl_DictObjPutKeyList) /* 501 */ 6173 #endif 6174 #ifndef Tcl_DictObjRemoveKeyList 6175 #define Tcl_DictObjRemoveKeyList \ 6176 (tclStubsPtr->tcl_DictObjRemoveKeyList) /* 502 */ 6177 #endif 6178 #ifndef Tcl_NewDictObj 6179 #define Tcl_NewDictObj \ 6180 (tclStubsPtr->tcl_NewDictObj) /* 503 */ 6181 #endif 6182 #ifndef Tcl_DbNewDictObj 6183 #define Tcl_DbNewDictObj \ 6184 (tclStubsPtr->tcl_DbNewDictObj) /* 504 */ 6185 #endif 6186 #ifndef Tcl_RegisterConfig 6187 #define Tcl_RegisterConfig \ 6188 (tclStubsPtr->tcl_RegisterConfig) /* 505 */ 6189 #endif 6190 #ifndef Tcl_CreateNamespace 6191 #define Tcl_CreateNamespace \ 6192 (tclStubsPtr->tcl_CreateNamespace) /* 506 */ 6193 #endif 6194 #ifndef Tcl_DeleteNamespace 6195 #define Tcl_DeleteNamespace \ 6196 (tclStubsPtr->tcl_DeleteNamespace) /* 507 */ 6197 #endif 6198 #ifndef Tcl_AppendExportList 6199 #define Tcl_AppendExportList \ 6200 (tclStubsPtr->tcl_AppendExportList) /* 508 */ 6201 #endif 6202 #ifndef Tcl_Export 6203 #define Tcl_Export \ 6204 (tclStubsPtr->tcl_Export) /* 509 */ 6205 #endif 6206 #ifndef Tcl_Import 6207 #define Tcl_Import \ 6208 (tclStubsPtr->tcl_Import) /* 510 */ 6209 #endif 6210 #ifndef Tcl_ForgetImport 6211 #define Tcl_ForgetImport \ 6212 (tclStubsPtr->tcl_ForgetImport) /* 511 */ 6213 #endif 6214 #ifndef Tcl_GetCurrentNamespace 6215 #define Tcl_GetCurrentNamespace \ 6216 (tclStubsPtr->tcl_GetCurrentNamespace) /* 512 */ 6217 #endif 6218 #ifndef Tcl_GetGlobalNamespace 6219 #define Tcl_GetGlobalNamespace \ 6220 (tclStubsPtr->tcl_GetGlobalNamespace) /* 513 */ 6221 #endif 6222 #ifndef Tcl_FindNamespace 6223 #define Tcl_FindNamespace \ 6224 (tclStubsPtr->tcl_FindNamespace) /* 514 */ 6225 #endif 6226 #ifndef Tcl_FindCommand 6227 #define Tcl_FindCommand \ 6228 (tclStubsPtr->tcl_FindCommand) /* 515 */ 6229 #endif 6230 #ifndef Tcl_GetCommandFromObj 6231 #define Tcl_GetCommandFromObj \ 6232 (tclStubsPtr->tcl_GetCommandFromObj) /* 516 */ 6233 #endif 6234 #ifndef Tcl_GetCommandFullName 6235 #define Tcl_GetCommandFullName \ 6236 (tclStubsPtr->tcl_GetCommandFullName) /* 517 */ 6237 #endif 6238 #ifndef Tcl_FSEvalFileEx 6239 #define Tcl_FSEvalFileEx \ 6240 (tclStubsPtr->tcl_FSEvalFileEx) /* 518 */ 6241 #endif 6242 #ifndef Tcl_SetExitProc 6243 #define Tcl_SetExitProc \ 6244 (tclStubsPtr->tcl_SetExitProc) /* 519 */ 6245 #endif 6246 #ifndef Tcl_LimitAddHandler 6247 #define Tcl_LimitAddHandler \ 6248 (tclStubsPtr->tcl_LimitAddHandler) /* 520 */ 6249 #endif 6250 #ifndef Tcl_LimitRemoveHandler 6251 #define Tcl_LimitRemoveHandler \ 6252 (tclStubsPtr->tcl_LimitRemoveHandler) /* 521 */ 6253 #endif 6254 #ifndef Tcl_LimitReady 6255 #define Tcl_LimitReady \ 6256 (tclStubsPtr->tcl_LimitReady) /* 522 */ 6257 #endif 6258 #ifndef Tcl_LimitCheck 6259 #define Tcl_LimitCheck \ 6260 (tclStubsPtr->tcl_LimitCheck) /* 523 */ 6261 #endif 6262 #ifndef Tcl_LimitExceeded 6263 #define Tcl_LimitExceeded \ 6264 (tclStubsPtr->tcl_LimitExceeded) /* 524 */ 6265 #endif 6266 #ifndef Tcl_LimitSetCommands 6267 #define Tcl_LimitSetCommands \ 6268 (tclStubsPtr->tcl_LimitSetCommands) /* 525 */ 6269 #endif 6270 #ifndef Tcl_LimitSetTime 6271 #define Tcl_LimitSetTime \ 6272 (tclStubsPtr->tcl_LimitSetTime) /* 526 */ 6273 #endif 6274 #ifndef Tcl_LimitSetGranularity 6275 #define Tcl_LimitSetGranularity \ 6276 (tclStubsPtr->tcl_LimitSetGranularity) /* 527 */ 6277 #endif 6278 #ifndef Tcl_LimitTypeEnabled 6279 #define Tcl_LimitTypeEnabled \ 6280 (tclStubsPtr->tcl_LimitTypeEnabled) /* 528 */ 6281 #endif 6282 #ifndef Tcl_LimitTypeExceeded 6283 #define Tcl_LimitTypeExceeded \ 6284 (tclStubsPtr->tcl_LimitTypeExceeded) /* 529 */ 6285 #endif 6286 #ifndef Tcl_LimitTypeSet 6287 #define Tcl_LimitTypeSet \ 6288 (tclStubsPtr->tcl_LimitTypeSet) /* 530 */ 6289 #endif 6290 #ifndef Tcl_LimitTypeReset 6291 #define Tcl_LimitTypeReset \ 6292 (tclStubsPtr->tcl_LimitTypeReset) /* 531 */ 6293 #endif 6294 #ifndef Tcl_LimitGetCommands 6295 #define Tcl_LimitGetCommands \ 6296 (tclStubsPtr->tcl_LimitGetCommands) /* 532 */ 6297 #endif 6298 #ifndef Tcl_LimitGetTime 6299 #define Tcl_LimitGetTime \ 6300 (tclStubsPtr->tcl_LimitGetTime) /* 533 */ 6301 #endif 6302 #ifndef Tcl_LimitGetGranularity 6303 #define Tcl_LimitGetGranularity \ 6304 (tclStubsPtr->tcl_LimitGetGranularity) /* 534 */ 6305 #endif 6306 #ifndef Tcl_SaveInterpState 6307 #define Tcl_SaveInterpState \ 6308 (tclStubsPtr->tcl_SaveInterpState) /* 535 */ 6309 #endif 6310 #ifndef Tcl_RestoreInterpState 6311 #define Tcl_RestoreInterpState \ 6312 (tclStubsPtr->tcl_RestoreInterpState) /* 536 */ 6313 #endif 6314 #ifndef Tcl_DiscardInterpState 6315 #define Tcl_DiscardInterpState \ 6316 (tclStubsPtr->tcl_DiscardInterpState) /* 537 */ 6317 #endif 6318 #ifndef Tcl_SetReturnOptions 6319 #define Tcl_SetReturnOptions \ 6320 (tclStubsPtr->tcl_SetReturnOptions) /* 538 */ 6321 #endif 6322 #ifndef Tcl_GetReturnOptions 6323 #define Tcl_GetReturnOptions \ 6324 (tclStubsPtr->tcl_GetReturnOptions) /* 539 */ 6325 #endif 6326 #ifndef Tcl_IsEnsemble 6327 #define Tcl_IsEnsemble \ 6328 (tclStubsPtr->tcl_IsEnsemble) /* 540 */ 6329 #endif 6330 #ifndef Tcl_CreateEnsemble 6331 #define Tcl_CreateEnsemble \ 6332 (tclStubsPtr->tcl_CreateEnsemble) /* 541 */ 6333 #endif 6334 #ifndef Tcl_FindEnsemble 6335 #define Tcl_FindEnsemble \ 6336 (tclStubsPtr->tcl_FindEnsemble) /* 542 */ 6337 #endif 6338 #ifndef Tcl_SetEnsembleSubcommandList 6339 #define Tcl_SetEnsembleSubcommandList \ 6340 (tclStubsPtr->tcl_SetEnsembleSubcommandList) /* 543 */ 6341 #endif 6342 #ifndef Tcl_SetEnsembleMappingDict 6343 #define Tcl_SetEnsembleMappingDict \ 6344 (tclStubsPtr->tcl_SetEnsembleMappingDict) /* 544 */ 6345 #endif 6346 #ifndef Tcl_SetEnsembleUnknownHandler 6347 #define Tcl_SetEnsembleUnknownHandler \ 6348 (tclStubsPtr->tcl_SetEnsembleUnknownHandler) /* 545 */ 6349 #endif 6350 #ifndef Tcl_SetEnsembleFlags 6351 #define Tcl_SetEnsembleFlags \ 6352 (tclStubsPtr->tcl_SetEnsembleFlags) /* 546 */ 6353 #endif 6354 #ifndef Tcl_GetEnsembleSubcommandList 6355 #define Tcl_GetEnsembleSubcommandList \ 6356 (tclStubsPtr->tcl_GetEnsembleSubcommandList) /* 547 */ 6357 #endif 6358 #ifndef Tcl_GetEnsembleMappingDict 6359 #define Tcl_GetEnsembleMappingDict \ 6360 (tclStubsPtr->tcl_GetEnsembleMappingDict) /* 548 */ 6361 #endif 6362 #ifndef Tcl_GetEnsembleUnknownHandler 6363 #define Tcl_GetEnsembleUnknownHandler \ 6364 (tclStubsPtr->tcl_GetEnsembleUnknownHandler) /* 549 */ 6365 #endif 6366 #ifndef Tcl_GetEnsembleFlags 6367 #define Tcl_GetEnsembleFlags \ 6368 (tclStubsPtr->tcl_GetEnsembleFlags) /* 550 */ 6369 #endif 6370 #ifndef Tcl_GetEnsembleNamespace 6371 #define Tcl_GetEnsembleNamespace \ 6372 (tclStubsPtr->tcl_GetEnsembleNamespace) /* 551 */ 6373 #endif 6374 #ifndef Tcl_SetTimeProc 6375 #define Tcl_SetTimeProc \ 6376 (tclStubsPtr->tcl_SetTimeProc) /* 552 */ 6377 #endif 6378 #ifndef Tcl_QueryTimeProc 6379 #define Tcl_QueryTimeProc \ 6380 (tclStubsPtr->tcl_QueryTimeProc) /* 553 */ 6381 #endif 6382 #ifndef Tcl_ChannelThreadActionProc 6383 #define Tcl_ChannelThreadActionProc \ 6384 (tclStubsPtr->tcl_ChannelThreadActionProc) /* 554 */ 6385 #endif 6386 #ifndef Tcl_NewBignumObj 6387 #define Tcl_NewBignumObj \ 6388 (tclStubsPtr->tcl_NewBignumObj) /* 555 */ 6389 #endif 6390 #ifndef Tcl_DbNewBignumObj 6391 #define Tcl_DbNewBignumObj \ 6392 (tclStubsPtr->tcl_DbNewBignumObj) /* 556 */ 6393 #endif 6394 #ifndef Tcl_SetBignumObj 6395 #define Tcl_SetBignumObj \ 6396 (tclStubsPtr->tcl_SetBignumObj) /* 557 */ 6397 #endif 6398 #ifndef Tcl_GetBignumFromObj 6399 #define Tcl_GetBignumFromObj \ 6400 (tclStubsPtr->tcl_GetBignumFromObj) /* 558 */ 6401 #endif 6402 #ifndef Tcl_TakeBignumFromObj 6403 #define Tcl_TakeBignumFromObj \ 6404 (tclStubsPtr->tcl_TakeBignumFromObj) /* 559 */ 6405 #endif 6406 #ifndef Tcl_TruncateChannel 6407 #define Tcl_TruncateChannel \ 6408 (tclStubsPtr->tcl_TruncateChannel) /* 560 */ 6409 #endif 6410 #ifndef Tcl_ChannelTruncateProc 6411 #define Tcl_ChannelTruncateProc \ 6412 (tclStubsPtr->tcl_ChannelTruncateProc) /* 561 */ 6413 #endif 6414 #ifndef Tcl_SetChannelErrorInterp 6415 #define Tcl_SetChannelErrorInterp \ 6416 (tclStubsPtr->tcl_SetChannelErrorInterp) /* 562 */ 6417 #endif 6418 #ifndef Tcl_GetChannelErrorInterp 6419 #define Tcl_GetChannelErrorInterp \ 6420 (tclStubsPtr->tcl_GetChannelErrorInterp) /* 563 */ 6421 #endif 6422 #ifndef Tcl_SetChannelError 6423 #define Tcl_SetChannelError \ 6424 (tclStubsPtr->tcl_SetChannelError) /* 564 */ 6425 #endif 6426 #ifndef Tcl_GetChannelError 6427 #define Tcl_GetChannelError \ 6428 (tclStubsPtr->tcl_GetChannelError) /* 565 */ 6429 #endif 6430 #ifndef Tcl_InitBignumFromDouble 6431 #define Tcl_InitBignumFromDouble \ 6432 (tclStubsPtr->tcl_InitBignumFromDouble) /* 566 */ 6433 #endif 6434 #ifndef Tcl_GetNamespaceUnknownHandler 6435 #define Tcl_GetNamespaceUnknownHandler \ 6436 (tclStubsPtr->tcl_GetNamespaceUnknownHandler) /* 567 */ 6437 #endif 6438 #ifndef Tcl_SetNamespaceUnknownHandler 6439 #define Tcl_SetNamespaceUnknownHandler \ 6440 (tclStubsPtr->tcl_SetNamespaceUnknownHandler) /* 568 */ 6441 #endif 6442 #ifndef Tcl_GetEncodingFromObj 6443 #define Tcl_GetEncodingFromObj \ 6444 (tclStubsPtr->tcl_GetEncodingFromObj) /* 569 */ 6445 #endif 6446 #ifndef Tcl_GetEncodingSearchPath 6447 #define Tcl_GetEncodingSearchPath \ 6448 (tclStubsPtr->tcl_GetEncodingSearchPath) /* 570 */ 6449 #endif 6450 #ifndef Tcl_SetEncodingSearchPath 6451 #define Tcl_SetEncodingSearchPath \ 6452 (tclStubsPtr->tcl_SetEncodingSearchPath) /* 571 */ 6453 #endif 6454 #ifndef Tcl_GetEncodingNameFromEnvironment 6455 #define Tcl_GetEncodingNameFromEnvironment \ 6456 (tclStubsPtr->tcl_GetEncodingNameFromEnvironment) /* 572 */ 6457 #endif 6458 #ifndef Tcl_PkgRequireProc 6459 #define Tcl_PkgRequireProc \ 6460 (tclStubsPtr->tcl_PkgRequireProc) /* 573 */ 6461 #endif 6462 #ifndef Tcl_AppendObjToErrorInfo 6463 #define Tcl_AppendObjToErrorInfo \ 6464 (tclStubsPtr->tcl_AppendObjToErrorInfo) /* 574 */ 6465 #endif 6466 #ifndef Tcl_AppendLimitedToObj 6467 #define Tcl_AppendLimitedToObj \ 6468 (tclStubsPtr->tcl_AppendLimitedToObj) /* 575 */ 6469 #endif 6470 #ifndef Tcl_Format 6471 #define Tcl_Format \ 6472 (tclStubsPtr->tcl_Format) /* 576 */ 6473 #endif 6474 #ifndef Tcl_AppendFormatToObj 6475 #define Tcl_AppendFormatToObj \ 6476 (tclStubsPtr->tcl_AppendFormatToObj) /* 577 */ 6477 #endif 6478 #ifndef Tcl_ObjPrintf 6479 #define Tcl_ObjPrintf \ 6480 (tclStubsPtr->tcl_ObjPrintf) /* 578 */ 6481 #endif 6482 #ifndef Tcl_AppendPrintfToObj 6483 #define Tcl_AppendPrintfToObj \ 6484 (tclStubsPtr->tcl_AppendPrintfToObj) /* 579 */ 6485 #endif 6486 /* Slot 580 is reserved */ 6487 /* Slot 581 is reserved */ 6488 /* Slot 582 is reserved */ 6489 /* Slot 583 is reserved */ 6490 /* Slot 584 is reserved */ 6491 /* Slot 585 is reserved */ 6492 /* Slot 586 is reserved */ 6493 /* Slot 587 is reserved */ 6494 /* Slot 588 is reserved */ 6495 /* Slot 589 is reserved */ 6496 /* Slot 590 is reserved */ 6497 /* Slot 591 is reserved */ 6498 /* Slot 592 is reserved */ 6499 /* Slot 593 is reserved */ 6500 /* Slot 594 is reserved */ 6501 /* Slot 595 is reserved */ 6502 /* Slot 596 is reserved */ 6503 /* Slot 597 is reserved */ 6504 /* Slot 598 is reserved */ 6505 /* Slot 599 is reserved */ 6506 /* Slot 600 is reserved */ 6507 /* Slot 601 is reserved */ 6508 /* Slot 602 is reserved */ 6509 /* Slot 603 is reserved */ 6510 /* Slot 604 is reserved */ 6511 /* Slot 605 is reserved */ 6512 /* Slot 606 is reserved */ 6513 /* Slot 607 is reserved */ 6514 /* Slot 608 is reserved */ 6515 /* Slot 609 is reserved */ 6516 /* Slot 610 is reserved */ 6517 /* Slot 611 is reserved */ 6518 /* Slot 612 is reserved */ 6519 /* Slot 613 is reserved */ 6520 /* Slot 614 is reserved */ 6521 /* Slot 615 is reserved */ 6522 /* Slot 616 is reserved */ 6523 /* Slot 617 is reserved */ 6524 /* Slot 618 is reserved */ 6525 /* Slot 619 is reserved */ 6526 /* Slot 620 is reserved */ 6527 /* Slot 621 is reserved */ 6528 /* Slot 622 is reserved */ 6529 /* Slot 623 is reserved */ 6530 /* Slot 624 is reserved */ 6531 /* Slot 625 is reserved */ 6532 /* Slot 626 is reserved */ 6533 /* Slot 627 is reserved */ 6534 /* Slot 628 is reserved */ 6535 /* Slot 629 is reserved */ 6536 #ifndef TclUnusedStubEntry 6537 #define TclUnusedStubEntry \ 6538 (tclStubsPtr->tclUnusedStubEntry) /* 630 */ 6539 #endif 6540 6541 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */ 6542 6543 /* !END!: Do not edit above this line. */ 6544 6545 #undef TclUnusedStubEntry 6546 6547 #undef TCL_STORAGE_CLASS 6548 #define TCL_STORAGE_CLASS DLLIMPORT 6549 6550 /* 6551 * Deprecated Tcl procedures: 6552 */ 6553 #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) 6554 # undef Tcl_EvalObj 6555 # define Tcl_EvalObj(interp,objPtr) \ 6556 Tcl_EvalObjEx((interp),(objPtr),0) 6557 # undef Tcl_GlobalEvalObj 6558 # define Tcl_GlobalEvalObj(interp,objPtr) \ 6559 Tcl_EvalObjEx((interp),(objPtr),TCL_EVAL_GLOBAL) 6560 #endif 6561 6562 #endif /* _TCLDECLS */ 6563 6564