mingw/include/tclDecls.h

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