0000: 2f 2a 0a 20 2a 20 74 63 6c 44 65 63 6c 73 2e 68 /*. * tclDecls.h
0010: 20 2d 2d 0a 20 2a 0a 20 2a 09 44 65 63 6c 61 72 --. *. *.Declar
0020: 61 74 69 6f 6e 73 20 6f 66 20 66 75 6e 63 74 69 ations of functi
0030: 6f 6e 73 20 69 6e 20 74 68 65 20 70 6c 61 74 66 ons in the platf
0040: 6f 72 6d 20 69 6e 64 65 70 65 6e 64 65 6e 74 20 orm independent
0050: 70 75 62 6c 69 63 20 54 63 6c 20 41 50 49 2e 0a public Tcl API..
0060: 20 2a 0a 20 2a 20 43 6f 70 79 72 69 67 68 74 20 *. * Copyright
0070: 28 63 29 20 31 39 39 38 2d 31 39 39 39 20 62 79 (c) 1998-1999 by
0080: 20 53 63 72 69 70 74 69 63 73 20 43 6f 72 70 6f Scriptics Corpo
0090: 72 61 74 69 6f 6e 2e 0a 20 2a 0a 20 2a 20 53 65 ration.. *. * Se
00a0: 65 20 74 68 65 20 66 69 6c 65 20 22 6c 69 63 65 e the file "lice
00b0: 6e 73 65 2e 74 65 72 6d 73 22 20 66 6f 72 20 69 nse.terms" for i
00c0: 6e 66 6f 72 6d 61 74 69 6f 6e 20 6f 6e 20 75 73 nformation on us
00d0: 61 67 65 20 61 6e 64 20 72 65 64 69 73 74 72 69 age and redistri
00e0: 62 75 74 69 6f 6e 0a 20 2a 20 6f 66 20 74 68 69 bution. * of thi
00f0: 73 20 66 69 6c 65 2c 20 61 6e 64 20 66 6f 72 20 s file, and for
0100: 61 20 44 49 53 43 4c 41 49 4d 45 52 20 4f 46 20 a DISCLAIMER OF
0110: 41 4c 4c 20 57 41 52 52 41 4e 54 49 45 53 2e 0a ALL WARRANTIES..
0120: 20 2a 0a 20 2a 20 52 43 53 3a 20 40 28 23 29 20 *. * RCS: @(#)
0130: 24 49 64 3a 20 74 63 6c 44 65 63 6c 73 2e 68 2c $Id: tclDecls.h,
0140: 76 20 31 2e 31 20 32 30 30 35 2f 30 38 2f 31 30 v 1.1 2005/08/10
0150: 20 31 32 3a 32 37 3a 30 34 20 65 73 63 6f 6c 61 12:27:04 escola
0160: 6e 6f 20 45 78 70 20 24 0a 20 2a 2f 0a 0a 23 69 no Exp $. */..#i
0170: 66 6e 64 65 66 20 5f 54 43 4c 44 45 43 4c 53 0a fndef _TCLDECLS.
0180: 23 64 65 66 69 6e 65 20 5f 54 43 4c 44 45 43 4c #define _TCLDECL
0190: 53 0a 0a 2f 2a 0a 20 2a 20 57 41 52 4e 49 4e 47 S../*. * WARNING
01a0: 3a 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 61 : This file is a
01b0: 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 67 65 6e utomatically gen
01c0: 65 72 61 74 65 64 20 62 79 20 74 68 65 20 74 6f erated by the to
01d0: 6f 6c 73 2f 67 65 6e 53 74 75 62 73 2e 74 63 6c ols/genStubs.tcl
01e0: 0a 20 2a 20 73 63 72 69 70 74 2e 20 20 41 6e 79 . * script. Any
01f0: 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 73 20 74 modifications t
0200: 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 64 o the function d
0210: 65 63 6c 61 72 61 74 69 6f 6e 73 20 62 65 6c 6f eclarations belo
0220: 77 20 73 68 6f 75 6c 64 20 62 65 20 6d 61 64 65 w should be made
0230: 0a 20 2a 20 69 6e 20 74 68 65 20 67 65 6e 65 72 . * in the gener
0240: 69 63 2f 74 63 6c 2e 64 65 63 6c 73 20 73 63 72 ic/tcl.decls scr
0250: 69 70 74 2e 0a 20 2a 2f 0a 0a 2f 2a 20 21 42 45 ipt.. */../* !BE
0260: 47 49 4e 21 3a 20 44 6f 20 6e 6f 74 20 65 64 69 GIN!: Do not edi
0270: 74 20 62 65 6c 6f 77 20 74 68 69 73 20 6c 69 6e t below this lin
0280: 65 2e 20 2a 2f 0a 0a 2f 2a 0a 20 2a 20 45 78 70 e. */../*. * Exp
0290: 6f 72 74 65 64 20 66 75 6e 63 74 69 6f 6e 20 64 orted function d
02a0: 65 63 6c 61 72 61 74 69 6f 6e 73 3a 0a 20 2a 2f eclarations:. */
02b0: 0a 0a 2f 2a 20 30 20 2a 2f 0a 45 58 54 45 52 4e ../* 0 */.EXTERN
02c0: 20 69 6e 74 09 09 54 63 6c 5f 50 6b 67 50 72 6f int..Tcl_PkgPro
02d0: 76 69 64 65 45 78 20 5f 41 4e 53 49 5f 41 52 47 videEx _ANSI_ARG
02e0: 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 2a 20 S_((Tcl_Interp*
02f0: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e interp, .....CON
0300: 53 54 20 63 68 61 72 2a 20 6e 61 6d 65 2c 20 43 ST char* name, C
0310: 4f 4e 53 54 20 63 68 61 72 2a 20 76 65 72 73 69 ONST char* versi
0320: 6f 6e 2c 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 on, .....ClientD
0330: 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 ata clientData))
0340: 3b 0a 2f 2a 20 31 20 2a 2f 0a 45 58 54 45 52 4e ;./* 1 */.EXTERN
0350: 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 CONST84_RETURN
0360: 63 68 61 72 20 2a 20 54 63 6c 5f 50 6b 67 52 65 char * Tcl_PkgRe
0370: 71 75 69 72 65 45 78 20 5f 41 4e 53 49 5f 41 52 quireEx _ANSI_AR
0380: 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e GS_((.....Tcl_In
0390: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
03a0: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 ONST char * name
03b0: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
03c0: 72 20 2a 20 76 65 72 73 69 6f 6e 2c 20 69 6e 74 r * version, int
03d0: 20 65 78 61 63 74 2c 20 0a 09 09 09 09 43 6c 69 exact, .....Cli
03e0: 65 6e 74 44 61 74 61 20 2a 20 63 6c 69 65 6e 74 entData * client
03f0: 44 61 74 61 50 74 72 29 29 3b 0a 2f 2a 20 32 20 DataPtr));./* 2
0400: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
0410: 54 63 6c 5f 50 61 6e 69 63 20 5f 41 4e 53 49 5f Tcl_Panic _ANSI_
0420: 41 52 47 53 5f 28 54 43 4c 5f 56 41 52 41 52 47 ARGS_(TCL_VARARG
0430: 53 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 2c 66 S(CONST char *,f
0440: 6f 72 6d 61 74 29 29 3b 0a 2f 2a 20 33 20 2a 2f ormat));./* 3 */
0450: 0a 45 58 54 45 52 4e 20 63 68 61 72 20 2a 09 09 .EXTERN char *..
0460: 54 63 6c 5f 41 6c 6c 6f 63 20 5f 41 4e 53 49 5f Tcl_Alloc _ANSI_
0470: 41 52 47 53 5f 28 28 75 6e 73 69 67 6e 65 64 20 ARGS_((unsigned
0480: 69 6e 74 20 73 69 7a 65 29 29 3b 0a 2f 2a 20 34 int size));./* 4
0490: 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 */.EXTERN void.
04a0: 09 54 63 6c 5f 46 72 65 65 20 5f 41 4e 53 49 5f .Tcl_Free _ANSI_
04b0: 41 52 47 53 5f 28 28 63 68 61 72 20 2a 20 70 74 ARGS_((char * pt
04c0: 72 29 29 3b 0a 2f 2a 20 35 20 2a 2f 0a 45 58 54 r));./* 5 */.EXT
04d0: 45 52 4e 20 63 68 61 72 20 2a 09 09 54 63 6c 5f ERN char *..Tcl_
04e0: 52 65 61 6c 6c 6f 63 20 5f 41 4e 53 49 5f 41 52 Realloc _ANSI_AR
04f0: 47 53 5f 28 28 63 68 61 72 20 2a 20 70 74 72 2c GS_((char * ptr,
0500: 20 0a 09 09 09 09 75 6e 73 69 67 6e 65 64 20 69 .....unsigned i
0510: 6e 74 20 73 69 7a 65 29 29 3b 0a 2f 2a 20 36 20 nt size));./* 6
0520: 2a 2f 0a 45 58 54 45 52 4e 20 63 68 61 72 20 2a */.EXTERN char *
0530: 09 09 54 63 6c 5f 44 62 43 6b 61 6c 6c 6f 63 20 ..Tcl_DbCkalloc
0540: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 75 6e 73 _ANSI_ARGS_((uns
0550: 69 67 6e 65 64 20 69 6e 74 20 73 69 7a 65 2c 20 igned int size,
0560: 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 .....CONST char
0570: 2a 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 * file, int line
0580: 29 29 3b 0a 2f 2a 20 37 20 2a 2f 0a 45 58 54 45 ));./* 7 */.EXTE
0590: 52 4e 20 69 6e 74 09 09 54 63 6c 5f 44 62 43 6b RN int..Tcl_DbCk
05a0: 66 72 65 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f free _ANSI_ARGS_
05b0: 28 28 63 68 61 72 20 2a 20 70 74 72 2c 20 0a 09 ((char * ptr, ..
05c0: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
05d0: 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 file, int line))
05e0: 3b 0a 2f 2a 20 38 20 2a 2f 0a 45 58 54 45 52 4e ;./* 8 */.EXTERN
05f0: 20 63 68 61 72 20 2a 09 09 54 63 6c 5f 44 62 43 char *..Tcl_DbC
0600: 6b 72 65 61 6c 6c 6f 63 20 5f 41 4e 53 49 5f 41 krealloc _ANSI_A
0610: 52 47 53 5f 28 28 63 68 61 72 20 2a 20 70 74 72 RGS_((char * ptr
0620: 2c 20 0a 09 09 09 09 75 6e 73 69 67 6e 65 64 20 , .....unsigned
0630: 69 6e 74 20 73 69 7a 65 2c 20 43 4f 4e 53 54 20 int size, CONST
0640: 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 0a 09 09 char * file, ...
0650: 09 09 69 6e 74 20 6c 69 6e 65 29 29 3b 0a 23 69 ..int line));.#i
0660: 66 20 21 64 65 66 69 6e 65 64 28 5f 5f 57 49 4e f !defined(__WIN
0670: 33 32 5f 5f 29 20 26 26 20 21 64 65 66 69 6e 65 32__) && !define
0680: 64 28 4d 41 43 5f 54 43 4c 29 20 2f 2a 20 55 4e d(MAC_TCL) /* UN
0690: 49 58 20 2a 2f 0a 2f 2a 20 39 20 2a 2f 0a 45 58 IX */./* 9 */.EX
06a0: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 43 TERN void..Tcl_C
06b0: 72 65 61 74 65 46 69 6c 65 48 61 6e 64 6c 65 72 reateFileHandler
06c0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e _ANSI_ARGS_((in
06d0: 74 20 66 64 2c 20 69 6e 74 20 6d 61 73 6b 2c 20 t fd, int mask,
06e0: 0a 09 09 09 09 54 63 6c 5f 46 69 6c 65 50 72 6f .....Tcl_FilePro
06f0: 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 c * proc, Client
0700: 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 Data clientData)
0710: 29 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 55 4e 49 );.#endif /* UNI
0720: 58 20 2a 2f 0a 23 69 66 20 21 64 65 66 69 6e 65 X */.#if !define
0730: 64 28 5f 5f 57 49 4e 33 32 5f 5f 29 20 26 26 20 d(__WIN32__) &&
0740: 21 64 65 66 69 6e 65 64 28 4d 41 43 5f 54 43 4c !defined(MAC_TCL
0750: 29 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 2f 2a 20 ) /* UNIX */./*
0760: 31 30 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 10 */.EXTERN voi
0770: 64 09 09 54 63 6c 5f 44 65 6c 65 74 65 46 69 6c d..Tcl_DeleteFil
0780: 65 48 61 6e 64 6c 65 72 20 5f 41 4e 53 49 5f 41 eHandler _ANSI_A
0790: 52 47 53 5f 28 28 69 6e 74 20 66 64 29 29 3b 0a RGS_((int fd));.
07a0: 23 65 6e 64 69 66 20 2f 2a 20 55 4e 49 58 20 2a #endif /* UNIX *
07b0: 2f 0a 2f 2a 20 31 31 20 2a 2f 0a 45 58 54 45 52 /./* 11 */.EXTER
07c0: 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 54 N void..Tcl_SetT
07d0: 69 6d 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f imer _ANSI_ARGS_
07e0: 28 28 54 63 6c 5f 54 69 6d 65 20 2a 20 74 69 6d ((Tcl_Time * tim
07f0: 65 50 74 72 29 29 3b 0a 2f 2a 20 31 32 20 2a 2f ePtr));./* 12 */
0800: 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 .EXTERN void..Tc
0810: 6c 5f 53 6c 65 65 70 20 5f 41 4e 53 49 5f 41 52 l_Sleep _ANSI_AR
0820: 47 53 5f 28 28 69 6e 74 20 6d 73 29 29 3b 0a 2f GS_((int ms));./
0830: 2a 20 31 33 20 2a 2f 0a 45 58 54 45 52 4e 20 69 * 13 */.EXTERN i
0840: 6e 74 09 09 54 63 6c 5f 57 61 69 74 46 6f 72 45 nt..Tcl_WaitForE
0850: 76 65 6e 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f vent _ANSI_ARGS_
0860: 28 28 54 63 6c 5f 54 69 6d 65 20 2a 20 74 69 6d ((Tcl_Time * tim
0870: 65 50 74 72 29 29 3b 0a 2f 2a 20 31 34 20 2a 2f ePtr));./* 14 */
0880: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
0890: 5f 41 70 70 65 6e 64 41 6c 6c 4f 62 6a 54 79 70 _AppendAllObjTyp
08a0: 65 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 es _ANSI_ARGS_((
08b0: 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 .....Tcl_Interp
08c0: 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 * interp, Tcl_Ob
08d0: 6a 20 2a 20 6f 62 6a 50 74 72 29 29 3b 0a 2f 2a j * objPtr));./*
08e0: 20 31 35 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 15 */.EXTERN vo
08f0: 69 64 09 09 54 63 6c 5f 41 70 70 65 6e 64 53 74 id..Tcl_AppendSt
0900: 72 69 6e 67 73 54 6f 4f 62 6a 20 5f 41 4e 53 49 ringsToObj _ANSI
0910: 5f 41 52 47 53 5f 28 54 43 4c 5f 56 41 52 41 52 _ARGS_(TCL_VARAR
0920: 47 53 28 54 63 6c 5f 4f 62 6a 20 2a 2c 6f 62 6a GS(Tcl_Obj *,obj
0930: 50 74 72 29 29 3b 0a 2f 2a 20 31 36 20 2a 2f 0a Ptr));./* 16 */.
0940: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
0950: 5f 41 70 70 65 6e 64 54 6f 4f 62 6a 20 5f 41 4e _AppendToObj _AN
0960: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
0970: 6a 2a 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 j* objPtr, .....
0980: 43 4f 4e 53 54 20 63 68 61 72 2a 20 62 79 74 65 CONST char* byte
0990: 73 2c 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 3b s, int length));
09a0: 0a 2f 2a 20 31 37 20 2a 2f 0a 45 58 54 45 52 4e ./* 17 */.EXTERN
09b0: 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 43 Tcl_Obj *.Tcl_C
09c0: 6f 6e 63 61 74 4f 62 6a 20 5f 41 4e 53 49 5f 41 oncatObj _ANSI_A
09d0: 52 47 53 5f 28 28 69 6e 74 20 6f 62 6a 63 2c 20 RGS_((int objc,
09e0: 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 43 4f .....Tcl_Obj *CO
09f0: 4e 53 54 20 6f 62 6a 76 5b 5d 29 29 3b 0a 2f 2a NST objv[]));./*
0a00: 20 31 38 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 18 */.EXTERN in
0a10: 74 09 09 54 63 6c 5f 43 6f 6e 76 65 72 74 54 6f t..Tcl_ConvertTo
0a20: 54 79 70 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f Type _ANSI_ARGS_
0a30: 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
0a40: 6e 74 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f nterp, .....Tcl_
0a50: 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 54 63 Obj * objPtr, Tc
0a60: 6c 5f 4f 62 6a 54 79 70 65 20 2a 20 74 79 70 65 l_ObjType * type
0a70: 50 74 72 29 29 3b 0a 2f 2a 20 31 39 20 2a 2f 0a Ptr));./* 19 */.
0a80: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
0a90: 5f 44 62 44 65 63 72 52 65 66 43 6f 75 6e 74 20 _DbDecrRefCount
0aa0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
0ab0: 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 0a _Obj * objPtr, .
0ac0: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
0ad0: 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 file, int line)
0ae0: 29 3b 0a 2f 2a 20 32 30 20 2a 2f 0a 45 58 54 45 );./* 20 */.EXTE
0af0: 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 44 62 49 RN void..Tcl_DbI
0b00: 6e 63 72 52 65 66 43 6f 75 6e 74 20 5f 41 4e 53 ncrRefCount _ANS
0b10: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a I_ARGS_((Tcl_Obj
0b20: 20 2a 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 * objPtr, .....
0b30: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 69 6c CONST char * fil
0b40: 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 3b 0a 2f e, int line));./
0b50: 2a 20 32 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 * 21 */.EXTERN i
0b60: 6e 74 09 09 54 63 6c 5f 44 62 49 73 53 68 61 72 nt..Tcl_DbIsShar
0b70: 65 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ed _ANSI_ARGS_((
0b80: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
0b90: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
0ba0: 72 20 2a 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 r * file, int li
0bb0: 6e 65 29 29 3b 0a 2f 2a 20 32 32 20 2a 2f 0a 45 ne));./* 22 */.E
0bc0: 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 XTERN Tcl_Obj *.
0bd0: 54 63 6c 5f 44 62 4e 65 77 42 6f 6f 6c 65 61 6e Tcl_DbNewBoolean
0be0: 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Obj _ANSI_ARGS_(
0bf0: 28 69 6e 74 20 62 6f 6f 6c 56 61 6c 75 65 2c 20 (int boolValue,
0c00: 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 .....CONST char
0c10: 2a 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 * file, int line
0c20: 29 29 3b 0a 2f 2a 20 32 33 20 2a 2f 0a 45 58 54 ));./* 23 */.EXT
0c30: 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 ERN Tcl_Obj *.Tc
0c40: 6c 5f 44 62 4e 65 77 42 79 74 65 41 72 72 61 79 l_DbNewByteArray
0c50: 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Obj _ANSI_ARGS_(
0c60: 28 0a 09 09 09 09 43 4f 4e 53 54 20 75 6e 73 69 (.....CONST unsi
0c70: 67 6e 65 64 20 63 68 61 72 20 2a 20 62 79 74 65 gned char * byte
0c80: 73 2c 20 69 6e 74 20 6c 65 6e 67 74 68 2c 20 0a s, int length, .
0c90: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
0ca0: 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 file, int line)
0cb0: 29 3b 0a 2f 2a 20 32 34 20 2a 2f 0a 45 58 54 45 );./* 24 */.EXTE
0cc0: 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c RN Tcl_Obj *.Tcl
0cd0: 5f 44 62 4e 65 77 44 6f 75 62 6c 65 4f 62 6a 20 _DbNewDoubleObj
0ce0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 64 6f 75 _ANSI_ARGS_((dou
0cf0: 62 6c 65 20 64 6f 75 62 6c 65 56 61 6c 75 65 2c ble doubleValue,
0d00: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
0d10: 20 2a 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e * file, int lin
0d20: 65 29 29 3b 0a 2f 2a 20 32 35 20 2a 2f 0a 45 58 e));./* 25 */.EX
0d30: 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 TERN Tcl_Obj *.T
0d40: 63 6c 5f 44 62 4e 65 77 4c 69 73 74 4f 62 6a 20 cl_DbNewListObj
0d50: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 _ANSI_ARGS_((int
0d60: 20 6f 62 6a 63 2c 20 0a 09 09 09 09 54 63 6c 5f objc, .....Tcl_
0d70: 4f 62 6a 20 2a 43 4f 4e 53 54 20 2a 20 6f 62 6a Obj *CONST * obj
0d80: 76 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 v, CONST char *
0d90: 66 69 6c 65 2c 20 0a 09 09 09 09 69 6e 74 20 6c file, .....int l
0da0: 69 6e 65 29 29 3b 0a 2f 2a 20 32 36 20 2a 2f 0a ine));./* 26 */.
0db0: 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a EXTERN Tcl_Obj *
0dc0: 09 54 63 6c 5f 44 62 4e 65 77 4c 6f 6e 67 4f 62 .Tcl_DbNewLongOb
0dd0: 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 6c j _ANSI_ARGS_((l
0de0: 6f 6e 67 20 6c 6f 6e 67 56 61 6c 75 65 2c 20 0a ong longValue, .
0df0: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
0e00: 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 file, int line)
0e10: 29 3b 0a 2f 2a 20 32 37 20 2a 2f 0a 45 58 54 45 );./* 27 */.EXTE
0e20: 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c RN Tcl_Obj *.Tcl
0e30: 5f 44 62 4e 65 77 4f 62 6a 20 5f 41 4e 53 49 5f _DbNewObj _ANSI_
0e40: 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 ARGS_((CONST cha
0e50: 72 20 2a 20 66 69 6c 65 2c 20 0a 09 09 09 09 69 r * file, .....i
0e60: 6e 74 20 6c 69 6e 65 29 29 3b 0a 2f 2a 20 32 38 nt line));./* 28
0e70: 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f */.EXTERN Tcl_O
0e80: 62 6a 20 2a 09 54 63 6c 5f 44 62 4e 65 77 53 74 bj *.Tcl_DbNewSt
0e90: 72 69 6e 67 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 ringObj _ANSI_AR
0ea0: 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 GS_((CONST char
0eb0: 2a 20 62 79 74 65 73 2c 20 0a 09 09 09 09 69 6e * bytes, .....in
0ec0: 74 20 6c 65 6e 67 74 68 2c 20 43 4f 4e 53 54 20 t length, CONST
0ed0: 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 69 6e 74 char * file, int
0ee0: 20 6c 69 6e 65 29 29 3b 0a 2f 2a 20 32 39 20 2a line));./* 29 *
0ef0: 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a /.EXTERN Tcl_Obj
0f00: 20 2a 09 54 63 6c 5f 44 75 70 6c 69 63 61 74 65 *.Tcl_Duplicate
0f10: 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Obj _ANSI_ARGS_(
0f20: 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 (Tcl_Obj * objPt
0f30: 72 29 29 3b 0a 2f 2a 20 33 30 20 2a 2f 0a 45 58 r));./* 30 */.EX
0f40: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 46 72 TERN void..TclFr
0f50: 65 65 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 eeObj _ANSI_ARGS
0f60: 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a _((Tcl_Obj * obj
0f70: 50 74 72 29 29 3b 0a 2f 2a 20 33 31 20 2a 2f 0a Ptr));./* 31 */.
0f80: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
0f90: 47 65 74 42 6f 6f 6c 65 61 6e 20 5f 41 4e 53 49 GetBoolean _ANSI
0fa0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
0fb0: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
0fc0: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ..CONST char * s
0fd0: 74 72 2c 20 69 6e 74 20 2a 20 62 6f 6f 6c 50 74 tr, int * boolPt
0fe0: 72 29 29 3b 0a 2f 2a 20 33 32 20 2a 2f 0a 45 58 r));./* 32 */.EX
0ff0: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 47 65 TERN int..Tcl_Ge
1000: 74 42 6f 6f 6c 65 61 6e 46 72 6f 6d 4f 62 6a 20 tBooleanFromObj
1010: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
1020: 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ..Tcl_Interp * i
1030: 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a nterp, Tcl_Obj *
1040: 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 69 6e objPtr, .....in
1050: 74 20 2a 20 62 6f 6f 6c 50 74 72 29 29 3b 0a 2f t * boolPtr));./
1060: 2a 20 33 33 20 2a 2f 0a 45 58 54 45 52 4e 20 75 * 33 */.EXTERN u
1070: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 09 54 nsigned char *.T
1080: 63 6c 5f 47 65 74 42 79 74 65 41 72 72 61 79 46 cl_GetByteArrayF
1090: 72 6f 6d 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 romObj _ANSI_ARG
10a0: 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 4f 62 6a S_((.....Tcl_Obj
10b0: 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 2a * objPtr, int *
10c0: 20 6c 65 6e 67 74 68 50 74 72 29 29 3b 0a 2f 2a lengthPtr));./*
10d0: 20 33 34 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 34 */.EXTERN in
10e0: 74 09 09 54 63 6c 5f 47 65 74 44 6f 75 62 6c 65 t..Tcl_GetDouble
10f0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
1100: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
1110: 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 p, .....CONST ch
1120: 61 72 20 2a 20 73 74 72 2c 20 64 6f 75 62 6c 65 ar * str, double
1130: 20 2a 20 64 6f 75 62 6c 65 50 74 72 29 29 3b 0a * doublePtr));.
1140: 2f 2a 20 33 35 20 2a 2f 0a 45 58 54 45 52 4e 20 /* 35 */.EXTERN
1150: 69 6e 74 09 09 54 63 6c 5f 47 65 74 44 6f 75 62 int..Tcl_GetDoub
1160: 6c 65 46 72 6f 6d 4f 62 6a 20 5f 41 4e 53 49 5f leFromObj _ANSI_
1170: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
1180: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
1190: 20 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 Tcl_Obj * objPt
11a0: 72 2c 20 0a 09 09 09 09 64 6f 75 62 6c 65 20 2a r, .....double *
11b0: 20 64 6f 75 62 6c 65 50 74 72 29 29 3b 0a 2f 2a doublePtr));./*
11c0: 20 33 36 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 36 */.EXTERN in
11d0: 74 09 09 54 63 6c 5f 47 65 74 49 6e 64 65 78 46 t..Tcl_GetIndexF
11e0: 72 6f 6d 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 romObj _ANSI_ARG
11f0: 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
1200: 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 54 63 interp, .....Tc
1210: 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 l_Obj * objPtr,
1220: 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a 2a 20 CONST84 char **
1230: 74 61 62 6c 65 50 74 72 2c 20 0a 09 09 09 09 43 tablePtr, .....C
1240: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6d 73 67 2c ONST char * msg,
1250: 20 69 6e 74 20 66 6c 61 67 73 2c 20 69 6e 74 20 int flags, int
1260: 2a 20 69 6e 64 65 78 50 74 72 29 29 3b 0a 2f 2a * indexPtr));./*
1270: 20 33 37 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 37 */.EXTERN in
1280: 74 09 09 54 63 6c 5f 47 65 74 49 6e 74 20 5f 41 t..Tcl_GetInt _A
1290: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
12a0: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
12b0: 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 .....CONST char
12c0: 2a 20 73 74 72 2c 20 69 6e 74 20 2a 20 69 6e 74 * str, int * int
12d0: 50 74 72 29 29 3b 0a 2f 2a 20 33 38 20 2a 2f 0a Ptr));./* 38 */.
12e0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
12f0: 47 65 74 49 6e 74 46 72 6f 6d 4f 62 6a 20 5f 41 GetIntFromObj _A
1300: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
1310: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
1320: 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 6f .....Tcl_Obj * o
1330: 62 6a 50 74 72 2c 20 69 6e 74 20 2a 20 69 6e 74 bjPtr, int * int
1340: 50 74 72 29 29 3b 0a 2f 2a 20 33 39 20 2a 2f 0a Ptr));./* 39 */.
1350: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
1360: 47 65 74 4c 6f 6e 67 46 72 6f 6d 4f 62 6a 20 5f GetLongFromObj _
1370: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
1380: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
1390: 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 .....Tcl_Obj *
13a0: 6f 62 6a 50 74 72 2c 20 6c 6f 6e 67 20 2a 20 6c objPtr, long * l
13b0: 6f 6e 67 50 74 72 29 29 3b 0a 2f 2a 20 34 30 20 ongPtr));./* 40
13c0: 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 */.EXTERN Tcl_Ob
13d0: 6a 54 79 70 65 20 2a 09 54 63 6c 5f 47 65 74 4f jType *.Tcl_GetO
13e0: 62 6a 54 79 70 65 20 5f 41 4e 53 49 5f 41 52 47 bjType _ANSI_ARG
13f0: 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a S_((CONST char *
1400: 20 74 79 70 65 4e 61 6d 65 29 29 3b 0a 2f 2a 20 typeName));./*
1410: 34 31 20 2a 2f 0a 45 58 54 45 52 4e 20 63 68 61 41 */.EXTERN cha
1420: 72 20 2a 09 09 54 63 6c 5f 47 65 74 53 74 72 69 r *..Tcl_GetStri
1430: 6e 67 46 72 6f 6d 4f 62 6a 20 5f 41 4e 53 49 5f ngFromObj _ANSI_
1440: 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a ARGS_((Tcl_Obj *
1450: 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 69 6e objPtr, .....in
1460: 74 20 2a 20 6c 65 6e 67 74 68 50 74 72 29 29 3b t * lengthPtr));
1470: 0a 2f 2a 20 34 32 20 2a 2f 0a 45 58 54 45 52 4e ./* 42 */.EXTERN
1480: 20 76 6f 69 64 09 09 54 63 6c 5f 49 6e 76 61 6c void..Tcl_Inval
1490: 69 64 61 74 65 53 74 72 69 6e 67 52 65 70 20 5f idateStringRep _
14a0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
14b0: 09 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 .Tcl_Obj * objPt
14c0: 72 29 29 3b 0a 2f 2a 20 34 33 20 2a 2f 0a 45 58 r));./* 43 */.EX
14d0: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 4c 69 TERN int..Tcl_Li
14e0: 73 74 4f 62 6a 41 70 70 65 6e 64 4c 69 73 74 20 stObjAppendList
14f0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
1500: 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ..Tcl_Interp * i
1510: 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a nterp, Tcl_Obj *
1520: 20 6c 69 73 74 50 74 72 2c 20 0a 09 09 09 09 54 listPtr, .....T
1530: 63 6c 5f 4f 62 6a 20 2a 20 65 6c 65 6d 4c 69 73 cl_Obj * elemLis
1540: 74 50 74 72 29 29 3b 0a 2f 2a 20 34 34 20 2a 2f tPtr));./* 44 */
1550: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
1560: 5f 4c 69 73 74 4f 62 6a 41 70 70 65 6e 64 45 6c _ListObjAppendEl
1570: 65 6d 65 6e 74 20 5f 41 4e 53 49 5f 41 52 47 53 ement _ANSI_ARGS
1580: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 _((.....Tcl_Inte
1590: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c rp * interp, Tcl
15a0: 5f 4f 62 6a 20 2a 20 6c 69 73 74 50 74 72 2c 20 _Obj * listPtr,
15b0: 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 6f .....Tcl_Obj * o
15c0: 62 6a 50 74 72 29 29 3b 0a 2f 2a 20 34 35 20 2a bjPtr));./* 45 *
15d0: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
15e0: 6c 5f 4c 69 73 74 4f 62 6a 47 65 74 45 6c 65 6d l_ListObjGetElem
15f0: 65 6e 74 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f ents _ANSI_ARGS_
1600: 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 ((.....Tcl_Inter
1610: 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f p * interp, Tcl_
1620: 4f 62 6a 20 2a 20 6c 69 73 74 50 74 72 2c 20 0a Obj * listPtr, .
1630: 09 09 09 09 69 6e 74 20 2a 20 6f 62 6a 63 50 74 ....int * objcPt
1640: 72 2c 20 54 63 6c 5f 4f 62 6a 20 2a 2a 2a 20 6f r, Tcl_Obj *** o
1650: 62 6a 76 50 74 72 29 29 3b 0a 2f 2a 20 34 36 20 bjvPtr));./* 46
1660: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
1670: 63 6c 5f 4c 69 73 74 4f 62 6a 49 6e 64 65 78 20 cl_ListObjIndex
1680: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
1690: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
16a0: 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a , .....Tcl_Obj *
16b0: 20 6c 69 73 74 50 74 72 2c 20 69 6e 74 20 69 6e listPtr, int in
16c0: 64 65 78 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 dex, .....Tcl_Ob
16d0: 6a 20 2a 2a 20 6f 62 6a 50 74 72 50 74 72 29 29 j ** objPtrPtr))
16e0: 3b 0a 2f 2a 20 34 37 20 2a 2f 0a 45 58 54 45 52 ;./* 47 */.EXTER
16f0: 4e 20 69 6e 74 09 09 54 63 6c 5f 4c 69 73 74 4f N int..Tcl_ListO
1700: 62 6a 4c 65 6e 67 74 68 20 5f 41 4e 53 49 5f 41 bjLength _ANSI_A
1710: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
1720: 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 * interp, .....
1730: 54 63 6c 5f 4f 62 6a 20 2a 20 6c 69 73 74 50 74 Tcl_Obj * listPt
1740: 72 2c 20 69 6e 74 20 2a 20 6c 65 6e 67 74 68 50 r, int * lengthP
1750: 74 72 29 29 3b 0a 2f 2a 20 34 38 20 2a 2f 0a 45 tr));./* 48 */.E
1760: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 4c XTERN int..Tcl_L
1770: 69 73 74 4f 62 6a 52 65 70 6c 61 63 65 20 5f 41 istObjReplace _A
1780: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
1790: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
17a0: 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 6c .....Tcl_Obj * l
17b0: 69 73 74 50 74 72 2c 20 69 6e 74 20 66 69 72 73 istPtr, int firs
17c0: 74 2c 20 69 6e 74 20 63 6f 75 6e 74 2c 20 0a 09 t, int count, ..
17d0: 09 09 09 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c ...int objc, Tcl
17e0: 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 _Obj *CONST objv
17f0: 5b 5d 29 29 3b 0a 2f 2a 20 34 39 20 2a 2f 0a 45 []));./* 49 */.E
1800: 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 XTERN Tcl_Obj *.
1810: 54 63 6c 5f 4e 65 77 42 6f 6f 6c 65 61 6e 4f 62 Tcl_NewBooleanOb
1820: 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 j _ANSI_ARGS_((i
1830: 6e 74 20 62 6f 6f 6c 56 61 6c 75 65 29 29 3b 0a nt boolValue));.
1840: 2f 2a 20 35 30 20 2a 2f 0a 45 58 54 45 52 4e 20 /* 50 */.EXTERN
1850: 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 4e 65 Tcl_Obj *.Tcl_Ne
1860: 77 42 79 74 65 41 72 72 61 79 4f 62 6a 20 5f 41 wByteArrayObj _A
1870: 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 NSI_ARGS_((.....
1880: 43 4f 4e 53 54 20 75 6e 73 69 67 6e 65 64 20 63 CONST unsigned c
1890: 68 61 72 2a 20 62 79 74 65 73 2c 20 69 6e 74 20 har* bytes, int
18a0: 6c 65 6e 67 74 68 29 29 3b 0a 2f 2a 20 35 31 20 length));./* 51
18b0: 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 */.EXTERN Tcl_Ob
18c0: 6a 20 2a 09 54 63 6c 5f 4e 65 77 44 6f 75 62 6c j *.Tcl_NewDoubl
18d0: 65 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f eObj _ANSI_ARGS_
18e0: 28 28 64 6f 75 62 6c 65 20 64 6f 75 62 6c 65 56 ((double doubleV
18f0: 61 6c 75 65 29 29 3b 0a 2f 2a 20 35 32 20 2a 2f alue));./* 52 */
1900: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 .EXTERN Tcl_Obj
1910: 2a 09 54 63 6c 5f 4e 65 77 49 6e 74 4f 62 6a 20 *.Tcl_NewIntObj
1920: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 _ANSI_ARGS_((int
1930: 20 69 6e 74 56 61 6c 75 65 29 29 3b 0a 2f 2a 20 intValue));./*
1940: 35 33 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 53 */.EXTERN Tcl
1950: 5f 4f 62 6a 20 2a 09 54 63 6c 5f 4e 65 77 4c 69 _Obj *.Tcl_NewLi
1960: 73 74 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 stObj _ANSI_ARGS
1970: 5f 28 28 69 6e 74 20 6f 62 6a 63 2c 20 0a 09 09 _((int objc, ...
1980: 09 09 54 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 ..Tcl_Obj *CONST
1990: 20 6f 62 6a 76 5b 5d 29 29 3b 0a 2f 2a 20 35 34 objv[]));./* 54
19a0: 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f */.EXTERN Tcl_O
19b0: 62 6a 20 2a 09 54 63 6c 5f 4e 65 77 4c 6f 6e 67 bj *.Tcl_NewLong
19c0: 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Obj _ANSI_ARGS_(
19d0: 28 6c 6f 6e 67 20 6c 6f 6e 67 56 61 6c 75 65 29 (long longValue)
19e0: 29 3b 0a 2f 2a 20 35 35 20 2a 2f 0a 45 58 54 45 );./* 55 */.EXTE
19f0: 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c RN Tcl_Obj *.Tcl
1a00: 5f 4e 65 77 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 _NewObj _ANSI_AR
1a10: 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f 2a 20 GS_((void));./*
1a20: 35 36 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 56 */.EXTERN Tcl
1a30: 5f 4f 62 6a 20 2a 09 54 63 6c 5f 4e 65 77 53 74 _Obj *.Tcl_NewSt
1a40: 72 69 6e 67 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 ringObj _ANSI_AR
1a50: 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 GS_((CONST char
1a60: 2a 20 62 79 74 65 73 2c 20 0a 09 09 09 09 69 6e * bytes, .....in
1a70: 74 20 6c 65 6e 67 74 68 29 29 3b 0a 2f 2a 20 35 t length));./* 5
1a80: 37 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 7 */.EXTERN void
1a90: 09 09 54 63 6c 5f 53 65 74 42 6f 6f 6c 65 61 6e ..Tcl_SetBoolean
1aa0: 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Obj _ANSI_ARGS_(
1ab0: 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 (Tcl_Obj * objPt
1ac0: 72 2c 20 0a 09 09 09 09 69 6e 74 20 62 6f 6f 6c r, .....int bool
1ad0: 56 61 6c 75 65 29 29 3b 0a 2f 2a 20 35 38 20 2a Value));./* 58 *
1ae0: 2f 0a 45 58 54 45 52 4e 20 75 6e 73 69 67 6e 65 /.EXTERN unsigne
1af0: 64 20 63 68 61 72 20 2a 09 54 63 6c 5f 53 65 74 d char *.Tcl_Set
1b00: 42 79 74 65 41 72 72 61 79 4c 65 6e 67 74 68 20 ByteArrayLength
1b10: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
1b20: 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 0a _Obj * objPtr, .
1b30: 09 09 09 09 69 6e 74 20 6c 65 6e 67 74 68 29 29 ....int length))
1b40: 3b 0a 2f 2a 20 35 39 20 2a 2f 0a 45 58 54 45 52 ;./* 59 */.EXTER
1b50: 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 42 N void..Tcl_SetB
1b60: 79 74 65 41 72 72 61 79 4f 62 6a 20 5f 41 4e 53 yteArrayObj _ANS
1b70: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a I_ARGS_((Tcl_Obj
1b80: 20 2a 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 * objPtr, .....
1b90: 43 4f 4e 53 54 20 75 6e 73 69 67 6e 65 64 20 63 CONST unsigned c
1ba0: 68 61 72 20 2a 20 62 79 74 65 73 2c 20 69 6e 74 har * bytes, int
1bb0: 20 6c 65 6e 67 74 68 29 29 3b 0a 2f 2a 20 36 30 length));./* 60
1bc0: 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 */.EXTERN void.
1bd0: 09 54 63 6c 5f 53 65 74 44 6f 75 62 6c 65 4f 62 .Tcl_SetDoubleOb
1be0: 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 j _ANSI_ARGS_((T
1bf0: 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c cl_Obj * objPtr,
1c00: 20 0a 09 09 09 09 64 6f 75 62 6c 65 20 64 6f 75 .....double dou
1c10: 62 6c 65 56 61 6c 75 65 29 29 3b 0a 2f 2a 20 36 bleValue));./* 6
1c20: 31 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 1 */.EXTERN void
1c30: 09 09 54 63 6c 5f 53 65 74 49 6e 74 4f 62 6a 20 ..Tcl_SetIntObj
1c40: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
1c50: 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 0a _Obj * objPtr, .
1c60: 09 09 09 09 69 6e 74 20 69 6e 74 56 61 6c 75 65 ....int intValue
1c70: 29 29 3b 0a 2f 2a 20 36 32 20 2a 2f 0a 45 58 54 ));./* 62 */.EXT
1c80: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 ERN void..Tcl_Se
1c90: 74 4c 69 73 74 4f 62 6a 20 5f 41 4e 53 49 5f 41 tListObj _ANSI_A
1ca0: 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 RGS_((Tcl_Obj *
1cb0: 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 69 6e 74 objPtr, .....int
1cc0: 20 6f 62 6a 63 2c 20 54 63 6c 5f 4f 62 6a 20 2a objc, Tcl_Obj *
1cd0: 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 29 29 3b 0a CONST objv[]));.
1ce0: 2f 2a 20 36 33 20 2a 2f 0a 45 58 54 45 52 4e 20 /* 63 */.EXTERN
1cf0: 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 4c 6f 6e void..Tcl_SetLon
1d00: 67 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f gObj _ANSI_ARGS_
1d10: 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 ((Tcl_Obj * objP
1d20: 74 72 2c 20 0a 09 09 09 09 6c 6f 6e 67 20 6c 6f tr, .....long lo
1d30: 6e 67 56 61 6c 75 65 29 29 3b 0a 2f 2a 20 36 34 ngValue));./* 64
1d40: 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 */.EXTERN void.
1d50: 09 54 63 6c 5f 53 65 74 4f 62 6a 4c 65 6e 67 74 .Tcl_SetObjLengt
1d60: 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 h _ANSI_ARGS_((T
1d70: 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c cl_Obj * objPtr,
1d80: 20 0a 09 09 09 09 69 6e 74 20 6c 65 6e 67 74 68 .....int length
1d90: 29 29 3b 0a 2f 2a 20 36 35 20 2a 2f 0a 45 58 54 ));./* 65 */.EXT
1da0: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 ERN void..Tcl_Se
1db0: 74 53 74 72 69 6e 67 4f 62 6a 20 5f 41 4e 53 49 tStringObj _ANSI
1dc0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 2a _ARGS_((Tcl_Obj*
1dd0: 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 43 4f objPtr, .....CO
1de0: 4e 53 54 20 63 68 61 72 2a 20 62 79 74 65 73 2c NST char* bytes,
1df0: 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 3b 0a 2f int length));./
1e00: 2a 20 36 36 20 2a 2f 0a 45 58 54 45 52 4e 20 76 * 66 */.EXTERN v
1e10: 6f 69 64 09 09 54 63 6c 5f 41 64 64 45 72 72 6f oid..Tcl_AddErro
1e20: 72 49 6e 66 6f 20 5f 41 4e 53 49 5f 41 52 47 53 rInfo _ANSI_ARGS
1e30: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
1e40: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e interp, .....CON
1e50: 53 54 20 63 68 61 72 20 2a 20 6d 65 73 73 61 67 ST char * messag
1e60: 65 29 29 3b 0a 2f 2a 20 36 37 20 2a 2f 0a 45 58 e));./* 67 */.EX
1e70: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 41 TERN void..Tcl_A
1e80: 64 64 4f 62 6a 45 72 72 6f 72 49 6e 66 6f 20 5f ddObjErrorInfo _
1e90: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
1ea0: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
1eb0: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
1ec0: 20 2a 20 6d 65 73 73 61 67 65 2c 20 69 6e 74 20 * message, int
1ed0: 6c 65 6e 67 74 68 29 29 3b 0a 2f 2a 20 36 38 20 length));./* 68
1ee0: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
1ef0: 54 63 6c 5f 41 6c 6c 6f 77 45 78 63 65 70 74 69 Tcl_AllowExcepti
1f00: 6f 6e 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ons _ANSI_ARGS_(
1f10: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
1f20: 74 65 72 70 29 29 3b 0a 2f 2a 20 36 39 20 2a 2f terp));./* 69 */
1f30: 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 .EXTERN void..Tc
1f40: 6c 5f 41 70 70 65 6e 64 45 6c 65 6d 65 6e 74 20 l_AppendElement
1f50: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
1f60: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
1f70: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
1f80: 72 20 2a 20 73 74 72 69 6e 67 29 29 3b 0a 2f 2a r * string));./*
1f90: 20 37 30 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 70 */.EXTERN vo
1fa0: 69 64 09 09 54 63 6c 5f 41 70 70 65 6e 64 52 65 id..Tcl_AppendRe
1fb0: 73 75 6c 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f sult _ANSI_ARGS_
1fc0: 28 54 43 4c 5f 56 41 52 41 52 47 53 28 54 63 6c (TCL_VARARGS(Tcl
1fd0: 5f 49 6e 74 65 72 70 20 2a 2c 69 6e 74 65 72 70 _Interp *,interp
1fe0: 29 29 3b 0a 2f 2a 20 37 31 20 2a 2f 0a 45 58 54 ));./* 71 */.EXT
1ff0: 45 52 4e 20 54 63 6c 5f 41 73 79 6e 63 48 61 6e ERN Tcl_AsyncHan
2000: 64 6c 65 72 09 20 54 63 6c 5f 41 73 79 6e 63 43 dler. Tcl_AsyncC
2010: 72 65 61 74 65 20 5f 41 4e 53 49 5f 41 52 47 53 reate _ANSI_ARGS
2020: 5f 28 28 54 63 6c 5f 41 73 79 6e 63 50 72 6f 63 _((Tcl_AsyncProc
2030: 20 2a 20 70 72 6f 63 2c 20 0a 09 09 09 09 43 6c * proc, .....Cl
2040: 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 ientData clientD
2050: 61 74 61 29 29 3b 0a 2f 2a 20 37 32 20 2a 2f 0a ata));./* 72 */.
2060: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
2070: 5f 41 73 79 6e 63 44 65 6c 65 74 65 20 5f 41 4e _AsyncDelete _AN
2080: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 41 73 SI_ARGS_((Tcl_As
2090: 79 6e 63 48 61 6e 64 6c 65 72 20 61 73 79 6e 63 yncHandler async
20a0: 29 29 3b 0a 2f 2a 20 37 33 20 2a 2f 0a 45 58 54 ));./* 73 */.EXT
20b0: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 41 73 79 ERN int..Tcl_Asy
20c0: 6e 63 49 6e 76 6f 6b 65 20 5f 41 4e 53 49 5f 41 ncInvoke _ANSI_A
20d0: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
20e0: 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 * interp, .....
20f0: 69 6e 74 20 63 6f 64 65 29 29 3b 0a 2f 2a 20 37 int code));./* 7
2100: 34 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 4 */.EXTERN void
2110: 09 09 54 63 6c 5f 41 73 79 6e 63 4d 61 72 6b 20 ..Tcl_AsyncMark
2120: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
2130: 5f 41 73 79 6e 63 48 61 6e 64 6c 65 72 20 61 73 _AsyncHandler as
2140: 79 6e 63 29 29 3b 0a 2f 2a 20 37 35 20 2a 2f 0a ync));./* 75 */.
2150: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
2160: 41 73 79 6e 63 52 65 61 64 79 20 5f 41 4e 53 49 AsyncReady _ANSI
2170: 5f 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a _ARGS_((void));.
2180: 2f 2a 20 37 36 20 2a 2f 0a 45 58 54 45 52 4e 20 /* 76 */.EXTERN
2190: 76 6f 69 64 09 09 54 63 6c 5f 42 61 63 6b 67 72 void..Tcl_Backgr
21a0: 6f 75 6e 64 45 72 72 6f 72 20 5f 41 4e 53 49 5f oundError _ANSI_
21b0: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
21c0: 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 0a 2f 2a p * interp));./*
21d0: 20 37 37 20 2a 2f 0a 45 58 54 45 52 4e 20 63 68 77 */.EXTERN ch
21e0: 61 72 09 09 54 63 6c 5f 42 61 63 6b 73 6c 61 73 ar..Tcl_Backslas
21f0: 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 h _ANSI_ARGS_((C
2200: 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c ONST char * src,
2210: 20 0a 09 09 09 09 69 6e 74 20 2a 20 72 65 61 64 .....int * read
2220: 50 74 72 29 29 3b 0a 2f 2a 20 37 38 20 2a 2f 0a Ptr));./* 78 */.
2230: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
2240: 42 61 64 43 68 61 6e 6e 65 6c 4f 70 74 69 6f 6e BadChannelOption
2250: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
2260: 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 ...Tcl_Interp *
2270: 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 interp, CONST ch
2280: 61 72 20 2a 20 6f 70 74 69 6f 6e 4e 61 6d 65 2c ar * optionName,
2290: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
22a0: 20 2a 20 6f 70 74 69 6f 6e 4c 69 73 74 29 29 3b * optionList));
22b0: 0a 2f 2a 20 37 39 20 2a 2f 0a 45 58 54 45 52 4e ./* 79 */.EXTERN
22c0: 20 76 6f 69 64 09 09 54 63 6c 5f 43 61 6c 6c 57 void..Tcl_CallW
22d0: 68 65 6e 44 65 6c 65 74 65 64 20 5f 41 4e 53 49 henDeleted _ANSI
22e0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
22f0: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
2300: 09 09 54 63 6c 5f 49 6e 74 65 72 70 44 65 6c 65 ..Tcl_InterpDele
2310: 74 65 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a teProc * proc, .
2320: 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 ....ClientData c
2330: 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 lientData));./*
2340: 38 30 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 80 */.EXTERN voi
2350: 64 09 09 54 63 6c 5f 43 61 6e 63 65 6c 49 64 6c d..Tcl_CancelIdl
2360: 65 43 61 6c 6c 20 5f 41 4e 53 49 5f 41 52 47 53 eCall _ANSI_ARGS
2370: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 64 6c 65 _((.....Tcl_Idle
2380: 50 72 6f 63 20 2a 20 69 64 6c 65 50 72 6f 63 2c Proc * idleProc,
2390: 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 .....ClientData
23a0: 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f clientData));./
23b0: 2a 20 38 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 * 81 */.EXTERN i
23c0: 6e 74 09 09 54 63 6c 5f 43 6c 6f 73 65 20 5f 41 nt..Tcl_Close _A
23d0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
23e0: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
23f0: 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c .....Tcl_Channel
2400: 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 38 32 20 2a chan));./* 82 *
2410: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
2420: 6c 5f 43 6f 6d 6d 61 6e 64 43 6f 6d 70 6c 65 74 l_CommandComplet
2430: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 e _ANSI_ARGS_((C
2440: 4f 4e 53 54 20 63 68 61 72 20 2a 20 63 6d 64 29 ONST char * cmd)
2450: 29 3b 0a 2f 2a 20 38 33 20 2a 2f 0a 45 58 54 45 );./* 83 */.EXTE
2460: 52 4e 20 63 68 61 72 20 2a 09 09 54 63 6c 5f 43 RN char *..Tcl_C
2470: 6f 6e 63 61 74 20 5f 41 4e 53 49 5f 41 52 47 53 oncat _ANSI_ARGS
2480: 5f 28 28 69 6e 74 20 61 72 67 63 2c 20 0a 09 09 _((int argc, ...
2490: 09 09 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a ..CONST84 char *
24a0: 20 43 4f 4e 53 54 20 2a 20 61 72 67 76 29 29 3b CONST * argv));
24b0: 0a 2f 2a 20 38 34 20 2a 2f 0a 45 58 54 45 52 4e ./* 84 */.EXTERN
24c0: 20 69 6e 74 09 09 54 63 6c 5f 43 6f 6e 76 65 72 int..Tcl_Conver
24d0: 74 45 6c 65 6d 65 6e 74 20 5f 41 4e 53 49 5f 41 tElement _ANSI_A
24e0: 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
24f0: 20 2a 20 73 72 63 2c 20 0a 09 09 09 09 63 68 61 * src, .....cha
2500: 72 20 2a 20 64 73 74 2c 20 69 6e 74 20 66 6c 61 r * dst, int fla
2510: 67 73 29 29 3b 0a 2f 2a 20 38 35 20 2a 2f 0a 45 gs));./* 85 */.E
2520: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 43 XTERN int..Tcl_C
2530: 6f 6e 76 65 72 74 43 6f 75 6e 74 65 64 45 6c 65 onvertCountedEle
2540: 6d 65 6e 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f ment _ANSI_ARGS_
2550: 28 28 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 ((.....CONST cha
2560: 72 20 2a 20 73 72 63 2c 20 69 6e 74 20 6c 65 6e r * src, int len
2570: 67 74 68 2c 20 63 68 61 72 20 2a 20 64 73 74 2c gth, char * dst,
2580: 20 0a 09 09 09 09 69 6e 74 20 66 6c 61 67 73 29 .....int flags)
2590: 29 3b 0a 2f 2a 20 38 36 20 2a 2f 0a 45 58 54 45 );./* 86 */.EXTE
25a0: 52 4e 20 69 6e 74 09 09 54 63 6c 5f 43 72 65 61 RN int..Tcl_Crea
25b0: 74 65 41 6c 69 61 73 20 5f 41 4e 53 49 5f 41 52 teAlias _ANSI_AR
25c0: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
25d0: 2a 20 73 6c 61 76 65 2c 20 0a 09 09 09 09 43 4f * slave, .....CO
25e0: 4e 53 54 20 63 68 61 72 20 2a 20 73 6c 61 76 65 NST char * slave
25f0: 43 6d 64 2c 20 54 63 6c 5f 49 6e 74 65 72 70 20 Cmd, Tcl_Interp
2600: 2a 20 74 61 72 67 65 74 2c 20 0a 09 09 09 09 43 * target, .....C
2610: 4f 4e 53 54 20 63 68 61 72 20 2a 20 74 61 72 67 ONST char * targ
2620: 65 74 43 6d 64 2c 20 69 6e 74 20 61 72 67 63 2c etCmd, int argc,
2630: 20 0a 09 09 09 09 43 4f 4e 53 54 38 34 20 63 68 .....CONST84 ch
2640: 61 72 20 2a 20 43 4f 4e 53 54 20 2a 20 61 72 67 ar * CONST * arg
2650: 76 29 29 3b 0a 2f 2a 20 38 37 20 2a 2f 0a 45 58 v));./* 87 */.EX
2660: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 43 72 TERN int..Tcl_Cr
2670: 65 61 74 65 41 6c 69 61 73 4f 62 6a 20 5f 41 4e eateAliasObj _AN
2680: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
2690: 74 65 72 70 20 2a 20 73 6c 61 76 65 2c 20 0a 09 terp * slave, ..
26a0: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
26b0: 73 6c 61 76 65 43 6d 64 2c 20 54 63 6c 5f 49 6e slaveCmd, Tcl_In
26c0: 74 65 72 70 20 2a 20 74 61 72 67 65 74 2c 20 0a terp * target, .
26d0: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
26e0: 20 74 61 72 67 65 74 43 6d 64 2c 20 69 6e 74 20 targetCmd, int
26f0: 6f 62 6a 63 2c 20 0a 09 09 09 09 54 63 6c 5f 4f objc, .....Tcl_O
2700: 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d bj *CONST objv[]
2710: 29 29 3b 0a 2f 2a 20 38 38 20 2a 2f 0a 45 58 54 ));./* 88 */.EXT
2720: 45 52 4e 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 09 ERN Tcl_Channel.
2730: 54 63 6c 5f 43 72 65 61 74 65 43 68 61 6e 6e 65 Tcl_CreateChanne
2740: 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a l _ANSI_ARGS_((.
2750: 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 ....Tcl_ChannelT
2760: 79 70 65 20 2a 20 74 79 70 65 50 74 72 2c 20 0a ype * typePtr, .
2770: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
2780: 20 63 68 61 6e 4e 61 6d 65 2c 20 0a 09 09 09 09 chanName, .....
2790: 43 6c 69 65 6e 74 44 61 74 61 20 69 6e 73 74 61 ClientData insta
27a0: 6e 63 65 44 61 74 61 2c 20 69 6e 74 20 6d 61 73 nceData, int mas
27b0: 6b 29 29 3b 0a 2f 2a 20 38 39 20 2a 2f 0a 45 58 k));./* 89 */.EX
27c0: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 43 TERN void..Tcl_C
27d0: 72 65 61 74 65 43 68 61 6e 6e 65 6c 48 61 6e 64 reateChannelHand
27e0: 6c 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ler _ANSI_ARGS_(
27f0: 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 (.....Tcl_Channe
2800: 6c 20 63 68 61 6e 2c 20 69 6e 74 20 6d 61 73 6b l chan, int mask
2810: 2c 20 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e , .....Tcl_Chann
2820: 65 6c 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a elProc * proc, .
2830: 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 ....ClientData c
2840: 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 lientData));./*
2850: 39 30 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 90 */.EXTERN voi
2860: 64 09 09 54 63 6c 5f 43 72 65 61 74 65 43 6c 6f d..Tcl_CreateClo
2870: 73 65 48 61 6e 64 6c 65 72 20 5f 41 4e 53 49 5f seHandler _ANSI_
2880: 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e ARGS_((Tcl_Chann
2890: 65 6c 20 63 68 61 6e 2c 20 0a 09 09 09 09 54 63 el chan, .....Tc
28a0: 6c 5f 43 6c 6f 73 65 50 72 6f 63 20 2a 20 70 72 l_CloseProc * pr
28b0: 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 oc, ClientData c
28c0: 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 lientData));./*
28d0: 39 31 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 91 */.EXTERN Tcl
28e0: 5f 43 6f 6d 6d 61 6e 64 09 54 63 6c 5f 43 72 65 _Command.Tcl_Cre
28f0: 61 74 65 43 6f 6d 6d 61 6e 64 20 5f 41 4e 53 49 ateCommand _ANSI
2900: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
2910: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
2920: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 63 ..CONST char * c
2930: 6d 64 4e 61 6d 65 2c 20 54 63 6c 5f 43 6d 64 50 mdName, Tcl_CmdP
2940: 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a 09 09 09 roc * proc, ....
2950: 09 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 .ClientData clie
2960: 6e 74 44 61 74 61 2c 20 0a 09 09 09 09 54 63 6c ntData, .....Tcl
2970: 5f 43 6d 64 44 65 6c 65 74 65 50 72 6f 63 20 2a _CmdDeleteProc *
2980: 20 64 65 6c 65 74 65 50 72 6f 63 29 29 3b 0a 2f deleteProc));./
2990: 2a 20 39 32 20 2a 2f 0a 45 58 54 45 52 4e 20 76 * 92 */.EXTERN v
29a0: 6f 69 64 09 09 54 63 6c 5f 43 72 65 61 74 65 45 oid..Tcl_CreateE
29b0: 76 65 6e 74 53 6f 75 72 63 65 20 5f 41 4e 53 49 ventSource _ANSI
29c0: 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c _ARGS_((.....Tcl
29d0: 5f 45 76 65 6e 74 53 65 74 75 70 50 72 6f 63 20 _EventSetupProc
29e0: 2a 20 73 65 74 75 70 50 72 6f 63 2c 20 0a 09 09 * setupProc, ...
29f0: 09 09 54 63 6c 5f 45 76 65 6e 74 43 68 65 63 6b ..Tcl_EventCheck
2a00: 50 72 6f 63 20 2a 20 63 68 65 63 6b 50 72 6f 63 Proc * checkProc
2a10: 2c 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 , .....ClientDat
2a20: 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a a clientData));.
2a30: 2f 2a 20 39 33 20 2a 2f 0a 45 58 54 45 52 4e 20 /* 93 */.EXTERN
2a40: 76 6f 69 64 09 09 54 63 6c 5f 43 72 65 61 74 65 void..Tcl_Create
2a50: 45 78 69 74 48 61 6e 64 6c 65 72 20 5f 41 4e 53 ExitHandler _ANS
2a60: 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 I_ARGS_((.....Tc
2a70: 6c 5f 45 78 69 74 50 72 6f 63 20 2a 20 70 72 6f l_ExitProc * pro
2a80: 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c c, ClientData cl
2a90: 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 39 ientData));./* 9
2aa0: 34 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4 */.EXTERN Tcl_
2ab0: 49 6e 74 65 72 70 20 2a 09 54 63 6c 5f 43 72 65 Interp *.Tcl_Cre
2ac0: 61 74 65 49 6e 74 65 72 70 20 5f 41 4e 53 49 5f ateInterp _ANSI_
2ad0: 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f ARGS_((void));./
2ae0: 2a 20 39 35 20 2a 2f 0a 45 58 54 45 52 4e 20 76 * 95 */.EXTERN v
2af0: 6f 69 64 09 09 54 63 6c 5f 43 72 65 61 74 65 4d oid..Tcl_CreateM
2b00: 61 74 68 46 75 6e 63 20 5f 41 4e 53 49 5f 41 52 athFunc _ANSI_AR
2b10: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
2b20: 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 * interp, .....C
2b30: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 ONST char * name
2b40: 2c 20 69 6e 74 20 6e 75 6d 41 72 67 73 2c 20 0a , int numArgs, .
2b50: 09 09 09 09 54 63 6c 5f 56 61 6c 75 65 54 79 70 ....Tcl_ValueTyp
2b60: 65 20 2a 20 61 72 67 54 79 70 65 73 2c 20 0a 09 e * argTypes, ..
2b70: 09 09 09 54 63 6c 5f 4d 61 74 68 50 72 6f 63 20 ...Tcl_MathProc
2b80: 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 * proc, ClientDa
2b90: 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b ta clientData));
2ba0: 0a 2f 2a 20 39 36 20 2a 2f 0a 45 58 54 45 52 4e ./* 96 */.EXTERN
2bb0: 20 54 63 6c 5f 43 6f 6d 6d 61 6e 64 09 54 63 6c Tcl_Command.Tcl
2bc0: 5f 43 72 65 61 74 65 4f 62 6a 43 6f 6d 6d 61 6e _CreateObjComman
2bd0: 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a d _ANSI_ARGS_((.
2be0: 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a ....Tcl_Interp *
2bf0: 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 interp, CONST c
2c00: 68 61 72 20 2a 20 63 6d 64 4e 61 6d 65 2c 20 0a har * cmdName, .
2c10: 09 09 09 09 54 63 6c 5f 4f 62 6a 43 6d 64 50 72 ....Tcl_ObjCmdPr
2c20: 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e oc * proc, Clien
2c30: 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 tData clientData
2c40: 2c 20 0a 09 09 09 09 54 63 6c 5f 43 6d 64 44 65 , .....Tcl_CmdDe
2c50: 6c 65 74 65 50 72 6f 63 20 2a 20 64 65 6c 65 74 leteProc * delet
2c60: 65 50 72 6f 63 29 29 3b 0a 2f 2a 20 39 37 20 2a eProc));./* 97 *
2c70: 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 49 6e 74 /.EXTERN Tcl_Int
2c80: 65 72 70 20 2a 09 54 63 6c 5f 43 72 65 61 74 65 erp *.Tcl_Create
2c90: 53 6c 61 76 65 20 5f 41 4e 53 49 5f 41 52 47 53 Slave _ANSI_ARGS
2ca0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
2cb0: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e interp, .....CON
2cc0: 53 54 20 63 68 61 72 20 2a 20 73 6c 61 76 65 4e ST char * slaveN
2cd0: 61 6d 65 2c 20 69 6e 74 20 69 73 53 61 66 65 29 ame, int isSafe)
2ce0: 29 3b 0a 2f 2a 20 39 38 20 2a 2f 0a 45 58 54 45 );./* 98 */.EXTE
2cf0: 52 4e 20 54 63 6c 5f 54 69 6d 65 72 54 6f 6b 65 RN Tcl_TimerToke
2d00: 6e 09 54 63 6c 5f 43 72 65 61 74 65 54 69 6d 65 n.Tcl_CreateTime
2d10: 72 48 61 6e 64 6c 65 72 20 5f 41 4e 53 49 5f 41 rHandler _ANSI_A
2d20: 52 47 53 5f 28 28 69 6e 74 20 6d 69 6c 6c 69 73 RGS_((int millis
2d30: 65 63 6f 6e 64 73 2c 20 0a 09 09 09 09 54 63 6c econds, .....Tcl
2d40: 5f 54 69 6d 65 72 50 72 6f 63 20 2a 20 70 72 6f _TimerProc * pro
2d50: 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c c, ClientData cl
2d60: 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 39 ientData));./* 9
2d70: 39 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 9 */.EXTERN Tcl_
2d80: 54 72 61 63 65 09 54 63 6c 5f 43 72 65 61 74 65 Trace.Tcl_Create
2d90: 54 72 61 63 65 20 5f 41 4e 53 49 5f 41 52 47 53 Trace _ANSI_ARGS
2da0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
2db0: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 69 6e 74 interp, .....int
2dc0: 20 6c 65 76 65 6c 2c 20 54 63 6c 5f 43 6d 64 54 level, Tcl_CmdT
2dd0: 72 61 63 65 50 72 6f 63 20 2a 20 70 72 6f 63 2c raceProc * proc,
2de0: 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 .....ClientData
2df0: 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f clientData));./
2e00: 2a 20 31 30 30 20 2a 2f 0a 45 58 54 45 52 4e 20 * 100 */.EXTERN
2e10: 76 6f 69 64 09 09 54 63 6c 5f 44 65 6c 65 74 65 void..Tcl_Delete
2e20: 41 73 73 6f 63 44 61 74 61 20 5f 41 4e 53 49 5f AssocData _ANSI_
2e30: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
2e40: 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 p * interp, ....
2e50: 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 61 .CONST char * na
2e60: 6d 65 29 29 3b 0a 2f 2a 20 31 30 31 20 2a 2f 0a me));./* 101 */.
2e70: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
2e80: 5f 44 65 6c 65 74 65 43 68 61 6e 6e 65 6c 48 61 _DeleteChannelHa
2e90: 6e 64 6c 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 ndler _ANSI_ARGS
2ea0: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e _((.....Tcl_Chan
2eb0: 6e 65 6c 20 63 68 61 6e 2c 20 54 63 6c 5f 43 68 nel chan, Tcl_Ch
2ec0: 61 6e 6e 65 6c 50 72 6f 63 20 2a 20 70 72 6f 63 annelProc * proc
2ed0: 2c 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 , .....ClientDat
2ee0: 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a a clientData));.
2ef0: 2f 2a 20 31 30 32 20 2a 2f 0a 45 58 54 45 52 4e /* 102 */.EXTERN
2f00: 20 76 6f 69 64 09 09 54 63 6c 5f 44 65 6c 65 74 void..Tcl_Delet
2f10: 65 43 6c 6f 73 65 48 61 6e 64 6c 65 72 20 5f 41 eCloseHandler _A
2f20: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 NSI_ARGS_((Tcl_C
2f30: 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 0a 09 09 hannel chan, ...
2f40: 09 09 54 63 6c 5f 43 6c 6f 73 65 50 72 6f 63 20 ..Tcl_CloseProc
2f50: 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 * proc, ClientDa
2f60: 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b ta clientData));
2f70: 0a 2f 2a 20 31 30 33 20 2a 2f 0a 45 58 54 45 52 ./* 103 */.EXTER
2f80: 4e 20 69 6e 74 09 09 54 63 6c 5f 44 65 6c 65 74 N int..Tcl_Delet
2f90: 65 43 6f 6d 6d 61 6e 64 20 5f 41 4e 53 49 5f 41 eCommand _ANSI_A
2fa0: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
2fb0: 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 * interp, .....
2fc0: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 63 6d 64 CONST char * cmd
2fd0: 4e 61 6d 65 29 29 3b 0a 2f 2a 20 31 30 34 20 2a Name));./* 104 *
2fe0: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
2ff0: 6c 5f 44 65 6c 65 74 65 43 6f 6d 6d 61 6e 64 46 l_DeleteCommandF
3000: 72 6f 6d 54 6f 6b 65 6e 20 5f 41 4e 53 49 5f 41 romToken _ANSI_A
3010: 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 RGS_((.....Tcl_I
3020: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
3030: 54 63 6c 5f 43 6f 6d 6d 61 6e 64 20 63 6f 6d 6d Tcl_Command comm
3040: 61 6e 64 29 29 3b 0a 2f 2a 20 31 30 35 20 2a 2f and));./* 105 */
3050: 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 .EXTERN void..Tc
3060: 6c 5f 44 65 6c 65 74 65 45 76 65 6e 74 73 20 5f l_DeleteEvents _
3070: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
3080: 09 54 63 6c 5f 45 76 65 6e 74 44 65 6c 65 74 65 .Tcl_EventDelete
3090: 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a 09 09 Proc * proc, ...
30a0: 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 ..ClientData cli
30b0: 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 31 30 entData));./* 10
30c0: 36 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 6 */.EXTERN void
30d0: 09 09 54 63 6c 5f 44 65 6c 65 74 65 45 76 65 6e ..Tcl_DeleteEven
30e0: 74 53 6f 75 72 63 65 20 5f 41 4e 53 49 5f 41 52 tSource _ANSI_AR
30f0: 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 45 76 GS_((.....Tcl_Ev
3100: 65 6e 74 53 65 74 75 70 50 72 6f 63 20 2a 20 73 entSetupProc * s
3110: 65 74 75 70 50 72 6f 63 2c 20 0a 09 09 09 09 54 etupProc, .....T
3120: 63 6c 5f 45 76 65 6e 74 43 68 65 63 6b 50 72 6f cl_EventCheckPro
3130: 63 20 2a 20 63 68 65 63 6b 50 72 6f 63 2c 20 0a c * checkProc, .
3140: 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 ....ClientData c
3150: 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 lientData));./*
3160: 31 30 37 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 107 */.EXTERN vo
3170: 69 64 09 09 54 63 6c 5f 44 65 6c 65 74 65 45 78 id..Tcl_DeleteEx
3180: 69 74 48 61 6e 64 6c 65 72 20 5f 41 4e 53 49 5f itHandler _ANSI_
3190: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
31a0: 45 78 69 74 50 72 6f 63 20 2a 20 70 72 6f 63 2c ExitProc * proc,
31b0: 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 ClientData clie
31c0: 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 31 30 38 ntData));./* 108
31d0: 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 */.EXTERN void.
31e0: 09 54 63 6c 5f 44 65 6c 65 74 65 48 61 73 68 45 .Tcl_DeleteHashE
31f0: 6e 74 72 79 20 5f 41 4e 53 49 5f 41 52 47 53 5f ntry _ANSI_ARGS_
3200: 28 28 0a 09 09 09 09 54 63 6c 5f 48 61 73 68 45 ((.....Tcl_HashE
3210: 6e 74 72 79 20 2a 20 65 6e 74 72 79 50 74 72 29 ntry * entryPtr)
3220: 29 3b 0a 2f 2a 20 31 30 39 20 2a 2f 0a 45 58 54 );./* 109 */.EXT
3230: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 44 65 ERN void..Tcl_De
3240: 6c 65 74 65 48 61 73 68 54 61 62 6c 65 20 5f 41 leteHashTable _A
3250: 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 NSI_ARGS_((.....
3260: 54 63 6c 5f 48 61 73 68 54 61 62 6c 65 20 2a 20 Tcl_HashTable *
3270: 74 61 62 6c 65 50 74 72 29 29 3b 0a 2f 2a 20 31 tablePtr));./* 1
3280: 31 30 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 10 */.EXTERN voi
3290: 64 09 09 54 63 6c 5f 44 65 6c 65 74 65 49 6e 74 d..Tcl_DeleteInt
32a0: 65 72 70 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 erp _ANSI_ARGS_(
32b0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
32c0: 74 65 72 70 29 29 3b 0a 23 69 66 20 21 64 65 66 terp));.#if !def
32d0: 69 6e 65 64 28 5f 5f 57 49 4e 33 32 5f 5f 29 20 ined(__WIN32__)
32e0: 26 26 20 21 64 65 66 69 6e 65 64 28 4d 41 43 5f && !defined(MAC_
32f0: 54 43 4c 29 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a TCL) /* UNIX */.
3300: 2f 2a 20 31 31 31 20 2a 2f 0a 45 58 54 45 52 4e /* 111 */.EXTERN
3310: 20 76 6f 69 64 09 09 54 63 6c 5f 44 65 74 61 63 void..Tcl_Detac
3320: 68 50 69 64 73 20 5f 41 4e 53 49 5f 41 52 47 53 hPids _ANSI_ARGS
3330: 5f 28 28 69 6e 74 20 6e 75 6d 50 69 64 73 2c 20 _((int numPids,
3340: 0a 09 09 09 09 54 63 6c 5f 50 69 64 20 2a 20 70 .....Tcl_Pid * p
3350: 69 64 50 74 72 29 29 3b 0a 23 65 6e 64 69 66 20 idPtr));.#endif
3360: 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 66 64 65 /* UNIX */.#ifde
3370: 66 20 5f 5f 57 49 4e 33 32 5f 5f 0a 2f 2a 20 31 f __WIN32__./* 1
3380: 31 31 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 11 */.EXTERN voi
3390: 64 09 09 54 63 6c 5f 44 65 74 61 63 68 50 69 64 d..Tcl_DetachPid
33a0: 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 s _ANSI_ARGS_((i
33b0: 6e 74 20 6e 75 6d 50 69 64 73 2c 20 0a 09 09 09 nt numPids, ....
33c0: 09 54 63 6c 5f 50 69 64 20 2a 20 70 69 64 50 74 .Tcl_Pid * pidPt
33d0: 72 29 29 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 5f r));.#endif /* _
33e0: 5f 57 49 4e 33 32 5f 5f 20 2a 2f 0a 2f 2a 20 31 _WIN32__ */./* 1
33f0: 31 32 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 12 */.EXTERN voi
3400: 64 09 09 54 63 6c 5f 44 65 6c 65 74 65 54 69 6d d..Tcl_DeleteTim
3410: 65 72 48 61 6e 64 6c 65 72 20 5f 41 4e 53 49 5f erHandler _ANSI_
3420: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
3430: 54 69 6d 65 72 54 6f 6b 65 6e 20 74 6f 6b 65 6e TimerToken token
3440: 29 29 3b 0a 2f 2a 20 31 31 33 20 2a 2f 0a 45 58 ));./* 113 */.EX
3450: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 44 TERN void..Tcl_D
3460: 65 6c 65 74 65 54 72 61 63 65 20 5f 41 4e 53 49 eleteTrace _ANSI
3470: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
3480: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
3490: 09 09 54 63 6c 5f 54 72 61 63 65 20 74 72 61 63 ..Tcl_Trace trac
34a0: 65 29 29 3b 0a 2f 2a 20 31 31 34 20 2a 2f 0a 45 e));./* 114 */.E
34b0: 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f XTERN void..Tcl_
34c0: 44 6f 6e 74 43 61 6c 6c 57 68 65 6e 44 65 6c 65 DontCallWhenDele
34d0: 74 65 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ted _ANSI_ARGS_(
34e0: 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 (.....Tcl_Interp
34f0: 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 * interp, .....
3500: 54 63 6c 5f 49 6e 74 65 72 70 44 65 6c 65 74 65 Tcl_InterpDelete
3510: 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a 09 09 Proc * proc, ...
3520: 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 ..ClientData cli
3530: 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 31 31 entData));./* 11
3540: 35 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 5 */.EXTERN int.
3550: 09 54 63 6c 5f 44 6f 4f 6e 65 45 76 65 6e 74 20 .Tcl_DoOneEvent
3560: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 _ANSI_ARGS_((int
3570: 20 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 31 31 36 flags));./* 116
3580: 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 */.EXTERN void.
3590: 09 54 63 6c 5f 44 6f 57 68 65 6e 49 64 6c 65 20 .Tcl_DoWhenIdle
35a0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
35b0: 5f 49 64 6c 65 50 72 6f 63 20 2a 20 70 72 6f 63 _IdleProc * proc
35c0: 2c 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 , .....ClientDat
35d0: 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a a clientData));.
35e0: 2f 2a 20 31 31 37 20 2a 2f 0a 45 58 54 45 52 4e /* 117 */.EXTERN
35f0: 20 63 68 61 72 20 2a 09 09 54 63 6c 5f 44 53 74 char *..Tcl_DSt
3600: 72 69 6e 67 41 70 70 65 6e 64 20 5f 41 4e 53 49 ringAppend _ANSI
3610: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 44 53 74 72 _ARGS_((Tcl_DStr
3620: 69 6e 67 20 2a 20 64 73 50 74 72 2c 20 0a 09 09 ing * dsPtr, ...
3630: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ..CONST char * s
3640: 74 72 2c 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 tr, int length))
3650: 3b 0a 2f 2a 20 31 31 38 20 2a 2f 0a 45 58 54 45 ;./* 118 */.EXTE
3660: 52 4e 20 63 68 61 72 20 2a 09 09 54 63 6c 5f 44 RN char *..Tcl_D
3670: 53 74 72 69 6e 67 41 70 70 65 6e 64 45 6c 65 6d StringAppendElem
3680: 65 6e 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ent _ANSI_ARGS_(
3690: 28 0a 09 09 09 09 54 63 6c 5f 44 53 74 72 69 6e (.....Tcl_DStrin
36a0: 67 20 2a 20 64 73 50 74 72 2c 20 43 4f 4e 53 54 g * dsPtr, CONST
36b0: 20 63 68 61 72 20 2a 20 73 74 72 69 6e 67 29 29 char * string))
36c0: 3b 0a 2f 2a 20 31 31 39 20 2a 2f 0a 45 58 54 45 ;./* 119 */.EXTE
36d0: 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 44 53 74 RN void..Tcl_DSt
36e0: 72 69 6e 67 45 6e 64 53 75 62 6c 69 73 74 20 5f ringEndSublist _
36f0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
3700: 09 54 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 64 .Tcl_DString * d
3710: 73 50 74 72 29 29 3b 0a 2f 2a 20 31 32 30 20 2a sPtr));./* 120 *
3720: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
3730: 63 6c 5f 44 53 74 72 69 6e 67 46 72 65 65 20 5f cl_DStringFree _
3740: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
3750: 44 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 29 DString * dsPtr)
3760: 29 3b 0a 2f 2a 20 31 32 31 20 2a 2f 0a 45 58 54 );./* 121 */.EXT
3770: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 44 53 ERN void..Tcl_DS
3780: 74 72 69 6e 67 47 65 74 52 65 73 75 6c 74 20 5f tringGetResult _
3790: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
37a0: 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e .Tcl_Interp * in
37b0: 74 65 72 70 2c 20 54 63 6c 5f 44 53 74 72 69 6e terp, Tcl_DStrin
37c0: 67 20 2a 20 64 73 50 74 72 29 29 3b 0a 2f 2a 20 g * dsPtr));./*
37d0: 31 32 32 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 122 */.EXTERN vo
37e0: 69 64 09 09 54 63 6c 5f 44 53 74 72 69 6e 67 49 id..Tcl_DStringI
37f0: 6e 69 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nit _ANSI_ARGS_(
3800: 28 54 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 64 (Tcl_DString * d
3810: 73 50 74 72 29 29 3b 0a 2f 2a 20 31 32 33 20 2a sPtr));./* 123 *
3820: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
3830: 63 6c 5f 44 53 74 72 69 6e 67 52 65 73 75 6c 74 cl_DStringResult
3840: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
3850: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
3860: 70 2c 20 0a 09 09 09 09 54 63 6c 5f 44 53 74 72 p, .....Tcl_DStr
3870: 69 6e 67 20 2a 20 64 73 50 74 72 29 29 3b 0a 2f ing * dsPtr));./
3880: 2a 20 31 32 34 20 2a 2f 0a 45 58 54 45 52 4e 20 * 124 */.EXTERN
3890: 76 6f 69 64 09 09 54 63 6c 5f 44 53 74 72 69 6e void..Tcl_DStrin
38a0: 67 53 65 74 4c 65 6e 67 74 68 20 5f 41 4e 53 49 gSetLength _ANSI
38b0: 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c _ARGS_((.....Tcl
38c0: 5f 44 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 _DString * dsPtr
38d0: 2c 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 3b 0a , int length));.
38e0: 2f 2a 20 31 32 35 20 2a 2f 0a 45 58 54 45 52 4e /* 125 */.EXTERN
38f0: 20 76 6f 69 64 09 09 54 63 6c 5f 44 53 74 72 69 void..Tcl_DStri
3900: 6e 67 53 74 61 72 74 53 75 62 6c 69 73 74 20 5f ngStartSublist _
3910: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
3920: 09 54 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 64 .Tcl_DString * d
3930: 73 50 74 72 29 29 3b 0a 2f 2a 20 31 32 36 20 2a sPtr));./* 126 *
3940: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
3950: 6c 5f 45 6f 66 20 5f 41 4e 53 49 5f 41 52 47 53 l_Eof _ANSI_ARGS
3960: 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 _((Tcl_Channel c
3970: 68 61 6e 29 29 3b 0a 2f 2a 20 31 32 37 20 2a 2f han));./* 127 */
3980: 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 5f .EXTERN CONST84_
3990: 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 63 RETURN char * Tc
39a0: 6c 5f 45 72 72 6e 6f 49 64 20 5f 41 4e 53 49 5f l_ErrnoId _ANSI_
39b0: 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f ARGS_((void));./
39c0: 2a 20 31 32 38 20 2a 2f 0a 45 58 54 45 52 4e 20 * 128 */.EXTERN
39d0: 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 CONST84_RETURN c
39e0: 68 61 72 20 2a 20 54 63 6c 5f 45 72 72 6e 6f 4d har * Tcl_ErrnoM
39f0: 73 67 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 sg _ANSI_ARGS_((
3a00: 69 6e 74 20 65 72 72 29 29 3b 0a 2f 2a 20 31 32 int err));./* 12
3a10: 39 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 9 */.EXTERN int.
3a20: 09 54 63 6c 5f 45 76 61 6c 20 5f 41 4e 53 49 5f .Tcl_Eval _ANSI_
3a30: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
3a40: 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 p * interp, ....
3a50: 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 .CONST char * st
3a60: 72 69 6e 67 29 29 3b 0a 2f 2a 20 31 33 30 20 2a ring));./* 130 *
3a70: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
3a80: 6c 5f 45 76 61 6c 46 69 6c 65 20 5f 41 4e 53 49 l_EvalFile _ANSI
3a90: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
3aa0: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
3ab0: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 ..CONST char * f
3ac0: 69 6c 65 4e 61 6d 65 29 29 3b 0a 2f 2a 20 31 33 ileName));./* 13
3ad0: 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 1 */.EXTERN int.
3ae0: 09 54 63 6c 5f 45 76 61 6c 4f 62 6a 20 5f 41 4e .Tcl_EvalObj _AN
3af0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
3b00: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a terp * interp, .
3b10: 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 ....Tcl_Obj * ob
3b20: 6a 50 74 72 29 29 3b 0a 2f 2a 20 31 33 32 20 2a jPtr));./* 132 *
3b30: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
3b40: 63 6c 5f 45 76 65 6e 74 75 61 6c 6c 79 46 72 65 cl_EventuallyFre
3b50: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a e _ANSI_ARGS_((.
3b60: 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 ....ClientData c
3b70: 6c 69 65 6e 74 44 61 74 61 2c 20 0a 09 09 09 09 lientData, .....
3b80: 54 63 6c 5f 46 72 65 65 50 72 6f 63 20 2a 20 66 Tcl_FreeProc * f
3b90: 72 65 65 50 72 6f 63 29 29 3b 0a 2f 2a 20 31 33 reeProc));./* 13
3ba0: 33 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 3 */.EXTERN void
3bb0: 09 09 54 63 6c 5f 45 78 69 74 20 5f 41 4e 53 49 ..Tcl_Exit _ANSI
3bc0: 5f 41 52 47 53 5f 28 28 69 6e 74 20 73 74 61 74 _ARGS_((int stat
3bd0: 75 73 29 29 3b 0a 2f 2a 20 31 33 34 20 2a 2f 0a us));./* 134 */.
3be0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
3bf0: 45 78 70 6f 73 65 43 6f 6d 6d 61 6e 64 20 5f 41 ExposeCommand _A
3c00: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
3c10: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
3c20: 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 .....CONST char
3c30: 2a 20 68 69 64 64 65 6e 43 6d 64 54 6f 6b 65 6e * hiddenCmdToken
3c40: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
3c50: 72 20 2a 20 63 6d 64 4e 61 6d 65 29 29 3b 0a 2f r * cmdName));./
3c60: 2a 20 31 33 35 20 2a 2f 0a 45 58 54 45 52 4e 20 * 135 */.EXTERN
3c70: 69 6e 74 09 09 54 63 6c 5f 45 78 70 72 42 6f 6f int..Tcl_ExprBoo
3c80: 6c 65 61 6e 20 5f 41 4e 53 49 5f 41 52 47 53 5f lean _ANSI_ARGS_
3c90: 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
3ca0: 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 nterp, .....CONS
3cb0: 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 69 6e T char * str, in
3cc0: 74 20 2a 20 70 74 72 29 29 3b 0a 2f 2a 20 31 33 t * ptr));./* 13
3cd0: 36 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 6 */.EXTERN int.
3ce0: 09 54 63 6c 5f 45 78 70 72 42 6f 6f 6c 65 61 6e .Tcl_ExprBoolean
3cf0: 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Obj _ANSI_ARGS_(
3d00: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
3d10: 74 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 4f terp, .....Tcl_O
3d20: 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 bj * objPtr, int
3d30: 20 2a 20 70 74 72 29 29 3b 0a 2f 2a 20 31 33 37 * ptr));./* 137
3d40: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
3d50: 54 63 6c 5f 45 78 70 72 44 6f 75 62 6c 65 20 5f Tcl_ExprDouble _
3d60: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
3d70: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
3d80: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
3d90: 20 2a 20 73 74 72 2c 20 64 6f 75 62 6c 65 20 2a * str, double *
3da0: 20 70 74 72 29 29 3b 0a 2f 2a 20 31 33 38 20 2a ptr));./* 138 *
3db0: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
3dc0: 6c 5f 45 78 70 72 44 6f 75 62 6c 65 4f 62 6a 20 l_ExprDoubleObj
3dd0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
3de0: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
3df0: 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a , .....Tcl_Obj *
3e00: 20 6f 62 6a 50 74 72 2c 20 64 6f 75 62 6c 65 20 objPtr, double
3e10: 2a 20 70 74 72 29 29 3b 0a 2f 2a 20 31 33 39 20 * ptr));./* 139
3e20: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
3e30: 63 6c 5f 45 78 70 72 4c 6f 6e 67 20 5f 41 4e 53 cl_ExprLong _ANS
3e40: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
3e50: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
3e60: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
3e70: 73 74 72 2c 20 6c 6f 6e 67 20 2a 20 70 74 72 29 str, long * ptr)
3e80: 29 3b 0a 2f 2a 20 31 34 30 20 2a 2f 0a 45 58 54 );./* 140 */.EXT
3e90: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 45 78 70 ERN int..Tcl_Exp
3ea0: 72 4c 6f 6e 67 4f 62 6a 20 5f 41 4e 53 49 5f 41 rLongObj _ANSI_A
3eb0: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
3ec0: 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 * interp, .....
3ed0: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
3ee0: 2c 20 6c 6f 6e 67 20 2a 20 70 74 72 29 29 3b 0a , long * ptr));.
3ef0: 2f 2a 20 31 34 31 20 2a 2f 0a 45 58 54 45 52 4e /* 141 */.EXTERN
3f00: 20 69 6e 74 09 09 54 63 6c 5f 45 78 70 72 4f 62 int..Tcl_ExprOb
3f10: 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 j _ANSI_ARGS_((T
3f20: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
3f30: 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a rp, .....Tcl_Obj
3f40: 20 2a 20 6f 62 6a 50 74 72 2c 20 54 63 6c 5f 4f * objPtr, Tcl_O
3f50: 62 6a 20 2a 2a 20 72 65 73 75 6c 74 50 74 72 50 bj ** resultPtrP
3f60: 74 72 29 29 3b 0a 2f 2a 20 31 34 32 20 2a 2f 0a tr));./* 142 */.
3f70: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
3f80: 45 78 70 72 53 74 72 69 6e 67 20 5f 41 4e 53 49 ExprString _ANSI
3f90: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
3fa0: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
3fb0: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ..CONST char * s
3fc0: 74 72 69 6e 67 29 29 3b 0a 2f 2a 20 31 34 33 20 tring));./* 143
3fd0: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
3fe0: 54 63 6c 5f 46 69 6e 61 6c 69 7a 65 20 5f 41 4e Tcl_Finalize _AN
3ff0: 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 64 29 29 SI_ARGS_((void))
4000: 3b 0a 2f 2a 20 31 34 34 20 2a 2f 0a 45 58 54 45 ;./* 144 */.EXTE
4010: 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 46 69 6e RN void..Tcl_Fin
4020: 64 45 78 65 63 75 74 61 62 6c 65 20 5f 41 4e 53 dExecutable _ANS
4030: 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 I_ARGS_((CONST c
4040: 68 61 72 20 2a 20 61 72 67 76 30 29 29 3b 0a 2f har * argv0));./
4050: 2a 20 31 34 35 20 2a 2f 0a 45 58 54 45 52 4e 20 * 145 */.EXTERN
4060: 54 63 6c 5f 48 61 73 68 45 6e 74 72 79 20 2a 09 Tcl_HashEntry *.
4070: 54 63 6c 5f 46 69 72 73 74 48 61 73 68 45 6e 74 Tcl_FirstHashEnt
4080: 72 79 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ry _ANSI_ARGS_((
4090: 0a 09 09 09 09 54 63 6c 5f 48 61 73 68 54 61 62 .....Tcl_HashTab
40a0: 6c 65 20 2a 20 74 61 62 6c 65 50 74 72 2c 20 0a le * tablePtr, .
40b0: 09 09 09 09 54 63 6c 5f 48 61 73 68 53 65 61 72 ....Tcl_HashSear
40c0: 63 68 20 2a 20 73 65 61 72 63 68 50 74 72 29 29 ch * searchPtr))
40d0: 3b 0a 2f 2a 20 31 34 36 20 2a 2f 0a 45 58 54 45 ;./* 146 */.EXTE
40e0: 52 4e 20 69 6e 74 09 09 54 63 6c 5f 46 6c 75 73 RN int..Tcl_Flus
40f0: 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 h _ANSI_ARGS_((T
4100: 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 29 cl_Channel chan)
4110: 29 3b 0a 2f 2a 20 31 34 37 20 2a 2f 0a 45 58 54 );./* 147 */.EXT
4120: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 46 72 ERN void..Tcl_Fr
4130: 65 65 52 65 73 75 6c 74 20 5f 41 4e 53 49 5f 41 eeResult _ANSI_A
4140: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
4150: 20 2a 20 69 6e 74 65 72 70 29 29 3b 0a 2f 2a 20 * interp));./*
4160: 31 34 38 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 148 */.EXTERN in
4170: 74 09 09 54 63 6c 5f 47 65 74 41 6c 69 61 73 20 t..Tcl_GetAlias
4180: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
4190: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
41a0: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
41b0: 72 20 2a 20 73 6c 61 76 65 43 6d 64 2c 20 0a 09 r * slaveCmd, ..
41c0: 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 2a ...Tcl_Interp **
41d0: 20 74 61 72 67 65 74 49 6e 74 65 72 70 50 74 72 targetInterpPtr
41e0: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 38 34 20 63 , .....CONST84 c
41f0: 68 61 72 20 2a 2a 20 74 61 72 67 65 74 43 6d 64 har ** targetCmd
4200: 50 74 72 2c 20 69 6e 74 20 2a 20 61 72 67 63 50 Ptr, int * argcP
4210: 74 72 2c 20 0a 09 09 09 09 43 4f 4e 53 54 38 34 tr, .....CONST84
4220: 20 63 68 61 72 20 2a 2a 2a 20 61 72 67 76 50 74 char *** argvPt
4230: 72 29 29 3b 0a 2f 2a 20 31 34 39 20 2a 2f 0a 45 r));./* 149 */.E
4240: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 47 XTERN int..Tcl_G
4250: 65 74 41 6c 69 61 73 4f 62 6a 20 5f 41 4e 53 49 etAliasObj _ANSI
4260: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
4270: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
4280: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ..CONST char * s
4290: 6c 61 76 65 43 6d 64 2c 20 0a 09 09 09 09 54 63 laveCmd, .....Tc
42a0: 6c 5f 49 6e 74 65 72 70 20 2a 2a 20 74 61 72 67 l_Interp ** targ
42b0: 65 74 49 6e 74 65 72 70 50 74 72 2c 20 0a 09 09 etInterpPtr, ...
42c0: 09 09 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a ..CONST84 char *
42d0: 2a 20 74 61 72 67 65 74 43 6d 64 50 74 72 2c 20 * targetCmdPtr,
42e0: 69 6e 74 20 2a 20 6f 62 6a 63 50 74 72 2c 20 0a int * objcPtr, .
42f0: 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 2a 2a 20 ....Tcl_Obj ***
4300: 6f 62 6a 76 29 29 3b 0a 2f 2a 20 31 35 30 20 2a objv));./* 150 *
4310: 2f 0a 45 58 54 45 52 4e 20 43 6c 69 65 6e 74 44 /.EXTERN ClientD
4320: 61 74 61 09 54 63 6c 5f 47 65 74 41 73 73 6f 63 ata.Tcl_GetAssoc
4330: 44 61 74 61 20 5f 41 4e 53 49 5f 41 52 47 53 5f Data _ANSI_ARGS_
4340: 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
4350: 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 nterp, .....CONS
4360: 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 2c 20 0a T char * name, .
4370: 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 44 65 ....Tcl_InterpDe
4380: 6c 65 74 65 50 72 6f 63 20 2a 2a 20 70 72 6f 63 leteProc ** proc
4390: 50 74 72 29 29 3b 0a 2f 2a 20 31 35 31 20 2a 2f Ptr));./* 151 */
43a0: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 43 68 61 6e .EXTERN Tcl_Chan
43b0: 6e 65 6c 09 54 63 6c 5f 47 65 74 43 68 61 6e 6e nel.Tcl_GetChann
43c0: 65 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 el _ANSI_ARGS_((
43d0: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
43e0: 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 erp, .....CONST
43f0: 63 68 61 72 20 2a 20 63 68 61 6e 4e 61 6d 65 2c char * chanName,
4400: 20 69 6e 74 20 2a 20 6d 6f 64 65 50 74 72 29 29 int * modePtr))
4410: 3b 0a 2f 2a 20 31 35 32 20 2a 2f 0a 45 58 54 45 ;./* 152 */.EXTE
4420: 52 4e 20 69 6e 74 09 09 54 63 6c 5f 47 65 74 43 RN int..Tcl_GetC
4430: 68 61 6e 6e 65 6c 42 75 66 66 65 72 53 69 7a 65 hannelBufferSize
4440: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
4450: 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 ...Tcl_Channel c
4460: 68 61 6e 29 29 3b 0a 2f 2a 20 31 35 33 20 2a 2f han));./* 153 */
4470: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
4480: 5f 47 65 74 43 68 61 6e 6e 65 6c 48 61 6e 64 6c _GetChannelHandl
4490: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 e _ANSI_ARGS_((T
44a0: 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c cl_Channel chan,
44b0: 20 0a 09 09 09 09 69 6e 74 20 64 69 72 65 63 74 .....int direct
44c0: 69 6f 6e 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 ion, ClientData
44d0: 2a 20 68 61 6e 64 6c 65 50 74 72 29 29 3b 0a 2f * handlePtr));./
44e0: 2a 20 31 35 34 20 2a 2f 0a 45 58 54 45 52 4e 20 * 154 */.EXTERN
44f0: 43 6c 69 65 6e 74 44 61 74 61 09 54 63 6c 5f 47 ClientData.Tcl_G
4500: 65 74 43 68 61 6e 6e 65 6c 49 6e 73 74 61 6e 63 etChannelInstanc
4510: 65 44 61 74 61 20 5f 41 4e 53 49 5f 41 52 47 53 eData _ANSI_ARGS
4520: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e _((.....Tcl_Chan
4530: 6e 65 6c 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 31 nel chan));./* 1
4540: 35 35 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 55 */.EXTERN int
4550: 09 09 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c ..Tcl_GetChannel
4560: 4d 6f 64 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f Mode _ANSI_ARGS_
4570: 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
4580: 61 6e 29 29 3b 0a 2f 2a 20 31 35 36 20 2a 2f 0a an));./* 156 */.
4590: 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 5f 52 EXTERN CONST84_R
45a0: 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 63 6c ETURN char * Tcl
45b0: 5f 47 65 74 43 68 61 6e 6e 65 6c 4e 61 6d 65 20 _GetChannelName
45c0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
45d0: 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ..Tcl_Channel ch
45e0: 61 6e 29 29 3b 0a 2f 2a 20 31 35 37 20 2a 2f 0a an));./* 157 */.
45f0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
4600: 47 65 74 43 68 61 6e 6e 65 6c 4f 70 74 69 6f 6e GetChannelOption
4610: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
4620: 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 ...Tcl_Interp *
4630: 69 6e 74 65 72 70 2c 20 54 63 6c 5f 43 68 61 6e interp, Tcl_Chan
4640: 6e 65 6c 20 63 68 61 6e 2c 20 0a 09 09 09 09 43 nel chan, .....C
4650: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6f 70 74 69 ONST char * opti
4660: 6f 6e 4e 61 6d 65 2c 20 54 63 6c 5f 44 53 74 72 onName, Tcl_DStr
4670: 69 6e 67 20 2a 20 64 73 50 74 72 29 29 3b 0a 2f ing * dsPtr));./
4680: 2a 20 31 35 38 20 2a 2f 0a 45 58 54 45 52 4e 20 * 158 */.EXTERN
4690: 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 20 Tcl_ChannelType
46a0: 2a 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c * Tcl_GetChannel
46b0: 54 79 70 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f Type _ANSI_ARGS_
46c0: 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
46d0: 61 6e 29 29 3b 0a 2f 2a 20 31 35 39 20 2a 2f 0a an));./* 159 */.
46e0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
46f0: 47 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 20 5f GetCommandInfo _
4700: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
4710: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
4720: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
4730: 20 2a 20 63 6d 64 4e 61 6d 65 2c 20 54 63 6c 5f * cmdName, Tcl_
4740: 43 6d 64 49 6e 66 6f 20 2a 20 69 6e 66 6f 50 74 CmdInfo * infoPt
4750: 72 29 29 3b 0a 2f 2a 20 31 36 30 20 2a 2f 0a 45 r));./* 160 */.E
4760: 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 5f 52 45 XTERN CONST84_RE
4770: 54 55 52 4e 20 63 68 61 72 20 2a 20 54 63 6c 5f TURN char * Tcl_
4780: 47 65 74 43 6f 6d 6d 61 6e 64 4e 61 6d 65 20 5f GetCommandName _
4790: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
47a0: 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e .Tcl_Interp * in
47b0: 74 65 72 70 2c 20 54 63 6c 5f 43 6f 6d 6d 61 6e terp, Tcl_Comman
47c0: 64 20 63 6f 6d 6d 61 6e 64 29 29 3b 0a 2f 2a 20 d command));./*
47d0: 31 36 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 161 */.EXTERN in
47e0: 74 09 09 54 63 6c 5f 47 65 74 45 72 72 6e 6f 20 t..Tcl_GetErrno
47f0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 _ANSI_ARGS_((voi
4800: 64 29 29 3b 0a 2f 2a 20 31 36 32 20 2a 2f 0a 45 d));./* 162 */.E
4810: 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 5f 52 45 XTERN CONST84_RE
4820: 54 55 52 4e 20 63 68 61 72 20 2a 20 54 63 6c 5f TURN char * Tcl_
4830: 47 65 74 48 6f 73 74 4e 61 6d 65 20 5f 41 4e 53 GetHostName _ANS
4840: 49 5f 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b I_ARGS_((void));
4850: 0a 2f 2a 20 31 36 33 20 2a 2f 0a 45 58 54 45 52 ./* 163 */.EXTER
4860: 4e 20 69 6e 74 09 09 54 63 6c 5f 47 65 74 49 6e N int..Tcl_GetIn
4870: 74 65 72 70 50 61 74 68 20 5f 41 4e 53 49 5f 41 terpPath _ANSI_A
4880: 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 RGS_((.....Tcl_I
4890: 6e 74 65 72 70 20 2a 20 61 73 6b 49 6e 74 65 72 nterp * askInter
48a0: 70 2c 20 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 p, .....Tcl_Inte
48b0: 72 70 20 2a 20 73 6c 61 76 65 49 6e 74 65 72 70 rp * slaveInterp
48c0: 29 29 3b 0a 2f 2a 20 31 36 34 20 2a 2f 0a 45 58 ));./* 164 */.EX
48d0: 54 45 52 4e 20 54 63 6c 5f 49 6e 74 65 72 70 20 TERN Tcl_Interp
48e0: 2a 09 54 63 6c 5f 47 65 74 4d 61 73 74 65 72 20 *.Tcl_GetMaster
48f0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
4900: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
4910: 29 29 3b 0a 2f 2a 20 31 36 35 20 2a 2f 0a 45 58 ));./* 165 */.EX
4920: 54 45 52 4e 20 43 4f 4e 53 54 20 63 68 61 72 20 TERN CONST char
4930: 2a 09 54 63 6c 5f 47 65 74 4e 61 6d 65 4f 66 45 *.Tcl_GetNameOfE
4940: 78 65 63 75 74 61 62 6c 65 20 5f 41 4e 53 49 5f xecutable _ANSI_
4950: 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f ARGS_((void));./
4960: 2a 20 31 36 36 20 2a 2f 0a 45 58 54 45 52 4e 20 * 166 */.EXTERN
4970: 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 47 65 Tcl_Obj *.Tcl_Ge
4980: 74 4f 62 6a 52 65 73 75 6c 74 20 5f 41 4e 53 49 tObjResult _ANSI
4990: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
49a0: 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 0a 23 rp * interp));.#
49b0: 69 66 20 21 64 65 66 69 6e 65 64 28 5f 5f 57 49 if !defined(__WI
49c0: 4e 33 32 5f 5f 29 20 26 26 20 21 64 65 66 69 6e N32__) && !defin
49d0: 65 64 28 4d 41 43 5f 54 43 4c 29 20 2f 2a 20 55 ed(MAC_TCL) /* U
49e0: 4e 49 58 20 2a 2f 0a 2f 2a 20 31 36 37 20 2a 2f NIX */./* 167 */
49f0: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
4a00: 5f 47 65 74 4f 70 65 6e 46 69 6c 65 20 5f 41 4e _GetOpenFile _AN
4a10: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
4a20: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a terp * interp, .
4a30: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
4a40: 20 73 74 72 2c 20 69 6e 74 20 66 6f 72 57 72 69 str, int forWri
4a50: 74 69 6e 67 2c 20 0a 09 09 09 09 69 6e 74 20 63 ting, .....int c
4a60: 68 65 63 6b 55 73 61 67 65 2c 20 43 6c 69 65 6e heckUsage, Clien
4a70: 74 44 61 74 61 20 2a 20 66 69 6c 65 50 74 72 29 tData * filePtr)
4a80: 29 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 55 4e 49 );.#endif /* UNI
4a90: 58 20 2a 2f 0a 2f 2a 20 31 36 38 20 2a 2f 0a 45 X */./* 168 */.E
4aa0: 58 54 45 52 4e 20 54 63 6c 5f 50 61 74 68 54 79 XTERN Tcl_PathTy
4ab0: 70 65 09 54 63 6c 5f 47 65 74 50 61 74 68 54 79 pe.Tcl_GetPathTy
4ac0: 70 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 pe _ANSI_ARGS_((
4ad0: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 74 CONST char * pat
4ae0: 68 29 29 3b 0a 2f 2a 20 31 36 39 20 2a 2f 0a 45 h));./* 169 */.E
4af0: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 47 XTERN int..Tcl_G
4b00: 65 74 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ets _ANSI_ARGS_(
4b10: 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 (Tcl_Channel cha
4b20: 6e 2c 20 0a 09 09 09 09 54 63 6c 5f 44 53 74 72 n, .....Tcl_DStr
4b30: 69 6e 67 20 2a 20 64 73 50 74 72 29 29 3b 0a 2f ing * dsPtr));./
4b40: 2a 20 31 37 30 20 2a 2f 0a 45 58 54 45 52 4e 20 * 170 */.EXTERN
4b50: 69 6e 74 09 09 54 63 6c 5f 47 65 74 73 4f 62 6a int..Tcl_GetsObj
4b60: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
4b70: 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 l_Channel chan,
4b80: 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 6f .....Tcl_Obj * o
4b90: 62 6a 50 74 72 29 29 3b 0a 2f 2a 20 31 37 31 20 bjPtr));./* 171
4ba0: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
4bb0: 63 6c 5f 47 65 74 53 65 72 76 69 63 65 4d 6f 64 cl_GetServiceMod
4bc0: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 e _ANSI_ARGS_((v
4bd0: 6f 69 64 29 29 3b 0a 2f 2a 20 31 37 32 20 2a 2f oid));./* 172 */
4be0: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 49 6e 74 65 .EXTERN Tcl_Inte
4bf0: 72 70 20 2a 09 54 63 6c 5f 47 65 74 53 6c 61 76 rp *.Tcl_GetSlav
4c00: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 e _ANSI_ARGS_((T
4c10: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
4c20: 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 rp, .....CONST c
4c30: 68 61 72 20 2a 20 73 6c 61 76 65 4e 61 6d 65 29 har * slaveName)
4c40: 29 3b 0a 2f 2a 20 31 37 33 20 2a 2f 0a 45 58 54 );./* 173 */.EXT
4c50: 45 52 4e 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 09 ERN Tcl_Channel.
4c60: 54 63 6c 5f 47 65 74 53 74 64 43 68 61 6e 6e 65 Tcl_GetStdChanne
4c70: 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 l _ANSI_ARGS_((i
4c80: 6e 74 20 74 79 70 65 29 29 3b 0a 2f 2a 20 31 37 nt type));./* 17
4c90: 34 20 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 4 */.EXTERN CONS
4ca0: 54 38 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 T84_RETURN char
4cb0: 2a 20 54 63 6c 5f 47 65 74 53 74 72 69 6e 67 52 * Tcl_GetStringR
4cc0: 65 73 75 6c 74 20 5f 41 4e 53 49 5f 41 52 47 53 esult _ANSI_ARGS
4cd0: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 _((.....Tcl_Inte
4ce0: 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 0a 2f rp * interp));./
4cf0: 2a 20 31 37 35 20 2a 2f 0a 45 58 54 45 52 4e 20 * 175 */.EXTERN
4d00: 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 CONST84_RETURN c
4d10: 68 61 72 20 2a 20 54 63 6c 5f 47 65 74 56 61 72 har * Tcl_GetVar
4d20: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
4d30: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
4d40: 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 p, .....CONST ch
4d50: 61 72 20 2a 20 76 61 72 4e 61 6d 65 2c 20 69 6e ar * varName, in
4d60: 74 20 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 31 37 t flags));./* 17
4d70: 36 20 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 6 */.EXTERN CONS
4d80: 54 38 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 T84_RETURN char
4d90: 2a 20 54 63 6c 5f 47 65 74 56 61 72 32 20 5f 41 * Tcl_GetVar2 _A
4da0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
4db0: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
4dc0: 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 .....CONST char
4dd0: 2a 20 70 61 72 74 31 2c 20 43 4f 4e 53 54 20 63 * part1, CONST c
4de0: 68 61 72 20 2a 20 70 61 72 74 32 2c 20 0a 09 09 har * part2, ...
4df0: 09 09 69 6e 74 20 66 6c 61 67 73 29 29 3b 0a 2f ..int flags));./
4e00: 2a 20 31 37 37 20 2a 2f 0a 45 58 54 45 52 4e 20 * 177 */.EXTERN
4e10: 69 6e 74 09 09 54 63 6c 5f 47 6c 6f 62 61 6c 45 int..Tcl_GlobalE
4e20: 76 61 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 val _ANSI_ARGS_(
4e30: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
4e40: 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 terp, .....CONST
4e50: 20 63 68 61 72 20 2a 20 63 6f 6d 6d 61 6e 64 29 char * command)
4e60: 29 3b 0a 2f 2a 20 31 37 38 20 2a 2f 0a 45 58 54 );./* 178 */.EXT
4e70: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 47 6c 6f ERN int..Tcl_Glo
4e80: 62 61 6c 45 76 61 6c 4f 62 6a 20 5f 41 4e 53 49 balEvalObj _ANSI
4e90: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
4ea0: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
4eb0: 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 ..Tcl_Obj * objP
4ec0: 74 72 29 29 3b 0a 2f 2a 20 31 37 39 20 2a 2f 0a tr));./* 179 */.
4ed0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
4ee0: 48 69 64 65 43 6f 6d 6d 61 6e 64 20 5f 41 4e 53 HideCommand _ANS
4ef0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
4f00: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
4f10: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
4f20: 63 6d 64 4e 61 6d 65 2c 20 0a 09 09 09 09 43 4f cmdName, .....CO
4f30: 4e 53 54 20 63 68 61 72 20 2a 20 68 69 64 64 65 NST char * hidde
4f40: 6e 43 6d 64 54 6f 6b 65 6e 29 29 3b 0a 2f 2a 20 nCmdToken));./*
4f50: 31 38 30 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 180 */.EXTERN in
4f60: 74 09 09 54 63 6c 5f 49 6e 69 74 20 5f 41 4e 53 t..Tcl_Init _ANS
4f70: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
4f80: 65 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 0a erp * interp));.
4f90: 2f 2a 20 31 38 31 20 2a 2f 0a 45 58 54 45 52 4e /* 181 */.EXTERN
4fa0: 20 76 6f 69 64 09 09 54 63 6c 5f 49 6e 69 74 48 void..Tcl_InitH
4fb0: 61 73 68 54 61 62 6c 65 20 5f 41 4e 53 49 5f 41 ashTable _ANSI_A
4fc0: 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 48 RGS_((.....Tcl_H
4fd0: 61 73 68 54 61 62 6c 65 20 2a 20 74 61 62 6c 65 ashTable * table
4fe0: 50 74 72 2c 20 69 6e 74 20 6b 65 79 54 79 70 65 Ptr, int keyType
4ff0: 29 29 3b 0a 2f 2a 20 31 38 32 20 2a 2f 0a 45 58 ));./* 182 */.EX
5000: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 49 6e TERN int..Tcl_In
5010: 70 75 74 42 6c 6f 63 6b 65 64 20 5f 41 4e 53 49 putBlocked _ANSI
5020: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e _ARGS_((Tcl_Chan
5030: 6e 65 6c 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 31 nel chan));./* 1
5040: 38 33 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 83 */.EXTERN int
5050: 09 09 54 63 6c 5f 49 6e 70 75 74 42 75 66 66 65 ..Tcl_InputBuffe
5060: 72 65 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 red _ANSI_ARGS_(
5070: 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 (Tcl_Channel cha
5080: 6e 29 29 3b 0a 2f 2a 20 31 38 34 20 2a 2f 0a 45 n));./* 184 */.E
5090: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 49 XTERN int..Tcl_I
50a0: 6e 74 65 72 70 44 65 6c 65 74 65 64 20 5f 41 4e nterpDeleted _AN
50b0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
50c0: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b terp * interp));
50d0: 0a 2f 2a 20 31 38 35 20 2a 2f 0a 45 58 54 45 52 ./* 185 */.EXTER
50e0: 4e 20 69 6e 74 09 09 54 63 6c 5f 49 73 53 61 66 N int..Tcl_IsSaf
50f0: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 e _ANSI_ARGS_((T
5100: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
5110: 72 70 29 29 3b 0a 2f 2a 20 31 38 36 20 2a 2f 0a rp));./* 186 */.
5120: 45 58 54 45 52 4e 20 63 68 61 72 20 2a 09 09 54 EXTERN char *..T
5130: 63 6c 5f 4a 6f 69 6e 50 61 74 68 20 5f 41 4e 53 cl_JoinPath _ANS
5140: 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 61 72 67 I_ARGS_((int arg
5150: 63 2c 20 0a 09 09 09 09 43 4f 4e 53 54 38 34 20 c, .....CONST84
5160: 63 68 61 72 20 2a 20 43 4f 4e 53 54 20 2a 20 61 char * CONST * a
5170: 72 67 76 2c 20 0a 09 09 09 09 54 63 6c 5f 44 53 rgv, .....Tcl_DS
5180: 74 72 69 6e 67 20 2a 20 72 65 73 75 6c 74 50 74 tring * resultPt
5190: 72 29 29 3b 0a 2f 2a 20 31 38 37 20 2a 2f 0a 45 r));./* 187 */.E
51a0: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 4c XTERN int..Tcl_L
51b0: 69 6e 6b 56 61 72 20 5f 41 4e 53 49 5f 41 52 47 inkVar _ANSI_ARG
51c0: 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
51d0: 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f interp, .....CO
51e0: 4e 53 54 20 63 68 61 72 20 2a 20 76 61 72 4e 61 NST char * varNa
51f0: 6d 65 2c 20 63 68 61 72 20 2a 20 61 64 64 72 2c me, char * addr,
5200: 20 69 6e 74 20 74 79 70 65 29 29 3b 0a 2f 2a 20 int type));./*
5210: 53 6c 6f 74 20 31 38 38 20 69 73 20 72 65 73 65 Slot 188 is rese
5220: 72 76 65 64 20 2a 2f 0a 2f 2a 20 31 38 39 20 2a rved */./* 189 *
5230: 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 43 68 61 /.EXTERN Tcl_Cha
5240: 6e 6e 65 6c 09 54 63 6c 5f 4d 61 6b 65 46 69 6c nnel.Tcl_MakeFil
5250: 65 43 68 61 6e 6e 65 6c 20 5f 41 4e 53 49 5f 41 eChannel _ANSI_A
5260: 52 47 53 5f 28 28 43 6c 69 65 6e 74 44 61 74 61 RGS_((ClientData
5270: 20 68 61 6e 64 6c 65 2c 20 0a 09 09 09 09 69 6e handle, .....in
5280: 74 20 6d 6f 64 65 29 29 3b 0a 2f 2a 20 31 39 30 t mode));./* 190
5290: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
52a0: 54 63 6c 5f 4d 61 6b 65 53 61 66 65 20 5f 41 4e Tcl_MakeSafe _AN
52b0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
52c0: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b terp * interp));
52d0: 0a 2f 2a 20 31 39 31 20 2a 2f 0a 45 58 54 45 52 ./* 191 */.EXTER
52e0: 4e 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 09 54 63 N Tcl_Channel.Tc
52f0: 6c 5f 4d 61 6b 65 54 63 70 43 6c 69 65 6e 74 43 l_MakeTcpClientC
5300: 68 61 6e 6e 65 6c 20 5f 41 4e 53 49 5f 41 52 47 hannel _ANSI_ARG
5310: 53 5f 28 28 0a 09 09 09 09 43 6c 69 65 6e 74 44 S_((.....ClientD
5320: 61 74 61 20 74 63 70 53 6f 63 6b 65 74 29 29 3b ata tcpSocket));
5330: 0a 2f 2a 20 31 39 32 20 2a 2f 0a 45 58 54 45 52 ./* 192 */.EXTER
5340: 4e 20 63 68 61 72 20 2a 09 09 54 63 6c 5f 4d 65 N char *..Tcl_Me
5350: 72 67 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 rge _ANSI_ARGS_(
5360: 28 69 6e 74 20 61 72 67 63 2c 20 0a 09 09 09 09 (int argc, .....
5370: 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a 20 43 CONST84 char * C
5380: 4f 4e 53 54 20 2a 20 61 72 67 76 29 29 3b 0a 2f ONST * argv));./
5390: 2a 20 31 39 33 20 2a 2f 0a 45 58 54 45 52 4e 20 * 193 */.EXTERN
53a0: 54 63 6c 5f 48 61 73 68 45 6e 74 72 79 20 2a 09 Tcl_HashEntry *.
53b0: 54 63 6c 5f 4e 65 78 74 48 61 73 68 45 6e 74 72 Tcl_NextHashEntr
53c0: 79 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a y _ANSI_ARGS_((.
53d0: 09 09 09 09 54 63 6c 5f 48 61 73 68 53 65 61 72 ....Tcl_HashSear
53e0: 63 68 20 2a 20 73 65 61 72 63 68 50 74 72 29 29 ch * searchPtr))
53f0: 3b 0a 2f 2a 20 31 39 34 20 2a 2f 0a 45 58 54 45 ;./* 194 */.EXTE
5400: 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 4e 6f 74 RN void..Tcl_Not
5410: 69 66 79 43 68 61 6e 6e 65 6c 20 5f 41 4e 53 49 ifyChannel _ANSI
5420: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e _ARGS_((Tcl_Chan
5430: 6e 65 6c 20 63 68 61 6e 6e 65 6c 2c 20 0a 09 09 nel channel, ...
5440: 09 09 69 6e 74 20 6d 61 73 6b 29 29 3b 0a 2f 2a ..int mask));./*
5450: 20 31 39 35 20 2a 2f 0a 45 58 54 45 52 4e 20 54 195 */.EXTERN T
5460: 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 4f 62 6a cl_Obj *.Tcl_Obj
5470: 47 65 74 56 61 72 32 20 5f 41 4e 53 49 5f 41 52 GetVar2 _ANSI_AR
5480: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
5490: 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 54 * interp, .....T
54a0: 63 6c 5f 4f 62 6a 20 2a 20 70 61 72 74 31 50 74 cl_Obj * part1Pt
54b0: 72 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 72 r, Tcl_Obj * par
54c0: 74 32 50 74 72 2c 20 0a 09 09 09 09 69 6e 74 20 t2Ptr, .....int
54d0: 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 31 39 36 20 flags));./* 196
54e0: 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 */.EXTERN Tcl_Ob
54f0: 6a 20 2a 09 54 63 6c 5f 4f 62 6a 53 65 74 56 61 j *.Tcl_ObjSetVa
5500: 72 32 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 r2 _ANSI_ARGS_((
5510: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
5520: 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 erp, .....Tcl_Ob
5530: 6a 20 2a 20 70 61 72 74 31 50 74 72 2c 20 54 63 j * part1Ptr, Tc
5540: 6c 5f 4f 62 6a 20 2a 20 70 61 72 74 32 50 74 72 l_Obj * part2Ptr
5550: 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a , .....Tcl_Obj *
5560: 20 6e 65 77 56 61 6c 75 65 50 74 72 2c 20 69 6e newValuePtr, in
5570: 74 20 66 6c 61 67 73 29 29 3b 0a 23 69 66 20 21 t flags));.#if !
5580: 64 65 66 69 6e 65 64 28 5f 5f 57 49 4e 33 32 5f defined(__WIN32_
5590: 5f 29 20 26 26 20 21 64 65 66 69 6e 65 64 28 4d _) && !defined(M
55a0: 41 43 5f 54 43 4c 29 20 2f 2a 20 55 4e 49 58 20 AC_TCL) /* UNIX
55b0: 2a 2f 0a 2f 2a 20 31 39 37 20 2a 2f 0a 45 58 54 */./* 197 */.EXT
55c0: 45 52 4e 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 09 ERN Tcl_Channel.
55d0: 54 63 6c 5f 4f 70 65 6e 43 6f 6d 6d 61 6e 64 43 Tcl_OpenCommandC
55e0: 68 61 6e 6e 65 6c 20 5f 41 4e 53 49 5f 41 52 47 hannel _ANSI_ARG
55f0: 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 S_((.....Tcl_Int
5600: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e erp * interp, in
5610: 74 20 61 72 67 63 2c 20 0a 09 09 09 09 43 4f 4e t argc, .....CON
5620: 53 54 38 34 20 63 68 61 72 20 2a 2a 20 61 72 67 ST84 char ** arg
5630: 76 2c 20 69 6e 74 20 66 6c 61 67 73 29 29 3b 0a v, int flags));.
5640: 23 65 6e 64 69 66 20 2f 2a 20 55 4e 49 58 20 2a #endif /* UNIX *
5650: 2f 0a 23 69 66 64 65 66 20 5f 5f 57 49 4e 33 32 /.#ifdef __WIN32
5660: 5f 5f 0a 2f 2a 20 31 39 37 20 2a 2f 0a 45 58 54 __./* 197 */.EXT
5670: 45 52 4e 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 09 ERN Tcl_Channel.
5680: 54 63 6c 5f 4f 70 65 6e 43 6f 6d 6d 61 6e 64 43 Tcl_OpenCommandC
5690: 68 61 6e 6e 65 6c 20 5f 41 4e 53 49 5f 41 52 47 hannel _ANSI_ARG
56a0: 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 S_((.....Tcl_Int
56b0: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e erp * interp, in
56c0: 74 20 61 72 67 63 2c 20 0a 09 09 09 09 43 4f 4e t argc, .....CON
56d0: 53 54 38 34 20 63 68 61 72 20 2a 2a 20 61 72 67 ST84 char ** arg
56e0: 76 2c 20 69 6e 74 20 66 6c 61 67 73 29 29 3b 0a v, int flags));.
56f0: 23 65 6e 64 69 66 20 2f 2a 20 5f 5f 57 49 4e 33 #endif /* __WIN3
5700: 32 5f 5f 20 2a 2f 0a 2f 2a 20 31 39 38 20 2a 2f 2__ */./* 198 */
5710: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 43 68 61 6e .EXTERN Tcl_Chan
5720: 6e 65 6c 09 54 63 6c 5f 4f 70 65 6e 46 69 6c 65 nel.Tcl_OpenFile
5730: 43 68 61 6e 6e 65 6c 20 5f 41 4e 53 49 5f 41 52 Channel _ANSI_AR
5740: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
5750: 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 * interp, .....C
5760: 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 ONST char * file
5770: 4e 61 6d 65 2c 20 0a 09 09 09 09 43 4f 4e 53 54 Name, .....CONST
5780: 20 63 68 61 72 20 2a 20 6d 6f 64 65 53 74 72 69 char * modeStri
5790: 6e 67 2c 20 69 6e 74 20 70 65 72 6d 69 73 73 69 ng, int permissi
57a0: 6f 6e 73 29 29 3b 0a 2f 2a 20 31 39 39 20 2a 2f ons));./* 199 */
57b0: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 43 68 61 6e .EXTERN Tcl_Chan
57c0: 6e 65 6c 09 54 63 6c 5f 4f 70 65 6e 54 63 70 43 nel.Tcl_OpenTcpC
57d0: 6c 69 65 6e 74 20 5f 41 4e 53 49 5f 41 52 47 53 lient _ANSI_ARGS
57e0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
57f0: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 69 6e 74 interp, .....int
5800: 20 70 6f 72 74 2c 20 43 4f 4e 53 54 20 63 68 61 port, CONST cha
5810: 72 20 2a 20 61 64 64 72 65 73 73 2c 20 0a 09 09 r * address, ...
5820: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6d ..CONST char * m
5830: 79 61 64 64 72 2c 20 69 6e 74 20 6d 79 70 6f 72 yaddr, int mypor
5840: 74 2c 20 69 6e 74 20 61 73 79 6e 63 29 29 3b 0a t, int async));.
5850: 2f 2a 20 32 30 30 20 2a 2f 0a 45 58 54 45 52 4e /* 200 */.EXTERN
5860: 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 09 54 63 6c Tcl_Channel.Tcl
5870: 5f 4f 70 65 6e 54 63 70 53 65 72 76 65 72 20 5f _OpenTcpServer _
5880: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
5890: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
58a0: 20 0a 09 09 09 09 69 6e 74 20 70 6f 72 74 2c 20 .....int port,
58b0: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 68 6f 73 CONST char * hos
58c0: 74 2c 20 0a 09 09 09 09 54 63 6c 5f 54 63 70 41 t, .....Tcl_TcpA
58d0: 63 63 65 70 74 50 72 6f 63 20 2a 20 61 63 63 65 cceptProc * acce
58e0: 70 74 50 72 6f 63 2c 20 0a 09 09 09 09 43 6c 69 ptProc, .....Cli
58f0: 65 6e 74 44 61 74 61 20 63 61 6c 6c 62 61 63 6b entData callback
5900: 44 61 74 61 29 29 3b 0a 2f 2a 20 32 30 31 20 2a Data));./* 201 *
5910: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
5920: 63 6c 5f 50 72 65 73 65 72 76 65 20 5f 41 4e 53 cl_Preserve _ANS
5930: 49 5f 41 52 47 53 5f 28 28 43 6c 69 65 6e 74 44 I_ARGS_((ClientD
5940: 61 74 61 20 64 61 74 61 29 29 3b 0a 2f 2a 20 32 ata data));./* 2
5950: 30 32 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 02 */.EXTERN voi
5960: 64 09 09 54 63 6c 5f 50 72 69 6e 74 44 6f 75 62 d..Tcl_PrintDoub
5970: 6c 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 le _ANSI_ARGS_((
5980: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
5990: 65 72 70 2c 20 0a 09 09 09 09 64 6f 75 62 6c 65 erp, .....double
59a0: 20 76 61 6c 75 65 2c 20 63 68 61 72 20 2a 20 64 value, char * d
59b0: 73 74 29 29 3b 0a 2f 2a 20 32 30 33 20 2a 2f 0a st));./* 203 */.
59c0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
59d0: 50 75 74 45 6e 76 20 5f 41 4e 53 49 5f 41 52 47 PutEnv _ANSI_ARG
59e0: 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a S_((CONST char *
59f0: 20 73 74 72 69 6e 67 29 29 3b 0a 2f 2a 20 32 30 string));./* 20
5a00: 34 20 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 4 */.EXTERN CONS
5a10: 54 38 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 T84_RETURN char
5a20: 2a 20 54 63 6c 5f 50 6f 73 69 78 45 72 72 6f 72 * Tcl_PosixError
5a30: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
5a40: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
5a50: 70 29 29 3b 0a 2f 2a 20 32 30 35 20 2a 2f 0a 45 p));./* 205 */.E
5a60: 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f XTERN void..Tcl_
5a70: 51 75 65 75 65 45 76 65 6e 74 20 5f 41 4e 53 49 QueueEvent _ANSI
5a80: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 45 76 65 6e _ARGS_((Tcl_Even
5a90: 74 20 2a 20 65 76 50 74 72 2c 20 0a 09 09 09 09 t * evPtr, .....
5aa0: 54 63 6c 5f 51 75 65 75 65 50 6f 73 69 74 69 6f Tcl_QueuePositio
5ab0: 6e 20 70 6f 73 69 74 69 6f 6e 29 29 3b 0a 2f 2a n position));./*
5ac0: 20 32 30 36 20 2a 2f 0a 45 58 54 45 52 4e 20 69 206 */.EXTERN i
5ad0: 6e 74 09 09 54 63 6c 5f 52 65 61 64 20 5f 41 4e nt..Tcl_Read _AN
5ae0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 SI_ARGS_((Tcl_Ch
5af0: 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 0a 09 09 09 annel chan, ....
5b00: 09 63 68 61 72 20 2a 20 62 75 66 50 74 72 2c 20 .char * bufPtr,
5b10: 69 6e 74 20 74 6f 52 65 61 64 29 29 3b 0a 23 69 int toRead));.#i
5b20: 66 20 21 64 65 66 69 6e 65 64 28 5f 5f 57 49 4e f !defined(__WIN
5b30: 33 32 5f 5f 29 20 26 26 20 21 64 65 66 69 6e 65 32__) && !define
5b40: 64 28 4d 41 43 5f 54 43 4c 29 20 2f 2a 20 55 4e d(MAC_TCL) /* UN
5b50: 49 58 20 2a 2f 0a 2f 2a 20 32 30 37 20 2a 2f 0a IX */./* 207 */.
5b60: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
5b70: 5f 52 65 61 70 44 65 74 61 63 68 65 64 50 72 6f _ReapDetachedPro
5b80: 63 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 cs _ANSI_ARGS_((
5b90: 76 6f 69 64 29 29 3b 0a 23 65 6e 64 69 66 20 2f void));.#endif /
5ba0: 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 66 64 65 66 * UNIX */.#ifdef
5bb0: 20 5f 5f 57 49 4e 33 32 5f 5f 0a 2f 2a 20 32 30 __WIN32__./* 20
5bc0: 37 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 7 */.EXTERN void
5bd0: 09 09 54 63 6c 5f 52 65 61 70 44 65 74 61 63 68 ..Tcl_ReapDetach
5be0: 65 64 50 72 6f 63 73 20 5f 41 4e 53 49 5f 41 52 edProcs _ANSI_AR
5bf0: 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 23 65 6e GS_((void));.#en
5c00: 64 69 66 20 2f 2a 20 5f 5f 57 49 4e 33 32 5f 5f dif /* __WIN32__
5c10: 20 2a 2f 0a 2f 2a 20 32 30 38 20 2a 2f 0a 45 58 */./* 208 */.EX
5c20: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 52 65 TERN int..Tcl_Re
5c30: 63 6f 72 64 41 6e 64 45 76 61 6c 20 5f 41 4e 53 cordAndEval _ANS
5c40: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
5c50: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
5c60: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
5c70: 63 6d 64 2c 20 69 6e 74 20 66 6c 61 67 73 29 29 cmd, int flags))
5c80: 3b 0a 2f 2a 20 32 30 39 20 2a 2f 0a 45 58 54 45 ;./* 209 */.EXTE
5c90: 52 4e 20 69 6e 74 09 09 54 63 6c 5f 52 65 63 6f RN int..Tcl_Reco
5ca0: 72 64 41 6e 64 45 76 61 6c 4f 62 6a 20 5f 41 4e rdAndEvalObj _AN
5cb0: 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 SI_ARGS_((.....T
5cc0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
5cd0: 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 63 6d rp, Tcl_Obj * cm
5ce0: 64 50 74 72 2c 20 0a 09 09 09 09 69 6e 74 20 66 dPtr, .....int f
5cf0: 6c 61 67 73 29 29 3b 0a 2f 2a 20 32 31 30 20 2a lags));./* 210 *
5d00: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
5d10: 63 6c 5f 52 65 67 69 73 74 65 72 43 68 61 6e 6e cl_RegisterChann
5d20: 65 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 el _ANSI_ARGS_((
5d30: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
5d40: 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 43 68 erp, .....Tcl_Ch
5d50: 61 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 0a 2f 2a annel chan));./*
5d60: 20 32 31 31 20 2a 2f 0a 45 58 54 45 52 4e 20 76 211 */.EXTERN v
5d70: 6f 69 64 09 09 54 63 6c 5f 52 65 67 69 73 74 65 oid..Tcl_Registe
5d80: 72 4f 62 6a 54 79 70 65 20 5f 41 4e 53 49 5f 41 rObjType _ANSI_A
5d90: 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 4f RGS_((.....Tcl_O
5da0: 62 6a 54 79 70 65 20 2a 20 74 79 70 65 50 74 72 bjType * typePtr
5db0: 29 29 3b 0a 2f 2a 20 32 31 32 20 2a 2f 0a 45 58 ));./* 212 */.EX
5dc0: 54 45 52 4e 20 54 63 6c 5f 52 65 67 45 78 70 09 TERN Tcl_RegExp.
5dd0: 54 63 6c 5f 52 65 67 45 78 70 43 6f 6d 70 69 6c Tcl_RegExpCompil
5de0: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 e _ANSI_ARGS_((T
5df0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
5e00: 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 rp, .....CONST c
5e10: 68 61 72 20 2a 20 73 74 72 69 6e 67 29 29 3b 0a har * string));.
5e20: 2f 2a 20 32 31 33 20 2a 2f 0a 45 58 54 45 52 4e /* 213 */.EXTERN
5e30: 20 69 6e 74 09 09 54 63 6c 5f 52 65 67 45 78 70 int..Tcl_RegExp
5e40: 45 78 65 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f Exec _ANSI_ARGS_
5e50: 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
5e60: 6e 74 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f nterp, .....Tcl_
5e70: 52 65 67 45 78 70 20 72 65 67 65 78 70 2c 20 43 RegExp regexp, C
5e80: 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 2c ONST char * str,
5e90: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
5ea0: 20 2a 20 73 74 61 72 74 29 29 3b 0a 2f 2a 20 32 * start));./* 2
5eb0: 31 34 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 14 */.EXTERN int
5ec0: 09 09 54 63 6c 5f 52 65 67 45 78 70 4d 61 74 63 ..Tcl_RegExpMatc
5ed0: 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 h _ANSI_ARGS_((T
5ee0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
5ef0: 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 rp, .....CONST c
5f00: 68 61 72 20 2a 20 73 74 72 2c 20 43 4f 4e 53 54 har * str, CONST
5f10: 20 63 68 61 72 20 2a 20 70 61 74 74 65 72 6e 29 char * pattern)
5f20: 29 3b 0a 2f 2a 20 32 31 35 20 2a 2f 0a 45 58 54 );./* 215 */.EXT
5f30: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 52 65 ERN void..Tcl_Re
5f40: 67 45 78 70 52 61 6e 67 65 20 5f 41 4e 53 49 5f gExpRange _ANSI_
5f50: 41 52 47 53 5f 28 28 54 63 6c 5f 52 65 67 45 78 ARGS_((Tcl_RegEx
5f60: 70 20 72 65 67 65 78 70 2c 20 0a 09 09 09 09 69 p regexp, .....i
5f70: 6e 74 20 69 6e 64 65 78 2c 20 43 4f 4e 53 54 38 nt index, CONST8
5f80: 34 20 63 68 61 72 20 2a 2a 20 73 74 61 72 74 50 4 char ** startP
5f90: 74 72 2c 20 0a 09 09 09 09 43 4f 4e 53 54 38 34 tr, .....CONST84
5fa0: 20 63 68 61 72 20 2a 2a 20 65 6e 64 50 74 72 29 char ** endPtr)
5fb0: 29 3b 0a 2f 2a 20 32 31 36 20 2a 2f 0a 45 58 54 );./* 216 */.EXT
5fc0: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 52 65 ERN void..Tcl_Re
5fd0: 6c 65 61 73 65 20 5f 41 4e 53 49 5f 41 52 47 53 lease _ANSI_ARGS
5fe0: 5f 28 28 43 6c 69 65 6e 74 44 61 74 61 20 63 6c _((ClientData cl
5ff0: 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 32 ientData));./* 2
6000: 31 37 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 17 */.EXTERN voi
6010: 64 09 09 54 63 6c 5f 52 65 73 65 74 52 65 73 75 d..Tcl_ResetResu
6020: 6c 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 lt _ANSI_ARGS_((
6030: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
6040: 65 72 70 29 29 3b 0a 2f 2a 20 32 31 38 20 2a 2f erp));./* 218 */
6050: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
6060: 5f 53 63 61 6e 45 6c 65 6d 65 6e 74 20 5f 41 4e _ScanElement _AN
6070: 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 SI_ARGS_((CONST
6080: 63 68 61 72 20 2a 20 73 74 72 2c 20 0a 09 09 09 char * str, ....
6090: 09 69 6e 74 20 2a 20 66 6c 61 67 50 74 72 29 29 .int * flagPtr))
60a0: 3b 0a 2f 2a 20 32 31 39 20 2a 2f 0a 45 58 54 45 ;./* 219 */.EXTE
60b0: 52 4e 20 69 6e 74 09 09 54 63 6c 5f 53 63 61 6e RN int..Tcl_Scan
60c0: 43 6f 75 6e 74 65 64 45 6c 65 6d 65 6e 74 20 5f CountedElement _
60d0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
60e0: 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 0a 09 T char * str, ..
60f0: 09 09 09 69 6e 74 20 6c 65 6e 67 74 68 2c 20 69 ...int length, i
6100: 6e 74 20 2a 20 66 6c 61 67 50 74 72 29 29 3b 0a nt * flagPtr));.
6110: 2f 2a 20 32 32 30 20 2a 2f 0a 45 58 54 45 52 4e /* 220 */.EXTERN
6120: 20 69 6e 74 09 09 54 63 6c 5f 53 65 65 6b 4f 6c int..Tcl_SeekOl
6130: 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 d _ANSI_ARGS_((T
6140: 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c cl_Channel chan,
6150: 20 0a 09 09 09 09 69 6e 74 20 6f 66 66 73 65 74 .....int offset
6160: 2c 20 69 6e 74 20 6d 6f 64 65 29 29 3b 0a 2f 2a , int mode));./*
6170: 20 32 32 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 221 */.EXTERN i
6180: 6e 74 09 09 54 63 6c 5f 53 65 72 76 69 63 65 41 nt..Tcl_ServiceA
6190: 6c 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ll _ANSI_ARGS_((
61a0: 76 6f 69 64 29 29 3b 0a 2f 2a 20 32 32 32 20 2a void));./* 222 *
61b0: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
61c0: 6c 5f 53 65 72 76 69 63 65 45 76 65 6e 74 20 5f l_ServiceEvent _
61d0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 ANSI_ARGS_((int
61e0: 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 32 32 33 20 flags));./* 223
61f0: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
6200: 54 63 6c 5f 53 65 74 41 73 73 6f 63 44 61 74 61 Tcl_SetAssocData
6210: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
6220: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
6230: 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 p, .....CONST ch
6240: 61 72 20 2a 20 6e 61 6d 65 2c 20 0a 09 09 09 09 ar * name, .....
6250: 54 63 6c 5f 49 6e 74 65 72 70 44 65 6c 65 74 65 Tcl_InterpDelete
6260: 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a 09 09 Proc * proc, ...
6270: 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 ..ClientData cli
6280: 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 32 32 entData));./* 22
6290: 34 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 4 */.EXTERN void
62a0: 09 09 54 63 6c 5f 53 65 74 43 68 61 6e 6e 65 6c ..Tcl_SetChannel
62b0: 42 75 66 66 65 72 53 69 7a 65 20 5f 41 4e 53 49 BufferSize _ANSI
62c0: 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c _ARGS_((.....Tcl
62d0: 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 69 _Channel chan, i
62e0: 6e 74 20 73 7a 29 29 3b 0a 2f 2a 20 32 32 35 20 nt sz));./* 225
62f0: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
6300: 63 6c 5f 53 65 74 43 68 61 6e 6e 65 6c 4f 70 74 cl_SetChannelOpt
6310: 69 6f 6e 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ion _ANSI_ARGS_(
6320: 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 (.....Tcl_Interp
6330: 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 43 * interp, Tcl_C
6340: 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 0a 09 09 hannel chan, ...
6350: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6f ..CONST char * o
6360: 70 74 69 6f 6e 4e 61 6d 65 2c 20 0a 09 09 09 09 ptionName, .....
6370: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 65 77 CONST char * new
6380: 56 61 6c 75 65 29 29 3b 0a 2f 2a 20 32 32 36 20 Value));./* 226
6390: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
63a0: 63 6c 5f 53 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 cl_SetCommandInf
63b0: 6f 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 o _ANSI_ARGS_((T
63c0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
63d0: 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 rp, .....CONST c
63e0: 68 61 72 20 2a 20 63 6d 64 4e 61 6d 65 2c 20 0a har * cmdName, .
63f0: 09 09 09 09 43 4f 4e 53 54 20 54 63 6c 5f 43 6d ....CONST Tcl_Cm
6400: 64 49 6e 66 6f 20 2a 20 69 6e 66 6f 50 74 72 29 dInfo * infoPtr)
6410: 29 3b 0a 2f 2a 20 32 32 37 20 2a 2f 0a 45 58 54 );./* 227 */.EXT
6420: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 ERN void..Tcl_Se
6430: 74 45 72 72 6e 6f 20 5f 41 4e 53 49 5f 41 52 47 tErrno _ANSI_ARG
6440: 53 5f 28 28 69 6e 74 20 65 72 72 29 29 3b 0a 2f S_((int err));./
6450: 2a 20 32 32 38 20 2a 2f 0a 45 58 54 45 52 4e 20 * 228 */.EXTERN
6460: 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 45 72 72 void..Tcl_SetErr
6470: 6f 72 43 6f 64 65 20 5f 41 4e 53 49 5f 41 52 47 orCode _ANSI_ARG
6480: 53 5f 28 54 43 4c 5f 56 41 52 41 52 47 53 28 54 S_(TCL_VARARGS(T
6490: 63 6c 5f 49 6e 74 65 72 70 20 2a 2c 69 6e 74 65 cl_Interp *,inte
64a0: 72 70 29 29 3b 0a 2f 2a 20 32 32 39 20 2a 2f 0a rp));./* 229 */.
64b0: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
64c0: 5f 53 65 74 4d 61 78 42 6c 6f 63 6b 54 69 6d 65 _SetMaxBlockTime
64d0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
64e0: 6c 5f 54 69 6d 65 20 2a 20 74 69 6d 65 50 74 72 l_Time * timePtr
64f0: 29 29 3b 0a 2f 2a 20 32 33 30 20 2a 2f 0a 45 58 ));./* 230 */.EX
6500: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 TERN void..Tcl_S
6510: 65 74 50 61 6e 69 63 50 72 6f 63 20 5f 41 4e 53 etPanicProc _ANS
6520: 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 I_ARGS_((.....Tc
6530: 6c 5f 50 61 6e 69 63 50 72 6f 63 20 2a 20 70 61 l_PanicProc * pa
6540: 6e 69 63 50 72 6f 63 29 29 3b 0a 2f 2a 20 32 33 nicProc));./* 23
6550: 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 1 */.EXTERN int.
6560: 09 54 63 6c 5f 53 65 74 52 65 63 75 72 73 69 6f .Tcl_SetRecursio
6570: 6e 4c 69 6d 69 74 20 5f 41 4e 53 49 5f 41 52 47 nLimit _ANSI_ARG
6580: 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 S_((.....Tcl_Int
6590: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e erp * interp, in
65a0: 74 20 64 65 70 74 68 29 29 3b 0a 2f 2a 20 32 33 t depth));./* 23
65b0: 32 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 2 */.EXTERN void
65c0: 09 09 54 63 6c 5f 53 65 74 52 65 73 75 6c 74 20 ..Tcl_SetResult
65d0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
65e0: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
65f0: 2c 20 0a 09 09 09 09 63 68 61 72 20 2a 20 73 74 , .....char * st
6600: 72 2c 20 54 63 6c 5f 46 72 65 65 50 72 6f 63 20 r, Tcl_FreeProc
6610: 2a 20 66 72 65 65 50 72 6f 63 29 29 3b 0a 2f 2a * freeProc));./*
6620: 20 32 33 33 20 2a 2f 0a 45 58 54 45 52 4e 20 69 233 */.EXTERN i
6630: 6e 74 09 09 54 63 6c 5f 53 65 74 53 65 72 76 69 nt..Tcl_SetServi
6640: 63 65 4d 6f 64 65 20 5f 41 4e 53 49 5f 41 52 47 ceMode _ANSI_ARG
6650: 53 5f 28 28 69 6e 74 20 6d 6f 64 65 29 29 3b 0a S_((int mode));.
6660: 2f 2a 20 32 33 34 20 2a 2f 0a 45 58 54 45 52 4e /* 234 */.EXTERN
6670: 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 4f 62 void..Tcl_SetOb
6680: 6a 45 72 72 6f 72 43 6f 64 65 20 5f 41 4e 53 49 jErrorCode _ANSI
6690: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
66a0: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
66b0: 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 65 72 72 6f ..Tcl_Obj * erro
66c0: 72 4f 62 6a 50 74 72 29 29 3b 0a 2f 2a 20 32 33 rObjPtr));./* 23
66d0: 35 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 5 */.EXTERN void
66e0: 09 09 54 63 6c 5f 53 65 74 4f 62 6a 52 65 73 75 ..Tcl_SetObjResu
66f0: 6c 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 lt _ANSI_ARGS_((
6700: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
6710: 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 erp, .....Tcl_Ob
6720: 6a 20 2a 20 72 65 73 75 6c 74 4f 62 6a 50 74 72 j * resultObjPtr
6730: 29 29 3b 0a 2f 2a 20 32 33 36 20 2a 2f 0a 45 58 ));./* 236 */.EX
6740: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 TERN void..Tcl_S
6750: 65 74 53 74 64 43 68 61 6e 6e 65 6c 20 5f 41 4e etStdChannel _AN
6760: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 SI_ARGS_((Tcl_Ch
6770: 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c 2c 20 0a annel channel, .
6780: 09 09 09 09 69 6e 74 20 74 79 70 65 29 29 3b 0a ....int type));.
6790: 2f 2a 20 32 33 37 20 2a 2f 0a 45 58 54 45 52 4e /* 237 */.EXTERN
67a0: 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 CONST84_RETURN
67b0: 63 68 61 72 20 2a 20 54 63 6c 5f 53 65 74 56 61 char * Tcl_SetVa
67c0: 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 r _ANSI_ARGS_((T
67d0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
67e0: 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 rp, .....CONST c
67f0: 68 61 72 20 2a 20 76 61 72 4e 61 6d 65 2c 20 43 har * varName, C
6800: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 65 77 56 ONST char * newV
6810: 61 6c 75 65 2c 20 0a 09 09 09 09 69 6e 74 20 66 alue, .....int f
6820: 6c 61 67 73 29 29 3b 0a 2f 2a 20 32 33 38 20 2a lags));./* 238 *
6830: 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 /.EXTERN CONST84
6840: 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 _RETURN char * T
6850: 63 6c 5f 53 65 74 56 61 72 32 20 5f 41 4e 53 49 cl_SetVar2 _ANSI
6860: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
6870: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
6880: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 ..CONST char * p
6890: 61 72 74 31 2c 20 43 4f 4e 53 54 20 63 68 61 72 art1, CONST char
68a0: 20 2a 20 70 61 72 74 32 2c 20 0a 09 09 09 09 43 * part2, .....C
68b0: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 65 77 56 ONST char * newV
68c0: 61 6c 75 65 2c 20 69 6e 74 20 66 6c 61 67 73 29 alue, int flags)
68d0: 29 3b 0a 2f 2a 20 32 33 39 20 2a 2f 0a 45 58 54 );./* 239 */.EXT
68e0: 45 52 4e 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 ERN CONST84_RETU
68f0: 52 4e 20 63 68 61 72 20 2a 20 54 63 6c 5f 53 69 RN char * Tcl_Si
6900: 67 6e 61 6c 49 64 20 5f 41 4e 53 49 5f 41 52 47 gnalId _ANSI_ARG
6910: 53 5f 28 28 69 6e 74 20 73 69 67 29 29 3b 0a 2f S_((int sig));./
6920: 2a 20 32 34 30 20 2a 2f 0a 45 58 54 45 52 4e 20 * 240 */.EXTERN
6930: 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 CONST84_RETURN c
6940: 68 61 72 20 2a 20 54 63 6c 5f 53 69 67 6e 61 6c har * Tcl_Signal
6950: 4d 73 67 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Msg _ANSI_ARGS_(
6960: 28 69 6e 74 20 73 69 67 29 29 3b 0a 2f 2a 20 32 (int sig));./* 2
6970: 34 31 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 41 */.EXTERN voi
6980: 64 09 09 54 63 6c 5f 53 6f 75 72 63 65 52 43 46 d..Tcl_SourceRCF
6990: 69 6c 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ile _ANSI_ARGS_(
69a0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
69b0: 74 65 72 70 29 29 3b 0a 2f 2a 20 32 34 32 20 2a terp));./* 242 *
69c0: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
69d0: 6c 5f 53 70 6c 69 74 4c 69 73 74 20 5f 41 4e 53 l_SplitList _ANS
69e0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
69f0: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
6a00: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
6a10: 6c 69 73 74 53 74 72 2c 20 69 6e 74 20 2a 20 61 listStr, int * a
6a20: 72 67 63 50 74 72 2c 20 0a 09 09 09 09 43 4f 4e rgcPtr, .....CON
6a30: 53 54 38 34 20 63 68 61 72 20 2a 2a 2a 20 61 72 ST84 char *** ar
6a40: 67 76 50 74 72 29 29 3b 0a 2f 2a 20 32 34 33 20 gvPtr));./* 243
6a50: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
6a60: 54 63 6c 5f 53 70 6c 69 74 50 61 74 68 20 5f 41 Tcl_SplitPath _A
6a70: 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 NSI_ARGS_((CONST
6a80: 20 63 68 61 72 20 2a 20 70 61 74 68 2c 20 0a 09 char * path, ..
6a90: 09 09 09 69 6e 74 20 2a 20 61 72 67 63 50 74 72 ...int * argcPtr
6aa0: 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a , CONST84 char *
6ab0: 2a 2a 20 61 72 67 76 50 74 72 29 29 3b 0a 2f 2a ** argvPtr));./*
6ac0: 20 32 34 34 20 2a 2f 0a 45 58 54 45 52 4e 20 76 244 */.EXTERN v
6ad0: 6f 69 64 09 09 54 63 6c 5f 53 74 61 74 69 63 50 oid..Tcl_StaticP
6ae0: 61 63 6b 61 67 65 20 5f 41 4e 53 49 5f 41 52 47 ackage _ANSI_ARG
6af0: 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
6b00: 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f interp, .....CO
6b10: 4e 53 54 20 63 68 61 72 20 2a 20 70 6b 67 4e 61 NST char * pkgNa
6b20: 6d 65 2c 20 0a 09 09 09 09 54 63 6c 5f 50 61 63 me, .....Tcl_Pac
6b30: 6b 61 67 65 49 6e 69 74 50 72 6f 63 20 2a 20 69 kageInitProc * i
6b40: 6e 69 74 50 72 6f 63 2c 20 0a 09 09 09 09 54 63 nitProc, .....Tc
6b50: 6c 5f 50 61 63 6b 61 67 65 49 6e 69 74 50 72 6f l_PackageInitPro
6b60: 63 20 2a 20 73 61 66 65 49 6e 69 74 50 72 6f 63 c * safeInitProc
6b70: 29 29 3b 0a 2f 2a 20 32 34 35 20 2a 2f 0a 45 58 ));./* 245 */.EX
6b80: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 53 74 TERN int..Tcl_St
6b90: 72 69 6e 67 4d 61 74 63 68 20 5f 41 4e 53 49 5f ringMatch _ANSI_
6ba0: 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 ARGS_((CONST cha
6bb0: 72 20 2a 20 73 74 72 2c 20 0a 09 09 09 09 43 4f r * str, .....CO
6bc0: 4e 53 54 20 63 68 61 72 20 2a 20 70 61 74 74 65 NST char * patte
6bd0: 72 6e 29 29 3b 0a 2f 2a 20 32 34 36 20 2a 2f 0a rn));./* 246 */.
6be0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
6bf0: 54 65 6c 6c 4f 6c 64 20 5f 41 4e 53 49 5f 41 52 TellOld _ANSI_AR
6c00: 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c GS_((Tcl_Channel
6c10: 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 32 34 37 20 chan));./* 247
6c20: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
6c30: 63 6c 5f 54 72 61 63 65 56 61 72 20 5f 41 4e 53 cl_TraceVar _ANS
6c40: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
6c50: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
6c60: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
6c70: 76 61 72 4e 61 6d 65 2c 20 69 6e 74 20 66 6c 61 varName, int fla
6c80: 67 73 2c 20 0a 09 09 09 09 54 63 6c 5f 56 61 72 gs, .....Tcl_Var
6c90: 54 72 61 63 65 50 72 6f 63 20 2a 20 70 72 6f 63 TraceProc * proc
6ca0: 2c 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 , .....ClientDat
6cb0: 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a a clientData));.
6cc0: 2f 2a 20 32 34 38 20 2a 2f 0a 45 58 54 45 52 4e /* 248 */.EXTERN
6cd0: 20 69 6e 74 09 09 54 63 6c 5f 54 72 61 63 65 56 int..Tcl_TraceV
6ce0: 61 72 32 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ar2 _ANSI_ARGS_(
6cf0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
6d00: 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 terp, .....CONST
6d10: 20 63 68 61 72 20 2a 20 70 61 72 74 31 2c 20 43 char * part1, C
6d20: 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 ONST char * part
6d30: 32 2c 20 0a 09 09 09 09 69 6e 74 20 66 6c 61 67 2, .....int flag
6d40: 73 2c 20 54 63 6c 5f 56 61 72 54 72 61 63 65 50 s, Tcl_VarTraceP
6d50: 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a 09 09 09 roc * proc, ....
6d60: 09 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 .ClientData clie
6d70: 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 32 34 39 ntData));./* 249
6d80: 20 2a 2f 0a 45 58 54 45 52 4e 20 63 68 61 72 20 */.EXTERN char
6d90: 2a 09 09 54 63 6c 5f 54 72 61 6e 73 6c 61 74 65 *..Tcl_Translate
6da0: 46 69 6c 65 4e 61 6d 65 20 5f 41 4e 53 49 5f 41 FileName _ANSI_A
6db0: 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 RGS_((.....Tcl_I
6dc0: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
6dd0: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 61 6d CONST char * nam
6de0: 65 2c 20 0a 09 09 09 09 54 63 6c 5f 44 53 74 72 e, .....Tcl_DStr
6df0: 69 6e 67 20 2a 20 62 75 66 66 65 72 50 74 72 29 ing * bufferPtr)
6e00: 29 3b 0a 2f 2a 20 32 35 30 20 2a 2f 0a 45 58 54 );./* 250 */.EXT
6e10: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 55 6e 67 ERN int..Tcl_Ung
6e20: 65 74 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ets _ANSI_ARGS_(
6e30: 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 (Tcl_Channel cha
6e40: 6e 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 n, .....CONST ch
6e50: 61 72 20 2a 20 73 74 72 2c 20 69 6e 74 20 6c 65 ar * str, int le
6e60: 6e 2c 20 69 6e 74 20 61 74 48 65 61 64 29 29 3b n, int atHead));
6e70: 0a 2f 2a 20 32 35 31 20 2a 2f 0a 45 58 54 45 52 ./* 251 */.EXTER
6e80: 4e 20 76 6f 69 64 09 09 54 63 6c 5f 55 6e 6c 69 N void..Tcl_Unli
6e90: 6e 6b 56 61 72 20 5f 41 4e 53 49 5f 41 52 47 53 nkVar _ANSI_ARGS
6ea0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
6eb0: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e interp, .....CON
6ec0: 53 54 20 63 68 61 72 20 2a 20 76 61 72 4e 61 6d ST char * varNam
6ed0: 65 29 29 3b 0a 2f 2a 20 32 35 32 20 2a 2f 0a 45 e));./* 252 */.E
6ee0: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 55 XTERN int..Tcl_U
6ef0: 6e 72 65 67 69 73 74 65 72 43 68 61 6e 6e 65 6c nregisterChannel
6f00: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
6f10: 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 ...Tcl_Interp *
6f20: 69 6e 74 65 72 70 2c 20 54 63 6c 5f 43 68 61 6e interp, Tcl_Chan
6f30: 6e 65 6c 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 32 nel chan));./* 2
6f40: 35 33 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 53 */.EXTERN int
6f50: 09 09 54 63 6c 5f 55 6e 73 65 74 56 61 72 20 5f ..Tcl_UnsetVar _
6f60: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
6f70: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
6f80: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
6f90: 20 2a 20 76 61 72 4e 61 6d 65 2c 20 69 6e 74 20 * varName, int
6fa0: 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 32 35 34 20 flags));./* 254
6fb0: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
6fc0: 63 6c 5f 55 6e 73 65 74 56 61 72 32 20 5f 41 4e cl_UnsetVar2 _AN
6fd0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
6fe0: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a terp * interp, .
6ff0: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
7000: 20 70 61 72 74 31 2c 20 43 4f 4e 53 54 20 63 68 part1, CONST ch
7010: 61 72 20 2a 20 70 61 72 74 32 2c 20 0a 09 09 09 ar * part2, ....
7020: 09 69 6e 74 20 66 6c 61 67 73 29 29 3b 0a 2f 2a .int flags));./*
7030: 20 32 35 35 20 2a 2f 0a 45 58 54 45 52 4e 20 76 255 */.EXTERN v
7040: 6f 69 64 09 09 54 63 6c 5f 55 6e 74 72 61 63 65 oid..Tcl_Untrace
7050: 56 61 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Var _ANSI_ARGS_(
7060: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
7070: 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 terp, .....CONST
7080: 20 63 68 61 72 20 2a 20 76 61 72 4e 61 6d 65 2c char * varName,
7090: 20 69 6e 74 20 66 6c 61 67 73 2c 20 0a 09 09 09 int flags, ....
70a0: 09 54 63 6c 5f 56 61 72 54 72 61 63 65 50 72 6f .Tcl_VarTracePro
70b0: 63 20 2a 20 70 72 6f 63 2c 20 0a 09 09 09 09 43 c * proc, .....C
70c0: 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 lientData client
70d0: 44 61 74 61 29 29 3b 0a 2f 2a 20 32 35 36 20 2a Data));./* 256 *
70e0: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
70f0: 63 6c 5f 55 6e 74 72 61 63 65 56 61 72 32 20 5f cl_UntraceVar2 _
7100: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
7110: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
7120: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
7130: 20 2a 20 70 61 72 74 31 2c 20 43 4f 4e 53 54 20 * part1, CONST
7140: 63 68 61 72 20 2a 20 70 61 72 74 32 2c 20 0a 09 char * part2, ..
7150: 09 09 09 69 6e 74 20 66 6c 61 67 73 2c 20 54 63 ...int flags, Tc
7160: 6c 5f 56 61 72 54 72 61 63 65 50 72 6f 63 20 2a l_VarTraceProc *
7170: 20 70 72 6f 63 2c 20 0a 09 09 09 09 43 6c 69 65 proc, .....Clie
7180: 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 ntData clientDat
7190: 61 29 29 3b 0a 2f 2a 20 32 35 37 20 2a 2f 0a 45 a));./* 257 */.E
71a0: 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f XTERN void..Tcl_
71b0: 55 70 64 61 74 65 4c 69 6e 6b 65 64 56 61 72 20 UpdateLinkedVar
71c0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
71d0: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
71e0: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
71f0: 72 20 2a 20 76 61 72 4e 61 6d 65 29 29 3b 0a 2f r * varName));./
7200: 2a 20 32 35 38 20 2a 2f 0a 45 58 54 45 52 4e 20 * 258 */.EXTERN
7210: 69 6e 74 09 09 54 63 6c 5f 55 70 56 61 72 20 5f int..Tcl_UpVar _
7220: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
7230: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
7240: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
7250: 20 2a 20 66 72 61 6d 65 4e 61 6d 65 2c 20 43 4f * frameName, CO
7260: 4e 53 54 20 63 68 61 72 20 2a 20 76 61 72 4e 61 NST char * varNa
7270: 6d 65 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 me, .....CONST c
7280: 68 61 72 20 2a 20 6c 6f 63 61 6c 4e 61 6d 65 2c har * localName,
7290: 20 69 6e 74 20 66 6c 61 67 73 29 29 3b 0a 2f 2a int flags));./*
72a0: 20 32 35 39 20 2a 2f 0a 45 58 54 45 52 4e 20 69 259 */.EXTERN i
72b0: 6e 74 09 09 54 63 6c 5f 55 70 56 61 72 32 20 5f nt..Tcl_UpVar2 _
72c0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
72d0: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
72e0: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
72f0: 20 2a 20 66 72 61 6d 65 4e 61 6d 65 2c 20 43 4f * frameName, CO
7300: 4e 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 31 NST char * part1
7310: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
7320: 72 20 2a 20 70 61 72 74 32 2c 20 43 4f 4e 53 54 r * part2, CONST
7330: 20 63 68 61 72 20 2a 20 6c 6f 63 61 6c 4e 61 6d char * localNam
7340: 65 2c 20 0a 09 09 09 09 69 6e 74 20 66 6c 61 67 e, .....int flag
7350: 73 29 29 3b 0a 2f 2a 20 32 36 30 20 2a 2f 0a 45 s));./* 260 */.E
7360: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 56 XTERN int..Tcl_V
7370: 61 72 45 76 61 6c 20 5f 41 4e 53 49 5f 41 52 47 arEval _ANSI_ARG
7380: 53 5f 28 54 43 4c 5f 56 41 52 41 52 47 53 28 54 S_(TCL_VARARGS(T
7390: 63 6c 5f 49 6e 74 65 72 70 20 2a 2c 69 6e 74 65 cl_Interp *,inte
73a0: 72 70 29 29 3b 0a 2f 2a 20 32 36 31 20 2a 2f 0a rp));./* 261 */.
73b0: 45 58 54 45 52 4e 20 43 6c 69 65 6e 74 44 61 74 EXTERN ClientDat
73c0: 61 09 54 63 6c 5f 56 61 72 54 72 61 63 65 49 6e a.Tcl_VarTraceIn
73d0: 66 6f 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 fo _ANSI_ARGS_((
73e0: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
73f0: 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 erp, .....CONST
7400: 63 68 61 72 20 2a 20 76 61 72 4e 61 6d 65 2c 20 char * varName,
7410: 69 6e 74 20 66 6c 61 67 73 2c 20 0a 09 09 09 09 int flags, .....
7420: 54 63 6c 5f 56 61 72 54 72 61 63 65 50 72 6f 63 Tcl_VarTraceProc
7430: 20 2a 20 70 72 6f 63 50 74 72 2c 20 0a 09 09 09 * procPtr, ....
7440: 09 43 6c 69 65 6e 74 44 61 74 61 20 70 72 65 76 .ClientData prev
7450: 43 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a ClientData));./*
7460: 20 32 36 32 20 2a 2f 0a 45 58 54 45 52 4e 20 43 262 */.EXTERN C
7470: 6c 69 65 6e 74 44 61 74 61 09 54 63 6c 5f 56 61 lientData.Tcl_Va
7480: 72 54 72 61 63 65 49 6e 66 6f 32 20 5f 41 4e 53 rTraceInfo2 _ANS
7490: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
74a0: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
74b0: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
74c0: 70 61 72 74 31 2c 20 43 4f 4e 53 54 20 63 68 61 part1, CONST cha
74d0: 72 20 2a 20 70 61 72 74 32 2c 20 0a 09 09 09 09 r * part2, .....
74e0: 69 6e 74 20 66 6c 61 67 73 2c 20 54 63 6c 5f 56 int flags, Tcl_V
74f0: 61 72 54 72 61 63 65 50 72 6f 63 20 2a 20 70 72 arTraceProc * pr
7500: 6f 63 50 74 72 2c 20 0a 09 09 09 09 43 6c 69 65 ocPtr, .....Clie
7510: 6e 74 44 61 74 61 20 70 72 65 76 43 6c 69 65 6e ntData prevClien
7520: 74 44 61 74 61 29 29 3b 0a 2f 2a 20 32 36 33 20 tData));./* 263
7530: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
7540: 63 6c 5f 57 72 69 74 65 20 5f 41 4e 53 49 5f 41 cl_Write _ANSI_A
7550: 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 RGS_((Tcl_Channe
7560: 6c 20 63 68 61 6e 2c 20 0a 09 09 09 09 43 4f 4e l chan, .....CON
7570: 53 54 20 63 68 61 72 20 2a 20 73 2c 20 69 6e 74 ST char * s, int
7580: 20 73 6c 65 6e 29 29 3b 0a 2f 2a 20 32 36 34 20 slen));./* 264
7590: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
75a0: 54 63 6c 5f 57 72 6f 6e 67 4e 75 6d 41 72 67 73 Tcl_WrongNumArgs
75b0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
75c0: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
75d0: 70 2c 20 0a 09 09 09 09 69 6e 74 20 6f 62 6a 63 p, .....int objc
75e0: 2c 20 54 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 , Tcl_Obj *CONST
75f0: 20 6f 62 6a 76 5b 5d 2c 20 0a 09 09 09 09 43 4f objv[], .....CO
7600: 4e 53 54 20 63 68 61 72 20 2a 20 6d 65 73 73 61 NST char * messa
7610: 67 65 29 29 3b 0a 2f 2a 20 32 36 35 20 2a 2f 0a ge));./* 265 */.
7620: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
7630: 44 75 6d 70 41 63 74 69 76 65 4d 65 6d 6f 72 79 DumpActiveMemory
7640: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
7650: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
7660: 66 69 6c 65 4e 61 6d 65 29 29 3b 0a 2f 2a 20 32 fileName));./* 2
7670: 36 36 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 66 */.EXTERN voi
7680: 64 09 09 54 63 6c 5f 56 61 6c 69 64 61 74 65 41 d..Tcl_ValidateA
7690: 6c 6c 4d 65 6d 6f 72 79 20 5f 41 4e 53 49 5f 41 llMemory _ANSI_A
76a0: 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
76b0: 20 2a 20 66 69 6c 65 2c 20 0a 09 09 09 09 69 6e * file, .....in
76c0: 74 20 6c 69 6e 65 29 29 3b 0a 2f 2a 20 32 36 37 t line));./* 267
76d0: 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 */.EXTERN void.
76e0: 09 54 63 6c 5f 41 70 70 65 6e 64 52 65 73 75 6c .Tcl_AppendResul
76f0: 74 56 41 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 tVA _ANSI_ARGS_(
7700: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
7710: 74 65 72 70 2c 20 0a 09 09 09 09 76 61 5f 6c 69 terp, .....va_li
7720: 73 74 20 61 72 67 4c 69 73 74 29 29 3b 0a 2f 2a st argList));./*
7730: 20 32 36 38 20 2a 2f 0a 45 58 54 45 52 4e 20 76 268 */.EXTERN v
7740: 6f 69 64 09 09 54 63 6c 5f 41 70 70 65 6e 64 53 oid..Tcl_AppendS
7750: 74 72 69 6e 67 73 54 6f 4f 62 6a 56 41 20 5f 41 tringsToObjVA _A
7760: 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 NSI_ARGS_((.....
7770: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
7780: 2c 20 76 61 5f 6c 69 73 74 20 61 72 67 4c 69 73 , va_list argLis
7790: 74 29 29 3b 0a 2f 2a 20 32 36 39 20 2a 2f 0a 45 t));./* 269 */.E
77a0: 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 5f 52 45 XTERN CONST84_RE
77b0: 54 55 52 4e 20 63 68 61 72 20 2a 20 54 63 6c 5f TURN char * Tcl_
77c0: 48 61 73 68 53 74 61 74 73 20 5f 41 4e 53 49 5f HashStats _ANSI_
77d0: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
77e0: 48 61 73 68 54 61 62 6c 65 20 2a 20 74 61 62 6c HashTable * tabl
77f0: 65 50 74 72 29 29 3b 0a 2f 2a 20 32 37 30 20 2a ePtr));./* 270 *
7800: 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 /.EXTERN CONST84
7810: 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 _RETURN char * T
7820: 63 6c 5f 50 61 72 73 65 56 61 72 20 5f 41 4e 53 cl_ParseVar _ANS
7830: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
7840: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
7850: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
7860: 73 74 72 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 str, CONST84 cha
7870: 72 20 2a 2a 20 74 65 72 6d 50 74 72 29 29 3b 0a r ** termPtr));.
7880: 2f 2a 20 32 37 31 20 2a 2f 0a 45 58 54 45 52 4e /* 271 */.EXTERN
7890: 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 CONST84_RETURN
78a0: 63 68 61 72 20 2a 20 54 63 6c 5f 50 6b 67 50 72 char * Tcl_PkgPr
78b0: 65 73 65 6e 74 20 5f 41 4e 53 49 5f 41 52 47 53 esent _ANSI_ARGS
78c0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
78d0: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e interp, .....CON
78e0: 53 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 2c 20 ST char * name,
78f0: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 65 72 CONST char * ver
7900: 73 69 6f 6e 2c 20 0a 09 09 09 09 69 6e 74 20 65 sion, .....int e
7910: 78 61 63 74 29 29 3b 0a 2f 2a 20 32 37 32 20 2a xact));./* 272 *
7920: 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 /.EXTERN CONST84
7930: 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 _RETURN char * T
7940: 63 6c 5f 50 6b 67 50 72 65 73 65 6e 74 45 78 20 cl_PkgPresentEx
7950: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
7960: 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ..Tcl_Interp * i
7970: 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 nterp, CONST cha
7980: 72 20 2a 20 6e 61 6d 65 2c 20 0a 09 09 09 09 43 r * name, .....C
7990: 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 65 72 73 ONST char * vers
79a0: 69 6f 6e 2c 20 69 6e 74 20 65 78 61 63 74 2c 20 ion, int exact,
79b0: 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 .....ClientData
79c0: 2a 20 63 6c 69 65 6e 74 44 61 74 61 50 74 72 29 * clientDataPtr)
79d0: 29 3b 0a 2f 2a 20 32 37 33 20 2a 2f 0a 45 58 54 );./* 273 */.EXT
79e0: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 50 6b 67 ERN int..Tcl_Pkg
79f0: 50 72 6f 76 69 64 65 20 5f 41 4e 53 49 5f 41 52 Provide _ANSI_AR
7a00: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
7a10: 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 * interp, .....C
7a20: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 ONST char * name
7a30: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 , CONST char * v
7a40: 65 72 73 69 6f 6e 29 29 3b 0a 2f 2a 20 32 37 34 ersion));./* 274
7a50: 20 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 */.EXTERN CONST
7a60: 38 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 84_RETURN char *
7a70: 20 54 63 6c 5f 50 6b 67 52 65 71 75 69 72 65 20 Tcl_PkgRequire
7a80: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
7a90: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
7aa0: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
7ab0: 72 20 2a 20 6e 61 6d 65 2c 20 43 4f 4e 53 54 20 r * name, CONST
7ac0: 63 68 61 72 20 2a 20 76 65 72 73 69 6f 6e 2c 20 char * version,
7ad0: 0a 09 09 09 09 69 6e 74 20 65 78 61 63 74 29 29 .....int exact))
7ae0: 3b 0a 2f 2a 20 32 37 35 20 2a 2f 0a 45 58 54 45 ;./* 275 */.EXTE
7af0: 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 RN void..Tcl_Set
7b00: 45 72 72 6f 72 43 6f 64 65 56 41 20 5f 41 4e 53 ErrorCodeVA _ANS
7b10: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
7b20: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
7b30: 09 09 09 76 61 5f 6c 69 73 74 20 61 72 67 4c 69 ...va_list argLi
7b40: 73 74 29 29 3b 0a 2f 2a 20 32 37 36 20 2a 2f 0a st));./* 276 */.
7b50: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
7b60: 56 61 72 45 76 61 6c 56 41 20 5f 41 4e 53 49 5f VarEvalVA _ANSI_
7b70: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
7b80: 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 p * interp, ....
7b90: 09 76 61 5f 6c 69 73 74 20 61 72 67 4c 69 73 74 .va_list argList
7ba0: 29 29 3b 0a 2f 2a 20 32 37 37 20 2a 2f 0a 45 58 ));./* 277 */.EX
7bb0: 54 45 52 4e 20 54 63 6c 5f 50 69 64 09 09 54 63 TERN Tcl_Pid..Tc
7bc0: 6c 5f 57 61 69 74 50 69 64 20 5f 41 4e 53 49 5f l_WaitPid _ANSI_
7bd0: 41 52 47 53 5f 28 28 54 63 6c 5f 50 69 64 20 70 ARGS_((Tcl_Pid p
7be0: 69 64 2c 20 69 6e 74 20 2a 20 73 74 61 74 50 74 id, int * statPt
7bf0: 72 2c 20 0a 09 09 09 09 69 6e 74 20 6f 70 74 69 r, .....int opti
7c00: 6f 6e 73 29 29 3b 0a 2f 2a 20 32 37 38 20 2a 2f ons));./* 278 */
7c10: 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 .EXTERN void..Tc
7c20: 6c 5f 50 61 6e 69 63 56 41 20 5f 41 4e 53 49 5f l_PanicVA _ANSI_
7c30: 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 ARGS_((CONST cha
7c40: 72 20 2a 20 66 6f 72 6d 61 74 2c 20 0a 09 09 09 r * format, ....
7c50: 09 76 61 5f 6c 69 73 74 20 61 72 67 4c 69 73 74 .va_list argList
7c60: 29 29 3b 0a 2f 2a 20 32 37 39 20 2a 2f 0a 45 58 ));./* 279 */.EX
7c70: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 47 TERN void..Tcl_G
7c80: 65 74 56 65 72 73 69 6f 6e 20 5f 41 4e 53 49 5f etVersion _ANSI_
7c90: 41 52 47 53 5f 28 28 69 6e 74 20 2a 20 6d 61 6a ARGS_((int * maj
7ca0: 6f 72 2c 20 69 6e 74 20 2a 20 6d 69 6e 6f 72 2c or, int * minor,
7cb0: 20 0a 09 09 09 09 69 6e 74 20 2a 20 70 61 74 63 .....int * patc
7cc0: 68 4c 65 76 65 6c 2c 20 69 6e 74 20 2a 20 74 79 hLevel, int * ty
7cd0: 70 65 29 29 3b 0a 2f 2a 20 32 38 30 20 2a 2f 0a pe));./* 280 */.
7ce0: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
7cf0: 5f 49 6e 69 74 4d 65 6d 6f 72 79 20 5f 41 4e 53 _InitMemory _ANS
7d00: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
7d10: 65 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 0a erp * interp));.
7d20: 2f 2a 20 32 38 31 20 2a 2f 0a 45 58 54 45 52 4e /* 281 */.EXTERN
7d30: 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 09 54 63 6c Tcl_Channel.Tcl
7d40: 5f 53 74 61 63 6b 43 68 61 6e 6e 65 6c 20 5f 41 _StackChannel _A
7d50: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
7d60: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
7d70: 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c .....Tcl_Channel
7d80: 54 79 70 65 20 2a 20 74 79 70 65 50 74 72 2c 20 Type * typePtr,
7d90: 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 .....ClientData
7da0: 69 6e 73 74 61 6e 63 65 44 61 74 61 2c 20 69 6e instanceData, in
7db0: 74 20 6d 61 73 6b 2c 20 0a 09 09 09 09 54 63 6c t mask, .....Tcl
7dc0: 5f 43 68 61 6e 6e 65 6c 20 70 72 65 76 43 68 61 _Channel prevCha
7dd0: 6e 29 29 3b 0a 2f 2a 20 32 38 32 20 2a 2f 0a 45 n));./* 282 */.E
7de0: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 55 XTERN int..Tcl_U
7df0: 6e 73 74 61 63 6b 43 68 61 6e 6e 65 6c 20 5f 41 nstackChannel _A
7e00: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
7e10: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
7e20: 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c .....Tcl_Channel
7e30: 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 32 38 33 20 chan));./* 283
7e40: 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 43 68 */.EXTERN Tcl_Ch
7e50: 61 6e 6e 65 6c 09 54 63 6c 5f 47 65 74 53 74 61 annel.Tcl_GetSta
7e60: 63 6b 65 64 43 68 61 6e 6e 65 6c 20 5f 41 4e 53 ckedChannel _ANS
7e70: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
7e80: 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 nnel chan));./*
7e90: 32 38 34 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 284 */.EXTERN vo
7ea0: 69 64 09 09 54 63 6c 5f 53 65 74 4d 61 69 6e 4c id..Tcl_SetMainL
7eb0: 6f 6f 70 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 oop _ANSI_ARGS_(
7ec0: 28 54 63 6c 5f 4d 61 69 6e 4c 6f 6f 70 50 72 6f (Tcl_MainLoopPro
7ed0: 63 20 2a 20 70 72 6f 63 29 29 3b 0a 2f 2a 20 53 c * proc));./* S
7ee0: 6c 6f 74 20 32 38 35 20 69 73 20 72 65 73 65 72 lot 285 is reser
7ef0: 76 65 64 20 2a 2f 0a 2f 2a 20 32 38 36 20 2a 2f ved */./* 286 */
7f00: 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 .EXTERN void..Tc
7f10: 6c 5f 41 70 70 65 6e 64 4f 62 6a 54 6f 4f 62 6a l_AppendObjToObj
7f20: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
7f30: 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 l_Obj * objPtr,
7f40: 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 61 .....Tcl_Obj * a
7f50: 70 70 65 6e 64 4f 62 6a 50 74 72 29 29 3b 0a 2f ppendObjPtr));./
7f60: 2a 20 32 38 37 20 2a 2f 0a 45 58 54 45 52 4e 20 * 287 */.EXTERN
7f70: 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 09 54 63 6c Tcl_Encoding.Tcl
7f80: 5f 43 72 65 61 74 65 45 6e 63 6f 64 69 6e 67 20 _CreateEncoding
7f90: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
7fa0: 09 09 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 54 79 ..Tcl_EncodingTy
7fb0: 70 65 20 2a 20 74 79 70 65 50 74 72 29 29 3b 0a pe * typePtr));.
7fc0: 2f 2a 20 32 38 38 20 2a 2f 0a 45 58 54 45 52 4e /* 288 */.EXTERN
7fd0: 20 76 6f 69 64 09 09 54 63 6c 5f 43 72 65 61 74 void..Tcl_Creat
7fe0: 65 54 68 72 65 61 64 45 78 69 74 48 61 6e 64 6c eThreadExitHandl
7ff0: 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 er _ANSI_ARGS_((
8000: 0a 09 09 09 09 54 63 6c 5f 45 78 69 74 50 72 6f .....Tcl_ExitPro
8010: 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 c * proc, Client
8020: 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 Data clientData)
8030: 29 3b 0a 2f 2a 20 32 38 39 20 2a 2f 0a 45 58 54 );./* 289 */.EXT
8040: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 44 65 ERN void..Tcl_De
8050: 6c 65 74 65 54 68 72 65 61 64 45 78 69 74 48 61 leteThreadExitHa
8060: 6e 64 6c 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 ndler _ANSI_ARGS
8070: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 45 78 69 74 _((.....Tcl_Exit
8080: 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 Proc * proc, Cli
8090: 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 entData clientDa
80a0: 74 61 29 29 3b 0a 2f 2a 20 32 39 30 20 2a 2f 0a ta));./* 290 */.
80b0: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
80c0: 5f 44 69 73 63 61 72 64 52 65 73 75 6c 74 20 5f _DiscardResult _
80d0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
80e0: 09 54 63 6c 5f 53 61 76 65 64 52 65 73 75 6c 74 .Tcl_SavedResult
80f0: 20 2a 20 73 74 61 74 65 50 74 72 29 29 3b 0a 2f * statePtr));./
8100: 2a 20 32 39 31 20 2a 2f 0a 45 58 54 45 52 4e 20 * 291 */.EXTERN
8110: 69 6e 74 09 09 54 63 6c 5f 45 76 61 6c 45 78 20 int..Tcl_EvalEx
8120: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
8130: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
8140: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
8150: 72 20 2a 20 73 63 72 69 70 74 2c 20 69 6e 74 20 r * script, int
8160: 6e 75 6d 42 79 74 65 73 2c 20 69 6e 74 20 66 6c numBytes, int fl
8170: 61 67 73 29 29 3b 0a 2f 2a 20 32 39 32 20 2a 2f ags));./* 292 */
8180: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
8190: 5f 45 76 61 6c 4f 62 6a 76 20 5f 41 4e 53 49 5f _EvalObjv _ANSI_
81a0: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
81b0: 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 p * interp, ....
81c0: 09 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c 5f 4f .int objc, Tcl_O
81d0: 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d bj *CONST objv[]
81e0: 2c 20 69 6e 74 20 66 6c 61 67 73 29 29 3b 0a 2f , int flags));./
81f0: 2a 20 32 39 33 20 2a 2f 0a 45 58 54 45 52 4e 20 * 293 */.EXTERN
8200: 69 6e 74 09 09 54 63 6c 5f 45 76 61 6c 4f 62 6a int..Tcl_EvalObj
8210: 45 78 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 Ex _ANSI_ARGS_((
8220: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
8230: 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 erp, .....Tcl_Ob
8240: 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 j * objPtr, int
8250: 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 32 39 34 20 flags));./* 294
8260: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
8270: 54 63 6c 5f 45 78 69 74 54 68 72 65 61 64 20 5f Tcl_ExitThread _
8280: 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 ANSI_ARGS_((int
8290: 73 74 61 74 75 73 29 29 3b 0a 2f 2a 20 32 39 35 status));./* 295
82a0: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
82b0: 54 63 6c 5f 45 78 74 65 72 6e 61 6c 54 6f 55 74 Tcl_ExternalToUt
82c0: 66 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 f _ANSI_ARGS_((T
82d0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
82e0: 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 45 6e 63 rp, .....Tcl_Enc
82f0: 6f 64 69 6e 67 20 65 6e 63 6f 64 69 6e 67 2c 20 oding encoding,
8300: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 72 63 CONST char * src
8310: 2c 20 0a 09 09 09 09 69 6e 74 20 73 72 63 4c 65 , .....int srcLe
8320: 6e 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 0a 09 n, int flags, ..
8330: 09 09 09 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 53 ...Tcl_EncodingS
8340: 74 61 74 65 20 2a 20 73 74 61 74 65 50 74 72 2c tate * statePtr,
8350: 20 63 68 61 72 20 2a 20 64 73 74 2c 20 0a 09 09 char * dst, ...
8360: 09 09 69 6e 74 20 64 73 74 4c 65 6e 2c 20 69 6e ..int dstLen, in
8370: 74 20 2a 20 73 72 63 52 65 61 64 50 74 72 2c 20 t * srcReadPtr,
8380: 0a 09 09 09 09 69 6e 74 20 2a 20 64 73 74 57 72 .....int * dstWr
8390: 6f 74 65 50 74 72 2c 20 69 6e 74 20 2a 20 64 73 otePtr, int * ds
83a0: 74 43 68 61 72 73 50 74 72 29 29 3b 0a 2f 2a 20 tCharsPtr));./*
83b0: 32 39 36 20 2a 2f 0a 45 58 54 45 52 4e 20 63 68 296 */.EXTERN ch
83c0: 61 72 20 2a 09 09 54 63 6c 5f 45 78 74 65 72 6e ar *..Tcl_Extern
83d0: 61 6c 54 6f 55 74 66 44 53 74 72 69 6e 67 20 5f alToUtfDString _
83e0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
83f0: 09 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 20 65 6e .Tcl_Encoding en
8400: 63 6f 64 69 6e 67 2c 20 43 4f 4e 53 54 20 63 68 coding, CONST ch
8410: 61 72 20 2a 20 73 72 63 2c 20 0a 09 09 09 09 69 ar * src, .....i
8420: 6e 74 20 73 72 63 4c 65 6e 2c 20 54 63 6c 5f 44 nt srcLen, Tcl_D
8430: 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 29 29 String * dsPtr))
8440: 3b 0a 2f 2a 20 32 39 37 20 2a 2f 0a 45 58 54 45 ;./* 297 */.EXTE
8450: 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 46 69 6e RN void..Tcl_Fin
8460: 61 6c 69 7a 65 54 68 72 65 61 64 20 5f 41 4e 53 alizeThread _ANS
8470: 49 5f 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b I_ARGS_((void));
8480: 0a 2f 2a 20 32 39 38 20 2a 2f 0a 45 58 54 45 52 ./* 298 */.EXTER
8490: 4e 20 76 6f 69 64 09 09 54 63 6c 5f 46 69 6e 61 N void..Tcl_Fina
84a0: 6c 69 7a 65 4e 6f 74 69 66 69 65 72 20 5f 41 4e lizeNotifier _AN
84b0: 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 43 SI_ARGS_((.....C
84c0: 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 lientData client
84d0: 44 61 74 61 29 29 3b 0a 2f 2a 20 32 39 39 20 2a Data));./* 299 *
84e0: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
84f0: 63 6c 5f 46 72 65 65 45 6e 63 6f 64 69 6e 67 20 cl_FreeEncoding
8500: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
8510: 5f 45 6e 63 6f 64 69 6e 67 20 65 6e 63 6f 64 69 _Encoding encodi
8520: 6e 67 29 29 3b 0a 2f 2a 20 33 30 30 20 2a 2f 0a ng));./* 300 */.
8530: 45 58 54 45 52 4e 20 54 63 6c 5f 54 68 72 65 61 EXTERN Tcl_Threa
8540: 64 49 64 09 54 63 6c 5f 47 65 74 43 75 72 72 65 dId.Tcl_GetCurre
8550: 6e 74 54 68 72 65 61 64 20 5f 41 4e 53 49 5f 41 ntThread _ANSI_A
8560: 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f 2a RGS_((void));./*
8570: 20 33 30 31 20 2a 2f 0a 45 58 54 45 52 4e 20 54 301 */.EXTERN T
8580: 63 6c 5f 45 6e 63 6f 64 69 6e 67 09 54 63 6c 5f cl_Encoding.Tcl_
8590: 47 65 74 45 6e 63 6f 64 69 6e 67 20 5f 41 4e 53 GetEncoding _ANS
85a0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
85b0: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 erp * interp, ..
85c0: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
85d0: 6e 61 6d 65 29 29 3b 0a 2f 2a 20 33 30 32 20 2a name));./* 302 *
85e0: 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 /.EXTERN CONST84
85f0: 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 _RETURN char * T
8600: 63 6c 5f 47 65 74 45 6e 63 6f 64 69 6e 67 4e 61 cl_GetEncodingNa
8610: 6d 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 me _ANSI_ARGS_((
8620: 0a 09 09 09 09 54 63 6c 5f 45 6e 63 6f 64 69 6e .....Tcl_Encodin
8630: 67 20 65 6e 63 6f 64 69 6e 67 29 29 3b 0a 2f 2a g encoding));./*
8640: 20 33 30 33 20 2a 2f 0a 45 58 54 45 52 4e 20 76 303 */.EXTERN v
8650: 6f 69 64 09 09 54 63 6c 5f 47 65 74 45 6e 63 6f oid..Tcl_GetEnco
8660: 64 69 6e 67 4e 61 6d 65 73 20 5f 41 4e 53 49 5f dingNames _ANSI_
8670: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
8680: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 29 Interp * interp)
8690: 29 3b 0a 2f 2a 20 33 30 34 20 2a 2f 0a 45 58 54 );./* 304 */.EXT
86a0: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 47 65 74 ERN int..Tcl_Get
86b0: 49 6e 64 65 78 46 72 6f 6d 4f 62 6a 53 74 72 75 IndexFromObjStru
86c0: 63 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ct _ANSI_ARGS_((
86d0: 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 .....Tcl_Interp
86e0: 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 * interp, Tcl_Ob
86f0: 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 j * objPtr, ....
8700: 09 43 4f 4e 53 54 20 56 4f 49 44 20 2a 20 74 61 .CONST VOID * ta
8710: 62 6c 65 50 74 72 2c 20 69 6e 74 20 6f 66 66 73 blePtr, int offs
8720: 65 74 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 et, .....CONST c
8730: 68 61 72 20 2a 20 6d 73 67 2c 20 69 6e 74 20 66 har * msg, int f
8740: 6c 61 67 73 2c 20 69 6e 74 20 2a 20 69 6e 64 65 lags, int * inde
8750: 78 50 74 72 29 29 3b 0a 2f 2a 20 33 30 35 20 2a xPtr));./* 305 *
8760: 2f 0a 45 58 54 45 52 4e 20 56 4f 49 44 20 2a 09 /.EXTERN VOID *.
8770: 09 54 63 6c 5f 47 65 74 54 68 72 65 61 64 44 61 .Tcl_GetThreadDa
8780: 74 61 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ta _ANSI_ARGS_((
8790: 0a 09 09 09 09 54 63 6c 5f 54 68 72 65 61 64 44 .....Tcl_ThreadD
87a0: 61 74 61 4b 65 79 20 2a 20 6b 65 79 50 74 72 2c ataKey * keyPtr,
87b0: 20 69 6e 74 20 73 69 7a 65 29 29 3b 0a 2f 2a 20 int size));./*
87c0: 33 30 36 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 306 */.EXTERN Tc
87d0: 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 47 65 74 56 l_Obj *.Tcl_GetV
87e0: 61 72 32 45 78 20 5f 41 4e 53 49 5f 41 52 47 53 ar2Ex _ANSI_ARGS
87f0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
8800: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e interp, .....CON
8810: 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 31 2c ST char * part1,
8820: 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 CONST char * pa
8830: 72 74 32 2c 20 0a 09 09 09 09 69 6e 74 20 66 6c rt2, .....int fl
8840: 61 67 73 29 29 3b 0a 2f 2a 20 33 30 37 20 2a 2f ags));./* 307 */
8850: 0a 45 58 54 45 52 4e 20 43 6c 69 65 6e 74 44 61 .EXTERN ClientDa
8860: 74 61 09 54 63 6c 5f 49 6e 69 74 4e 6f 74 69 66 ta.Tcl_InitNotif
8870: 69 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ier _ANSI_ARGS_(
8880: 28 76 6f 69 64 29 29 3b 0a 2f 2a 20 33 30 38 20 (void));./* 308
8890: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
88a0: 54 63 6c 5f 4d 75 74 65 78 4c 6f 63 6b 20 5f 41 Tcl_MutexLock _A
88b0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4d NSI_ARGS_((Tcl_M
88c0: 75 74 65 78 20 2a 20 6d 75 74 65 78 50 74 72 29 utex * mutexPtr)
88d0: 29 3b 0a 2f 2a 20 33 30 39 20 2a 2f 0a 45 58 54 );./* 309 */.EXT
88e0: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 4d 75 ERN void..Tcl_Mu
88f0: 74 65 78 55 6e 6c 6f 63 6b 20 5f 41 4e 53 49 5f texUnlock _ANSI_
8900: 41 52 47 53 5f 28 28 54 63 6c 5f 4d 75 74 65 78 ARGS_((Tcl_Mutex
8910: 20 2a 20 6d 75 74 65 78 50 74 72 29 29 3b 0a 2f * mutexPtr));./
8920: 2a 20 33 31 30 20 2a 2f 0a 45 58 54 45 52 4e 20 * 310 */.EXTERN
8930: 76 6f 69 64 09 09 54 63 6c 5f 43 6f 6e 64 69 74 void..Tcl_Condit
8940: 69 6f 6e 4e 6f 74 69 66 79 20 5f 41 4e 53 49 5f ionNotify _ANSI_
8950: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
8960: 43 6f 6e 64 69 74 69 6f 6e 20 2a 20 63 6f 6e 64 Condition * cond
8970: 50 74 72 29 29 3b 0a 2f 2a 20 33 31 31 20 2a 2f Ptr));./* 311 */
8980: 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 .EXTERN void..Tc
8990: 6c 5f 43 6f 6e 64 69 74 69 6f 6e 57 61 69 74 20 l_ConditionWait
89a0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
89b0: 09 09 54 63 6c 5f 43 6f 6e 64 69 74 69 6f 6e 20 ..Tcl_Condition
89c0: 2a 20 63 6f 6e 64 50 74 72 2c 20 0a 09 09 09 09 * condPtr, .....
89d0: 54 63 6c 5f 4d 75 74 65 78 20 2a 20 6d 75 74 65 Tcl_Mutex * mute
89e0: 78 50 74 72 2c 20 54 63 6c 5f 54 69 6d 65 20 2a xPtr, Tcl_Time *
89f0: 20 74 69 6d 65 50 74 72 29 29 3b 0a 2f 2a 20 33 timePtr));./* 3
8a00: 31 32 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 12 */.EXTERN int
8a10: 09 09 54 63 6c 5f 4e 75 6d 55 74 66 43 68 61 72 ..Tcl_NumUtfChar
8a20: 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 s _ANSI_ARGS_((C
8a30: 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c ONST char * src,
8a40: 20 0a 09 09 09 09 69 6e 74 20 6c 65 6e 29 29 3b .....int len));
8a50: 0a 2f 2a 20 33 31 33 20 2a 2f 0a 45 58 54 45 52 ./* 313 */.EXTER
8a60: 4e 20 69 6e 74 09 09 54 63 6c 5f 52 65 61 64 43 N int..Tcl_ReadC
8a70: 68 61 72 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f hars _ANSI_ARGS_
8a80: 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
8a90: 61 6e 6e 65 6c 2c 20 0a 09 09 09 09 54 63 6c 5f annel, .....Tcl_
8aa0: 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e Obj * objPtr, in
8ab0: 74 20 63 68 61 72 73 54 6f 52 65 61 64 2c 20 0a t charsToRead, .
8ac0: 09 09 09 09 69 6e 74 20 61 70 70 65 6e 64 46 6c ....int appendFl
8ad0: 61 67 29 29 3b 0a 2f 2a 20 33 31 34 20 2a 2f 0a ag));./* 314 */.
8ae0: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
8af0: 5f 52 65 73 74 6f 72 65 52 65 73 75 6c 74 20 5f _RestoreResult _
8b00: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
8b10: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
8b20: 20 0a 09 09 09 09 54 63 6c 5f 53 61 76 65 64 52 .....Tcl_SavedR
8b30: 65 73 75 6c 74 20 2a 20 73 74 61 74 65 50 74 72 esult * statePtr
8b40: 29 29 3b 0a 2f 2a 20 33 31 35 20 2a 2f 0a 45 58 ));./* 315 */.EX
8b50: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 TERN void..Tcl_S
8b60: 61 76 65 52 65 73 75 6c 74 20 5f 41 4e 53 49 5f aveResult _ANSI_
8b70: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
8b80: 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 p * interp, ....
8b90: 09 54 63 6c 5f 53 61 76 65 64 52 65 73 75 6c 74 .Tcl_SavedResult
8ba0: 20 2a 20 73 74 61 74 65 50 74 72 29 29 3b 0a 2f * statePtr));./
8bb0: 2a 20 33 31 36 20 2a 2f 0a 45 58 54 45 52 4e 20 * 316 */.EXTERN
8bc0: 69 6e 74 09 09 54 63 6c 5f 53 65 74 53 79 73 74 int..Tcl_SetSyst
8bd0: 65 6d 45 6e 63 6f 64 69 6e 67 20 5f 41 4e 53 49 emEncoding _ANSI
8be0: 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c _ARGS_((.....Tcl
8bf0: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
8c00: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e , CONST char * n
8c10: 61 6d 65 29 29 3b 0a 2f 2a 20 33 31 37 20 2a 2f ame));./* 317 */
8c20: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 .EXTERN Tcl_Obj
8c30: 2a 09 54 63 6c 5f 53 65 74 56 61 72 32 45 78 20 *.Tcl_SetVar2Ex
8c40: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
8c50: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
8c60: 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 , .....CONST cha
8c70: 72 20 2a 20 70 61 72 74 31 2c 20 43 4f 4e 53 54 r * part1, CONST
8c80: 20 63 68 61 72 20 2a 20 70 61 72 74 32 2c 20 0a char * part2, .
8c90: 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 6e 65 ....Tcl_Obj * ne
8ca0: 77 56 61 6c 75 65 50 74 72 2c 20 69 6e 74 20 66 wValuePtr, int f
8cb0: 6c 61 67 73 29 29 3b 0a 2f 2a 20 33 31 38 20 2a lags));./* 318 *
8cc0: 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 /.EXTERN void..T
8cd0: 63 6c 5f 54 68 72 65 61 64 41 6c 65 72 74 20 5f cl_ThreadAlert _
8ce0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
8cf0: 54 68 72 65 61 64 49 64 20 74 68 72 65 61 64 49 ThreadId threadI
8d00: 64 29 29 3b 0a 2f 2a 20 33 31 39 20 2a 2f 0a 45 d));./* 319 */.E
8d10: 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f XTERN void..Tcl_
8d20: 54 68 72 65 61 64 51 75 65 75 65 45 76 65 6e 74 ThreadQueueEvent
8d30: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
8d40: 09 09 09 54 63 6c 5f 54 68 72 65 61 64 49 64 20 ...Tcl_ThreadId
8d50: 74 68 72 65 61 64 49 64 2c 20 54 63 6c 5f 45 76 threadId, Tcl_Ev
8d60: 65 6e 74 2a 20 65 76 50 74 72 2c 20 0a 09 09 09 ent* evPtr, ....
8d70: 09 54 63 6c 5f 51 75 65 75 65 50 6f 73 69 74 69 .Tcl_QueuePositi
8d80: 6f 6e 20 70 6f 73 69 74 69 6f 6e 29 29 3b 0a 2f on position));./
8d90: 2a 20 33 32 30 20 2a 2f 0a 45 58 54 45 52 4e 20 * 320 */.EXTERN
8da0: 54 63 6c 5f 55 6e 69 43 68 61 72 09 54 63 6c 5f Tcl_UniChar.Tcl_
8db0: 55 6e 69 43 68 61 72 41 74 49 6e 64 65 78 20 5f UniCharAtIndex _
8dc0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
8dd0: 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 0a 09 T char * src, ..
8de0: 09 09 09 69 6e 74 20 69 6e 64 65 78 29 29 3b 0a ...int index));.
8df0: 2f 2a 20 33 32 31 20 2a 2f 0a 45 58 54 45 52 4e /* 321 */.EXTERN
8e00: 20 54 63 6c 5f 55 6e 69 43 68 61 72 09 54 63 6c Tcl_UniChar.Tcl
8e10: 5f 55 6e 69 43 68 61 72 54 6f 4c 6f 77 65 72 20 _UniCharToLower
8e20: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 _ANSI_ARGS_((int
8e30: 20 63 68 29 29 3b 0a 2f 2a 20 33 32 32 20 2a 2f ch));./* 322 */
8e40: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 55 6e 69 43 .EXTERN Tcl_UniC
8e50: 68 61 72 09 54 63 6c 5f 55 6e 69 43 68 61 72 54 har.Tcl_UniCharT
8e60: 6f 54 69 74 6c 65 20 5f 41 4e 53 49 5f 41 52 47 oTitle _ANSI_ARG
8e70: 53 5f 28 28 69 6e 74 20 63 68 29 29 3b 0a 2f 2a S_((int ch));./*
8e80: 20 33 32 33 20 2a 2f 0a 45 58 54 45 52 4e 20 54 323 */.EXTERN T
8e90: 63 6c 5f 55 6e 69 43 68 61 72 09 54 63 6c 5f 55 cl_UniChar.Tcl_U
8ea0: 6e 69 43 68 61 72 54 6f 55 70 70 65 72 20 5f 41 niCharToUpper _A
8eb0: 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 63 NSI_ARGS_((int c
8ec0: 68 29 29 3b 0a 2f 2a 20 33 32 34 20 2a 2f 0a 45 h));./* 324 */.E
8ed0: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 55 XTERN int..Tcl_U
8ee0: 6e 69 43 68 61 72 54 6f 55 74 66 20 5f 41 4e 53 niCharToUtf _ANS
8ef0: 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 63 68 2c I_ARGS_((int ch,
8f00: 20 63 68 61 72 20 2a 20 62 75 66 29 29 3b 0a 2f char * buf));./
8f10: 2a 20 33 32 35 20 2a 2f 0a 45 58 54 45 52 4e 20 * 325 */.EXTERN
8f20: 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 CONST84_RETURN c
8f30: 68 61 72 20 2a 20 54 63 6c 5f 55 74 66 41 74 49 har * Tcl_UtfAtI
8f40: 6e 64 65 78 20 5f 41 4e 53 49 5f 41 52 47 53 5f ndex _ANSI_ARGS_
8f50: 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ((CONST char * s
8f60: 72 63 2c 20 0a 09 09 09 09 69 6e 74 20 69 6e 64 rc, .....int ind
8f70: 65 78 29 29 3b 0a 2f 2a 20 33 32 36 20 2a 2f 0a ex));./* 326 */.
8f80: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
8f90: 55 74 66 43 68 61 72 43 6f 6d 70 6c 65 74 65 20 UtfCharComplete
8fa0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
8fb0: 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 0a ST char * src, .
8fc0: 09 09 09 09 69 6e 74 20 6c 65 6e 29 29 3b 0a 2f ....int len));./
8fd0: 2a 20 33 32 37 20 2a 2f 0a 45 58 54 45 52 4e 20 * 327 */.EXTERN
8fe0: 69 6e 74 09 09 54 63 6c 5f 55 74 66 42 61 63 6b int..Tcl_UtfBack
8ff0: 73 6c 61 73 68 20 5f 41 4e 53 49 5f 41 52 47 53 slash _ANSI_ARGS
9000: 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 _((CONST char *
9010: 73 72 63 2c 20 0a 09 09 09 09 69 6e 74 20 2a 20 src, .....int *
9020: 72 65 61 64 50 74 72 2c 20 63 68 61 72 20 2a 20 readPtr, char *
9030: 64 73 74 29 29 3b 0a 2f 2a 20 33 32 38 20 2a 2f dst));./* 328 */
9040: 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 5f .EXTERN CONST84_
9050: 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 63 RETURN char * Tc
9060: 6c 5f 55 74 66 46 69 6e 64 46 69 72 73 74 20 5f l_UtfFindFirst _
9070: 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
9080: 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 0a 09 T char * src, ..
9090: 09 09 09 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 ...int ch));./*
90a0: 33 32 39 20 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 329 */.EXTERN CO
90b0: 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 68 61 NST84_RETURN cha
90c0: 72 20 2a 20 54 63 6c 5f 55 74 66 46 69 6e 64 4c r * Tcl_UtfFindL
90d0: 61 73 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ast _ANSI_ARGS_(
90e0: 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 72 (CONST char * sr
90f0: 63 2c 20 0a 09 09 09 09 69 6e 74 20 63 68 29 29 c, .....int ch))
9100: 3b 0a 2f 2a 20 33 33 30 20 2a 2f 0a 45 58 54 45 ;./* 330 */.EXTE
9110: 52 4e 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 RN CONST84_RETUR
9120: 4e 20 63 68 61 72 20 2a 20 54 63 6c 5f 55 74 66 N char * Tcl_Utf
9130: 4e 65 78 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f Next _ANSI_ARGS_
9140: 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ((CONST char * s
9150: 72 63 29 29 3b 0a 2f 2a 20 33 33 31 20 2a 2f 0a rc));./* 331 */.
9160: 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 5f 52 EXTERN CONST84_R
9170: 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 63 6c ETURN char * Tcl
9180: 5f 55 74 66 50 72 65 76 20 5f 41 4e 53 49 5f 41 _UtfPrev _ANSI_A
9190: 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
91a0: 20 2a 20 73 72 63 2c 20 0a 09 09 09 09 43 4f 4e * src, .....CON
91b0: 53 54 20 63 68 61 72 20 2a 20 73 74 61 72 74 29 ST char * start)
91c0: 29 3b 0a 2f 2a 20 33 33 32 20 2a 2f 0a 45 58 54 );./* 332 */.EXT
91d0: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 55 74 66 ERN int..Tcl_Utf
91e0: 54 6f 45 78 74 65 72 6e 61 6c 20 5f 41 4e 53 49 ToExternal _ANSI
91f0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
9200: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
9210: 09 09 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 20 65 ..Tcl_Encoding e
9220: 6e 63 6f 64 69 6e 67 2c 20 43 4f 4e 53 54 20 63 ncoding, CONST c
9230: 68 61 72 20 2a 20 73 72 63 2c 20 0a 09 09 09 09 har * src, .....
9240: 69 6e 74 20 73 72 63 4c 65 6e 2c 20 69 6e 74 20 int srcLen, int
9250: 66 6c 61 67 73 2c 20 0a 09 09 09 09 54 63 6c 5f flags, .....Tcl_
9260: 45 6e 63 6f 64 69 6e 67 53 74 61 74 65 20 2a 20 EncodingState *
9270: 73 74 61 74 65 50 74 72 2c 20 63 68 61 72 20 2a statePtr, char *
9280: 20 64 73 74 2c 20 0a 09 09 09 09 69 6e 74 20 64 dst, .....int d
9290: 73 74 4c 65 6e 2c 20 69 6e 74 20 2a 20 73 72 63 stLen, int * src
92a0: 52 65 61 64 50 74 72 2c 20 0a 09 09 09 09 69 6e ReadPtr, .....in
92b0: 74 20 2a 20 64 73 74 57 72 6f 74 65 50 74 72 2c t * dstWrotePtr,
92c0: 20 69 6e 74 20 2a 20 64 73 74 43 68 61 72 73 50 int * dstCharsP
92d0: 74 72 29 29 3b 0a 2f 2a 20 33 33 33 20 2a 2f 0a tr));./* 333 */.
92e0: 45 58 54 45 52 4e 20 63 68 61 72 20 2a 09 09 54 EXTERN char *..T
92f0: 63 6c 5f 55 74 66 54 6f 45 78 74 65 72 6e 61 6c cl_UtfToExternal
9300: 44 53 74 72 69 6e 67 20 5f 41 4e 53 49 5f 41 52 DString _ANSI_AR
9310: 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 45 6e GS_((.....Tcl_En
9320: 63 6f 64 69 6e 67 20 65 6e 63 6f 64 69 6e 67 2c coding encoding,
9330: 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 72 CONST char * sr
9340: 63 2c 20 0a 09 09 09 09 69 6e 74 20 73 72 63 4c c, .....int srcL
9350: 65 6e 2c 20 54 63 6c 5f 44 53 74 72 69 6e 67 20 en, Tcl_DString
9360: 2a 20 64 73 50 74 72 29 29 3b 0a 2f 2a 20 33 33 * dsPtr));./* 33
9370: 34 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 4 */.EXTERN int.
9380: 09 54 63 6c 5f 55 74 66 54 6f 4c 6f 77 65 72 20 .Tcl_UtfToLower
9390: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 63 68 61 _ANSI_ARGS_((cha
93a0: 72 20 2a 20 73 72 63 29 29 3b 0a 2f 2a 20 33 33 r * src));./* 33
93b0: 35 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 5 */.EXTERN int.
93c0: 09 54 63 6c 5f 55 74 66 54 6f 54 69 74 6c 65 20 .Tcl_UtfToTitle
93d0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 63 68 61 _ANSI_ARGS_((cha
93e0: 72 20 2a 20 73 72 63 29 29 3b 0a 2f 2a 20 33 33 r * src));./* 33
93f0: 36 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 6 */.EXTERN int.
9400: 09 54 63 6c 5f 55 74 66 54 6f 55 6e 69 43 68 61 .Tcl_UtfToUniCha
9410: 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 r _ANSI_ARGS_((C
9420: 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c ONST char * src,
9430: 20 0a 09 09 09 09 54 63 6c 5f 55 6e 69 43 68 61 .....Tcl_UniCha
9440: 72 20 2a 20 63 68 50 74 72 29 29 3b 0a 2f 2a 20 r * chPtr));./*
9450: 33 33 37 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 337 */.EXTERN in
9460: 74 09 09 54 63 6c 5f 55 74 66 54 6f 55 70 70 65 t..Tcl_UtfToUppe
9470: 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 63 r _ANSI_ARGS_((c
9480: 68 61 72 20 2a 20 73 72 63 29 29 3b 0a 2f 2a 20 har * src));./*
9490: 33 33 38 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 338 */.EXTERN in
94a0: 74 09 09 54 63 6c 5f 57 72 69 74 65 43 68 61 72 t..Tcl_WriteChar
94b0: 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 s _ANSI_ARGS_((T
94c0: 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c cl_Channel chan,
94d0: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
94e0: 20 2a 20 73 72 63 2c 20 69 6e 74 20 73 72 63 4c * src, int srcL
94f0: 65 6e 29 29 3b 0a 2f 2a 20 33 33 39 20 2a 2f 0a en));./* 339 */.
9500: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
9510: 57 72 69 74 65 4f 62 6a 20 5f 41 4e 53 49 5f 41 WriteObj _ANSI_A
9520: 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 RGS_((Tcl_Channe
9530: 6c 20 63 68 61 6e 2c 20 0a 09 09 09 09 54 63 6c l chan, .....Tcl
9540: 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 29 29 3b _Obj * objPtr));
9550: 0a 2f 2a 20 33 34 30 20 2a 2f 0a 45 58 54 45 52 ./* 340 */.EXTER
9560: 4e 20 63 68 61 72 20 2a 09 09 54 63 6c 5f 47 65 N char *..Tcl_Ge
9570: 74 53 74 72 69 6e 67 20 5f 41 4e 53 49 5f 41 52 tString _ANSI_AR
9580: 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f GS_((Tcl_Obj * o
9590: 62 6a 50 74 72 29 29 3b 0a 2f 2a 20 33 34 31 20 bjPtr));./* 341
95a0: 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 */.EXTERN CONST8
95b0: 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 4_RETURN char *
95c0: 54 63 6c 5f 47 65 74 44 65 66 61 75 6c 74 45 6e Tcl_GetDefaultEn
95d0: 63 6f 64 69 6e 67 44 69 72 20 5f 41 4e 53 49 5f codingDir _ANSI_
95e0: 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f ARGS_((void));./
95f0: 2a 20 33 34 32 20 2a 2f 0a 45 58 54 45 52 4e 20 * 342 */.EXTERN
9600: 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 44 65 66 void..Tcl_SetDef
9610: 61 75 6c 74 45 6e 63 6f 64 69 6e 67 44 69 72 20 aultEncodingDir
9620: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
9630: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 ..CONST char * p
9640: 61 74 68 29 29 3b 0a 2f 2a 20 33 34 33 20 2a 2f ath));./* 343 */
9650: 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 .EXTERN void..Tc
9660: 6c 5f 41 6c 65 72 74 4e 6f 74 69 66 69 65 72 20 l_AlertNotifier
9670: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 6c 69 _ANSI_ARGS_((Cli
9680: 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 entData clientDa
9690: 74 61 29 29 3b 0a 2f 2a 20 33 34 34 20 2a 2f 0a ta));./* 344 */.
96a0: 45 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c EXTERN void..Tcl
96b0: 5f 53 65 72 76 69 63 65 4d 6f 64 65 48 6f 6f 6b _ServiceModeHook
96c0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e _ANSI_ARGS_((in
96d0: 74 20 6d 6f 64 65 29 29 3b 0a 2f 2a 20 33 34 35 t mode));./* 345
96e0: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
96f0: 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 41 6c 6e Tcl_UniCharIsAln
9700: 75 6d 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 um _ANSI_ARGS_((
9710: 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 34 36 int ch));./* 346
9720: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
9730: 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 41 6c 70 Tcl_UniCharIsAlp
9740: 68 61 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ha _ANSI_ARGS_((
9750: 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 34 37 int ch));./* 347
9760: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
9770: 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 44 69 67 Tcl_UniCharIsDig
9780: 69 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 it _ANSI_ARGS_((
9790: 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 34 38 int ch));./* 348
97a0: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
97b0: 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 4c 6f 77 Tcl_UniCharIsLow
97c0: 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 er _ANSI_ARGS_((
97d0: 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 34 39 int ch));./* 349
97e0: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
97f0: 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 53 70 61 Tcl_UniCharIsSpa
9800: 63 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ce _ANSI_ARGS_((
9810: 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 35 30 int ch));./* 350
9820: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
9830: 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 55 70 70 Tcl_UniCharIsUpp
9840: 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 er _ANSI_ARGS_((
9850: 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 35 31 int ch));./* 351
9860: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
9870: 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 57 6f 72 Tcl_UniCharIsWor
9880: 64 43 68 61 72 20 5f 41 4e 53 49 5f 41 52 47 53 dChar _ANSI_ARGS
9890: 5f 28 28 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 _((int ch));./*
98a0: 33 35 32 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 352 */.EXTERN in
98b0: 74 09 09 54 63 6c 5f 55 6e 69 43 68 61 72 4c 65 t..Tcl_UniCharLe
98c0: 6e 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 n _ANSI_ARGS_((C
98d0: 4f 4e 53 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 ONST Tcl_UniChar
98e0: 20 2a 20 73 74 72 29 29 3b 0a 2f 2a 20 33 35 33 * str));./* 353
98f0: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
9900: 54 63 6c 5f 55 6e 69 43 68 61 72 4e 63 6d 70 20 Tcl_UniCharNcmp
9910: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
9920: 53 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a ST Tcl_UniChar *
9930: 20 63 73 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 cs, .....CONST
9940: 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a 20 63 74 Tcl_UniChar * ct
9950: 2c 20 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 20 , unsigned long
9960: 6e 29 29 3b 0a 2f 2a 20 33 35 34 20 2a 2f 0a 45 n));./* 354 */.E
9970: 58 54 45 52 4e 20 63 68 61 72 20 2a 09 09 54 63 XTERN char *..Tc
9980: 6c 5f 55 6e 69 43 68 61 72 54 6f 55 74 66 44 53 l_UniCharToUtfDS
9990: 74 72 69 6e 67 20 5f 41 4e 53 49 5f 41 52 47 53 tring _ANSI_ARGS
99a0: 5f 28 28 0a 09 09 09 09 43 4f 4e 53 54 20 54 63 _((.....CONST Tc
99b0: 6c 5f 55 6e 69 43 68 61 72 20 2a 20 73 74 72 69 l_UniChar * stri
99c0: 6e 67 2c 20 69 6e 74 20 6e 75 6d 43 68 61 72 73 ng, int numChars
99d0: 2c 20 0a 09 09 09 09 54 63 6c 5f 44 53 74 72 69 , .....Tcl_DStri
99e0: 6e 67 20 2a 20 64 73 50 74 72 29 29 3b 0a 2f 2a ng * dsPtr));./*
99f0: 20 33 35 35 20 2a 2f 0a 45 58 54 45 52 4e 20 54 355 */.EXTERN T
9a00: 63 6c 5f 55 6e 69 43 68 61 72 20 2a 09 54 63 6c cl_UniChar *.Tcl
9a10: 5f 55 74 66 54 6f 55 6e 69 43 68 61 72 44 53 74 _UtfToUniCharDSt
9a20: 72 69 6e 67 20 5f 41 4e 53 49 5f 41 52 47 53 5f ring _ANSI_ARGS_
9a30: 28 28 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 ((.....CONST cha
9a40: 72 20 2a 20 73 74 72 69 6e 67 2c 20 69 6e 74 20 r * string, int
9a50: 6c 65 6e 67 74 68 2c 20 0a 09 09 09 09 54 63 6c length, .....Tcl
9a60: 5f 44 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 _DString * dsPtr
9a70: 29 29 3b 0a 2f 2a 20 33 35 36 20 2a 2f 0a 45 58 ));./* 356 */.EX
9a80: 54 45 52 4e 20 54 63 6c 5f 52 65 67 45 78 70 09 TERN Tcl_RegExp.
9a90: 54 63 6c 5f 47 65 74 52 65 67 45 78 70 46 72 6f Tcl_GetRegExpFro
9aa0: 6d 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f mObj _ANSI_ARGS_
9ab0: 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 ((.....Tcl_Inter
9ac0: 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f p * interp, Tcl_
9ad0: 4f 62 6a 20 2a 20 70 61 74 4f 62 6a 2c 20 0a 09 Obj * patObj, ..
9ae0: 09 09 09 69 6e 74 20 66 6c 61 67 73 29 29 3b 0a ...int flags));.
9af0: 2f 2a 20 33 35 37 20 2a 2f 0a 45 58 54 45 52 4e /* 357 */.EXTERN
9b00: 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 45 Tcl_Obj *.Tcl_E
9b10: 76 61 6c 54 6f 6b 65 6e 73 20 5f 41 4e 53 49 5f valTokens _ANSI_
9b20: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
9b30: 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 p * interp, ....
9b40: 09 54 63 6c 5f 54 6f 6b 65 6e 20 2a 20 74 6f 6b .Tcl_Token * tok
9b50: 65 6e 50 74 72 2c 20 69 6e 74 20 63 6f 75 6e 74 enPtr, int count
9b60: 29 29 3b 0a 2f 2a 20 33 35 38 20 2a 2f 0a 45 58 ));./* 358 */.EX
9b70: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 46 TERN void..Tcl_F
9b80: 72 65 65 50 61 72 73 65 20 5f 41 4e 53 49 5f 41 reeParse _ANSI_A
9b90: 52 47 53 5f 28 28 54 63 6c 5f 50 61 72 73 65 20 RGS_((Tcl_Parse
9ba0: 2a 20 70 61 72 73 65 50 74 72 29 29 3b 0a 2f 2a * parsePtr));./*
9bb0: 20 33 35 39 20 2a 2f 0a 45 58 54 45 52 4e 20 76 359 */.EXTERN v
9bc0: 6f 69 64 09 09 54 63 6c 5f 4c 6f 67 43 6f 6d 6d oid..Tcl_LogComm
9bd0: 61 6e 64 49 6e 66 6f 20 5f 41 4e 53 49 5f 41 52 andInfo _ANSI_AR
9be0: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
9bf0: 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 * interp, .....C
9c00: 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 63 72 69 ONST char * scri
9c10: 70 74 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a pt, CONST char *
9c20: 20 63 6f 6d 6d 61 6e 64 2c 20 0a 09 09 09 09 69 command, .....i
9c30: 6e 74 20 6c 65 6e 67 74 68 29 29 3b 0a 2f 2a 20 nt length));./*
9c40: 33 36 30 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 360 */.EXTERN in
9c50: 74 09 09 54 63 6c 5f 50 61 72 73 65 42 72 61 63 t..Tcl_ParseBrac
9c60: 65 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 es _ANSI_ARGS_((
9c70: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
9c80: 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 erp, .....CONST
9c90: 63 68 61 72 20 2a 20 73 74 72 69 6e 67 2c 20 69 char * string, i
9ca0: 6e 74 20 6e 75 6d 42 79 74 65 73 2c 20 0a 09 09 nt numBytes, ...
9cb0: 09 09 54 63 6c 5f 50 61 72 73 65 20 2a 20 70 61 ..Tcl_Parse * pa
9cc0: 72 73 65 50 74 72 2c 20 69 6e 74 20 61 70 70 65 rsePtr, int appe
9cd0: 6e 64 2c 20 0a 09 09 09 09 43 4f 4e 53 54 38 34 nd, .....CONST84
9ce0: 20 63 68 61 72 20 2a 2a 20 74 65 72 6d 50 74 72 char ** termPtr
9cf0: 29 29 3b 0a 2f 2a 20 33 36 31 20 2a 2f 0a 45 58 ));./* 361 */.EX
9d00: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 50 61 TERN int..Tcl_Pa
9d10: 72 73 65 43 6f 6d 6d 61 6e 64 20 5f 41 4e 53 49 rseCommand _ANSI
9d20: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
9d30: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 rp * interp, ...
9d40: 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ..CONST char * s
9d50: 74 72 69 6e 67 2c 20 69 6e 74 20 6e 75 6d 42 79 tring, int numBy
9d60: 74 65 73 2c 20 0a 09 09 09 09 69 6e 74 20 6e 65 tes, .....int ne
9d70: 73 74 65 64 2c 20 54 63 6c 5f 50 61 72 73 65 20 sted, Tcl_Parse
9d80: 2a 20 70 61 72 73 65 50 74 72 29 29 3b 0a 2f 2a * parsePtr));./*
9d90: 20 33 36 32 20 2a 2f 0a 45 58 54 45 52 4e 20 69 362 */.EXTERN i
9da0: 6e 74 09 09 54 63 6c 5f 50 61 72 73 65 45 78 70 nt..Tcl_ParseExp
9db0: 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 r _ANSI_ARGS_((T
9dc0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
9dd0: 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 rp, .....CONST c
9de0: 68 61 72 20 2a 20 73 74 72 69 6e 67 2c 20 69 6e har * string, in
9df0: 74 20 6e 75 6d 42 79 74 65 73 2c 20 0a 09 09 09 t numBytes, ....
9e00: 09 54 63 6c 5f 50 61 72 73 65 20 2a 20 70 61 72 .Tcl_Parse * par
9e10: 73 65 50 74 72 29 29 3b 0a 2f 2a 20 33 36 33 20 sePtr));./* 363
9e20: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
9e30: 63 6c 5f 50 61 72 73 65 51 75 6f 74 65 64 53 74 cl_ParseQuotedSt
9e40: 72 69 6e 67 20 5f 41 4e 53 49 5f 41 52 47 53 5f ring _ANSI_ARGS_
9e50: 28 28 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 ((.....Tcl_Inter
9e60: 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 p * interp, CONS
9e70: 54 20 63 68 61 72 20 2a 20 73 74 72 69 6e 67 2c T char * string,
9e80: 20 0a 09 09 09 09 69 6e 74 20 6e 75 6d 42 79 74 .....int numByt
9e90: 65 73 2c 20 54 63 6c 5f 50 61 72 73 65 20 2a 20 es, Tcl_Parse *
9ea0: 70 61 72 73 65 50 74 72 2c 20 0a 09 09 09 09 69 parsePtr, .....i
9eb0: 6e 74 20 61 70 70 65 6e 64 2c 20 43 4f 4e 53 54 nt append, CONST
9ec0: 38 34 20 63 68 61 72 20 2a 2a 20 74 65 72 6d 50 84 char ** termP
9ed0: 74 72 29 29 3b 0a 2f 2a 20 33 36 34 20 2a 2f 0a tr));./* 364 */.
9ee0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
9ef0: 50 61 72 73 65 56 61 72 4e 61 6d 65 20 5f 41 4e ParseVarName _AN
9f00: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
9f10: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a terp * interp, .
9f20: 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a ....CONST char *
9f30: 20 73 74 72 69 6e 67 2c 20 69 6e 74 20 6e 75 6d string, int num
9f40: 42 79 74 65 73 2c 20 0a 09 09 09 09 54 63 6c 5f Bytes, .....Tcl_
9f50: 50 61 72 73 65 20 2a 20 70 61 72 73 65 50 74 72 Parse * parsePtr
9f60: 2c 20 69 6e 74 20 61 70 70 65 6e 64 29 29 3b 0a , int append));.
9f70: 2f 2a 20 33 36 35 20 2a 2f 0a 45 58 54 45 52 4e /* 365 */.EXTERN
9f80: 20 63 68 61 72 20 2a 09 09 54 63 6c 5f 47 65 74 char *..Tcl_Get
9f90: 43 77 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Cwd _ANSI_ARGS_(
9fa0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
9fb0: 74 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 44 terp, .....Tcl_D
9fc0: 53 74 72 69 6e 67 20 2a 20 63 77 64 50 74 72 29 String * cwdPtr)
9fd0: 29 3b 0a 2f 2a 20 33 36 36 20 2a 2f 0a 45 58 54 );./* 366 */.EXT
9fe0: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 43 68 64 ERN int..Tcl_Chd
9ff0: 69 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ir _ANSI_ARGS_((
a000: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 64 69 72 CONST char * dir
a010: 4e 61 6d 65 29 29 3b 0a 2f 2a 20 33 36 37 20 2a Name));./* 367 *
a020: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
a030: 6c 5f 41 63 63 65 73 73 20 5f 41 4e 53 49 5f 41 l_Access _ANSI_A
a040: 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
a050: 20 2a 20 70 61 74 68 2c 20 69 6e 74 20 6d 6f 64 * path, int mod
a060: 65 29 29 3b 0a 2f 2a 20 33 36 38 20 2a 2f 0a 45 e));./* 368 */.E
a070: 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 53 XTERN int..Tcl_S
a080: 74 61 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 tat _ANSI_ARGS_(
a090: 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 (CONST char * pa
a0a0: 74 68 2c 20 0a 09 09 09 09 73 74 72 75 63 74 20 th, .....struct
a0b0: 73 74 61 74 20 2a 20 62 75 66 50 74 72 29 29 3b stat * bufPtr));
a0c0: 0a 2f 2a 20 33 36 39 20 2a 2f 0a 45 58 54 45 52 ./* 369 */.EXTER
a0d0: 4e 20 69 6e 74 09 09 54 63 6c 5f 55 74 66 4e 63 N int..Tcl_UtfNc
a0e0: 6d 70 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 mp _ANSI_ARGS_((
a0f0: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 31 2c CONST char * s1,
a100: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
a110: 20 2a 20 73 32 2c 20 75 6e 73 69 67 6e 65 64 20 * s2, unsigned
a120: 6c 6f 6e 67 20 6e 29 29 3b 0a 2f 2a 20 33 37 30 long n));./* 370
a130: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
a140: 54 63 6c 5f 55 74 66 4e 63 61 73 65 63 6d 70 20 Tcl_UtfNcasecmp
a150: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
a160: 53 54 20 63 68 61 72 20 2a 20 73 31 2c 20 0a 09 ST char * s1, ..
a170: 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 ...CONST char *
a180: 73 32 2c 20 75 6e 73 69 67 6e 65 64 20 6c 6f 6e s2, unsigned lon
a190: 67 20 6e 29 29 3b 0a 2f 2a 20 33 37 31 20 2a 2f g n));./* 371 */
a1a0: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
a1b0: 5f 53 74 72 69 6e 67 43 61 73 65 4d 61 74 63 68 _StringCaseMatch
a1c0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f _ANSI_ARGS_((CO
a1d0: 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 NST char * str,
a1e0: 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 20 .....CONST char
a1f0: 2a 20 70 61 74 74 65 72 6e 2c 20 69 6e 74 20 6e * pattern, int n
a200: 6f 63 61 73 65 29 29 3b 0a 2f 2a 20 33 37 32 20 ocase));./* 372
a210: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
a220: 63 6c 5f 55 6e 69 43 68 61 72 49 73 43 6f 6e 74 cl_UniCharIsCont
a230: 72 6f 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 rol _ANSI_ARGS_(
a240: 28 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 37 (int ch));./* 37
a250: 33 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 3 */.EXTERN int.
a260: 09 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 47 72 .Tcl_UniCharIsGr
a270: 61 70 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 aph _ANSI_ARGS_(
a280: 28 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 37 (int ch));./* 37
a290: 34 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 4 */.EXTERN int.
a2a0: 09 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 50 72 .Tcl_UniCharIsPr
a2b0: 69 6e 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 int _ANSI_ARGS_(
a2c0: 28 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 37 (int ch));./* 37
a2d0: 35 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 5 */.EXTERN int.
a2e0: 09 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 50 75 .Tcl_UniCharIsPu
a2f0: 6e 63 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nct _ANSI_ARGS_(
a300: 28 69 6e 74 20 63 68 29 29 3b 0a 2f 2a 20 33 37 (int ch));./* 37
a310: 36 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 6 */.EXTERN int.
a320: 09 54 63 6c 5f 52 65 67 45 78 70 45 78 65 63 4f .Tcl_RegExpExecO
a330: 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 bj _ANSI_ARGS_((
a340: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
a350: 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 52 65 erp, .....Tcl_Re
a360: 67 45 78 70 20 72 65 67 65 78 70 2c 20 54 63 6c gExp regexp, Tcl
a370: 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 0a _Obj * objPtr, .
a380: 09 09 09 09 69 6e 74 20 6f 66 66 73 65 74 2c 20 ....int offset,
a390: 69 6e 74 20 6e 6d 61 74 63 68 65 73 2c 20 69 6e int nmatches, in
a3a0: 74 20 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 33 37 t flags));./* 37
a3b0: 37 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 7 */.EXTERN void
a3c0: 09 09 54 63 6c 5f 52 65 67 45 78 70 47 65 74 49 ..Tcl_RegExpGetI
a3d0: 6e 66 6f 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nfo _ANSI_ARGS_(
a3e0: 28 54 63 6c 5f 52 65 67 45 78 70 20 72 65 67 65 (Tcl_RegExp rege
a3f0: 78 70 2c 20 0a 09 09 09 09 54 63 6c 5f 52 65 67 xp, .....Tcl_Reg
a400: 45 78 70 49 6e 66 6f 20 2a 20 69 6e 66 6f 50 74 ExpInfo * infoPt
a410: 72 29 29 3b 0a 2f 2a 20 33 37 38 20 2a 2f 0a 45 r));./* 378 */.E
a420: 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 XTERN Tcl_Obj *.
a430: 54 63 6c 5f 4e 65 77 55 6e 69 63 6f 64 65 4f 62 Tcl_NewUnicodeOb
a440: 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a j _ANSI_ARGS_((.
a450: 09 09 09 09 43 4f 4e 53 54 20 54 63 6c 5f 55 6e ....CONST Tcl_Un
a460: 69 43 68 61 72 20 2a 20 75 6e 69 63 6f 64 65 2c iChar * unicode,
a470: 20 69 6e 74 20 6e 75 6d 43 68 61 72 73 29 29 3b int numChars));
a480: 0a 2f 2a 20 33 37 39 20 2a 2f 0a 45 58 54 45 52 ./* 379 */.EXTER
a490: 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 65 74 55 N void..Tcl_SetU
a4a0: 6e 69 63 6f 64 65 4f 62 6a 20 5f 41 4e 53 49 5f nicodeObj _ANSI_
a4b0: 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a ARGS_((Tcl_Obj *
a4c0: 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 09 43 4f objPtr, .....CO
a4d0: 4e 53 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 NST Tcl_UniChar
a4e0: 2a 20 75 6e 69 63 6f 64 65 2c 20 69 6e 74 20 6e * unicode, int n
a4f0: 75 6d 43 68 61 72 73 29 29 3b 0a 2f 2a 20 33 38 umChars));./* 38
a500: 30 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 0 */.EXTERN int.
a510: 09 54 63 6c 5f 47 65 74 43 68 61 72 4c 65 6e 67 .Tcl_GetCharLeng
a520: 74 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 th _ANSI_ARGS_((
a530: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
a540: 29 29 3b 0a 2f 2a 20 33 38 31 20 2a 2f 0a 45 58 ));./* 381 */.EX
a550: 54 45 52 4e 20 54 63 6c 5f 55 6e 69 43 68 61 72 TERN Tcl_UniChar
a560: 09 54 63 6c 5f 47 65 74 55 6e 69 43 68 61 72 20 .Tcl_GetUniChar
a570: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
a580: 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 0a _Obj * objPtr, .
a590: 09 09 09 09 69 6e 74 20 69 6e 64 65 78 29 29 3b ....int index));
a5a0: 0a 2f 2a 20 33 38 32 20 2a 2f 0a 45 58 54 45 52 ./* 382 */.EXTER
a5b0: 4e 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a 09 N Tcl_UniChar *.
a5c0: 54 63 6c 5f 47 65 74 55 6e 69 63 6f 64 65 20 5f Tcl_GetUnicode _
a5d0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
a5e0: 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 29 29 3b 0a Obj * objPtr));.
a5f0: 2f 2a 20 33 38 33 20 2a 2f 0a 45 58 54 45 52 4e /* 383 */.EXTERN
a600: 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 47 Tcl_Obj *.Tcl_G
a610: 65 74 52 61 6e 67 65 20 5f 41 4e 53 49 5f 41 52 etRange _ANSI_AR
a620: 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f GS_((Tcl_Obj * o
a630: 62 6a 50 74 72 2c 20 0a 09 09 09 09 69 6e 74 20 bjPtr, .....int
a640: 66 69 72 73 74 2c 20 69 6e 74 20 6c 61 73 74 29 first, int last)
a650: 29 3b 0a 2f 2a 20 33 38 34 20 2a 2f 0a 45 58 54 );./* 384 */.EXT
a660: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 41 70 ERN void..Tcl_Ap
a670: 70 65 6e 64 55 6e 69 63 6f 64 65 54 6f 4f 62 6a pendUnicodeToObj
a680: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
a690: 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 l_Obj * objPtr,
a6a0: 0a 09 09 09 09 43 4f 4e 53 54 20 54 63 6c 5f 55 .....CONST Tcl_U
a6b0: 6e 69 43 68 61 72 20 2a 20 75 6e 69 63 6f 64 65 niChar * unicode
a6c0: 2c 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 3b 0a , int length));.
a6d0: 2f 2a 20 33 38 35 20 2a 2f 0a 45 58 54 45 52 4e /* 385 */.EXTERN
a6e0: 20 69 6e 74 09 09 54 63 6c 5f 52 65 67 45 78 70 int..Tcl_RegExp
a6f0: 4d 61 74 63 68 4f 62 6a 20 5f 41 4e 53 49 5f 41 MatchObj _ANSI_A
a700: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
a710: 20 2a 20 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 * interp, .....
a720: 54 63 6c 5f 4f 62 6a 20 2a 20 73 74 72 69 6e 67 Tcl_Obj * string
a730: 4f 62 6a 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 70 Obj, Tcl_Obj * p
a740: 61 74 74 65 72 6e 4f 62 6a 29 29 3b 0a 2f 2a 20 atternObj));./*
a750: 33 38 36 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 386 */.EXTERN vo
a760: 69 64 09 09 54 63 6c 5f 53 65 74 4e 6f 74 69 66 id..Tcl_SetNotif
a770: 69 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ier _ANSI_ARGS_(
a780: 28 0a 09 09 09 09 54 63 6c 5f 4e 6f 74 69 66 69 (.....Tcl_Notifi
a790: 65 72 50 72 6f 63 73 20 2a 20 6e 6f 74 69 66 69 erProcs * notifi
a7a0: 65 72 50 72 6f 63 50 74 72 29 29 3b 0a 2f 2a 20 erProcPtr));./*
a7b0: 33 38 37 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 387 */.EXTERN Tc
a7c0: 6c 5f 4d 75 74 65 78 20 2a 09 54 63 6c 5f 47 65 l_Mutex *.Tcl_Ge
a7d0: 74 41 6c 6c 6f 63 4d 75 74 65 78 20 5f 41 4e 53 tAllocMutex _ANS
a7e0: 49 5f 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b I_ARGS_((void));
a7f0: 0a 2f 2a 20 33 38 38 20 2a 2f 0a 45 58 54 45 52 ./* 388 */.EXTER
a800: 4e 20 69 6e 74 09 09 54 63 6c 5f 47 65 74 43 68 N int..Tcl_GetCh
a810: 61 6e 6e 65 6c 4e 61 6d 65 73 20 5f 41 4e 53 49 annelNames _ANSI
a820: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
a830: 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 0a 2f rp * interp));./
a840: 2a 20 33 38 39 20 2a 2f 0a 45 58 54 45 52 4e 20 * 389 */.EXTERN
a850: 69 6e 74 09 09 54 63 6c 5f 47 65 74 43 68 61 6e int..Tcl_GetChan
a860: 6e 65 6c 4e 61 6d 65 73 45 78 20 5f 41 4e 53 49 nelNamesEx _ANSI
a870: 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c _ARGS_((.....Tcl
a880: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
a890: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 , CONST char * p
a8a0: 61 74 74 65 72 6e 29 29 3b 0a 2f 2a 20 33 39 30 attern));./* 390
a8b0: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
a8c0: 54 63 6c 5f 50 72 6f 63 4f 62 6a 43 6d 64 20 5f Tcl_ProcObjCmd _
a8d0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 6c 69 65 ANSI_ARGS_((Clie
a8e0: 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 ntData clientDat
a8f0: 61 2c 20 0a 09 09 09 09 54 63 6c 5f 49 6e 74 65 a, .....Tcl_Inte
a900: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e 74 rp * interp, int
a910: 20 6f 62 6a 63 2c 20 0a 09 09 09 09 54 63 6c 5f objc, .....Tcl_
a920: 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b Obj *CONST objv[
a930: 5d 29 29 3b 0a 2f 2a 20 33 39 31 20 2a 2f 0a 45 ]));./* 391 */.E
a940: 58 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f XTERN void..Tcl_
a950: 43 6f 6e 64 69 74 69 6f 6e 46 69 6e 61 6c 69 7a ConditionFinaliz
a960: 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a e _ANSI_ARGS_((.
a970: 09 09 09 09 54 63 6c 5f 43 6f 6e 64 69 74 69 6f ....Tcl_Conditio
a980: 6e 20 2a 20 63 6f 6e 64 50 74 72 29 29 3b 0a 2f n * condPtr));./
a990: 2a 20 33 39 32 20 2a 2f 0a 45 58 54 45 52 4e 20 * 392 */.EXTERN
a9a0: 76 6f 69 64 09 09 54 63 6c 5f 4d 75 74 65 78 46 void..Tcl_MutexF
a9b0: 69 6e 61 6c 69 7a 65 20 5f 41 4e 53 49 5f 41 52 inalize _ANSI_AR
a9c0: 47 53 5f 28 28 54 63 6c 5f 4d 75 74 65 78 20 2a GS_((Tcl_Mutex *
a9d0: 20 6d 75 74 65 78 29 29 3b 0a 2f 2a 20 33 39 33 mutex));./* 393
a9e0: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
a9f0: 54 63 6c 5f 43 72 65 61 74 65 54 68 72 65 61 64 Tcl_CreateThread
aa00: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
aa10: 6c 5f 54 68 72 65 61 64 49 64 20 2a 20 69 64 50 l_ThreadId * idP
aa20: 74 72 2c 20 0a 09 09 09 09 54 63 6c 5f 54 68 72 tr, .....Tcl_Thr
aa30: 65 61 64 43 72 65 61 74 65 50 72 6f 63 20 70 72 eadCreateProc pr
aa40: 6f 63 2c 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 oc, .....ClientD
aa50: 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 2c 20 ata clientData,
aa60: 69 6e 74 20 73 74 61 63 6b 53 69 7a 65 2c 20 0a int stackSize, .
aa70: 09 09 09 09 69 6e 74 20 66 6c 61 67 73 29 29 3b ....int flags));
aa80: 0a 2f 2a 20 33 39 34 20 2a 2f 0a 45 58 54 45 52 ./* 394 */.EXTER
aa90: 4e 20 69 6e 74 09 09 54 63 6c 5f 52 65 61 64 52 N int..Tcl_ReadR
aaa0: 61 77 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 aw _ANSI_ARGS_((
aab0: 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e Tcl_Channel chan
aac0: 2c 20 0a 09 09 09 09 63 68 61 72 20 2a 20 64 73 , .....char * ds
aad0: 74 2c 20 69 6e 74 20 62 79 74 65 73 54 6f 52 65 t, int bytesToRe
aae0: 61 64 29 29 3b 0a 2f 2a 20 33 39 35 20 2a 2f 0a ad));./* 395 */.
aaf0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
ab00: 57 72 69 74 65 52 61 77 20 5f 41 4e 53 49 5f 41 WriteRaw _ANSI_A
ab10: 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 RGS_((Tcl_Channe
ab20: 6c 20 63 68 61 6e 2c 20 0a 09 09 09 09 43 4f 4e l chan, .....CON
ab30: 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 69 ST char * src, i
ab40: 6e 74 20 73 72 63 4c 65 6e 29 29 3b 0a 2f 2a 20 nt srcLen));./*
ab50: 33 39 36 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 396 */.EXTERN Tc
ab60: 6c 5f 43 68 61 6e 6e 65 6c 09 54 63 6c 5f 47 65 l_Channel.Tcl_Ge
ab70: 74 54 6f 70 43 68 61 6e 6e 65 6c 20 5f 41 4e 53 tTopChannel _ANS
ab80: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
ab90: 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 nnel chan));./*
aba0: 33 39 37 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 397 */.EXTERN in
abb0: 74 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 42 75 t..Tcl_ChannelBu
abc0: 66 66 65 72 65 64 20 5f 41 4e 53 49 5f 41 52 47 ffered _ANSI_ARG
abd0: 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 S_((Tcl_Channel
abe0: 63 68 61 6e 29 29 3b 0a 2f 2a 20 33 39 38 20 2a chan));./* 398 *
abf0: 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 53 54 38 34 /.EXTERN CONST84
ac00: 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 54 _RETURN char * T
ac10: 63 6c 5f 43 68 61 6e 6e 65 6c 4e 61 6d 65 20 5f cl_ChannelName _
ac20: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
ac30: 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 .Tcl_ChannelType
ac40: 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 29 29 * chanTypePtr))
ac50: 3b 0a 2f 2a 20 33 39 39 20 2a 2f 0a 45 58 54 45 ;./* 399 */.EXTE
ac60: 52 4e 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 RN Tcl_ChannelTy
ac70: 70 65 56 65 72 73 69 6f 6e 20 54 63 6c 5f 43 68 peVersion Tcl_Ch
ac80: 61 6e 6e 65 6c 56 65 72 73 69 6f 6e 20 5f 41 4e annelVersion _AN
ac90: 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 SI_ARGS_((.....T
aca0: 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 20 2a cl_ChannelType *
acb0: 20 63 68 61 6e 54 79 70 65 50 74 72 29 29 3b 0a chanTypePtr));.
acc0: 2f 2a 20 34 30 30 20 2a 2f 0a 45 58 54 45 52 4e /* 400 */.EXTERN
acd0: 20 54 63 6c 5f 44 72 69 76 65 72 42 6c 6f 63 6b Tcl_DriverBlock
ace0: 4d 6f 64 65 50 72 6f 63 20 2a 20 54 63 6c 5f 43 ModeProc * Tcl_C
acf0: 68 61 6e 6e 65 6c 42 6c 6f 63 6b 4d 6f 64 65 50 hannelBlockModeP
ad00: 72 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 roc _ANSI_ARGS_(
ad10: 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 (.....Tcl_Channe
ad20: 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 lType * chanType
ad30: 50 74 72 29 29 3b 0a 2f 2a 20 34 30 31 20 2a 2f Ptr));./* 401 */
ad40: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 44 72 69 76 .EXTERN Tcl_Driv
ad50: 65 72 43 6c 6f 73 65 50 72 6f 63 20 2a 20 54 63 erCloseProc * Tc
ad60: 6c 5f 43 68 61 6e 6e 65 6c 43 6c 6f 73 65 50 72 l_ChannelClosePr
ad70: 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 oc _ANSI_ARGS_((
ad80: 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c .....Tcl_Channel
ad90: 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 50 Type * chanTypeP
ada0: 74 72 29 29 3b 0a 2f 2a 20 34 30 32 20 2a 2f 0a tr));./* 402 */.
adb0: 45 58 54 45 52 4e 20 54 63 6c 5f 44 72 69 76 65 EXTERN Tcl_Drive
adc0: 72 43 6c 6f 73 65 32 50 72 6f 63 20 2a 20 54 63 rClose2Proc * Tc
add0: 6c 5f 43 68 61 6e 6e 65 6c 43 6c 6f 73 65 32 50 l_ChannelClose2P
ade0: 72 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 roc _ANSI_ARGS_(
adf0: 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 (.....Tcl_Channe
ae00: 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 lType * chanType
ae10: 50 74 72 29 29 3b 0a 2f 2a 20 34 30 33 20 2a 2f Ptr));./* 403 */
ae20: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 44 72 69 76 .EXTERN Tcl_Driv
ae30: 65 72 49 6e 70 75 74 50 72 6f 63 20 2a 20 54 63 erInputProc * Tc
ae40: 6c 5f 43 68 61 6e 6e 65 6c 49 6e 70 75 74 50 72 l_ChannelInputPr
ae50: 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 oc _ANSI_ARGS_((
ae60: 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c .....Tcl_Channel
ae70: 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 50 Type * chanTypeP
ae80: 74 72 29 29 3b 0a 2f 2a 20 34 30 34 20 2a 2f 0a tr));./* 404 */.
ae90: 45 58 54 45 52 4e 20 54 63 6c 5f 44 72 69 76 65 EXTERN Tcl_Drive
aea0: 72 4f 75 74 70 75 74 50 72 6f 63 20 2a 20 54 63 rOutputProc * Tc
aeb0: 6c 5f 43 68 61 6e 6e 65 6c 4f 75 74 70 75 74 50 l_ChannelOutputP
aec0: 72 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 roc _ANSI_ARGS_(
aed0: 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 (.....Tcl_Channe
aee0: 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 lType * chanType
aef0: 50 74 72 29 29 3b 0a 2f 2a 20 34 30 35 20 2a 2f Ptr));./* 405 */
af00: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 44 72 69 76 .EXTERN Tcl_Driv
af10: 65 72 53 65 65 6b 50 72 6f 63 20 2a 20 54 63 6c erSeekProc * Tcl
af20: 5f 43 68 61 6e 6e 65 6c 53 65 65 6b 50 72 6f 63 _ChannelSeekProc
af30: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
af40: 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 ...Tcl_ChannelTy
af50: 70 65 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 pe * chanTypePtr
af60: 29 29 3b 0a 2f 2a 20 34 30 36 20 2a 2f 0a 45 58 ));./* 406 */.EX
af70: 54 45 52 4e 20 54 63 6c 5f 44 72 69 76 65 72 53 TERN Tcl_DriverS
af80: 65 74 4f 70 74 69 6f 6e 50 72 6f 63 20 2a 20 54 etOptionProc * T
af90: 63 6c 5f 43 68 61 6e 6e 65 6c 53 65 74 4f 70 74 cl_ChannelSetOpt
afa0: 69 6f 6e 50 72 6f 63 20 5f 41 4e 53 49 5f 41 52 ionProc _ANSI_AR
afb0: 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 43 68 GS_((.....Tcl_Ch
afc0: 61 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 61 6e annelType * chan
afd0: 54 79 70 65 50 74 72 29 29 3b 0a 2f 2a 20 34 30 TypePtr));./* 40
afe0: 37 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 7 */.EXTERN Tcl_
aff0: 44 72 69 76 65 72 47 65 74 4f 70 74 69 6f 6e 50 DriverGetOptionP
b000: 72 6f 63 20 2a 20 54 63 6c 5f 43 68 61 6e 6e 65 roc * Tcl_Channe
b010: 6c 47 65 74 4f 70 74 69 6f 6e 50 72 6f 63 20 5f lGetOptionProc _
b020: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
b030: 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 .Tcl_ChannelType
b040: 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 29 29 * chanTypePtr))
b050: 3b 0a 2f 2a 20 34 30 38 20 2a 2f 0a 45 58 54 45 ;./* 408 */.EXTE
b060: 52 4e 20 54 63 6c 5f 44 72 69 76 65 72 57 61 74 RN Tcl_DriverWat
b070: 63 68 50 72 6f 63 20 2a 20 54 63 6c 5f 43 68 61 chProc * Tcl_Cha
b080: 6e 6e 65 6c 57 61 74 63 68 50 72 6f 63 20 5f 41 nnelWatchProc _A
b090: 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 NSI_ARGS_((.....
b0a0: 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 20 Tcl_ChannelType
b0b0: 2a 20 63 68 61 6e 54 79 70 65 50 74 72 29 29 3b * chanTypePtr));
b0c0: 0a 2f 2a 20 34 30 39 20 2a 2f 0a 45 58 54 45 52 ./* 409 */.EXTER
b0d0: 4e 20 54 63 6c 5f 44 72 69 76 65 72 47 65 74 48 N Tcl_DriverGetH
b0e0: 61 6e 64 6c 65 50 72 6f 63 20 2a 20 54 63 6c 5f andleProc * Tcl_
b0f0: 43 68 61 6e 6e 65 6c 47 65 74 48 61 6e 64 6c 65 ChannelGetHandle
b100: 50 72 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f Proc _ANSI_ARGS_
b110: 28 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e ((.....Tcl_Chann
b120: 65 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 elType * chanTyp
b130: 65 50 74 72 29 29 3b 0a 2f 2a 20 34 31 30 20 2a ePtr));./* 410 *
b140: 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 44 72 69 /.EXTERN Tcl_Dri
b150: 76 65 72 46 6c 75 73 68 50 72 6f 63 20 2a 20 54 verFlushProc * T
b160: 63 6c 5f 43 68 61 6e 6e 65 6c 46 6c 75 73 68 50 cl_ChannelFlushP
b170: 72 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 roc _ANSI_ARGS_(
b180: 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 (.....Tcl_Channe
b190: 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 lType * chanType
b1a0: 50 74 72 29 29 3b 0a 2f 2a 20 34 31 31 20 2a 2f Ptr));./* 411 */
b1b0: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 44 72 69 76 .EXTERN Tcl_Driv
b1c0: 65 72 48 61 6e 64 6c 65 72 50 72 6f 63 20 2a 20 erHandlerProc *
b1d0: 54 63 6c 5f 43 68 61 6e 6e 65 6c 48 61 6e 64 6c Tcl_ChannelHandl
b1e0: 65 72 50 72 6f 63 20 5f 41 4e 53 49 5f 41 52 47 erProc _ANSI_ARG
b1f0: 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 43 68 61 S_((.....Tcl_Cha
b200: 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 nnelType * chanT
b210: 79 70 65 50 74 72 29 29 3b 0a 2f 2a 20 34 31 32 ypePtr));./* 412
b220: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
b230: 54 63 6c 5f 4a 6f 69 6e 54 68 72 65 61 64 20 5f Tcl_JoinThread _
b240: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
b250: 54 68 72 65 61 64 49 64 20 69 64 2c 20 0a 09 09 ThreadId id, ...
b260: 09 09 69 6e 74 2a 20 72 65 73 75 6c 74 29 29 3b ..int* result));
b270: 0a 2f 2a 20 34 31 33 20 2a 2f 0a 45 58 54 45 52 ./* 413 */.EXTER
b280: 4e 20 69 6e 74 09 09 54 63 6c 5f 49 73 43 68 61 N int..Tcl_IsCha
b290: 6e 6e 65 6c 53 68 61 72 65 64 20 5f 41 4e 53 49 nnelShared _ANSI
b2a0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e _ARGS_((Tcl_Chan
b2b0: 6e 65 6c 20 63 68 61 6e 6e 65 6c 29 29 3b 0a 2f nel channel));./
b2c0: 2a 20 34 31 34 20 2a 2f 0a 45 58 54 45 52 4e 20 * 414 */.EXTERN
b2d0: 69 6e 74 09 09 54 63 6c 5f 49 73 43 68 61 6e 6e int..Tcl_IsChann
b2e0: 65 6c 52 65 67 69 73 74 65 72 65 64 20 5f 41 4e elRegistered _AN
b2f0: 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 SI_ARGS_((.....T
b300: 63 6c 5f 49 6e 74 65 72 70 2a 20 69 6e 74 65 72 cl_Interp* inter
b310: 70 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 p, Tcl_Channel c
b320: 68 61 6e 6e 65 6c 29 29 3b 0a 2f 2a 20 34 31 35 hannel));./* 415
b330: 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 */.EXTERN void.
b340: 09 54 63 6c 5f 43 75 74 43 68 61 6e 6e 65 6c 20 .Tcl_CutChannel
b350: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
b360: 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c _Channel channel
b370: 29 29 3b 0a 2f 2a 20 34 31 36 20 2a 2f 0a 45 58 ));./* 416 */.EX
b380: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 TERN void..Tcl_S
b390: 70 6c 69 63 65 43 68 61 6e 6e 65 6c 20 5f 41 4e pliceChannel _AN
b3a0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 SI_ARGS_((Tcl_Ch
b3b0: 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c 29 29 3b annel channel));
b3c0: 0a 2f 2a 20 34 31 37 20 2a 2f 0a 45 58 54 45 52 ./* 417 */.EXTER
b3d0: 4e 20 76 6f 69 64 09 09 54 63 6c 5f 43 6c 65 61 N void..Tcl_Clea
b3e0: 72 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 73 rChannelHandlers
b3f0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
b400: 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 ...Tcl_Channel c
b410: 68 61 6e 6e 65 6c 29 29 3b 0a 2f 2a 20 34 31 38 hannel));./* 418
b420: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
b430: 54 63 6c 5f 49 73 43 68 61 6e 6e 65 6c 45 78 69 Tcl_IsChannelExi
b440: 73 74 69 6e 67 20 5f 41 4e 53 49 5f 41 52 47 53 sting _ANSI_ARGS
b450: 5f 28 28 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 _((.....CONST ch
b460: 61 72 2a 20 63 68 61 6e 6e 65 6c 4e 61 6d 65 29 ar* channelName)
b470: 29 3b 0a 2f 2a 20 34 31 39 20 2a 2f 0a 45 58 54 );./* 419 */.EXT
b480: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 55 6e 69 ERN int..Tcl_Uni
b490: 43 68 61 72 4e 63 61 73 65 63 6d 70 20 5f 41 4e CharNcasecmp _AN
b4a0: 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 43 SI_ARGS_((.....C
b4b0: 4f 4e 53 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 ONST Tcl_UniChar
b4c0: 20 2a 20 63 73 2c 20 0a 09 09 09 09 43 4f 4e 53 * cs, .....CONS
b4d0: 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a 20 T Tcl_UniChar *
b4e0: 63 74 2c 20 75 6e 73 69 67 6e 65 64 20 6c 6f 6e ct, unsigned lon
b4f0: 67 20 6e 29 29 3b 0a 2f 2a 20 34 32 30 20 2a 2f g n));./* 420 */
b500: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
b510: 5f 55 6e 69 43 68 61 72 43 61 73 65 4d 61 74 63 _UniCharCaseMatc
b520: 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a h _ANSI_ARGS_((.
b530: 09 09 09 09 43 4f 4e 53 54 20 54 63 6c 5f 55 6e ....CONST Tcl_Un
b540: 69 43 68 61 72 20 2a 20 75 73 74 72 2c 20 0a 09 iChar * ustr, ..
b550: 09 09 09 43 4f 4e 53 54 20 54 63 6c 5f 55 6e 69 ...CONST Tcl_Uni
b560: 43 68 61 72 20 2a 20 70 61 74 74 65 72 6e 2c 20 Char * pattern,
b570: 69 6e 74 20 6e 6f 63 61 73 65 29 29 3b 0a 2f 2a int nocase));./*
b580: 20 34 32 31 20 2a 2f 0a 45 58 54 45 52 4e 20 54 421 */.EXTERN T
b590: 63 6c 5f 48 61 73 68 45 6e 74 72 79 20 2a 09 54 cl_HashEntry *.T
b5a0: 63 6c 5f 46 69 6e 64 48 61 73 68 45 6e 74 72 79 cl_FindHashEntry
b5b0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
b5c0: 09 09 09 54 63 6c 5f 48 61 73 68 54 61 62 6c 65 ...Tcl_HashTable
b5d0: 20 2a 20 74 61 62 6c 65 50 74 72 2c 20 43 4f 4e * tablePtr, CON
b5e0: 53 54 20 63 68 61 72 20 2a 20 6b 65 79 29 29 3b ST char * key));
b5f0: 0a 2f 2a 20 34 32 32 20 2a 2f 0a 45 58 54 45 52 ./* 422 */.EXTER
b600: 4e 20 54 63 6c 5f 48 61 73 68 45 6e 74 72 79 20 N Tcl_HashEntry
b610: 2a 09 54 63 6c 5f 43 72 65 61 74 65 48 61 73 68 *.Tcl_CreateHash
b620: 45 6e 74 72 79 20 5f 41 4e 53 49 5f 41 52 47 53 Entry _ANSI_ARGS
b630: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 48 61 73 68 _((.....Tcl_Hash
b640: 54 61 62 6c 65 20 2a 20 74 61 62 6c 65 50 74 72 Table * tablePtr
b650: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6b , CONST char * k
b660: 65 79 2c 20 0a 09 09 09 09 69 6e 74 20 2a 20 6e ey, .....int * n
b670: 65 77 50 74 72 29 29 3b 0a 2f 2a 20 34 32 33 20 ewPtr));./* 423
b680: 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 64 09 09 */.EXTERN void..
b690: 54 63 6c 5f 49 6e 69 74 43 75 73 74 6f 6d 48 61 Tcl_InitCustomHa
b6a0: 73 68 54 61 62 6c 65 20 5f 41 4e 53 49 5f 41 52 shTable _ANSI_AR
b6b0: 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 48 61 GS_((.....Tcl_Ha
b6c0: 73 68 54 61 62 6c 65 20 2a 20 74 61 62 6c 65 50 shTable * tableP
b6d0: 74 72 2c 20 69 6e 74 20 6b 65 79 54 79 70 65 2c tr, int keyType,
b6e0: 20 0a 09 09 09 09 54 63 6c 5f 48 61 73 68 4b 65 .....Tcl_HashKe
b6f0: 79 54 79 70 65 20 2a 20 74 79 70 65 50 74 72 29 yType * typePtr)
b700: 29 3b 0a 2f 2a 20 34 32 34 20 2a 2f 0a 45 58 54 );./* 424 */.EXT
b710: 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 49 6e ERN void..Tcl_In
b720: 69 74 4f 62 6a 48 61 73 68 54 61 62 6c 65 20 5f itObjHashTable _
b730: 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 ANSI_ARGS_((....
b740: 09 54 63 6c 5f 48 61 73 68 54 61 62 6c 65 20 2a .Tcl_HashTable *
b750: 20 74 61 62 6c 65 50 74 72 29 29 3b 0a 2f 2a 20 tablePtr));./*
b760: 34 32 35 20 2a 2f 0a 45 58 54 45 52 4e 20 43 6c 425 */.EXTERN Cl
b770: 69 65 6e 74 44 61 74 61 09 54 63 6c 5f 43 6f 6d ientData.Tcl_Com
b780: 6d 61 6e 64 54 72 61 63 65 49 6e 66 6f 20 5f 41 mandTraceInfo _A
b790: 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 NSI_ARGS_((.....
b7a0: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
b7b0: 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 erp, CONST char
b7c0: 2a 20 76 61 72 4e 61 6d 65 2c 20 0a 09 09 09 09 * varName, .....
b7d0: 69 6e 74 20 66 6c 61 67 73 2c 20 54 63 6c 5f 43 int flags, Tcl_C
b7e0: 6f 6d 6d 61 6e 64 54 72 61 63 65 50 72 6f 63 20 ommandTraceProc
b7f0: 2a 20 70 72 6f 63 50 74 72 2c 20 0a 09 09 09 09 * procPtr, .....
b800: 43 6c 69 65 6e 74 44 61 74 61 20 70 72 65 76 43 ClientData prevC
b810: 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 lientData));./*
b820: 34 32 36 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 426 */.EXTERN in
b830: 74 09 09 54 63 6c 5f 54 72 61 63 65 43 6f 6d 6d t..Tcl_TraceComm
b840: 61 6e 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 and _ANSI_ARGS_(
b850: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
b860: 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 terp, .....CONST
b870: 20 63 68 61 72 20 2a 20 76 61 72 4e 61 6d 65 2c char * varName,
b880: 20 69 6e 74 20 66 6c 61 67 73 2c 20 0a 09 09 09 int flags, ....
b890: 09 54 63 6c 5f 43 6f 6d 6d 61 6e 64 54 72 61 63 .Tcl_CommandTrac
b8a0: 65 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 0a 09 eProc * proc, ..
b8b0: 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 6c ...ClientData cl
b8c0: 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 34 ientData));./* 4
b8d0: 32 37 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 69 27 */.EXTERN voi
b8e0: 64 09 09 54 63 6c 5f 55 6e 74 72 61 63 65 43 6f d..Tcl_UntraceCo
b8f0: 6d 6d 61 6e 64 20 5f 41 4e 53 49 5f 41 52 47 53 mmand _ANSI_ARGS
b900: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
b910: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 43 4f 4e interp, .....CON
b920: 53 54 20 63 68 61 72 20 2a 20 76 61 72 4e 61 6d ST char * varNam
b930: 65 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 0a 09 e, int flags, ..
b940: 09 09 09 54 63 6c 5f 43 6f 6d 6d 61 6e 64 54 72 ...Tcl_CommandTr
b950: 61 63 65 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 aceProc * proc,
b960: 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 .....ClientData
b970: 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a clientData));./*
b980: 20 34 32 38 20 2a 2f 0a 45 58 54 45 52 4e 20 63 428 */.EXTERN c
b990: 68 61 72 20 2a 09 09 54 63 6c 5f 41 74 74 65 6d har *..Tcl_Attem
b9a0: 70 74 41 6c 6c 6f 63 20 5f 41 4e 53 49 5f 41 52 ptAlloc _ANSI_AR
b9b0: 47 53 5f 28 28 75 6e 73 69 67 6e 65 64 20 69 6e GS_((unsigned in
b9c0: 74 20 73 69 7a 65 29 29 3b 0a 2f 2a 20 34 32 39 t size));./* 429
b9d0: 20 2a 2f 0a 45 58 54 45 52 4e 20 63 68 61 72 20 */.EXTERN char
b9e0: 2a 09 09 54 63 6c 5f 41 74 74 65 6d 70 74 44 62 *..Tcl_AttemptDb
b9f0: 43 6b 61 6c 6c 6f 63 20 5f 41 4e 53 49 5f 41 52 Ckalloc _ANSI_AR
ba00: 47 53 5f 28 28 75 6e 73 69 67 6e 65 64 20 69 6e GS_((unsigned in
ba10: 74 20 73 69 7a 65 2c 20 0a 09 09 09 09 43 4f 4e t size, .....CON
ba20: 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 ST char * file,
ba30: 69 6e 74 20 6c 69 6e 65 29 29 3b 0a 2f 2a 20 34 int line));./* 4
ba40: 33 30 20 2a 2f 0a 45 58 54 45 52 4e 20 63 68 61 30 */.EXTERN cha
ba50: 72 20 2a 09 09 54 63 6c 5f 41 74 74 65 6d 70 74 r *..Tcl_Attempt
ba60: 52 65 61 6c 6c 6f 63 20 5f 41 4e 53 49 5f 41 52 Realloc _ANSI_AR
ba70: 47 53 5f 28 28 63 68 61 72 20 2a 20 70 74 72 2c GS_((char * ptr,
ba80: 20 0a 09 09 09 09 75 6e 73 69 67 6e 65 64 20 69 .....unsigned i
ba90: 6e 74 20 73 69 7a 65 29 29 3b 0a 2f 2a 20 34 33 nt size));./* 43
baa0: 31 20 2a 2f 0a 45 58 54 45 52 4e 20 63 68 61 72 1 */.EXTERN char
bab0: 20 2a 09 09 54 63 6c 5f 41 74 74 65 6d 70 74 44 *..Tcl_AttemptD
bac0: 62 43 6b 72 65 61 6c 6c 6f 63 20 5f 41 4e 53 49 bCkrealloc _ANSI
bad0: 5f 41 52 47 53 5f 28 28 63 68 61 72 20 2a 20 70 _ARGS_((char * p
bae0: 74 72 2c 20 0a 09 09 09 09 75 6e 73 69 67 6e 65 tr, .....unsigne
baf0: 64 20 69 6e 74 20 73 69 7a 65 2c 20 43 4f 4e 53 d int size, CONS
bb00: 54 20 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 0a T char * file, .
bb10: 09 09 09 09 69 6e 74 20 6c 69 6e 65 29 29 3b 0a ....int line));.
bb20: 2f 2a 20 34 33 32 20 2a 2f 0a 45 58 54 45 52 4e /* 432 */.EXTERN
bb30: 20 69 6e 74 09 09 54 63 6c 5f 41 74 74 65 6d 70 int..Tcl_Attemp
bb40: 74 53 65 74 4f 62 6a 4c 65 6e 67 74 68 20 5f 41 tSetObjLength _A
bb50: 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 NSI_ARGS_((.....
bb60: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
bb70: 2c 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 3b 0a , int length));.
bb80: 2f 2a 20 34 33 33 20 2a 2f 0a 45 58 54 45 52 4e /* 433 */.EXTERN
bb90: 20 54 63 6c 5f 54 68 72 65 61 64 49 64 09 54 63 Tcl_ThreadId.Tc
bba0: 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 54 68 72 65 l_GetChannelThre
bbb0: 61 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ad _ANSI_ARGS_((
bbc0: 0a 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c .....Tcl_Channel
bbd0: 20 63 68 61 6e 6e 65 6c 29 29 3b 0a 2f 2a 20 34 channel));./* 4
bbe0: 33 34 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 34 */.EXTERN Tcl
bbf0: 5f 55 6e 69 43 68 61 72 20 2a 09 54 63 6c 5f 47 _UniChar *.Tcl_G
bc00: 65 74 55 6e 69 63 6f 64 65 46 72 6f 6d 4f 62 6a etUnicodeFromObj
bc10: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
bc20: 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 l_Obj * objPtr,
bc30: 0a 09 09 09 09 69 6e 74 20 2a 20 6c 65 6e 67 74 .....int * lengt
bc40: 68 50 74 72 29 29 3b 0a 2f 2a 20 34 33 35 20 2a hPtr));./* 435 *
bc50: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
bc60: 6c 5f 47 65 74 4d 61 74 68 46 75 6e 63 49 6e 66 l_GetMathFuncInf
bc70: 6f 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 o _ANSI_ARGS_((T
bc80: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
bc90: 72 70 2c 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 rp, .....CONST c
bca0: 68 61 72 20 2a 20 6e 61 6d 65 2c 20 69 6e 74 20 har * name, int
bcb0: 2a 20 6e 75 6d 41 72 67 73 50 74 72 2c 20 0a 09 * numArgsPtr, ..
bcc0: 09 09 09 54 63 6c 5f 56 61 6c 75 65 54 79 70 65 ...Tcl_ValueType
bcd0: 20 2a 2a 20 61 72 67 54 79 70 65 73 50 74 72 2c ** argTypesPtr,
bce0: 20 0a 09 09 09 09 54 63 6c 5f 4d 61 74 68 50 72 .....Tcl_MathPr
bcf0: 6f 63 20 2a 2a 20 70 72 6f 63 50 74 72 2c 20 0a oc ** procPtr, .
bd00: 09 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 2a ....ClientData *
bd10: 20 63 6c 69 65 6e 74 44 61 74 61 50 74 72 29 29 clientDataPtr))
bd20: 3b 0a 2f 2a 20 34 33 36 20 2a 2f 0a 45 58 54 45 ;./* 436 */.EXTE
bd30: 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c RN Tcl_Obj *.Tcl
bd40: 5f 4c 69 73 74 4d 61 74 68 46 75 6e 63 73 20 5f _ListMathFuncs _
bd50: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
bd60: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
bd70: 20 0a 09 09 09 09 43 4f 4e 53 54 20 63 68 61 72 .....CONST char
bd80: 20 2a 20 70 61 74 74 65 72 6e 29 29 3b 0a 2f 2a * pattern));./*
bd90: 20 34 33 37 20 2a 2f 0a 45 58 54 45 52 4e 20 54 437 */.EXTERN T
bda0: 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f 53 75 62 cl_Obj *.Tcl_Sub
bdb0: 73 74 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 stObj _ANSI_ARGS
bdc0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
bdd0: 69 6e 74 65 72 70 2c 20 0a 09 09 09 09 54 63 6c interp, .....Tcl
bde0: 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 _Obj * objPtr, i
bdf0: 6e 74 20 66 6c 61 67 73 29 29 3b 0a 2f 2a 20 34 nt flags));./* 4
be00: 33 38 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 38 */.EXTERN int
be10: 09 09 54 63 6c 5f 44 65 74 61 63 68 43 68 61 6e ..Tcl_DetachChan
be20: 6e 65 6c 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nel _ANSI_ARGS_(
be30: 28 54 63 6c 5f 49 6e 74 65 72 70 2a 20 69 6e 74 (Tcl_Interp* int
be40: 65 72 70 2c 20 0a 09 09 09 09 54 63 6c 5f 43 68 erp, .....Tcl_Ch
be50: 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c 29 29 3b annel channel));
be60: 0a 2f 2a 20 34 33 39 20 2a 2f 0a 45 58 54 45 52 ./* 439 */.EXTER
be70: 4e 20 69 6e 74 09 09 54 63 6c 5f 49 73 53 74 61 N int..Tcl_IsSta
be80: 6e 64 61 72 64 43 68 61 6e 6e 65 6c 20 5f 41 4e ndardChannel _AN
be90: 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 SI_ARGS_((.....T
bea0: 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 6e cl_Channel chann
beb0: 65 6c 29 29 3b 0a 2f 2a 20 34 34 30 20 2a 2f 0a el));./* 440 */.
bec0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
bed0: 46 53 43 6f 70 79 46 69 6c 65 20 5f 41 4e 53 49 FSCopyFile _ANSI
bee0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 _ARGS_((Tcl_Obj
bef0: 2a 20 73 72 63 50 61 74 68 50 74 72 2c 20 0a 09 * srcPathPtr, ..
bf00: 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 64 65 73 ...Tcl_Obj * des
bf10: 74 50 61 74 68 50 74 72 29 29 3b 0a 2f 2a 20 34 tPathPtr));./* 4
bf20: 34 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 41 */.EXTERN int
bf30: 09 09 54 63 6c 5f 46 53 43 6f 70 79 44 69 72 65 ..Tcl_FSCopyDire
bf40: 63 74 6f 72 79 20 5f 41 4e 53 49 5f 41 52 47 53 ctory _ANSI_ARGS
bf50: 5f 28 28 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 _((.....Tcl_Obj
bf60: 2a 20 73 72 63 50 61 74 68 50 74 72 2c 20 54 63 * srcPathPtr, Tc
bf70: 6c 5f 4f 62 6a 20 2a 20 64 65 73 74 50 61 74 68 l_Obj * destPath
bf80: 50 74 72 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 Ptr, .....Tcl_Ob
bf90: 6a 20 2a 2a 20 65 72 72 6f 72 50 74 72 29 29 3b j ** errorPtr));
bfa0: 0a 2f 2a 20 34 34 32 20 2a 2f 0a 45 58 54 45 52 ./* 442 */.EXTER
bfb0: 4e 20 69 6e 74 09 09 54 63 6c 5f 46 53 43 72 65 N int..Tcl_FSCre
bfc0: 61 74 65 44 69 72 65 63 74 6f 72 79 20 5f 41 4e ateDirectory _AN
bfd0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
bfe0: 6a 20 2a 20 70 61 74 68 50 74 72 29 29 3b 0a 2f j * pathPtr));./
bff0: 2a 20 34 34 33 20 2a 2f 0a 45 58 54 45 52 4e 20 * 443 */.EXTERN
c000: 69 6e 74 09 09 54 63 6c 5f 46 53 44 65 6c 65 74 int..Tcl_FSDelet
c010: 65 46 69 6c 65 20 5f 41 4e 53 49 5f 41 52 47 53 eFile _ANSI_ARGS
c020: 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 74 _((Tcl_Obj * pat
c030: 68 50 74 72 29 29 3b 0a 2f 2a 20 34 34 34 20 2a hPtr));./* 444 *
c040: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
c050: 6c 5f 46 53 4c 6f 61 64 46 69 6c 65 20 5f 41 4e l_FSLoadFile _AN
c060: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
c070: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a terp * interp, .
c080: 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 ....Tcl_Obj * pa
c090: 74 68 50 74 72 2c 20 43 4f 4e 53 54 20 63 68 61 thPtr, CONST cha
c0a0: 72 20 2a 20 73 79 6d 31 2c 20 0a 09 09 09 09 43 r * sym1, .....C
c0b0: 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 79 6d 32 ONST char * sym2
c0c0: 2c 20 0a 09 09 09 09 54 63 6c 5f 50 61 63 6b 61 , .....Tcl_Packa
c0d0: 67 65 49 6e 69 74 50 72 6f 63 20 2a 2a 20 70 72 geInitProc ** pr
c0e0: 6f 63 31 50 74 72 2c 20 0a 09 09 09 09 54 63 6c oc1Ptr, .....Tcl
c0f0: 5f 50 61 63 6b 61 67 65 49 6e 69 74 50 72 6f 63 _PackageInitProc
c100: 20 2a 2a 20 70 72 6f 63 32 50 74 72 2c 20 0a 09 ** proc2Ptr, ..
c110: 09 09 09 54 63 6c 5f 4c 6f 61 64 48 61 6e 64 6c ...Tcl_LoadHandl
c120: 65 20 2a 20 68 61 6e 64 6c 65 50 74 72 2c 20 0a e * handlePtr, .
c130: 09 09 09 09 54 63 6c 5f 46 53 55 6e 6c 6f 61 64 ....Tcl_FSUnload
c140: 46 69 6c 65 50 72 6f 63 20 2a 2a 20 75 6e 6c 6f FileProc ** unlo
c150: 61 64 50 72 6f 63 50 74 72 29 29 3b 0a 2f 2a 20 adProcPtr));./*
c160: 34 34 35 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 445 */.EXTERN in
c170: 74 09 09 54 63 6c 5f 46 53 4d 61 74 63 68 49 6e t..Tcl_FSMatchIn
c180: 44 69 72 65 63 74 6f 72 79 20 5f 41 4e 53 49 5f Directory _ANSI_
c190: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
c1a0: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
c1b0: 20 54 63 6c 5f 4f 62 6a 20 2a 20 72 65 73 75 6c Tcl_Obj * resul
c1c0: 74 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 t, .....Tcl_Obj
c1d0: 2a 20 70 61 74 68 50 74 72 2c 20 43 4f 4e 53 54 * pathPtr, CONST
c1e0: 20 63 68 61 72 20 2a 20 70 61 74 74 65 72 6e 2c char * pattern,
c1f0: 20 0a 09 09 09 09 54 63 6c 5f 47 6c 6f 62 54 79 .....Tcl_GlobTy
c200: 70 65 44 61 74 61 20 2a 20 74 79 70 65 73 29 29 peData * types))
c210: 3b 0a 2f 2a 20 34 34 36 20 2a 2f 0a 45 58 54 45 ;./* 446 */.EXTE
c220: 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c RN Tcl_Obj *.Tcl
c230: 5f 46 53 4c 69 6e 6b 20 5f 41 4e 53 49 5f 41 52 _FSLink _ANSI_AR
c240: 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 70 GS_((Tcl_Obj * p
c250: 61 74 68 50 74 72 2c 20 0a 09 09 09 09 54 63 6c athPtr, .....Tcl
c260: 5f 4f 62 6a 20 2a 20 74 6f 50 74 72 2c 20 69 6e _Obj * toPtr, in
c270: 74 20 6c 69 6e 6b 41 63 74 69 6f 6e 29 29 3b 0a t linkAction));.
c280: 2f 2a 20 34 34 37 20 2a 2f 0a 45 58 54 45 52 4e /* 447 */.EXTERN
c290: 20 69 6e 74 09 09 54 63 6c 5f 46 53 52 65 6d 6f int..Tcl_FSRemo
c2a0: 76 65 44 69 72 65 63 74 6f 72 79 20 5f 41 4e 53 veDirectory _ANS
c2b0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a I_ARGS_((Tcl_Obj
c2c0: 20 2a 20 70 61 74 68 50 74 72 2c 20 0a 09 09 09 * pathPtr, ....
c2d0: 09 69 6e 74 20 72 65 63 75 72 73 69 76 65 2c 20 .int recursive,
c2e0: 54 63 6c 5f 4f 62 6a 20 2a 2a 20 65 72 72 6f 72 Tcl_Obj ** error
c2f0: 50 74 72 29 29 3b 0a 2f 2a 20 34 34 38 20 2a 2f Ptr));./* 448 */
c300: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
c310: 5f 46 53 52 65 6e 61 6d 65 46 69 6c 65 20 5f 41 _FSRenameFile _A
c320: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
c330: 62 6a 20 2a 20 73 72 63 50 61 74 68 50 74 72 2c bj * srcPathPtr,
c340: 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 .....Tcl_Obj *
c350: 64 65 73 74 50 61 74 68 50 74 72 29 29 3b 0a 2f destPathPtr));./
c360: 2a 20 34 34 39 20 2a 2f 0a 45 58 54 45 52 4e 20 * 449 */.EXTERN
c370: 69 6e 74 09 09 54 63 6c 5f 46 53 4c 73 74 61 74 int..Tcl_FSLstat
c380: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
c390: 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 2c l_Obj * pathPtr,
c3a0: 20 0a 09 09 09 09 54 63 6c 5f 53 74 61 74 42 75 .....Tcl_StatBu
c3b0: 66 20 2a 20 62 75 66 29 29 3b 0a 2f 2a 20 34 35 f * buf));./* 45
c3c0: 30 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 0 */.EXTERN int.
c3d0: 09 54 63 6c 5f 46 53 55 74 69 6d 65 20 5f 41 4e .Tcl_FSUtime _AN
c3e0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
c3f0: 6a 20 2a 20 70 61 74 68 50 74 72 2c 20 0a 09 09 j * pathPtr, ...
c400: 09 09 73 74 72 75 63 74 20 75 74 69 6d 62 75 66 ..struct utimbuf
c410: 20 2a 20 74 76 61 6c 29 29 3b 0a 2f 2a 20 34 35 * tval));./* 45
c420: 31 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 1 */.EXTERN int.
c430: 09 54 63 6c 5f 46 53 46 69 6c 65 41 74 74 72 73 .Tcl_FSFileAttrs
c440: 47 65 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Get _ANSI_ARGS_(
c450: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
c460: 74 65 72 70 2c 20 0a 09 09 09 09 69 6e 74 20 69 terp, .....int i
c470: 6e 64 65 78 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 ndex, Tcl_Obj *
c480: 70 61 74 68 50 74 72 2c 20 0a 09 09 09 09 54 63 pathPtr, .....Tc
c490: 6c 5f 4f 62 6a 20 2a 2a 20 6f 62 6a 50 74 72 52 l_Obj ** objPtrR
c4a0: 65 66 29 29 3b 0a 2f 2a 20 34 35 32 20 2a 2f 0a ef));./* 452 */.
c4b0: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
c4c0: 46 53 46 69 6c 65 41 74 74 72 73 53 65 74 20 5f FSFileAttrsSet _
c4d0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
c4e0: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
c4f0: 20 0a 09 09 09 09 69 6e 74 20 69 6e 64 65 78 2c .....int index,
c500: 20 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 Tcl_Obj * pathP
c510: 74 72 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a tr, .....Tcl_Obj
c520: 20 2a 20 6f 62 6a 50 74 72 29 29 3b 0a 2f 2a 20 * objPtr));./*
c530: 34 35 33 20 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 453 */.EXTERN CO
c540: 4e 53 54 20 63 68 61 72 20 2a 2a 09 54 63 6c 5f NST char **.Tcl_
c550: 46 53 46 69 6c 65 41 74 74 72 53 74 72 69 6e 67 FSFileAttrString
c560: 73 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 s _ANSI_ARGS_((T
c570: 63 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 cl_Obj * pathPtr
c580: 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a , .....Tcl_Obj *
c590: 2a 20 6f 62 6a 50 74 72 52 65 66 29 29 3b 0a 2f * objPtrRef));./
c5a0: 2a 20 34 35 34 20 2a 2f 0a 45 58 54 45 52 4e 20 * 454 */.EXTERN
c5b0: 69 6e 74 09 09 54 63 6c 5f 46 53 53 74 61 74 20 int..Tcl_FSStat
c5c0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
c5d0: 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 2c 20 _Obj * pathPtr,
c5e0: 0a 09 09 09 09 54 63 6c 5f 53 74 61 74 42 75 66 .....Tcl_StatBuf
c5f0: 20 2a 20 62 75 66 29 29 3b 0a 2f 2a 20 34 35 35 * buf));./* 455
c600: 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 */.EXTERN int..
c610: 54 63 6c 5f 46 53 41 63 63 65 73 73 20 5f 41 4e Tcl_FSAccess _AN
c620: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
c630: 6a 20 2a 20 70 61 74 68 50 74 72 2c 20 0a 09 09 j * pathPtr, ...
c640: 09 09 69 6e 74 20 6d 6f 64 65 29 29 3b 0a 2f 2a ..int mode));./*
c650: 20 34 35 36 20 2a 2f 0a 45 58 54 45 52 4e 20 54 456 */.EXTERN T
c660: 63 6c 5f 43 68 61 6e 6e 65 6c 09 54 63 6c 5f 46 cl_Channel.Tcl_F
c670: 53 4f 70 65 6e 46 69 6c 65 43 68 61 6e 6e 65 6c SOpenFileChannel
c680: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
c690: 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 ...Tcl_Interp *
c6a0: 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 interp, Tcl_Obj
c6b0: 2a 20 70 61 74 68 50 74 72 2c 20 0a 09 09 09 09 * pathPtr, .....
c6c0: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6d 6f 64 CONST char * mod
c6d0: 65 53 74 72 69 6e 67 2c 20 69 6e 74 20 70 65 72 eString, int per
c6e0: 6d 69 73 73 69 6f 6e 73 29 29 3b 0a 2f 2a 20 34 missions));./* 4
c6f0: 35 37 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 57 */.EXTERN Tcl
c700: 5f 4f 62 6a 2a 09 09 54 63 6c 5f 46 53 47 65 74 _Obj*..Tcl_FSGet
c710: 43 77 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Cwd _ANSI_ARGS_(
c720: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
c730: 74 65 72 70 29 29 3b 0a 2f 2a 20 34 35 38 20 2a terp));./* 458 *
c740: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
c750: 6c 5f 46 53 43 68 64 69 72 20 5f 41 4e 53 49 5f l_FSChdir _ANSI_
c760: 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a ARGS_((Tcl_Obj *
c770: 20 70 61 74 68 50 74 72 29 29 3b 0a 2f 2a 20 34 pathPtr));./* 4
c780: 35 39 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 59 */.EXTERN int
c790: 09 09 54 63 6c 5f 46 53 43 6f 6e 76 65 72 74 54 ..Tcl_FSConvertT
c7a0: 6f 50 61 74 68 54 79 70 65 20 5f 41 4e 53 49 5f oPathType _ANSI_
c7b0: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
c7c0: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
c7d0: 20 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 Tcl_Obj * pathP
c7e0: 74 72 29 29 3b 0a 2f 2a 20 34 36 30 20 2a 2f 0a tr));./* 460 */.
c7f0: 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 2a 09 EXTERN Tcl_Obj*.
c800: 09 54 63 6c 5f 46 53 4a 6f 69 6e 50 61 74 68 20 .Tcl_FSJoinPath
c810: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
c820: 5f 4f 62 6a 20 2a 20 6c 69 73 74 4f 62 6a 2c 20 _Obj * listObj,
c830: 0a 09 09 09 09 69 6e 74 20 65 6c 65 6d 65 6e 74 .....int element
c840: 73 29 29 3b 0a 2f 2a 20 34 36 31 20 2a 2f 0a 45 s));./* 461 */.E
c850: 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 2a 09 09 XTERN Tcl_Obj*..
c860: 54 63 6c 5f 46 53 53 70 6c 69 74 50 61 74 68 20 Tcl_FSSplitPath
c870: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
c880: 5f 4f 62 6a 2a 20 70 61 74 68 50 74 72 2c 20 0a _Obj* pathPtr, .
c890: 09 09 09 09 69 6e 74 20 2a 20 6c 65 6e 50 74 72 ....int * lenPtr
c8a0: 29 29 3b 0a 2f 2a 20 34 36 32 20 2a 2f 0a 45 58 ));./* 462 */.EX
c8b0: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 46 53 TERN int..Tcl_FS
c8c0: 45 71 75 61 6c 50 61 74 68 73 20 5f 41 4e 53 49 EqualPaths _ANSI
c8d0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 2a _ARGS_((Tcl_Obj*
c8e0: 20 66 69 72 73 74 50 74 72 2c 20 0a 09 09 09 09 firstPtr, .....
c8f0: 54 63 6c 5f 4f 62 6a 2a 20 73 65 63 6f 6e 64 50 Tcl_Obj* secondP
c900: 74 72 29 29 3b 0a 2f 2a 20 34 36 33 20 2a 2f 0a tr));./* 463 */.
c910: 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 2a 09 EXTERN Tcl_Obj*.
c920: 09 54 63 6c 5f 46 53 47 65 74 4e 6f 72 6d 61 6c .Tcl_FSGetNormal
c930: 69 7a 65 64 50 61 74 68 20 5f 41 4e 53 49 5f 41 izedPath _ANSI_A
c940: 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 49 RGS_((.....Tcl_I
c950: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
c960: 54 63 6c 5f 4f 62 6a 2a 20 70 61 74 68 4f 62 6a Tcl_Obj* pathObj
c970: 50 74 72 29 29 3b 0a 2f 2a 20 34 36 34 20 2a 2f Ptr));./* 464 */
c980: 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 6a 2a .EXTERN Tcl_Obj*
c990: 09 09 54 63 6c 5f 46 53 4a 6f 69 6e 54 6f 50 61 ..Tcl_FSJoinToPa
c9a0: 74 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 th _ANSI_ARGS_((
c9b0: 54 63 6c 5f 4f 62 6a 20 2a 20 62 61 73 65 50 74 Tcl_Obj * basePt
c9c0: 72 2c 20 0a 09 09 09 09 69 6e 74 20 6f 62 6a 63 r, .....int objc
c9d0: 2c 20 54 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 , Tcl_Obj *CONST
c9e0: 20 6f 62 6a 76 5b 5d 29 29 3b 0a 2f 2a 20 34 36 objv[]));./* 46
c9f0: 35 20 2a 2f 0a 45 58 54 45 52 4e 20 43 6c 69 65 5 */.EXTERN Clie
ca00: 6e 74 44 61 74 61 09 54 63 6c 5f 46 53 47 65 74 ntData.Tcl_FSGet
ca10: 49 6e 74 65 72 6e 61 6c 52 65 70 20 5f 41 4e 53 InternalRep _ANS
ca20: 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 I_ARGS_((.....Tc
ca30: 6c 5f 4f 62 6a 2a 20 70 61 74 68 4f 62 6a 50 74 l_Obj* pathObjPt
ca40: 72 2c 20 54 63 6c 5f 46 69 6c 65 73 79 73 74 65 r, Tcl_Filesyste
ca50: 6d 20 2a 20 66 73 50 74 72 29 29 3b 0a 2f 2a 20 m * fsPtr));./*
ca60: 34 36 36 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 466 */.EXTERN Tc
ca70: 6c 5f 4f 62 6a 2a 09 09 54 63 6c 5f 46 53 47 65 l_Obj*..Tcl_FSGe
ca80: 74 54 72 61 6e 73 6c 61 74 65 64 50 61 74 68 20 tTranslatedPath
ca90: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 _ANSI_ARGS_((...
caa0: 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ..Tcl_Interp * i
cab0: 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 2a 20 nterp, Tcl_Obj*
cac0: 70 61 74 68 50 74 72 29 29 3b 0a 2f 2a 20 34 36 pathPtr));./* 46
cad0: 37 20 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 7 */.EXTERN int.
cae0: 09 54 63 6c 5f 46 53 45 76 61 6c 46 69 6c 65 20 .Tcl_FSEvalFile
caf0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
cb00: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
cb10: 2c 20 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a , .....Tcl_Obj *
cb20: 20 66 69 6c 65 4e 61 6d 65 29 29 3b 0a 2f 2a 20 fileName));./*
cb30: 34 36 38 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 468 */.EXTERN Tc
cb40: 6c 5f 4f 62 6a 2a 09 09 54 63 6c 5f 46 53 4e 65 l_Obj*..Tcl_FSNe
cb50: 77 4e 61 74 69 76 65 50 61 74 68 20 5f 41 4e 53 wNativePath _ANS
cb60: 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 I_ARGS_((.....Tc
cb70: 6c 5f 46 69 6c 65 73 79 73 74 65 6d 2a 20 66 72 l_Filesystem* fr
cb80: 6f 6d 46 69 6c 65 73 79 73 74 65 6d 2c 20 0a 09 omFilesystem, ..
cb90: 09 09 09 43 6c 69 65 6e 74 44 61 74 61 20 63 6c ...ClientData cl
cba0: 69 65 6e 74 44 61 74 61 29 29 3b 0a 2f 2a 20 34 ientData));./* 4
cbb0: 36 39 20 2a 2f 0a 45 58 54 45 52 4e 20 43 4f 4e 69 */.EXTERN CON
cbc0: 53 54 20 63 68 61 72 2a 09 54 63 6c 5f 46 53 47 ST char*.Tcl_FSG
cbd0: 65 74 4e 61 74 69 76 65 50 61 74 68 20 5f 41 4e etNativePath _AN
cbe0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
cbf0: 6a 2a 20 70 61 74 68 4f 62 6a 50 74 72 29 29 3b j* pathObjPtr));
cc00: 0a 2f 2a 20 34 37 30 20 2a 2f 0a 45 58 54 45 52 ./* 470 */.EXTER
cc10: 4e 20 54 63 6c 5f 4f 62 6a 2a 09 09 54 63 6c 5f N Tcl_Obj*..Tcl_
cc20: 46 53 46 69 6c 65 53 79 73 74 65 6d 49 6e 66 6f FSFileSystemInfo
cc30: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
cc40: 09 09 09 54 63 6c 5f 4f 62 6a 2a 20 70 61 74 68 ...Tcl_Obj* path
cc50: 4f 62 6a 50 74 72 29 29 3b 0a 2f 2a 20 34 37 31 ObjPtr));./* 471
cc60: 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 4f */.EXTERN Tcl_O
cc70: 62 6a 2a 09 09 54 63 6c 5f 46 53 50 61 74 68 53 bj*..Tcl_FSPathS
cc80: 65 70 61 72 61 74 6f 72 20 5f 41 4e 53 49 5f 41 eparator _ANSI_A
cc90: 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 2a 20 70 RGS_((Tcl_Obj* p
cca0: 61 74 68 4f 62 6a 50 74 72 29 29 3b 0a 2f 2a 20 athObjPtr));./*
ccb0: 34 37 32 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 472 */.EXTERN Tc
ccc0: 6c 5f 4f 62 6a 2a 09 09 54 63 6c 5f 46 53 4c 69 l_Obj*..Tcl_FSLi
ccd0: 73 74 56 6f 6c 75 6d 65 73 20 5f 41 4e 53 49 5f stVolumes _ANSI_
cce0: 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f ARGS_((void));./
ccf0: 2a 20 34 37 33 20 2a 2f 0a 45 58 54 45 52 4e 20 * 473 */.EXTERN
cd00: 69 6e 74 09 09 54 63 6c 5f 46 53 52 65 67 69 73 int..Tcl_FSRegis
cd10: 74 65 72 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ter _ANSI_ARGS_(
cd20: 28 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 (ClientData clie
cd30: 6e 74 44 61 74 61 2c 20 0a 09 09 09 09 54 63 6c ntData, .....Tcl
cd40: 5f 46 69 6c 65 73 79 73 74 65 6d 20 2a 20 66 73 _Filesystem * fs
cd50: 50 74 72 29 29 3b 0a 2f 2a 20 34 37 34 20 2a 2f Ptr));./* 474 */
cd60: 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c .EXTERN int..Tcl
cd70: 5f 46 53 55 6e 72 65 67 69 73 74 65 72 20 5f 41 _FSUnregister _A
cd80: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 46 NSI_ARGS_((Tcl_F
cd90: 69 6c 65 73 79 73 74 65 6d 20 2a 20 66 73 50 74 ilesystem * fsPt
cda0: 72 29 29 3b 0a 2f 2a 20 34 37 35 20 2a 2f 0a 45 r));./* 475 */.E
cdb0: 58 54 45 52 4e 20 43 6c 69 65 6e 74 44 61 74 61 XTERN ClientData
cdc0: 09 54 63 6c 5f 46 53 44 61 74 61 20 5f 41 4e 53 .Tcl_FSData _ANS
cdd0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 46 69 6c I_ARGS_((Tcl_Fil
cde0: 65 73 79 73 74 65 6d 20 2a 20 66 73 50 74 72 29 esystem * fsPtr)
cdf0: 29 3b 0a 2f 2a 20 34 37 36 20 2a 2f 0a 45 58 54 );./* 476 */.EXT
ce00: 45 52 4e 20 43 4f 4e 53 54 20 63 68 61 72 2a 09 ERN CONST char*.
ce10: 54 63 6c 5f 46 53 47 65 74 54 72 61 6e 73 6c 61 Tcl_FSGetTransla
ce20: 74 65 64 53 74 72 69 6e 67 50 61 74 68 20 5f 41 tedStringPath _A
ce30: 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 NSI_ARGS_((.....
ce40: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
ce50: 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 2a 20 70 61 erp, Tcl_Obj* pa
ce60: 74 68 50 74 72 29 29 3b 0a 2f 2a 20 34 37 37 20 thPtr));./* 477
ce70: 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 46 69 */.EXTERN Tcl_Fi
ce80: 6c 65 73 79 73 74 65 6d 2a 09 54 63 6c 5f 46 53 lesystem*.Tcl_FS
ce90: 47 65 74 46 69 6c 65 53 79 73 74 65 6d 46 6f 72 GetFileSystemFor
cea0: 50 61 74 68 20 5f 41 4e 53 49 5f 41 52 47 53 5f Path _ANSI_ARGS_
ceb0: 28 28 0a 09 09 09 09 54 63 6c 5f 4f 62 6a 2a 20 ((.....Tcl_Obj*
cec0: 70 61 74 68 4f 62 6a 50 74 72 29 29 3b 0a 2f 2a pathObjPtr));./*
ced0: 20 34 37 38 20 2a 2f 0a 45 58 54 45 52 4e 20 54 478 */.EXTERN T
cee0: 63 6c 5f 50 61 74 68 54 79 70 65 09 54 63 6c 5f cl_PathType.Tcl_
cef0: 46 53 47 65 74 50 61 74 68 54 79 70 65 20 5f 41 FSGetPathType _A
cf00: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
cf10: 62 6a 20 2a 20 70 61 74 68 4f 62 6a 50 74 72 29 bj * pathObjPtr)
cf20: 29 3b 0a 2f 2a 20 34 37 39 20 2a 2f 0a 45 58 54 );./* 479 */.EXT
cf30: 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 4f 75 74 ERN int..Tcl_Out
cf40: 70 75 74 42 75 66 66 65 72 65 64 20 5f 41 4e 53 putBuffered _ANS
cf50: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
cf60: 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 0a 2f 2a 20 nnel chan));./*
cf70: 34 38 30 20 2a 2f 0a 45 58 54 45 52 4e 20 76 6f 480 */.EXTERN vo
cf80: 69 64 09 09 54 63 6c 5f 46 53 4d 6f 75 6e 74 73 id..Tcl_FSMounts
cf90: 43 68 61 6e 67 65 64 20 5f 41 4e 53 49 5f 41 52 Changed _ANSI_AR
cfa0: 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f 46 69 GS_((.....Tcl_Fi
cfb0: 6c 65 73 79 73 74 65 6d 20 2a 20 66 73 50 74 72 lesystem * fsPtr
cfc0: 29 29 3b 0a 2f 2a 20 34 38 31 20 2a 2f 0a 45 58 ));./* 481 */.EX
cfd0: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 45 76 TERN int..Tcl_Ev
cfe0: 61 6c 54 6f 6b 65 6e 73 53 74 61 6e 64 61 72 64 alTokensStandard
cff0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
d000: 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 ...Tcl_Interp *
d010: 69 6e 74 65 72 70 2c 20 54 63 6c 5f 54 6f 6b 65 interp, Tcl_Toke
d020: 6e 20 2a 20 74 6f 6b 65 6e 50 74 72 2c 20 0a 09 n * tokenPtr, ..
d030: 09 09 09 69 6e 74 20 63 6f 75 6e 74 29 29 3b 0a ...int count));.
d040: 2f 2a 20 34 38 32 20 2a 2f 0a 45 58 54 45 52 4e /* 482 */.EXTERN
d050: 20 76 6f 69 64 09 09 54 63 6c 5f 47 65 74 54 69 void..Tcl_GetTi
d060: 6d 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 me _ANSI_ARGS_((
d070: 54 63 6c 5f 54 69 6d 65 2a 20 74 69 6d 65 42 75 Tcl_Time* timeBu
d080: 66 29 29 3b 0a 2f 2a 20 34 38 33 20 2a 2f 0a 45 f));./* 483 */.E
d090: 58 54 45 52 4e 20 54 63 6c 5f 54 72 61 63 65 09 XTERN Tcl_Trace.
d0a0: 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 54 72 61 Tcl_CreateObjTra
d0b0: 63 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 ce _ANSI_ARGS_((
d0c0: 54 63 6c 5f 49 6e 74 65 72 70 2a 20 69 6e 74 65 Tcl_Interp* inte
d0d0: 72 70 2c 20 0a 09 09 09 09 69 6e 74 20 6c 65 76 rp, .....int lev
d0e0: 65 6c 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 0a el, int flags, .
d0f0: 09 09 09 09 54 63 6c 5f 43 6d 64 4f 62 6a 54 72 ....Tcl_CmdObjTr
d100: 61 63 65 50 72 6f 63 2a 20 6f 62 6a 50 72 6f 63 aceProc* objProc
d110: 2c 20 0a 09 09 09 09 43 6c 69 65 6e 74 44 61 74 , .....ClientDat
d120: 61 20 63 6c 69 65 6e 74 44 61 74 61 2c 20 0a 09 a clientData, ..
d130: 09 09 09 54 63 6c 5f 43 6d 64 4f 62 6a 54 72 61 ...Tcl_CmdObjTra
d140: 63 65 44 65 6c 65 74 65 50 72 6f 63 2a 20 64 65 ceDeleteProc* de
d150: 6c 50 72 6f 63 29 29 3b 0a 2f 2a 20 34 38 34 20 lProc));./* 484
d160: 2a 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 */.EXTERN int..T
d170: 63 6c 5f 47 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 cl_GetCommandInf
d180: 6f 46 72 6f 6d 54 6f 6b 65 6e 20 5f 41 4e 53 49 oFromToken _ANSI
d190: 5f 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c _ARGS_((.....Tcl
d1a0: 5f 43 6f 6d 6d 61 6e 64 20 74 6f 6b 65 6e 2c 20 _Command token,
d1b0: 54 63 6c 5f 43 6d 64 49 6e 66 6f 2a 20 69 6e 66 Tcl_CmdInfo* inf
d1c0: 6f 50 74 72 29 29 3b 0a 2f 2a 20 34 38 35 20 2a oPtr));./* 485 *
d1d0: 2f 0a 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 /.EXTERN int..Tc
d1e0: 6c 5f 53 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f l_SetCommandInfo
d1f0: 46 72 6f 6d 54 6f 6b 65 6e 20 5f 41 4e 53 49 5f FromToken _ANSI_
d200: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
d210: 43 6f 6d 6d 61 6e 64 20 74 6f 6b 65 6e 2c 20 0a Command token, .
d220: 09 09 09 09 43 4f 4e 53 54 20 54 63 6c 5f 43 6d ....CONST Tcl_Cm
d230: 64 49 6e 66 6f 2a 20 69 6e 66 6f 50 74 72 29 29 dInfo* infoPtr))
d240: 3b 0a 2f 2a 20 34 38 36 20 2a 2f 0a 45 58 54 45 ;./* 486 */.EXTE
d250: 52 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c RN Tcl_Obj *.Tcl
d260: 5f 44 62 4e 65 77 57 69 64 65 49 6e 74 4f 62 6a _DbNewWideIntObj
d270: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a 09 _ANSI_ARGS_((..
d280: 09 09 09 54 63 6c 5f 57 69 64 65 49 6e 74 20 77 ...Tcl_WideInt w
d290: 69 64 65 56 61 6c 75 65 2c 20 43 4f 4e 53 54 20 ideValue, CONST
d2a0: 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 0a 09 09 char * file, ...
d2b0: 09 09 69 6e 74 20 6c 69 6e 65 29 29 3b 0a 2f 2a ..int line));./*
d2c0: 20 34 38 37 20 2a 2f 0a 45 58 54 45 52 4e 20 69 487 */.EXTERN i
d2d0: 6e 74 09 09 54 63 6c 5f 47 65 74 57 69 64 65 49 nt..Tcl_GetWideI
d2e0: 6e 74 46 72 6f 6d 4f 62 6a 20 5f 41 4e 53 49 5f ntFromObj _ANSI_
d2f0: 41 52 47 53 5f 28 28 0a 09 09 09 09 54 63 6c 5f ARGS_((.....Tcl_
d300: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
d310: 20 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 Tcl_Obj * objPt
d320: 72 2c 20 0a 09 09 09 09 54 63 6c 5f 57 69 64 65 r, .....Tcl_Wide
d330: 49 6e 74 20 2a 20 77 69 64 65 50 74 72 29 29 3b Int * widePtr));
d340: 0a 2f 2a 20 34 38 38 20 2a 2f 0a 45 58 54 45 52 ./* 488 */.EXTER
d350: 4e 20 54 63 6c 5f 4f 62 6a 20 2a 09 54 63 6c 5f N Tcl_Obj *.Tcl_
d360: 4e 65 77 57 69 64 65 49 6e 74 4f 62 6a 20 5f 41 NewWideIntObj _A
d370: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 57 NSI_ARGS_((Tcl_W
d380: 69 64 65 49 6e 74 20 77 69 64 65 56 61 6c 75 65 ideInt wideValue
d390: 29 29 3b 0a 2f 2a 20 34 38 39 20 2a 2f 0a 45 58 ));./* 489 */.EX
d3a0: 54 45 52 4e 20 76 6f 69 64 09 09 54 63 6c 5f 53 TERN void..Tcl_S
d3b0: 65 74 57 69 64 65 49 6e 74 4f 62 6a 20 5f 41 4e etWideIntObj _AN
d3c0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
d3d0: 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 0a 09 09 09 j * objPtr, ....
d3e0: 09 54 63 6c 5f 57 69 64 65 49 6e 74 20 77 69 64 .Tcl_WideInt wid
d3f0: 65 56 61 6c 75 65 29 29 3b 0a 2f 2a 20 34 39 30 eValue));./* 490
d400: 20 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 53 */.EXTERN Tcl_S
d410: 74 61 74 42 75 66 20 2a 09 54 63 6c 5f 41 6c 6c tatBuf *.Tcl_All
d420: 6f 63 53 74 61 74 42 75 66 20 5f 41 4e 53 49 5f ocStatBuf _ANSI_
d430: 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 0a 2f ARGS_((void));./
d440: 2a 20 34 39 31 20 2a 2f 0a 45 58 54 45 52 4e 20 * 491 */.EXTERN
d450: 54 63 6c 5f 57 69 64 65 49 6e 74 09 54 63 6c 5f Tcl_WideInt.Tcl_
d460: 53 65 65 6b 20 5f 41 4e 53 49 5f 41 52 47 53 5f Seek _ANSI_ARGS_
d470: 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
d480: 61 6e 2c 20 0a 09 09 09 09 54 63 6c 5f 57 69 64 an, .....Tcl_Wid
d490: 65 49 6e 74 20 6f 66 66 73 65 74 2c 20 69 6e 74 eInt offset, int
d4a0: 20 6d 6f 64 65 29 29 3b 0a 2f 2a 20 34 39 32 20 mode));./* 492
d4b0: 2a 2f 0a 45 58 54 45 52 4e 20 54 63 6c 5f 57 69 */.EXTERN Tcl_Wi
d4c0: 64 65 49 6e 74 09 54 63 6c 5f 54 65 6c 6c 20 5f deInt.Tcl_Tell _
d4d0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
d4e0: 43 68 61 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 0a Channel chan));.
d4f0: 2f 2a 20 34 39 33 20 2a 2f 0a 45 58 54 45 52 4e /* 493 */.EXTERN
d500: 20 54 63 6c 5f 44 72 69 76 65 72 57 69 64 65 53 Tcl_DriverWideS
d510: 65 65 6b 50 72 6f 63 20 2a 20 54 63 6c 5f 43 68 eekProc * Tcl_Ch
d520: 61 6e 6e 65 6c 57 69 64 65 53 65 65 6b 50 72 6f annelWideSeekPro
d530: 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a c _ANSI_ARGS_((.
d540: 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 ....Tcl_ChannelT
d550: 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 50 74 ype * chanTypePt
d560: 72 29 29 3b 0a 0a 74 79 70 65 64 65 66 20 73 74 r));..typedef st
d570: 72 75 63 74 20 54 63 6c 53 74 75 62 48 6f 6f 6b ruct TclStubHook
d580: 73 20 7b 0a 20 20 20 20 73 74 72 75 63 74 20 54 s {. struct T
d590: 63 6c 50 6c 61 74 53 74 75 62 73 20 2a 74 63 6c clPlatStubs *tcl
d5a0: 50 6c 61 74 53 74 75 62 73 3b 0a 20 20 20 20 73 PlatStubs;. s
d5b0: 74 72 75 63 74 20 54 63 6c 49 6e 74 53 74 75 62 truct TclIntStub
d5c0: 73 20 2a 74 63 6c 49 6e 74 53 74 75 62 73 3b 0a s *tclIntStubs;.
d5d0: 20 20 20 20 73 74 72 75 63 74 20 54 63 6c 49 6e struct TclIn
d5e0: 74 50 6c 61 74 53 74 75 62 73 20 2a 74 63 6c 49 tPlatStubs *tclI
d5f0: 6e 74 50 6c 61 74 53 74 75 62 73 3b 0a 7d 20 54 ntPlatStubs;.} T
d600: 63 6c 53 74 75 62 48 6f 6f 6b 73 3b 0a 0a 74 79 clStubHooks;..ty
d610: 70 65 64 65 66 20 73 74 72 75 63 74 20 54 63 6c pedef struct Tcl
d620: 53 74 75 62 73 20 7b 0a 20 20 20 20 69 6e 74 20 Stubs {. int
d630: 6d 61 67 69 63 3b 0a 20 20 20 20 73 74 72 75 63 magic;. struc
d640: 74 20 54 63 6c 53 74 75 62 48 6f 6f 6b 73 20 2a t TclStubHooks *
d650: 68 6f 6f 6b 73 3b 0a 0a 20 20 20 20 69 6e 74 20 hooks;.. int
d660: 28 2a 74 63 6c 5f 50 6b 67 50 72 6f 76 69 64 65 (*tcl_PkgProvide
d670: 45 78 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 Ex) _ANSI_ARGS_(
d680: 28 54 63 6c 5f 49 6e 74 65 72 70 2a 20 69 6e 74 (Tcl_Interp* int
d690: 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 2a erp, CONST char*
d6a0: 20 6e 61 6d 65 2c 20 43 4f 4e 53 54 20 63 68 61 name, CONST cha
d6b0: 72 2a 20 76 65 72 73 69 6f 6e 2c 20 43 6c 69 65 r* version, Clie
d6c0: 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 ntData clientDat
d6d0: 61 29 29 3b 20 2f 2a 20 30 20 2a 2f 0a 20 20 20 a)); /* 0 */.
d6e0: 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 CONST84_RETURN
d6f0: 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 50 6b 67 char * (*tcl_Pkg
d700: 52 65 71 75 69 72 65 45 78 29 20 5f 41 4e 53 49 RequireEx) _ANSI
d710: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
d720: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e rp * interp, CON
d730: 53 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 2c 20 ST char * name,
d740: 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 65 72 CONST char * ver
d750: 73 69 6f 6e 2c 20 69 6e 74 20 65 78 61 63 74 2c sion, int exact,
d760: 20 43 6c 69 65 6e 74 44 61 74 61 20 2a 20 63 6c ClientData * cl
d770: 69 65 6e 74 44 61 74 61 50 74 72 29 29 3b 20 2f ientDataPtr)); /
d780: 2a 20 31 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 * 1 */. void
d790: 28 2a 74 63 6c 5f 50 61 6e 69 63 29 20 5f 41 4e (*tcl_Panic) _AN
d7a0: 53 49 5f 41 52 47 53 5f 28 54 43 4c 5f 56 41 52 SI_ARGS_(TCL_VAR
d7b0: 41 52 47 53 28 43 4f 4e 53 54 20 63 68 61 72 20 ARGS(CONST char
d7c0: 2a 2c 66 6f 72 6d 61 74 29 29 3b 20 2f 2a 20 32 *,format)); /* 2
d7d0: 20 2a 2f 0a 20 20 20 20 63 68 61 72 20 2a 20 28 */. char * (
d7e0: 2a 74 63 6c 5f 41 6c 6c 6f 63 29 20 5f 41 4e 53 *tcl_Alloc) _ANS
d7f0: 49 5f 41 52 47 53 5f 28 28 75 6e 73 69 67 6e 65 I_ARGS_((unsigne
d800: 64 20 69 6e 74 20 73 69 7a 65 29 29 3b 20 2f 2a d int size)); /*
d810: 20 33 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 3 */. void (
d820: 2a 74 63 6c 5f 46 72 65 65 29 20 5f 41 4e 53 49 *tcl_Free) _ANSI
d830: 5f 41 52 47 53 5f 28 28 63 68 61 72 20 2a 20 70 _ARGS_((char * p
d840: 74 72 29 29 3b 20 2f 2a 20 34 20 2a 2f 0a 20 20 tr)); /* 4 */.
d850: 20 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 52 char * (*tcl_R
d860: 65 61 6c 6c 6f 63 29 20 5f 41 4e 53 49 5f 41 52 ealloc) _ANSI_AR
d870: 47 53 5f 28 28 63 68 61 72 20 2a 20 70 74 72 2c GS_((char * ptr,
d880: 20 75 6e 73 69 67 6e 65 64 20 69 6e 74 20 73 69 unsigned int si
d890: 7a 65 29 29 3b 20 2f 2a 20 35 20 2a 2f 0a 20 20 ze)); /* 5 */.
d8a0: 20 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 44 char * (*tcl_D
d8b0: 62 43 6b 61 6c 6c 6f 63 29 20 5f 41 4e 53 49 5f bCkalloc) _ANSI_
d8c0: 41 52 47 53 5f 28 28 75 6e 73 69 67 6e 65 64 20 ARGS_((unsigned
d8d0: 69 6e 74 20 73 69 7a 65 2c 20 43 4f 4e 53 54 20 int size, CONST
d8e0: 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 69 6e 74 char * file, int
d8f0: 20 6c 69 6e 65 29 29 3b 20 2f 2a 20 36 20 2a 2f line)); /* 6 */
d900: 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 44 . int (*tcl_D
d910: 62 43 6b 66 72 65 65 29 20 5f 41 4e 53 49 5f 41 bCkfree) _ANSI_A
d920: 52 47 53 5f 28 28 63 68 61 72 20 2a 20 70 74 72 RGS_((char * ptr
d930: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 , CONST char * f
d940: 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 3b ile, int line));
d950: 20 2f 2a 20 37 20 2a 2f 0a 20 20 20 20 63 68 61 /* 7 */. cha
d960: 72 20 2a 20 28 2a 74 63 6c 5f 44 62 43 6b 72 65 r * (*tcl_DbCkre
d970: 61 6c 6c 6f 63 29 20 5f 41 4e 53 49 5f 41 52 47 alloc) _ANSI_ARG
d980: 53 5f 28 28 63 68 61 72 20 2a 20 70 74 72 2c 20 S_((char * ptr,
d990: 75 6e 73 69 67 6e 65 64 20 69 6e 74 20 73 69 7a unsigned int siz
d9a0: 65 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 e, CONST char *
d9b0: 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 file, int line))
d9c0: 3b 20 2f 2a 20 38 20 2a 2f 0a 23 69 66 20 21 64 ; /* 8 */.#if !d
d9d0: 65 66 69 6e 65 64 28 5f 5f 57 49 4e 33 32 5f 5f efined(__WIN32__
d9e0: 29 20 26 26 20 21 64 65 66 69 6e 65 64 28 4d 41 ) && !defined(MA
d9f0: 43 5f 54 43 4c 29 20 2f 2a 20 55 4e 49 58 20 2a C_TCL) /* UNIX *
da00: 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
da10: 5f 43 72 65 61 74 65 46 69 6c 65 48 61 6e 64 6c _CreateFileHandl
da20: 65 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 er) _ANSI_ARGS_(
da30: 28 69 6e 74 20 66 64 2c 20 69 6e 74 20 6d 61 73 (int fd, int mas
da40: 6b 2c 20 54 63 6c 5f 46 69 6c 65 50 72 6f 63 20 k, Tcl_FileProc
da50: 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 * proc, ClientDa
da60: 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b ta clientData));
da70: 20 2f 2a 20 39 20 2a 2f 0a 23 65 6e 64 69 66 20 /* 9 */.#endif
da80: 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 66 64 65 /* UNIX */.#ifde
da90: 66 20 5f 5f 57 49 4e 33 32 5f 5f 0a 20 20 20 20 f __WIN32__.
daa0: 76 6f 69 64 20 2a 72 65 73 65 72 76 65 64 39 3b void *reserved9;
dab0: 0a 23 65 6e 64 69 66 20 2f 2a 20 5f 5f 57 49 4e .#endif /* __WIN
dac0: 33 32 5f 5f 20 2a 2f 0a 23 69 66 64 65 66 20 4d 32__ */.#ifdef M
dad0: 41 43 5f 54 43 4c 0a 20 20 20 20 76 6f 69 64 20 AC_TCL. void
dae0: 2a 72 65 73 65 72 76 65 64 39 3b 0a 23 65 6e 64 *reserved9;.#end
daf0: 69 66 20 2f 2a 20 4d 41 43 5f 54 43 4c 20 2a 2f if /* MAC_TCL */
db00: 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28 5f 5f .#if !defined(__
db10: 57 49 4e 33 32 5f 5f 29 20 26 26 20 21 64 65 66 WIN32__) && !def
db20: 69 6e 65 64 28 4d 41 43 5f 54 43 4c 29 20 2f 2a ined(MAC_TCL) /*
db30: 20 55 4e 49 58 20 2a 2f 0a 20 20 20 20 76 6f 69 UNIX */. voi
db40: 64 20 28 2a 74 63 6c 5f 44 65 6c 65 74 65 46 69 d (*tcl_DeleteFi
db50: 6c 65 48 61 6e 64 6c 65 72 29 20 5f 41 4e 53 49 leHandler) _ANSI
db60: 5f 41 52 47 53 5f 28 28 69 6e 74 20 66 64 29 29 _ARGS_((int fd))
db70: 3b 20 2f 2a 20 31 30 20 2a 2f 0a 23 65 6e 64 69 ; /* 10 */.#endi
db80: 66 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 66 f /* UNIX */.#if
db90: 64 65 66 20 5f 5f 57 49 4e 33 32 5f 5f 0a 20 20 def __WIN32__.
dba0: 20 20 76 6f 69 64 20 2a 72 65 73 65 72 76 65 64 void *reserved
dbb0: 31 30 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 5f 5f 10;.#endif /* __
dbc0: 57 49 4e 33 32 5f 5f 20 2a 2f 0a 23 69 66 64 65 WIN32__ */.#ifde
dbd0: 66 20 4d 41 43 5f 54 43 4c 0a 20 20 20 20 76 6f f MAC_TCL. vo
dbe0: 69 64 20 2a 72 65 73 65 72 76 65 64 31 30 3b 0a id *reserved10;.
dbf0: 23 65 6e 64 69 66 20 2f 2a 20 4d 41 43 5f 54 43 #endif /* MAC_TC
dc00: 4c 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a L */. void (*
dc10: 74 63 6c 5f 53 65 74 54 69 6d 65 72 29 20 5f 41 tcl_SetTimer) _A
dc20: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 54 NSI_ARGS_((Tcl_T
dc30: 69 6d 65 20 2a 20 74 69 6d 65 50 74 72 29 29 3b ime * timePtr));
dc40: 20 2f 2a 20 31 31 20 2a 2f 0a 20 20 20 20 76 6f /* 11 */. vo
dc50: 69 64 20 28 2a 74 63 6c 5f 53 6c 65 65 70 29 20 id (*tcl_Sleep)
dc60: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 _ANSI_ARGS_((int
dc70: 20 6d 73 29 29 3b 20 2f 2a 20 31 32 20 2a 2f 0a ms)); /* 12 */.
dc80: 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 57 61 int (*tcl_Wa
dc90: 69 74 46 6f 72 45 76 65 6e 74 29 20 5f 41 4e 53 itForEvent) _ANS
dca0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 54 69 6d I_ARGS_((Tcl_Tim
dcb0: 65 20 2a 20 74 69 6d 65 50 74 72 29 29 3b 20 2f e * timePtr)); /
dcc0: 2a 20 31 33 20 2a 2f 0a 20 20 20 20 69 6e 74 20 * 13 */. int
dcd0: 28 2a 74 63 6c 5f 41 70 70 65 6e 64 41 6c 6c 4f (*tcl_AppendAllO
dce0: 62 6a 54 79 70 65 73 29 20 5f 41 4e 53 49 5f 41 bjTypes) _ANSI_A
dcf0: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
dd00: 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
dd10: 62 6a 20 2a 20 6f 62 6a 50 74 72 29 29 3b 20 2f bj * objPtr)); /
dd20: 2a 20 31 34 20 2a 2f 0a 20 20 20 20 76 6f 69 64 * 14 */. void
dd30: 20 28 2a 74 63 6c 5f 41 70 70 65 6e 64 53 74 72 (*tcl_AppendStr
dd40: 69 6e 67 73 54 6f 4f 62 6a 29 20 5f 41 4e 53 49 ingsToObj) _ANSI
dd50: 5f 41 52 47 53 5f 28 54 43 4c 5f 56 41 52 41 52 _ARGS_(TCL_VARAR
dd60: 47 53 28 54 63 6c 5f 4f 62 6a 20 2a 2c 6f 62 6a GS(Tcl_Obj *,obj
dd70: 50 74 72 29 29 3b 20 2f 2a 20 31 35 20 2a 2f 0a Ptr)); /* 15 */.
dd80: 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 41 void (*tcl_A
dd90: 70 70 65 6e 64 54 6f 4f 62 6a 29 20 5f 41 4e 53 ppendToObj) _ANS
dda0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a I_ARGS_((Tcl_Obj
ddb0: 2a 20 6f 62 6a 50 74 72 2c 20 43 4f 4e 53 54 20 * objPtr, CONST
ddc0: 63 68 61 72 2a 20 62 79 74 65 73 2c 20 69 6e 74 char* bytes, int
ddd0: 20 6c 65 6e 67 74 68 29 29 3b 20 2f 2a 20 31 36 length)); /* 16
dde0: 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 20 */. Tcl_Obj
ddf0: 2a 20 28 2a 74 63 6c 5f 43 6f 6e 63 61 74 4f 62 * (*tcl_ConcatOb
de00: 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 j) _ANSI_ARGS_((
de10: 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c 5f 4f 62 int objc, Tcl_Ob
de20: 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 29 j *CONST objv[])
de30: 29 3b 20 2f 2a 20 31 37 20 2a 2f 0a 20 20 20 20 ); /* 17 */.
de40: 69 6e 74 20 28 2a 74 63 6c 5f 43 6f 6e 76 65 72 int (*tcl_Conver
de50: 74 54 6f 54 79 70 65 29 20 5f 41 4e 53 49 5f 41 tToType) _ANSI_A
de60: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
de70: 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
de80: 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 54 63 6c bj * objPtr, Tcl
de90: 5f 4f 62 6a 54 79 70 65 20 2a 20 74 79 70 65 50 _ObjType * typeP
dea0: 74 72 29 29 3b 20 2f 2a 20 31 38 20 2a 2f 0a 20 tr)); /* 18 */.
deb0: 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 62 void (*tcl_Db
dec0: 44 65 63 72 52 65 66 43 6f 75 6e 74 29 20 5f 41 DecrRefCount) _A
ded0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
dee0: 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 43 4f 4e bj * objPtr, CON
def0: 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 ST char * file,
df00: 69 6e 74 20 6c 69 6e 65 29 29 3b 20 2f 2a 20 31 int line)); /* 1
df10: 39 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 9 */. void (*
df20: 74 63 6c 5f 44 62 49 6e 63 72 52 65 66 43 6f 75 tcl_DbIncrRefCou
df30: 6e 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nt) _ANSI_ARGS_(
df40: 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 (Tcl_Obj * objPt
df50: 72 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 r, CONST char *
df60: 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 file, int line))
df70: 3b 20 2f 2a 20 32 30 20 2a 2f 0a 20 20 20 20 69 ; /* 20 */. i
df80: 6e 74 20 28 2a 74 63 6c 5f 44 62 49 73 53 68 61 nt (*tcl_DbIsSha
df90: 72 65 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f red) _ANSI_ARGS_
dfa0: 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 ((Tcl_Obj * objP
dfb0: 74 72 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a tr, CONST char *
dfc0: 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 file, int line)
dfd0: 29 3b 20 2f 2a 20 32 31 20 2a 2f 0a 20 20 20 20 ); /* 21 */.
dfe0: 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f Tcl_Obj * (*tcl_
dff0: 44 62 4e 65 77 42 6f 6f 6c 65 61 6e 4f 62 6a 29 DbNewBooleanObj)
e000: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e _ANSI_ARGS_((in
e010: 74 20 62 6f 6f 6c 56 61 6c 75 65 2c 20 43 4f 4e t boolValue, CON
e020: 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 ST char * file,
e030: 69 6e 74 20 6c 69 6e 65 29 29 3b 20 2f 2a 20 32 int line)); /* 2
e040: 32 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 2 */. Tcl_Obj
e050: 20 2a 20 28 2a 74 63 6c 5f 44 62 4e 65 77 42 79 * (*tcl_DbNewBy
e060: 74 65 41 72 72 61 79 4f 62 6a 29 20 5f 41 4e 53 teArrayObj) _ANS
e070: 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 75 I_ARGS_((CONST u
e080: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 20 62 nsigned char * b
e090: 79 74 65 73 2c 20 69 6e 74 20 6c 65 6e 67 74 68 ytes, int length
e0a0: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 , CONST char * f
e0b0: 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 3b ile, int line));
e0c0: 20 2f 2a 20 32 33 20 2a 2f 0a 20 20 20 20 54 63 /* 23 */. Tc
e0d0: 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f 44 62 l_Obj * (*tcl_Db
e0e0: 4e 65 77 44 6f 75 62 6c 65 4f 62 6a 29 20 5f 41 NewDoubleObj) _A
e0f0: 4e 53 49 5f 41 52 47 53 5f 28 28 64 6f 75 62 6c NSI_ARGS_((doubl
e100: 65 20 64 6f 75 62 6c 65 56 61 6c 75 65 2c 20 43 e doubleValue, C
e110: 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 ONST char * file
e120: 2c 20 69 6e 74 20 6c 69 6e 65 29 29 3b 20 2f 2a , int line)); /*
e130: 20 32 34 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 24 */. Tcl_O
e140: 62 6a 20 2a 20 28 2a 74 63 6c 5f 44 62 4e 65 77 bj * (*tcl_DbNew
e150: 4c 69 73 74 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 ListObj) _ANSI_A
e160: 52 47 53 5f 28 28 69 6e 74 20 6f 62 6a 63 2c 20 RGS_((int objc,
e170: 54 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 2a Tcl_Obj *CONST *
e180: 20 6f 62 6a 76 2c 20 43 4f 4e 53 54 20 63 68 61 objv, CONST cha
e190: 72 20 2a 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 r * file, int li
e1a0: 6e 65 29 29 3b 20 2f 2a 20 32 35 20 2a 2f 0a 20 ne)); /* 25 */.
e1b0: 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 Tcl_Obj * (*t
e1c0: 63 6c 5f 44 62 4e 65 77 4c 6f 6e 67 4f 62 6a 29 cl_DbNewLongObj)
e1d0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 6c 6f _ANSI_ARGS_((lo
e1e0: 6e 67 20 6c 6f 6e 67 56 61 6c 75 65 2c 20 43 4f ng longValue, CO
e1f0: 4e 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 2c NST char * file,
e200: 20 69 6e 74 20 6c 69 6e 65 29 29 3b 20 2f 2a 20 int line)); /*
e210: 32 36 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 26 */. Tcl_Ob
e220: 6a 20 2a 20 28 2a 74 63 6c 5f 44 62 4e 65 77 4f j * (*tcl_DbNewO
e230: 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
e240: 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 69 (CONST char * fi
e250: 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 3b 20 le, int line));
e260: 2f 2a 20 32 37 20 2a 2f 0a 20 20 20 20 54 63 6c /* 27 */. Tcl
e270: 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f 44 62 4e _Obj * (*tcl_DbN
e280: 65 77 53 74 72 69 6e 67 4f 62 6a 29 20 5f 41 4e ewStringObj) _AN
e290: 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 SI_ARGS_((CONST
e2a0: 63 68 61 72 20 2a 20 62 79 74 65 73 2c 20 69 6e char * bytes, in
e2b0: 74 20 6c 65 6e 67 74 68 2c 20 43 4f 4e 53 54 20 t length, CONST
e2c0: 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 69 6e 74 char * file, int
e2d0: 20 6c 69 6e 65 29 29 3b 20 2f 2a 20 32 38 20 2a line)); /* 28 *
e2e0: 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 /. Tcl_Obj *
e2f0: 28 2a 74 63 6c 5f 44 75 70 6c 69 63 61 74 65 4f (*tcl_DuplicateO
e300: 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
e310: 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 (Tcl_Obj * objPt
e320: 72 29 29 3b 20 2f 2a 20 32 39 20 2a 2f 0a 20 20 r)); /* 29 */.
e330: 20 20 76 6f 69 64 20 28 2a 74 63 6c 46 72 65 65 void (*tclFree
e340: 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Obj) _ANSI_ARGS_
e350: 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 ((Tcl_Obj * objP
e360: 74 72 29 29 3b 20 2f 2a 20 33 30 20 2a 2f 0a 20 tr)); /* 30 */.
e370: 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 int (*tcl_Get
e380: 42 6f 6f 6c 65 61 6e 29 20 5f 41 4e 53 49 5f 41 Boolean) _ANSI_A
e390: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
e3a0: 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 * interp, CONST
e3b0: 20 63 68 61 72 20 2a 20 73 74 72 2c 20 69 6e 74 char * str, int
e3c0: 20 2a 20 62 6f 6f 6c 50 74 72 29 29 3b 20 2f 2a * boolPtr)); /*
e3d0: 20 33 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 31 */. int (
e3e0: 2a 74 63 6c 5f 47 65 74 42 6f 6f 6c 65 61 6e 46 *tcl_GetBooleanF
e3f0: 72 6f 6d 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 romObj) _ANSI_AR
e400: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
e410: 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 * interp, Tcl_Ob
e420: 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 j * objPtr, int
e430: 2a 20 62 6f 6f 6c 50 74 72 29 29 3b 20 2f 2a 20 * boolPtr)); /*
e440: 33 32 20 2a 2f 0a 20 20 20 20 75 6e 73 69 67 6e 32 */. unsign
e450: 65 64 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f ed char * (*tcl_
e460: 47 65 74 42 79 74 65 41 72 72 61 79 46 72 6f 6d GetByteArrayFrom
e470: 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Obj) _ANSI_ARGS_
e480: 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 ((Tcl_Obj * objP
e490: 74 72 2c 20 69 6e 74 20 2a 20 6c 65 6e 67 74 68 tr, int * length
e4a0: 50 74 72 29 29 3b 20 2f 2a 20 33 33 20 2a 2f 0a Ptr)); /* 33 */.
e4b0: 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 int (*tcl_Ge
e4c0: 74 44 6f 75 62 6c 65 29 20 5f 41 4e 53 49 5f 41 tDouble) _ANSI_A
e4d0: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
e4e0: 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 * interp, CONST
e4f0: 20 63 68 61 72 20 2a 20 73 74 72 2c 20 64 6f 75 char * str, dou
e500: 62 6c 65 20 2a 20 64 6f 75 62 6c 65 50 74 72 29 ble * doublePtr)
e510: 29 3b 20 2f 2a 20 33 34 20 2a 2f 0a 20 20 20 20 ); /* 34 */.
e520: 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 44 6f 75 int (*tcl_GetDou
e530: 62 6c 65 46 72 6f 6d 4f 62 6a 29 20 5f 41 4e 53 bleFromObj) _ANS
e540: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
e550: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 erp * interp, Tc
e560: 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 l_Obj * objPtr,
e570: 64 6f 75 62 6c 65 20 2a 20 64 6f 75 62 6c 65 50 double * doubleP
e580: 74 72 29 29 3b 20 2f 2a 20 33 35 20 2a 2f 0a 20 tr)); /* 35 */.
e590: 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 int (*tcl_Get
e5a0: 49 6e 64 65 78 46 72 6f 6d 4f 62 6a 29 20 5f 41 IndexFromObj) _A
e5b0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
e5c0: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
e5d0: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
e5e0: 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a , CONST84 char *
e5f0: 2a 20 74 61 62 6c 65 50 74 72 2c 20 43 4f 4e 53 * tablePtr, CONS
e600: 54 20 63 68 61 72 20 2a 20 6d 73 67 2c 20 69 6e T char * msg, in
e610: 74 20 66 6c 61 67 73 2c 20 69 6e 74 20 2a 20 69 t flags, int * i
e620: 6e 64 65 78 50 74 72 29 29 3b 20 2f 2a 20 33 36 ndexPtr)); /* 36
e630: 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
e640: 6c 5f 47 65 74 49 6e 74 29 20 5f 41 4e 53 49 5f l_GetInt) _ANSI_
e650: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
e660: 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 p * interp, CONS
e670: 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 69 6e T char * str, in
e680: 74 20 2a 20 69 6e 74 50 74 72 29 29 3b 20 2f 2a t * intPtr)); /*
e690: 20 33 37 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 37 */. int (
e6a0: 2a 74 63 6c 5f 47 65 74 49 6e 74 46 72 6f 6d 4f *tcl_GetIntFromO
e6b0: 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
e6c0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
e6d0: 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 terp, Tcl_Obj *
e6e0: 6f 62 6a 50 74 72 2c 20 69 6e 74 20 2a 20 69 6e objPtr, int * in
e6f0: 74 50 74 72 29 29 3b 20 2f 2a 20 33 38 20 2a 2f tPtr)); /* 38 */
e700: 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 . int (*tcl_G
e710: 65 74 4c 6f 6e 67 46 72 6f 6d 4f 62 6a 29 20 5f etLongFromObj) _
e720: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
e730: 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
e740: 20 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 Tcl_Obj * objPt
e750: 72 2c 20 6c 6f 6e 67 20 2a 20 6c 6f 6e 67 50 74 r, long * longPt
e760: 72 29 29 3b 20 2f 2a 20 33 39 20 2a 2f 0a 20 20 r)); /* 39 */.
e770: 20 20 54 63 6c 5f 4f 62 6a 54 79 70 65 20 2a 20 Tcl_ObjType *
e780: 28 2a 74 63 6c 5f 47 65 74 4f 62 6a 54 79 70 65 (*tcl_GetObjType
e790: 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 ) _ANSI_ARGS_((C
e7a0: 4f 4e 53 54 20 63 68 61 72 20 2a 20 74 79 70 65 ONST char * type
e7b0: 4e 61 6d 65 29 29 3b 20 2f 2a 20 34 30 20 2a 2f Name)); /* 40 */
e7c0: 0a 20 20 20 20 63 68 61 72 20 2a 20 28 2a 74 63 . char * (*tc
e7d0: 6c 5f 47 65 74 53 74 72 69 6e 67 46 72 6f 6d 4f l_GetStringFromO
e7e0: 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
e7f0: 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 (Tcl_Obj * objPt
e800: 72 2c 20 69 6e 74 20 2a 20 6c 65 6e 67 74 68 50 r, int * lengthP
e810: 74 72 29 29 3b 20 2f 2a 20 34 31 20 2a 2f 0a 20 tr)); /* 41 */.
e820: 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 49 6e void (*tcl_In
e830: 76 61 6c 69 64 61 74 65 53 74 72 69 6e 67 52 65 validateStringRe
e840: 70 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 p) _ANSI_ARGS_((
e850: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
e860: 29 29 3b 20 2f 2a 20 34 32 20 2a 2f 0a 20 20 20 )); /* 42 */.
e870: 20 69 6e 74 20 28 2a 74 63 6c 5f 4c 69 73 74 4f int (*tcl_ListO
e880: 62 6a 41 70 70 65 6e 64 4c 69 73 74 29 20 5f 41 bjAppendList) _A
e890: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
e8a0: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
e8b0: 54 63 6c 5f 4f 62 6a 20 2a 20 6c 69 73 74 50 74 Tcl_Obj * listPt
e8c0: 72 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 65 6c 65 r, Tcl_Obj * ele
e8d0: 6d 4c 69 73 74 50 74 72 29 29 3b 20 2f 2a 20 34 mListPtr)); /* 4
e8e0: 33 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 3 */. int (*t
e8f0: 63 6c 5f 4c 69 73 74 4f 62 6a 41 70 70 65 6e 64 cl_ListObjAppend
e900: 45 6c 65 6d 65 6e 74 29 20 5f 41 4e 53 49 5f 41 Element) _ANSI_A
e910: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
e920: 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
e930: 62 6a 20 2a 20 6c 69 73 74 50 74 72 2c 20 54 63 bj * listPtr, Tc
e940: 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 29 29 l_Obj * objPtr))
e950: 3b 20 2f 2a 20 34 34 20 2a 2f 0a 20 20 20 20 69 ; /* 44 */. i
e960: 6e 74 20 28 2a 74 63 6c 5f 4c 69 73 74 4f 62 6a nt (*tcl_ListObj
e970: 47 65 74 45 6c 65 6d 65 6e 74 73 29 20 5f 41 4e GetElements) _AN
e980: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
e990: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 terp * interp, T
e9a0: 63 6c 5f 4f 62 6a 20 2a 20 6c 69 73 74 50 74 72 cl_Obj * listPtr
e9b0: 2c 20 69 6e 74 20 2a 20 6f 62 6a 63 50 74 72 2c , int * objcPtr,
e9c0: 20 54 63 6c 5f 4f 62 6a 20 2a 2a 2a 20 6f 62 6a Tcl_Obj *** obj
e9d0: 76 50 74 72 29 29 3b 20 2f 2a 20 34 35 20 2a 2f vPtr)); /* 45 */
e9e0: 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 4c . int (*tcl_L
e9f0: 69 73 74 4f 62 6a 49 6e 64 65 78 29 20 5f 41 4e istObjIndex) _AN
ea00: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
ea10: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 terp * interp, T
ea20: 63 6c 5f 4f 62 6a 20 2a 20 6c 69 73 74 50 74 72 cl_Obj * listPtr
ea30: 2c 20 69 6e 74 20 69 6e 64 65 78 2c 20 54 63 6c , int index, Tcl
ea40: 5f 4f 62 6a 20 2a 2a 20 6f 62 6a 50 74 72 50 74 _Obj ** objPtrPt
ea50: 72 29 29 3b 20 2f 2a 20 34 36 20 2a 2f 0a 20 20 r)); /* 46 */.
ea60: 20 20 69 6e 74 20 28 2a 74 63 6c 5f 4c 69 73 74 int (*tcl_List
ea70: 4f 62 6a 4c 65 6e 67 74 68 29 20 5f 41 4e 53 49 ObjLength) _ANSI
ea80: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
ea90: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c rp * interp, Tcl
eaa0: 5f 4f 62 6a 20 2a 20 6c 69 73 74 50 74 72 2c 20 _Obj * listPtr,
eab0: 69 6e 74 20 2a 20 6c 65 6e 67 74 68 50 74 72 29 int * lengthPtr)
eac0: 29 3b 20 2f 2a 20 34 37 20 2a 2f 0a 20 20 20 20 ); /* 47 */.
ead0: 69 6e 74 20 28 2a 74 63 6c 5f 4c 69 73 74 4f 62 int (*tcl_ListOb
eae0: 6a 52 65 70 6c 61 63 65 29 20 5f 41 4e 53 49 5f jReplace) _ANSI_
eaf0: 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
eb00: 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f p * interp, Tcl_
eb10: 4f 62 6a 20 2a 20 6c 69 73 74 50 74 72 2c 20 69 Obj * listPtr, i
eb20: 6e 74 20 66 69 72 73 74 2c 20 69 6e 74 20 63 6f nt first, int co
eb30: 75 6e 74 2c 20 69 6e 74 20 6f 62 6a 63 2c 20 54 unt, int objc, T
eb40: 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 cl_Obj *CONST ob
eb50: 6a 76 5b 5d 29 29 3b 20 2f 2a 20 34 38 20 2a 2f jv[])); /* 48 */
eb60: 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 . Tcl_Obj * (
eb70: 2a 74 63 6c 5f 4e 65 77 42 6f 6f 6c 65 61 6e 4f *tcl_NewBooleanO
eb80: 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
eb90: 28 69 6e 74 20 62 6f 6f 6c 56 61 6c 75 65 29 29 (int boolValue))
eba0: 3b 20 2f 2a 20 34 39 20 2a 2f 0a 20 20 20 20 54 ; /* 49 */. T
ebb0: 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f 4e cl_Obj * (*tcl_N
ebc0: 65 77 42 79 74 65 41 72 72 61 79 4f 62 6a 29 20 ewByteArrayObj)
ebd0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
ebe0: 53 54 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 ST unsigned char
ebf0: 2a 20 62 79 74 65 73 2c 20 69 6e 74 20 6c 65 6e * bytes, int len
ec00: 67 74 68 29 29 3b 20 2f 2a 20 35 30 20 2a 2f 0a gth)); /* 50 */.
ec10: 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a Tcl_Obj * (*
ec20: 74 63 6c 5f 4e 65 77 44 6f 75 62 6c 65 4f 62 6a tcl_NewDoubleObj
ec30: 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 64 ) _ANSI_ARGS_((d
ec40: 6f 75 62 6c 65 20 64 6f 75 62 6c 65 56 61 6c 75 ouble doubleValu
ec50: 65 29 29 3b 20 2f 2a 20 35 31 20 2a 2f 0a 20 20 e)); /* 51 */.
ec60: 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 Tcl_Obj * (*tc
ec70: 6c 5f 4e 65 77 49 6e 74 4f 62 6a 29 20 5f 41 4e l_NewIntObj) _AN
ec80: 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 69 6e SI_ARGS_((int in
ec90: 74 56 61 6c 75 65 29 29 3b 20 2f 2a 20 35 32 20 tValue)); /* 52
eca0: 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a */. Tcl_Obj *
ecb0: 20 28 2a 74 63 6c 5f 4e 65 77 4c 69 73 74 4f 62 (*tcl_NewListOb
ecc0: 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 j) _ANSI_ARGS_((
ecd0: 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c 5f 4f 62 int objc, Tcl_Ob
ece0: 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 29 j *CONST objv[])
ecf0: 29 3b 20 2f 2a 20 35 33 20 2a 2f 0a 20 20 20 20 ); /* 53 */.
ed00: 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f Tcl_Obj * (*tcl_
ed10: 4e 65 77 4c 6f 6e 67 4f 62 6a 29 20 5f 41 4e 53 NewLongObj) _ANS
ed20: 49 5f 41 52 47 53 5f 28 28 6c 6f 6e 67 20 6c 6f I_ARGS_((long lo
ed30: 6e 67 56 61 6c 75 65 29 29 3b 20 2f 2a 20 35 34 ngValue)); /* 54
ed40: 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 20 */. Tcl_Obj
ed50: 2a 20 28 2a 74 63 6c 5f 4e 65 77 4f 62 6a 29 20 * (*tcl_NewObj)
ed60: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 _ANSI_ARGS_((voi
ed70: 64 29 29 3b 20 2f 2a 20 35 35 20 2a 2f 0a 20 20 d)); /* 55 */.
ed80: 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 Tcl_Obj * (*tc
ed90: 6c 5f 4e 65 77 53 74 72 69 6e 67 4f 62 6a 29 20 l_NewStringObj)
eda0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
edb0: 53 54 20 63 68 61 72 20 2a 20 62 79 74 65 73 2c ST char * bytes,
edc0: 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 3b 20 2f int length)); /
edd0: 2a 20 35 36 20 2a 2f 0a 20 20 20 20 76 6f 69 64 * 56 */. void
ede0: 20 28 2a 74 63 6c 5f 53 65 74 42 6f 6f 6c 65 61 (*tcl_SetBoolea
edf0: 6e 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 nObj) _ANSI_ARGS
ee00: 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a _((Tcl_Obj * obj
ee10: 50 74 72 2c 20 69 6e 74 20 62 6f 6f 6c 56 61 6c Ptr, int boolVal
ee20: 75 65 29 29 3b 20 2f 2a 20 35 37 20 2a 2f 0a 20 ue)); /* 57 */.
ee30: 20 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 unsigned char
ee40: 20 2a 20 28 2a 74 63 6c 5f 53 65 74 42 79 74 65 * (*tcl_SetByte
ee50: 41 72 72 61 79 4c 65 6e 67 74 68 29 20 5f 41 4e ArrayLength) _AN
ee60: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
ee70: 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 j * objPtr, int
ee80: 6c 65 6e 67 74 68 29 29 3b 20 2f 2a 20 35 38 20 length)); /* 58
ee90: 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 */. void (*tc
eea0: 6c 5f 53 65 74 42 79 74 65 41 72 72 61 79 4f 62 l_SetByteArrayOb
eeb0: 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 j) _ANSI_ARGS_((
eec0: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
eed0: 2c 20 43 4f 4e 53 54 20 75 6e 73 69 67 6e 65 64 , CONST unsigned
eee0: 20 63 68 61 72 20 2a 20 62 79 74 65 73 2c 20 69 char * bytes, i
eef0: 6e 74 20 6c 65 6e 67 74 68 29 29 3b 20 2f 2a 20 nt length)); /*
ef00: 35 39 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 59 */. void (
ef10: 2a 74 63 6c 5f 53 65 74 44 6f 75 62 6c 65 4f 62 *tcl_SetDoubleOb
ef20: 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 j) _ANSI_ARGS_((
ef30: 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 Tcl_Obj * objPtr
ef40: 2c 20 64 6f 75 62 6c 65 20 64 6f 75 62 6c 65 56 , double doubleV
ef50: 61 6c 75 65 29 29 3b 20 2f 2a 20 36 30 20 2a 2f alue)); /* 60 */
ef60: 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f . void (*tcl_
ef70: 53 65 74 49 6e 74 4f 62 6a 29 20 5f 41 4e 53 49 SetIntObj) _ANSI
ef80: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 _ARGS_((Tcl_Obj
ef90: 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 69 6e * objPtr, int in
efa0: 74 56 61 6c 75 65 29 29 3b 20 2f 2a 20 36 31 20 tValue)); /* 61
efb0: 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 */. void (*tc
efc0: 6c 5f 53 65 74 4c 69 73 74 4f 62 6a 29 20 5f 41 l_SetListObj) _A
efd0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
efe0: 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 bj * objPtr, int
eff0: 20 6f 62 6a 63 2c 20 54 63 6c 5f 4f 62 6a 20 2a objc, Tcl_Obj *
f000: 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 29 29 3b 20 CONST objv[]));
f010: 2f 2a 20 36 32 20 2a 2f 0a 20 20 20 20 76 6f 69 /* 62 */. voi
f020: 64 20 28 2a 74 63 6c 5f 53 65 74 4c 6f 6e 67 4f d (*tcl_SetLongO
f030: 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
f040: 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 (Tcl_Obj * objPt
f050: 72 2c 20 6c 6f 6e 67 20 6c 6f 6e 67 56 61 6c 75 r, long longValu
f060: 65 29 29 3b 20 2f 2a 20 36 33 20 2a 2f 0a 20 20 e)); /* 63 */.
f070: 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 65 74 void (*tcl_Set
f080: 4f 62 6a 4c 65 6e 67 74 68 29 20 5f 41 4e 53 49 ObjLength) _ANSI
f090: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 _ARGS_((Tcl_Obj
f0a0: 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 6c 65 * objPtr, int le
f0b0: 6e 67 74 68 29 29 3b 20 2f 2a 20 36 34 20 2a 2f ngth)); /* 64 */
f0c0: 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f . void (*tcl_
f0d0: 53 65 74 53 74 72 69 6e 67 4f 62 6a 29 20 5f 41 SetStringObj) _A
f0e0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
f0f0: 62 6a 2a 20 6f 62 6a 50 74 72 2c 20 43 4f 4e 53 bj* objPtr, CONS
f100: 54 20 63 68 61 72 2a 20 62 79 74 65 73 2c 20 69 T char* bytes, i
f110: 6e 74 20 6c 65 6e 67 74 68 29 29 3b 20 2f 2a 20 nt length)); /*
f120: 36 35 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 65 */. void (
f130: 2a 74 63 6c 5f 41 64 64 45 72 72 6f 72 49 6e 66 *tcl_AddErrorInf
f140: 6f 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 o) _ANSI_ARGS_((
f150: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
f160: 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 erp, CONST char
f170: 2a 20 6d 65 73 73 61 67 65 29 29 3b 20 2f 2a 20 * message)); /*
f180: 36 36 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 66 */. void (
f190: 2a 74 63 6c 5f 41 64 64 4f 62 6a 45 72 72 6f 72 *tcl_AddObjError
f1a0: 49 6e 66 6f 29 20 5f 41 4e 53 49 5f 41 52 47 53 Info) _ANSI_ARGS
f1b0: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
f1c0: 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 interp, CONST ch
f1d0: 61 72 20 2a 20 6d 65 73 73 61 67 65 2c 20 69 6e ar * message, in
f1e0: 74 20 6c 65 6e 67 74 68 29 29 3b 20 2f 2a 20 36 t length)); /* 6
f1f0: 37 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 7 */. void (*
f200: 74 63 6c 5f 41 6c 6c 6f 77 45 78 63 65 70 74 69 tcl_AllowExcepti
f210: 6f 6e 73 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ons) _ANSI_ARGS_
f220: 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
f230: 6e 74 65 72 70 29 29 3b 20 2f 2a 20 36 38 20 2a nterp)); /* 68 *
f240: 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
f250: 5f 41 70 70 65 6e 64 45 6c 65 6d 65 6e 74 29 20 _AppendElement)
f260: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
f270: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
f280: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
f290: 74 72 69 6e 67 29 29 3b 20 2f 2a 20 36 39 20 2a tring)); /* 69 *
f2a0: 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
f2b0: 5f 41 70 70 65 6e 64 52 65 73 75 6c 74 29 20 5f _AppendResult) _
f2c0: 41 4e 53 49 5f 41 52 47 53 5f 28 54 43 4c 5f 56 ANSI_ARGS_(TCL_V
f2d0: 41 52 41 52 47 53 28 54 63 6c 5f 49 6e 74 65 72 ARARGS(Tcl_Inter
f2e0: 70 20 2a 2c 69 6e 74 65 72 70 29 29 3b 20 2f 2a p *,interp)); /*
f2f0: 20 37 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 41 70 */. Tcl_A
f300: 73 79 6e 63 48 61 6e 64 6c 65 72 20 28 2a 74 63 syncHandler (*tc
f310: 6c 5f 41 73 79 6e 63 43 72 65 61 74 65 29 20 5f l_AsyncCreate) _
f320: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
f330: 41 73 79 6e 63 50 72 6f 63 20 2a 20 70 72 6f 63 AsyncProc * proc
f340: 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 , ClientData cli
f350: 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 37 31 entData)); /* 71
f360: 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
f370: 63 6c 5f 41 73 79 6e 63 44 65 6c 65 74 65 29 20 cl_AsyncDelete)
f380: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
f390: 5f 41 73 79 6e 63 48 61 6e 64 6c 65 72 20 61 73 _AsyncHandler as
f3a0: 79 6e 63 29 29 3b 20 2f 2a 20 37 32 20 2a 2f 0a ync)); /* 72 */.
f3b0: 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 41 73 int (*tcl_As
f3c0: 79 6e 63 49 6e 76 6f 6b 65 29 20 5f 41 4e 53 49 yncInvoke) _ANSI
f3d0: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
f3e0: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e 74 rp * interp, int
f3f0: 20 63 6f 64 65 29 29 3b 20 2f 2a 20 37 33 20 2a code)); /* 73 *
f400: 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
f410: 5f 41 73 79 6e 63 4d 61 72 6b 29 20 5f 41 4e 53 _AsyncMark) _ANS
f420: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 41 73 79 I_ARGS_((Tcl_Asy
f430: 6e 63 48 61 6e 64 6c 65 72 20 61 73 79 6e 63 29 ncHandler async)
f440: 29 3b 20 2f 2a 20 37 34 20 2a 2f 0a 20 20 20 20 ); /* 74 */.
f450: 69 6e 74 20 28 2a 74 63 6c 5f 41 73 79 6e 63 52 int (*tcl_AsyncR
f460: 65 61 64 79 29 20 5f 41 4e 53 49 5f 41 52 47 53 eady) _ANSI_ARGS
f470: 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 37 35 _((void)); /* 75
f480: 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
f490: 63 6c 5f 42 61 63 6b 67 72 6f 75 6e 64 45 72 72 cl_BackgroundErr
f4a0: 6f 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 or) _ANSI_ARGS_(
f4b0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
f4c0: 74 65 72 70 29 29 3b 20 2f 2a 20 37 36 20 2a 2f terp)); /* 76 */
f4d0: 0a 20 20 20 20 63 68 61 72 20 28 2a 74 63 6c 5f . char (*tcl_
f4e0: 42 61 63 6b 73 6c 61 73 68 29 20 5f 41 4e 53 49 Backslash) _ANSI
f4f0: 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 _ARGS_((CONST ch
f500: 61 72 20 2a 20 73 72 63 2c 20 69 6e 74 20 2a 20 ar * src, int *
f510: 72 65 61 64 50 74 72 29 29 3b 20 2f 2a 20 37 37 readPtr)); /* 77
f520: 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
f530: 6c 5f 42 61 64 43 68 61 6e 6e 65 6c 4f 70 74 69 l_BadChannelOpti
f540: 6f 6e 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 on) _ANSI_ARGS_(
f550: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
f560: 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 terp, CONST char
f570: 20 2a 20 6f 70 74 69 6f 6e 4e 61 6d 65 2c 20 43 * optionName, C
f580: 4f 4e 53 54 20 63 68 61 72 20 2a 20 6f 70 74 69 ONST char * opti
f590: 6f 6e 4c 69 73 74 29 29 3b 20 2f 2a 20 37 38 20 onList)); /* 78
f5a0: 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 */. void (*tc
f5b0: 6c 5f 43 61 6c 6c 57 68 65 6e 44 65 6c 65 74 65 l_CallWhenDelete
f5c0: 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 d) _ANSI_ARGS_((
f5d0: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
f5e0: 65 72 70 2c 20 54 63 6c 5f 49 6e 74 65 72 70 44 erp, Tcl_InterpD
f5f0: 65 6c 65 74 65 50 72 6f 63 20 2a 20 70 72 6f 63 eleteProc * proc
f600: 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 , ClientData cli
f610: 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 37 39 entData)); /* 79
f620: 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
f630: 63 6c 5f 43 61 6e 63 65 6c 49 64 6c 65 43 61 6c cl_CancelIdleCal
f640: 6c 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 l) _ANSI_ARGS_((
f650: 54 63 6c 5f 49 64 6c 65 50 72 6f 63 20 2a 20 69 Tcl_IdleProc * i
f660: 64 6c 65 50 72 6f 63 2c 20 43 6c 69 65 6e 74 44 dleProc, ClientD
f670: 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 ata clientData))
f680: 3b 20 2f 2a 20 38 30 20 2a 2f 0a 20 20 20 20 69 ; /* 80 */. i
f690: 6e 74 20 28 2a 74 63 6c 5f 43 6c 6f 73 65 29 20 nt (*tcl_Close)
f6a0: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
f6b0: 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
f6c0: 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 , Tcl_Channel ch
f6d0: 61 6e 29 29 3b 20 2f 2a 20 38 31 20 2a 2f 0a 20 an)); /* 81 */.
f6e0: 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 43 6f 6d int (*tcl_Com
f6f0: 6d 61 6e 64 43 6f 6d 70 6c 65 74 65 29 20 5f 41 mandComplete) _A
f700: 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 NSI_ARGS_((CONST
f710: 20 63 68 61 72 20 2a 20 63 6d 64 29 29 3b 20 2f char * cmd)); /
f720: 2a 20 38 32 20 2a 2f 0a 20 20 20 20 63 68 61 72 * 82 */. char
f730: 20 2a 20 28 2a 74 63 6c 5f 43 6f 6e 63 61 74 29 * (*tcl_Concat)
f740: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e _ANSI_ARGS_((in
f750: 74 20 61 72 67 63 2c 20 43 4f 4e 53 54 38 34 20 t argc, CONST84
f760: 63 68 61 72 20 2a 20 43 4f 4e 53 54 20 2a 20 61 char * CONST * a
f770: 72 67 76 29 29 3b 20 2f 2a 20 38 33 20 2a 2f 0a rgv)); /* 83 */.
f780: 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 43 6f int (*tcl_Co
f790: 6e 76 65 72 74 45 6c 65 6d 65 6e 74 29 20 5f 41 nvertElement) _A
f7a0: 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 NSI_ARGS_((CONST
f7b0: 20 63 68 61 72 20 2a 20 73 72 63 2c 20 63 68 61 char * src, cha
f7c0: 72 20 2a 20 64 73 74 2c 20 69 6e 74 20 66 6c 61 r * dst, int fla
f7d0: 67 73 29 29 3b 20 2f 2a 20 38 34 20 2a 2f 0a 20 gs)); /* 84 */.
f7e0: 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 43 6f 6e int (*tcl_Con
f7f0: 76 65 72 74 43 6f 75 6e 74 65 64 45 6c 65 6d 65 vertCountedEleme
f800: 6e 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nt) _ANSI_ARGS_(
f810: 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 72 (CONST char * sr
f820: 63 2c 20 69 6e 74 20 6c 65 6e 67 74 68 2c 20 63 c, int length, c
f830: 68 61 72 20 2a 20 64 73 74 2c 20 69 6e 74 20 66 har * dst, int f
f840: 6c 61 67 73 29 29 3b 20 2f 2a 20 38 35 20 2a 2f lags)); /* 85 */
f850: 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 43 . int (*tcl_C
f860: 72 65 61 74 65 41 6c 69 61 73 29 20 5f 41 4e 53 reateAlias) _ANS
f870: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
f880: 65 72 70 20 2a 20 73 6c 61 76 65 2c 20 43 4f 4e erp * slave, CON
f890: 53 54 20 63 68 61 72 20 2a 20 73 6c 61 76 65 43 ST char * slaveC
f8a0: 6d 64 2c 20 54 63 6c 5f 49 6e 74 65 72 70 20 2a md, Tcl_Interp *
f8b0: 20 74 61 72 67 65 74 2c 20 43 4f 4e 53 54 20 63 target, CONST c
f8c0: 68 61 72 20 2a 20 74 61 72 67 65 74 43 6d 64 2c har * targetCmd,
f8d0: 20 69 6e 74 20 61 72 67 63 2c 20 43 4f 4e 53 54 int argc, CONST
f8e0: 38 34 20 63 68 61 72 20 2a 20 43 4f 4e 53 54 20 84 char * CONST
f8f0: 2a 20 61 72 67 76 29 29 3b 20 2f 2a 20 38 36 20 * argv)); /* 86
f900: 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c */. int (*tcl
f910: 5f 43 72 65 61 74 65 41 6c 69 61 73 4f 62 6a 29 _CreateAliasObj)
f920: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
f930: 6c 5f 49 6e 74 65 72 70 20 2a 20 73 6c 61 76 65 l_Interp * slave
f940: 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
f950: 6c 61 76 65 43 6d 64 2c 20 54 63 6c 5f 49 6e 74 laveCmd, Tcl_Int
f960: 65 72 70 20 2a 20 74 61 72 67 65 74 2c 20 43 4f erp * target, CO
f970: 4e 53 54 20 63 68 61 72 20 2a 20 74 61 72 67 65 NST char * targe
f980: 74 43 6d 64 2c 20 69 6e 74 20 6f 62 6a 63 2c 20 tCmd, int objc,
f990: 54 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f Tcl_Obj *CONST o
f9a0: 62 6a 76 5b 5d 29 29 3b 20 2f 2a 20 38 37 20 2a bjv[])); /* 87 *
f9b0: 2f 0a 20 20 20 20 54 63 6c 5f 43 68 61 6e 6e 65 /. Tcl_Channe
f9c0: 6c 20 28 2a 74 63 6c 5f 43 72 65 61 74 65 43 68 l (*tcl_CreateCh
f9d0: 61 6e 6e 65 6c 29 20 5f 41 4e 53 49 5f 41 52 47 annel) _ANSI_ARG
f9e0: 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 S_((Tcl_ChannelT
f9f0: 79 70 65 20 2a 20 74 79 70 65 50 74 72 2c 20 43 ype * typePtr, C
fa00: 4f 4e 53 54 20 63 68 61 72 20 2a 20 63 68 61 6e ONST char * chan
fa10: 4e 61 6d 65 2c 20 43 6c 69 65 6e 74 44 61 74 61 Name, ClientData
fa20: 20 69 6e 73 74 61 6e 63 65 44 61 74 61 2c 20 69 instanceData, i
fa30: 6e 74 20 6d 61 73 6b 29 29 3b 20 2f 2a 20 38 38 nt mask)); /* 88
fa40: 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
fa50: 63 6c 5f 43 72 65 61 74 65 43 68 61 6e 6e 65 6c cl_CreateChannel
fa60: 48 61 6e 64 6c 65 72 29 20 5f 41 4e 53 49 5f 41 Handler) _ANSI_A
fa70: 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 RGS_((Tcl_Channe
fa80: 6c 20 63 68 61 6e 2c 20 69 6e 74 20 6d 61 73 6b l chan, int mask
fa90: 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 50 72 6f , Tcl_ChannelPro
faa0: 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 c * proc, Client
fab0: 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 Data clientData)
fac0: 29 3b 20 2f 2a 20 38 39 20 2a 2f 0a 20 20 20 20 ); /* 89 */.
fad0: 76 6f 69 64 20 28 2a 74 63 6c 5f 43 72 65 61 74 void (*tcl_Creat
fae0: 65 43 6c 6f 73 65 48 61 6e 64 6c 65 72 29 20 5f eCloseHandler) _
faf0: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
fb00: 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 54 63 Channel chan, Tc
fb10: 6c 5f 43 6c 6f 73 65 50 72 6f 63 20 2a 20 70 72 l_CloseProc * pr
fb20: 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 oc, ClientData c
fb30: 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 lientData)); /*
fb40: 39 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 43 6f 90 */. Tcl_Co
fb50: 6d 6d 61 6e 64 20 28 2a 74 63 6c 5f 43 72 65 61 mmand (*tcl_Crea
fb60: 74 65 43 6f 6d 6d 61 6e 64 29 20 5f 41 4e 53 49 teCommand) _ANSI
fb70: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
fb80: 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e rp * interp, CON
fb90: 53 54 20 63 68 61 72 20 2a 20 63 6d 64 4e 61 6d ST char * cmdNam
fba0: 65 2c 20 54 63 6c 5f 43 6d 64 50 72 6f 63 20 2a e, Tcl_CmdProc *
fbb0: 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 proc, ClientDat
fbc0: 61 20 63 6c 69 65 6e 74 44 61 74 61 2c 20 54 63 a clientData, Tc
fbd0: 6c 5f 43 6d 64 44 65 6c 65 74 65 50 72 6f 63 20 l_CmdDeleteProc
fbe0: 2a 20 64 65 6c 65 74 65 50 72 6f 63 29 29 3b 20 * deleteProc));
fbf0: 2f 2a 20 39 31 20 2a 2f 0a 20 20 20 20 76 6f 69 /* 91 */. voi
fc00: 64 20 28 2a 74 63 6c 5f 43 72 65 61 74 65 45 76 d (*tcl_CreateEv
fc10: 65 6e 74 53 6f 75 72 63 65 29 20 5f 41 4e 53 49 entSource) _ANSI
fc20: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 45 76 65 6e _ARGS_((Tcl_Even
fc30: 74 53 65 74 75 70 50 72 6f 63 20 2a 20 73 65 74 tSetupProc * set
fc40: 75 70 50 72 6f 63 2c 20 54 63 6c 5f 45 76 65 6e upProc, Tcl_Even
fc50: 74 43 68 65 63 6b 50 72 6f 63 20 2a 20 63 68 65 tCheckProc * che
fc60: 63 6b 50 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 ckProc, ClientDa
fc70: 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b ta clientData));
fc80: 20 2f 2a 20 39 32 20 2a 2f 0a 20 20 20 20 76 6f /* 92 */. vo
fc90: 69 64 20 28 2a 74 63 6c 5f 43 72 65 61 74 65 45 id (*tcl_CreateE
fca0: 78 69 74 48 61 6e 64 6c 65 72 29 20 5f 41 4e 53 xitHandler) _ANS
fcb0: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 45 78 69 I_ARGS_((Tcl_Exi
fcc0: 74 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c tProc * proc, Cl
fcd0: 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 ientData clientD
fce0: 61 74 61 29 29 3b 20 2f 2a 20 39 33 20 2a 2f 0a ata)); /* 93 */.
fcf0: 20 20 20 20 54 63 6c 5f 49 6e 74 65 72 70 20 2a Tcl_Interp *
fd00: 20 28 2a 74 63 6c 5f 43 72 65 61 74 65 49 6e 74 (*tcl_CreateInt
fd10: 65 72 70 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f erp) _ANSI_ARGS_
fd20: 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 39 34 20 ((void)); /* 94
fd30: 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 */. void (*tc
fd40: 6c 5f 43 72 65 61 74 65 4d 61 74 68 46 75 6e 63 l_CreateMathFunc
fd50: 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
fd60: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
fd70: 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a rp, CONST char *
fd80: 20 6e 61 6d 65 2c 20 69 6e 74 20 6e 75 6d 41 72 name, int numAr
fd90: 67 73 2c 20 54 63 6c 5f 56 61 6c 75 65 54 79 70 gs, Tcl_ValueTyp
fda0: 65 20 2a 20 61 72 67 54 79 70 65 73 2c 20 54 63 e * argTypes, Tc
fdb0: 6c 5f 4d 61 74 68 50 72 6f 63 20 2a 20 70 72 6f l_MathProc * pro
fdc0: 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c c, ClientData cl
fdd0: 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 39 ientData)); /* 9
fde0: 35 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 43 6f 6d 5 */. Tcl_Com
fdf0: 6d 61 6e 64 20 28 2a 74 63 6c 5f 43 72 65 61 74 mand (*tcl_Creat
fe00: 65 4f 62 6a 43 6f 6d 6d 61 6e 64 29 20 5f 41 4e eObjCommand) _AN
fe10: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
fe20: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
fe30: 4f 4e 53 54 20 63 68 61 72 20 2a 20 63 6d 64 4e ONST char * cmdN
fe40: 61 6d 65 2c 20 54 63 6c 5f 4f 62 6a 43 6d 64 50 ame, Tcl_ObjCmdP
fe50: 72 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 roc * proc, Clie
fe60: 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 ntData clientDat
fe70: 61 2c 20 54 63 6c 5f 43 6d 64 44 65 6c 65 74 65 a, Tcl_CmdDelete
fe80: 50 72 6f 63 20 2a 20 64 65 6c 65 74 65 50 72 6f Proc * deletePro
fe90: 63 29 29 3b 20 2f 2a 20 39 36 20 2a 2f 0a 20 20 c)); /* 96 */.
fea0: 20 20 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 28 Tcl_Interp * (
feb0: 2a 74 63 6c 5f 43 72 65 61 74 65 53 6c 61 76 65 *tcl_CreateSlave
fec0: 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
fed0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
fee0: 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a rp, CONST char *
fef0: 20 73 6c 61 76 65 4e 61 6d 65 2c 20 69 6e 74 20 slaveName, int
ff00: 69 73 53 61 66 65 29 29 3b 20 2f 2a 20 39 37 20 isSafe)); /* 97
ff10: 2a 2f 0a 20 20 20 20 54 63 6c 5f 54 69 6d 65 72 */. Tcl_Timer
ff20: 54 6f 6b 65 6e 20 28 2a 74 63 6c 5f 43 72 65 61 Token (*tcl_Crea
ff30: 74 65 54 69 6d 65 72 48 61 6e 64 6c 65 72 29 20 teTimerHandler)
ff40: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 _ANSI_ARGS_((int
ff50: 20 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 2c 20 54 milliseconds, T
ff60: 63 6c 5f 54 69 6d 65 72 50 72 6f 63 20 2a 20 70 cl_TimerProc * p
ff70: 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 roc, ClientData
ff80: 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a clientData)); /*
ff90: 20 39 38 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 54 98 */. Tcl_T
ffa0: 72 61 63 65 20 28 2a 74 63 6c 5f 43 72 65 61 74 race (*tcl_Creat
ffb0: 65 54 72 61 63 65 29 20 5f 41 4e 53 49 5f 41 52 eTrace) _ANSI_AR
ffc0: 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
ffd0: 2a 20 69 6e 74 65 72 70 2c 20 69 6e 74 20 6c 65 * interp, int le
ffe0: 76 65 6c 2c 20 54 63 6c 5f 43 6d 64 54 72 61 63 vel, Tcl_CmdTrac
fff0: 65 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c eProc * proc, Cl
10000 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 ientData clientD
10010 61 74 61 29 29 3b 20 2f 2a 20 39 39 20 2a 2f 0a ata)); /* 99 */.
10020 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 void (*tcl_D
10030 65 6c 65 74 65 41 73 73 6f 63 44 61 74 61 29 20 eleteAssocData)
10040 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
10050 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
10060 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e , CONST char * n
10070 61 6d 65 29 29 3b 20 2f 2a 20 31 30 30 20 2a 2f ame)); /* 100 */
10080 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f . void (*tcl_
10090 44 65 6c 65 74 65 43 68 61 6e 6e 65 6c 48 61 6e DeleteChannelHan
100a0 64 6c 65 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 dler) _ANSI_ARGS
100b0 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 _((Tcl_Channel c
100c0 68 61 6e 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c han, Tcl_Channel
100d0 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 Proc * proc, Cli
100e0 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 entData clientDa
100f0 74 61 29 29 3b 20 2f 2a 20 31 30 31 20 2a 2f 0a ta)); /* 101 */.
10100 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 void (*tcl_D
10110 65 6c 65 74 65 43 6c 6f 73 65 48 61 6e 64 6c 65 eleteCloseHandle
10120 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 r) _ANSI_ARGS_((
10130 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e Tcl_Channel chan
10140 2c 20 54 63 6c 5f 43 6c 6f 73 65 50 72 6f 63 20 , Tcl_CloseProc
10150 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 * proc, ClientDa
10160 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b ta clientData));
10170 20 2f 2a 20 31 30 32 20 2a 2f 0a 20 20 20 20 69 /* 102 */. i
10180 6e 74 20 28 2a 74 63 6c 5f 44 65 6c 65 74 65 43 nt (*tcl_DeleteC
10190 6f 6d 6d 61 6e 64 29 20 5f 41 4e 53 49 5f 41 52 ommand) _ANSI_AR
101a0 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
101b0 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 * interp, CONST
101c0 63 68 61 72 20 2a 20 63 6d 64 4e 61 6d 65 29 29 char * cmdName))
101d0 3b 20 2f 2a 20 31 30 33 20 2a 2f 0a 20 20 20 20 ; /* 103 */.
101e0 69 6e 74 20 28 2a 74 63 6c 5f 44 65 6c 65 74 65 int (*tcl_Delete
101f0 43 6f 6d 6d 61 6e 64 46 72 6f 6d 54 6f 6b 65 6e CommandFromToken
10200 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
10210 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
10220 72 70 2c 20 54 63 6c 5f 43 6f 6d 6d 61 6e 64 20 rp, Tcl_Command
10230 63 6f 6d 6d 61 6e 64 29 29 3b 20 2f 2a 20 31 30 command)); /* 10
10240 34 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 4 */. void (*
10250 74 63 6c 5f 44 65 6c 65 74 65 45 76 65 6e 74 73 tcl_DeleteEvents
10260 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
10270 63 6c 5f 45 76 65 6e 74 44 65 6c 65 74 65 50 72 cl_EventDeletePr
10280 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e oc * proc, Clien
10290 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 tData clientData
102a0 29 29 3b 20 2f 2a 20 31 30 35 20 2a 2f 0a 20 20 )); /* 105 */.
102b0 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 65 6c void (*tcl_Del
102c0 65 74 65 45 76 65 6e 74 53 6f 75 72 63 65 29 20 eteEventSource)
102d0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
102e0 5f 45 76 65 6e 74 53 65 74 75 70 50 72 6f 63 20 _EventSetupProc
102f0 2a 20 73 65 74 75 70 50 72 6f 63 2c 20 54 63 6c * setupProc, Tcl
10300 5f 45 76 65 6e 74 43 68 65 63 6b 50 72 6f 63 20 _EventCheckProc
10310 2a 20 63 68 65 63 6b 50 72 6f 63 2c 20 43 6c 69 * checkProc, Cli
10320 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 entData clientDa
10330 74 61 29 29 3b 20 2f 2a 20 31 30 36 20 2a 2f 0a ta)); /* 106 */.
10340 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 void (*tcl_D
10350 65 6c 65 74 65 45 78 69 74 48 61 6e 64 6c 65 72 eleteExitHandler
10360 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
10370 63 6c 5f 45 78 69 74 50 72 6f 63 20 2a 20 70 72 cl_ExitProc * pr
10380 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 oc, ClientData c
10390 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 lientData)); /*
103a0 31 30 37 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 107 */. void
103b0 28 2a 74 63 6c 5f 44 65 6c 65 74 65 48 61 73 68 (*tcl_DeleteHash
103c0 45 6e 74 72 79 29 20 5f 41 4e 53 49 5f 41 52 47 Entry) _ANSI_ARG
103d0 53 5f 28 28 54 63 6c 5f 48 61 73 68 45 6e 74 72 S_((Tcl_HashEntr
103e0 79 20 2a 20 65 6e 74 72 79 50 74 72 29 29 3b 20 y * entryPtr));
103f0 2f 2a 20 31 30 38 20 2a 2f 0a 20 20 20 20 76 6f /* 108 */. vo
10400 69 64 20 28 2a 74 63 6c 5f 44 65 6c 65 74 65 48 id (*tcl_DeleteH
10410 61 73 68 54 61 62 6c 65 29 20 5f 41 4e 53 49 5f ashTable) _ANSI_
10420 41 52 47 53 5f 28 28 54 63 6c 5f 48 61 73 68 54 ARGS_((Tcl_HashT
10430 61 62 6c 65 20 2a 20 74 61 62 6c 65 50 74 72 29 able * tablePtr)
10440 29 3b 20 2f 2a 20 31 30 39 20 2a 2f 0a 20 20 20 ); /* 109 */.
10450 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 65 6c 65 void (*tcl_Dele
10460 74 65 49 6e 74 65 72 70 29 20 5f 41 4e 53 49 5f teInterp) _ANSI_
10470 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
10480 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 20 2f 2a p * interp)); /*
10490 20 31 31 30 20 2a 2f 0a 23 69 66 20 21 64 65 66 110 */.#if !def
104a0 69 6e 65 64 28 5f 5f 57 49 4e 33 32 5f 5f 29 20 ined(__WIN32__)
104b0 26 26 20 21 64 65 66 69 6e 65 64 28 4d 41 43 5f && !defined(MAC_
104c0 54 43 4c 29 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a TCL) /* UNIX */.
104d0 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 void (*tcl_D
104e0 65 74 61 63 68 50 69 64 73 29 20 5f 41 4e 53 49 etachPids) _ANSI
104f0 5f 41 52 47 53 5f 28 28 69 6e 74 20 6e 75 6d 50 _ARGS_((int numP
10500 69 64 73 2c 20 54 63 6c 5f 50 69 64 20 2a 20 70 ids, Tcl_Pid * p
10510 69 64 50 74 72 29 29 3b 20 2f 2a 20 31 31 31 20 idPtr)); /* 111
10520 2a 2f 0a 23 65 6e 64 69 66 20 2f 2a 20 55 4e 49 */.#endif /* UNI
10530 58 20 2a 2f 0a 23 69 66 64 65 66 20 5f 5f 57 49 X */.#ifdef __WI
10540 4e 33 32 5f 5f 0a 20 20 20 20 76 6f 69 64 20 28 N32__. void (
10550 2a 74 63 6c 5f 44 65 74 61 63 68 50 69 64 73 29 *tcl_DetachPids)
10560 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e _ANSI_ARGS_((in
10570 74 20 6e 75 6d 50 69 64 73 2c 20 54 63 6c 5f 50 t numPids, Tcl_P
10580 69 64 20 2a 20 70 69 64 50 74 72 29 29 3b 20 2f id * pidPtr)); /
10590 2a 20 31 31 31 20 2a 2f 0a 23 65 6e 64 69 66 20 * 111 */.#endif
105a0 2f 2a 20 5f 5f 57 49 4e 33 32 5f 5f 20 2a 2f 0a /* __WIN32__ */.
105b0 23 69 66 64 65 66 20 4d 41 43 5f 54 43 4c 0a 20 #ifdef MAC_TCL.
105c0 20 20 20 76 6f 69 64 20 2a 72 65 73 65 72 76 65 void *reserve
105d0 64 31 31 31 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 d111;.#endif /*
105e0 4d 41 43 5f 54 43 4c 20 2a 2f 0a 20 20 20 20 76 MAC_TCL */. v
105f0 6f 69 64 20 28 2a 74 63 6c 5f 44 65 6c 65 74 65 oid (*tcl_Delete
10600 54 69 6d 65 72 48 61 6e 64 6c 65 72 29 20 5f 41 TimerHandler) _A
10610 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 54 NSI_ARGS_((Tcl_T
10620 69 6d 65 72 54 6f 6b 65 6e 20 74 6f 6b 65 6e 29 imerToken token)
10630 29 3b 20 2f 2a 20 31 31 32 20 2a 2f 0a 20 20 20 ); /* 112 */.
10640 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 65 6c 65 void (*tcl_Dele
10650 74 65 54 72 61 63 65 29 20 5f 41 4e 53 49 5f 41 teTrace) _ANSI_A
10660 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
10670 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 54 * interp, Tcl_T
10680 72 61 63 65 20 74 72 61 63 65 29 29 3b 20 2f 2a race trace)); /*
10690 20 31 31 33 20 2a 2f 0a 20 20 20 20 76 6f 69 64 113 */. void
106a0 20 28 2a 74 63 6c 5f 44 6f 6e 74 43 61 6c 6c 57 (*tcl_DontCallW
106b0 68 65 6e 44 65 6c 65 74 65 64 29 20 5f 41 4e 53 henDeleted) _ANS
106c0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
106d0 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 erp * interp, Tc
106e0 6c 5f 49 6e 74 65 72 70 44 65 6c 65 74 65 50 72 l_InterpDeletePr
106f0 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e oc * proc, Clien
10700 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 tData clientData
10710 29 29 3b 20 2f 2a 20 31 31 34 20 2a 2f 0a 20 20 )); /* 114 */.
10720 20 20 69 6e 74 20 28 2a 74 63 6c 5f 44 6f 4f 6e int (*tcl_DoOn
10730 65 45 76 65 6e 74 29 20 5f 41 4e 53 49 5f 41 52 eEvent) _ANSI_AR
10740 47 53 5f 28 28 69 6e 74 20 66 6c 61 67 73 29 29 GS_((int flags))
10750 3b 20 2f 2a 20 31 31 35 20 2a 2f 0a 20 20 20 20 ; /* 115 */.
10760 76 6f 69 64 20 28 2a 74 63 6c 5f 44 6f 57 68 65 void (*tcl_DoWhe
10770 6e 49 64 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 nIdle) _ANSI_ARG
10780 53 5f 28 28 54 63 6c 5f 49 64 6c 65 50 72 6f 63 S_((Tcl_IdleProc
10790 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e 74 44 * proc, ClientD
107a0 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 29 29 ata clientData))
107b0 3b 20 2f 2a 20 31 31 36 20 2a 2f 0a 20 20 20 20 ; /* 116 */.
107c0 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 44 53 74 char * (*tcl_DSt
107d0 72 69 6e 67 41 70 70 65 6e 64 29 20 5f 41 4e 53 ringAppend) _ANS
107e0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 44 53 74 I_ARGS_((Tcl_DSt
107f0 72 69 6e 67 20 2a 20 64 73 50 74 72 2c 20 43 4f ring * dsPtr, CO
10800 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 NST char * str,
10810 69 6e 74 20 6c 65 6e 67 74 68 29 29 3b 20 2f 2a int length)); /*
10820 20 31 31 37 20 2a 2f 0a 20 20 20 20 63 68 61 72 117 */. char
10830 20 2a 20 28 2a 74 63 6c 5f 44 53 74 72 69 6e 67 * (*tcl_DString
10840 41 70 70 65 6e 64 45 6c 65 6d 65 6e 74 29 20 5f AppendElement) _
10850 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
10860 44 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 2c DString * dsPtr,
10870 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 CONST char * st
10880 72 69 6e 67 29 29 3b 20 2f 2a 20 31 31 38 20 2a ring)); /* 118 *
10890 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
108a0 5f 44 53 74 72 69 6e 67 45 6e 64 53 75 62 6c 69 _DStringEndSubli
108b0 73 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 st) _ANSI_ARGS_(
108c0 28 54 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 64 (Tcl_DString * d
108d0 73 50 74 72 29 29 3b 20 2f 2a 20 31 31 39 20 2a sPtr)); /* 119 *
108e0 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
108f0 5f 44 53 74 72 69 6e 67 46 72 65 65 29 20 5f 41 _DStringFree) _A
10900 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 44 NSI_ARGS_((Tcl_D
10910 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 29 29 String * dsPtr))
10920 3b 20 2f 2a 20 31 32 30 20 2a 2f 0a 20 20 20 20 ; /* 120 */.
10930 76 6f 69 64 20 28 2a 74 63 6c 5f 44 53 74 72 69 void (*tcl_DStri
10940 6e 67 47 65 74 52 65 73 75 6c 74 29 20 5f 41 4e ngGetResult) _AN
10950 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
10960 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 terp * interp, T
10970 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 64 73 50 cl_DString * dsP
10980 74 72 29 29 3b 20 2f 2a 20 31 32 31 20 2a 2f 0a tr)); /* 121 */.
10990 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 44 void (*tcl_D
109a0 53 74 72 69 6e 67 49 6e 69 74 29 20 5f 41 4e 53 StringInit) _ANS
109b0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 44 53 74 I_ARGS_((Tcl_DSt
109c0 72 69 6e 67 20 2a 20 64 73 50 74 72 29 29 3b 20 ring * dsPtr));
109d0 2f 2a 20 31 32 32 20 2a 2f 0a 20 20 20 20 76 6f /* 122 */. vo
109e0 69 64 20 28 2a 74 63 6c 5f 44 53 74 72 69 6e 67 id (*tcl_DString
109f0 52 65 73 75 6c 74 29 20 5f 41 4e 53 49 5f 41 52 Result) _ANSI_AR
10a00 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
10a10 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 44 53 * interp, Tcl_DS
10a20 74 72 69 6e 67 20 2a 20 64 73 50 74 72 29 29 3b tring * dsPtr));
10a30 20 2f 2a 20 31 32 33 20 2a 2f 0a 20 20 20 20 76 /* 123 */. v
10a40 6f 69 64 20 28 2a 74 63 6c 5f 44 53 74 72 69 6e oid (*tcl_DStrin
10a50 67 53 65 74 4c 65 6e 67 74 68 29 20 5f 41 4e 53 gSetLength) _ANS
10a60 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 44 53 74 I_ARGS_((Tcl_DSt
10a70 72 69 6e 67 20 2a 20 64 73 50 74 72 2c 20 69 6e ring * dsPtr, in
10a80 74 20 6c 65 6e 67 74 68 29 29 3b 20 2f 2a 20 31 t length)); /* 1
10a90 32 34 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 24 */. void (
10aa0 2a 74 63 6c 5f 44 53 74 72 69 6e 67 53 74 61 72 *tcl_DStringStar
10ab0 74 53 75 62 6c 69 73 74 29 20 5f 41 4e 53 49 5f tSublist) _ANSI_
10ac0 41 52 47 53 5f 28 28 54 63 6c 5f 44 53 74 72 69 ARGS_((Tcl_DStri
10ad0 6e 67 20 2a 20 64 73 50 74 72 29 29 3b 20 2f 2a ng * dsPtr)); /*
10ae0 20 31 32 35 20 2a 2f 0a 20 20 20 20 69 6e 74 20 125 */. int
10af0 28 2a 74 63 6c 5f 45 6f 66 29 20 5f 41 4e 53 49 (*tcl_Eof) _ANSI
10b00 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e _ARGS_((Tcl_Chan
10b10 6e 65 6c 20 63 68 61 6e 29 29 3b 20 2f 2a 20 31 nel chan)); /* 1
10b20 32 36 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 26 */. CONST8
10b30 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 4_RETURN char *
10b40 28 2a 74 63 6c 5f 45 72 72 6e 6f 49 64 29 20 5f (*tcl_ErrnoId) _
10b50 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 64 ANSI_ARGS_((void
10b60 29 29 3b 20 2f 2a 20 31 32 37 20 2a 2f 0a 20 20 )); /* 127 */.
10b70 20 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e CONST84_RETURN
10b80 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 45 72 char * (*tcl_Er
10b90 72 6e 6f 4d 73 67 29 20 5f 41 4e 53 49 5f 41 52 rnoMsg) _ANSI_AR
10ba0 47 53 5f 28 28 69 6e 74 20 65 72 72 29 29 3b 20 GS_((int err));
10bb0 2f 2a 20 31 32 38 20 2a 2f 0a 20 20 20 20 69 6e /* 128 */. in
10bc0 74 20 28 2a 74 63 6c 5f 45 76 61 6c 29 20 5f 41 t (*tcl_Eval) _A
10bd0 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
10be0 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
10bf0 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 CONST char * str
10c00 69 6e 67 29 29 3b 20 2f 2a 20 31 32 39 20 2a 2f ing)); /* 129 */
10c10 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 45 . int (*tcl_E
10c20 76 61 6c 46 69 6c 65 29 20 5f 41 4e 53 49 5f 41 valFile) _ANSI_A
10c30 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
10c40 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 * interp, CONST
10c50 20 63 68 61 72 20 2a 20 66 69 6c 65 4e 61 6d 65 char * fileName
10c60 29 29 3b 20 2f 2a 20 31 33 30 20 2a 2f 0a 20 20 )); /* 130 */.
10c70 20 20 69 6e 74 20 28 2a 74 63 6c 5f 45 76 61 6c int (*tcl_Eval
10c80 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Obj) _ANSI_ARGS_
10c90 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
10ca0 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a nterp, Tcl_Obj *
10cb0 20 6f 62 6a 50 74 72 29 29 3b 20 2f 2a 20 31 33 objPtr)); /* 13
10cc0 31 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 1 */. void (*
10cd0 74 63 6c 5f 45 76 65 6e 74 75 61 6c 6c 79 46 72 tcl_EventuallyFr
10ce0 65 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ee) _ANSI_ARGS_(
10cf0 28 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 (ClientData clie
10d00 6e 74 44 61 74 61 2c 20 54 63 6c 5f 46 72 65 65 ntData, Tcl_Free
10d10 50 72 6f 63 20 2a 20 66 72 65 65 50 72 6f 63 29 Proc * freeProc)
10d20 29 3b 20 2f 2a 20 31 33 32 20 2a 2f 0a 20 20 20 ); /* 132 */.
10d30 20 76 6f 69 64 20 28 2a 74 63 6c 5f 45 78 69 74 void (*tcl_Exit
10d40 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 ) _ANSI_ARGS_((i
10d50 6e 74 20 73 74 61 74 75 73 29 29 3b 20 2f 2a 20 nt status)); /*
10d60 31 33 33 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 133 */. int (
10d70 2a 74 63 6c 5f 45 78 70 6f 73 65 43 6f 6d 6d 61 *tcl_ExposeComma
10d80 6e 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nd) _ANSI_ARGS_(
10d90 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
10da0 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 terp, CONST char
10db0 20 2a 20 68 69 64 64 65 6e 43 6d 64 54 6f 6b 65 * hiddenCmdToke
10dc0 6e 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 n, CONST char *
10dd0 63 6d 64 4e 61 6d 65 29 29 3b 20 2f 2a 20 31 33 cmdName)); /* 13
10de0 34 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 4 */. int (*t
10df0 63 6c 5f 45 78 70 72 42 6f 6f 6c 65 61 6e 29 20 cl_ExprBoolean)
10e00 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
10e10 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
10e20 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
10e30 74 72 2c 20 69 6e 74 20 2a 20 70 74 72 29 29 3b tr, int * ptr));
10e40 20 2f 2a 20 31 33 35 20 2a 2f 0a 20 20 20 20 69 /* 135 */. i
10e50 6e 74 20 28 2a 74 63 6c 5f 45 78 70 72 42 6f 6f nt (*tcl_ExprBoo
10e60 6c 65 61 6e 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 leanObj) _ANSI_A
10e70 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
10e80 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
10e90 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 bj * objPtr, int
10ea0 20 2a 20 70 74 72 29 29 3b 20 2f 2a 20 31 33 36 * ptr)); /* 136
10eb0 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
10ec0 6c 5f 45 78 70 72 44 6f 75 62 6c 65 29 20 5f 41 l_ExprDouble) _A
10ed0 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
10ee0 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
10ef0 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 CONST char * str
10f00 2c 20 64 6f 75 62 6c 65 20 2a 20 70 74 72 29 29 , double * ptr))
10f10 3b 20 2f 2a 20 31 33 37 20 2a 2f 0a 20 20 20 20 ; /* 137 */.
10f20 69 6e 74 20 28 2a 74 63 6c 5f 45 78 70 72 44 6f int (*tcl_ExprDo
10f30 75 62 6c 65 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 ubleObj) _ANSI_A
10f40 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
10f50 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
10f60 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 64 6f 75 bj * objPtr, dou
10f70 62 6c 65 20 2a 20 70 74 72 29 29 3b 20 2f 2a 20 ble * ptr)); /*
10f80 31 33 38 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 138 */. int (
10f90 2a 74 63 6c 5f 45 78 70 72 4c 6f 6e 67 29 20 5f *tcl_ExprLong) _
10fa0 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
10fb0 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
10fc0 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 CONST char * st
10fd0 72 2c 20 6c 6f 6e 67 20 2a 20 70 74 72 29 29 3b r, long * ptr));
10fe0 20 2f 2a 20 31 33 39 20 2a 2f 0a 20 20 20 20 69 /* 139 */. i
10ff0 6e 74 20 28 2a 74 63 6c 5f 45 78 70 72 4c 6f 6e nt (*tcl_ExprLon
11000 67 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 gObj) _ANSI_ARGS
11010 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
11020 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 interp, Tcl_Obj
11030 2a 20 6f 62 6a 50 74 72 2c 20 6c 6f 6e 67 20 2a * objPtr, long *
11040 20 70 74 72 29 29 3b 20 2f 2a 20 31 34 30 20 2a ptr)); /* 140 *
11050 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
11060 45 78 70 72 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 ExprObj) _ANSI_A
11070 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
11080 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
11090 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 54 63 6c bj * objPtr, Tcl
110a0 5f 4f 62 6a 20 2a 2a 20 72 65 73 75 6c 74 50 74 _Obj ** resultPt
110b0 72 50 74 72 29 29 3b 20 2f 2a 20 31 34 31 20 2a rPtr)); /* 141 *
110c0 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
110d0 45 78 70 72 53 74 72 69 6e 67 29 20 5f 41 4e 53 ExprString) _ANS
110e0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
110f0 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f erp * interp, CO
11100 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 69 6e NST char * strin
11110 67 29 29 3b 20 2f 2a 20 31 34 32 20 2a 2f 0a 20 g)); /* 142 */.
11120 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 46 69 void (*tcl_Fi
11130 6e 61 6c 69 7a 65 29 20 5f 41 4e 53 49 5f 41 52 nalize) _ANSI_AR
11140 47 53 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 GS_((void)); /*
11150 31 34 33 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 143 */. void
11160 28 2a 74 63 6c 5f 46 69 6e 64 45 78 65 63 75 74 (*tcl_FindExecut
11170 61 62 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 able) _ANSI_ARGS
11180 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 _((CONST char *
11190 61 72 67 76 30 29 29 3b 20 2f 2a 20 31 34 34 20 argv0)); /* 144
111a0 2a 2f 0a 20 20 20 20 54 63 6c 5f 48 61 73 68 45 */. Tcl_HashE
111b0 6e 74 72 79 20 2a 20 28 2a 74 63 6c 5f 46 69 72 ntry * (*tcl_Fir
111c0 73 74 48 61 73 68 45 6e 74 72 79 29 20 5f 41 4e stHashEntry) _AN
111d0 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 48 61 SI_ARGS_((Tcl_Ha
111e0 73 68 54 61 62 6c 65 20 2a 20 74 61 62 6c 65 50 shTable * tableP
111f0 74 72 2c 20 54 63 6c 5f 48 61 73 68 53 65 61 72 tr, Tcl_HashSear
11200 63 68 20 2a 20 73 65 61 72 63 68 50 74 72 29 29 ch * searchPtr))
11210 3b 20 2f 2a 20 31 34 35 20 2a 2f 0a 20 20 20 20 ; /* 145 */.
11220 69 6e 74 20 28 2a 74 63 6c 5f 46 6c 75 73 68 29 int (*tcl_Flush)
11230 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
11240 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 29 29 l_Channel chan))
11250 3b 20 2f 2a 20 31 34 36 20 2a 2f 0a 20 20 20 20 ; /* 146 */.
11260 76 6f 69 64 20 28 2a 74 63 6c 5f 46 72 65 65 52 void (*tcl_FreeR
11270 65 73 75 6c 74 29 20 5f 41 4e 53 49 5f 41 52 47 esult) _ANSI_ARG
11280 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
11290 20 69 6e 74 65 72 70 29 29 3b 20 2f 2a 20 31 34 interp)); /* 14
112a0 37 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 7 */. int (*t
112b0 63 6c 5f 47 65 74 41 6c 69 61 73 29 20 5f 41 4e cl_GetAlias) _AN
112c0 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
112d0 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
112e0 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 6c 61 76 ONST char * slav
112f0 65 43 6d 64 2c 20 54 63 6c 5f 49 6e 74 65 72 70 eCmd, Tcl_Interp
11300 20 2a 2a 20 74 61 72 67 65 74 49 6e 74 65 72 70 ** targetInterp
11310 50 74 72 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 Ptr, CONST84 cha
11320 72 20 2a 2a 20 74 61 72 67 65 74 43 6d 64 50 74 r ** targetCmdPt
11330 72 2c 20 69 6e 74 20 2a 20 61 72 67 63 50 74 72 r, int * argcPtr
11340 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a , CONST84 char *
11350 2a 2a 20 61 72 67 76 50 74 72 29 29 3b 20 2f 2a ** argvPtr)); /*
11360 20 31 34 38 20 2a 2f 0a 20 20 20 20 69 6e 74 20 148 */. int
11370 28 2a 74 63 6c 5f 47 65 74 41 6c 69 61 73 4f 62 (*tcl_GetAliasOb
11380 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 j) _ANSI_ARGS_((
11390 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
113a0 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 erp, CONST char
113b0 2a 20 73 6c 61 76 65 43 6d 64 2c 20 54 63 6c 5f * slaveCmd, Tcl_
113c0 49 6e 74 65 72 70 20 2a 2a 20 74 61 72 67 65 74 Interp ** target
113d0 49 6e 74 65 72 70 50 74 72 2c 20 43 4f 4e 53 54 InterpPtr, CONST
113e0 38 34 20 63 68 61 72 20 2a 2a 20 74 61 72 67 65 84 char ** targe
113f0 74 43 6d 64 50 74 72 2c 20 69 6e 74 20 2a 20 6f tCmdPtr, int * o
11400 62 6a 63 50 74 72 2c 20 54 63 6c 5f 4f 62 6a 20 bjcPtr, Tcl_Obj
11410 2a 2a 2a 20 6f 62 6a 76 29 29 3b 20 2f 2a 20 31 *** objv)); /* 1
11420 34 39 20 2a 2f 0a 20 20 20 20 43 6c 69 65 6e 74 49 */. Client
11430 44 61 74 61 20 28 2a 74 63 6c 5f 47 65 74 41 73 Data (*tcl_GetAs
11440 73 6f 63 44 61 74 61 29 20 5f 41 4e 53 49 5f 41 socData) _ANSI_A
11450 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
11460 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 * interp, CONST
11470 20 63 68 61 72 20 2a 20 6e 61 6d 65 2c 20 54 63 char * name, Tc
11480 6c 5f 49 6e 74 65 72 70 44 65 6c 65 74 65 50 72 l_InterpDeletePr
11490 6f 63 20 2a 2a 20 70 72 6f 63 50 74 72 29 29 3b oc ** procPtr));
114a0 20 2f 2a 20 31 35 30 20 2a 2f 0a 20 20 20 20 54 /* 150 */. T
114b0 63 6c 5f 43 68 61 6e 6e 65 6c 20 28 2a 74 63 6c cl_Channel (*tcl
114c0 5f 47 65 74 43 68 61 6e 6e 65 6c 29 20 5f 41 4e _GetChannel) _AN
114d0 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
114e0 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
114f0 4f 4e 53 54 20 63 68 61 72 20 2a 20 63 68 61 6e ONST char * chan
11500 4e 61 6d 65 2c 20 69 6e 74 20 2a 20 6d 6f 64 65 Name, int * mode
11510 50 74 72 29 29 3b 20 2f 2a 20 31 35 31 20 2a 2f Ptr)); /* 151 */
11520 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 . int (*tcl_G
11530 65 74 43 68 61 6e 6e 65 6c 42 75 66 66 65 72 53 etChannelBufferS
11540 69 7a 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ize) _ANSI_ARGS_
11550 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
11560 61 6e 29 29 3b 20 2f 2a 20 31 35 32 20 2a 2f 0a an)); /* 152 */.
11570 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 int (*tcl_Ge
11580 74 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 29 20 tChannelHandle)
11590 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
115a0 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 69 _Channel chan, i
115b0 6e 74 20 64 69 72 65 63 74 69 6f 6e 2c 20 43 6c nt direction, Cl
115c0 69 65 6e 74 44 61 74 61 20 2a 20 68 61 6e 64 6c ientData * handl
115d0 65 50 74 72 29 29 3b 20 2f 2a 20 31 35 33 20 2a ePtr)); /* 153 *
115e0 2f 0a 20 20 20 20 43 6c 69 65 6e 74 44 61 74 61 /. ClientData
115f0 20 28 2a 74 63 6c 5f 47 65 74 43 68 61 6e 6e 65 (*tcl_GetChanne
11600 6c 49 6e 73 74 61 6e 63 65 44 61 74 61 29 20 5f lInstanceData) _
11610 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
11620 43 68 61 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 20 Channel chan));
11630 2f 2a 20 31 35 34 20 2a 2f 0a 20 20 20 20 69 6e /* 154 */. in
11640 74 20 28 2a 74 63 6c 5f 47 65 74 43 68 61 6e 6e t (*tcl_GetChann
11650 65 6c 4d 6f 64 65 29 20 5f 41 4e 53 49 5f 41 52 elMode) _ANSI_AR
11660 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c GS_((Tcl_Channel
11670 20 63 68 61 6e 29 29 3b 20 2f 2a 20 31 35 35 20 chan)); /* 155
11680 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f 52 */. CONST84_R
11690 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a 74 ETURN char * (*t
116a0 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 4e 61 6d cl_GetChannelNam
116b0 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 e) _ANSI_ARGS_((
116c0 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e Tcl_Channel chan
116d0 29 29 3b 20 2f 2a 20 31 35 36 20 2a 2f 0a 20 20 )); /* 156 */.
116e0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 43 int (*tcl_GetC
116f0 68 61 6e 6e 65 6c 4f 70 74 69 6f 6e 29 20 5f 41 hannelOption) _A
11700 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
11710 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
11720 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e Tcl_Channel chan
11730 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6f , CONST char * o
11740 70 74 69 6f 6e 4e 61 6d 65 2c 20 54 63 6c 5f 44 ptionName, Tcl_D
11750 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 29 29 String * dsPtr))
11760 3b 20 2f 2a 20 31 35 37 20 2a 2f 0a 20 20 20 20 ; /* 157 */.
11770 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 20 Tcl_ChannelType
11780 2a 20 28 2a 74 63 6c 5f 47 65 74 43 68 61 6e 6e * (*tcl_GetChann
11790 65 6c 54 79 70 65 29 20 5f 41 4e 53 49 5f 41 52 elType) _ANSI_AR
117a0 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c GS_((Tcl_Channel
117b0 20 63 68 61 6e 29 29 3b 20 2f 2a 20 31 35 38 20 chan)); /* 158
117c0 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c */. int (*tcl
117d0 5f 47 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 29 _GetCommandInfo)
117e0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
117f0 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
11800 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 p, CONST char *
11810 63 6d 64 4e 61 6d 65 2c 20 54 63 6c 5f 43 6d 64 cmdName, Tcl_Cmd
11820 49 6e 66 6f 20 2a 20 69 6e 66 6f 50 74 72 29 29 Info * infoPtr))
11830 3b 20 2f 2a 20 31 35 39 20 2a 2f 0a 20 20 20 20 ; /* 159 */.
11840 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 CONST84_RETURN c
11850 68 61 72 20 2a 20 28 2a 74 63 6c 5f 47 65 74 43 har * (*tcl_GetC
11860 6f 6d 6d 61 6e 64 4e 61 6d 65 29 20 5f 41 4e 53 ommandName) _ANS
11870 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
11880 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 erp * interp, Tc
11890 6c 5f 43 6f 6d 6d 61 6e 64 20 63 6f 6d 6d 61 6e l_Command comman
118a0 64 29 29 3b 20 2f 2a 20 31 36 30 20 2a 2f 0a 20 d)); /* 160 */.
118b0 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 int (*tcl_Get
118c0 45 72 72 6e 6f 29 20 5f 41 4e 53 49 5f 41 52 47 Errno) _ANSI_ARG
118d0 53 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 31 S_((void)); /* 1
118e0 36 31 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 61 */. CONST8
118f0 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 4_RETURN char *
11900 28 2a 74 63 6c 5f 47 65 74 48 6f 73 74 4e 61 6d (*tcl_GetHostNam
11910 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 e) _ANSI_ARGS_((
11920 76 6f 69 64 29 29 3b 20 2f 2a 20 31 36 32 20 2a void)); /* 162 *
11930 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
11940 47 65 74 49 6e 74 65 72 70 50 61 74 68 29 20 5f GetInterpPath) _
11950 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
11960 49 6e 74 65 72 70 20 2a 20 61 73 6b 49 6e 74 65 Interp * askInte
11970 72 70 2c 20 54 63 6c 5f 49 6e 74 65 72 70 20 2a rp, Tcl_Interp *
11980 20 73 6c 61 76 65 49 6e 74 65 72 70 29 29 3b 20 slaveInterp));
11990 2f 2a 20 31 36 33 20 2a 2f 0a 20 20 20 20 54 63 /* 163 */. Tc
119a0 6c 5f 49 6e 74 65 72 70 20 2a 20 28 2a 74 63 6c l_Interp * (*tcl
119b0 5f 47 65 74 4d 61 73 74 65 72 29 20 5f 41 4e 53 _GetMaster) _ANS
119c0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
119d0 65 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 20 erp * interp));
119e0 2f 2a 20 31 36 34 20 2a 2f 0a 20 20 20 20 43 4f /* 164 */. CO
119f0 4e 53 54 20 63 68 61 72 20 2a 20 28 2a 74 63 6c NST char * (*tcl
11a00 5f 47 65 74 4e 61 6d 65 4f 66 45 78 65 63 75 74 _GetNameOfExecut
11a10 61 62 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 able) _ANSI_ARGS
11a20 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 31 36 _((void)); /* 16
11a30 35 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 5 */. Tcl_Obj
11a40 20 2a 20 28 2a 74 63 6c 5f 47 65 74 4f 62 6a 52 * (*tcl_GetObjR
11a50 65 73 75 6c 74 29 20 5f 41 4e 53 49 5f 41 52 47 esult) _ANSI_ARG
11a60 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
11a70 20 69 6e 74 65 72 70 29 29 3b 20 2f 2a 20 31 36 interp)); /* 16
11a80 36 20 2a 2f 0a 23 69 66 20 21 64 65 66 69 6e 65 6 */.#if !define
11a90 64 28 5f 5f 57 49 4e 33 32 5f 5f 29 20 26 26 20 d(__WIN32__) &&
11aa0 21 64 65 66 69 6e 65 64 28 4d 41 43 5f 54 43 4c !defined(MAC_TCL
11ab0 29 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 20 20 20 ) /* UNIX */.
11ac0 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 4f 70 int (*tcl_GetOp
11ad0 65 6e 46 69 6c 65 29 20 5f 41 4e 53 49 5f 41 52 enFile) _ANSI_AR
11ae0 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
11af0 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 * interp, CONST
11b00 63 68 61 72 20 2a 20 73 74 72 2c 20 69 6e 74 20 char * str, int
11b10 66 6f 72 57 72 69 74 69 6e 67 2c 20 69 6e 74 20 forWriting, int
11b20 63 68 65 63 6b 55 73 61 67 65 2c 20 43 6c 69 65 checkUsage, Clie
11b30 6e 74 44 61 74 61 20 2a 20 66 69 6c 65 50 74 72 ntData * filePtr
11b40 29 29 3b 20 2f 2a 20 31 36 37 20 2a 2f 0a 23 65 )); /* 167 */.#e
11b50 6e 64 69 66 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a ndif /* UNIX */.
11b60 23 69 66 64 65 66 20 5f 5f 57 49 4e 33 32 5f 5f #ifdef __WIN32__
11b70 0a 20 20 20 20 76 6f 69 64 20 2a 72 65 73 65 72 . void *reser
11b80 76 65 64 31 36 37 3b 0a 23 65 6e 64 69 66 20 2f ved167;.#endif /
11b90 2a 20 5f 5f 57 49 4e 33 32 5f 5f 20 2a 2f 0a 23 * __WIN32__ */.#
11ba0 69 66 64 65 66 20 4d 41 43 5f 54 43 4c 0a 20 20 ifdef MAC_TCL.
11bb0 20 20 76 6f 69 64 20 2a 72 65 73 65 72 76 65 64 void *reserved
11bc0 31 36 37 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 4d 167;.#endif /* M
11bd0 41 43 5f 54 43 4c 20 2a 2f 0a 20 20 20 20 54 63 AC_TCL */. Tc
11be0 6c 5f 50 61 74 68 54 79 70 65 20 28 2a 74 63 6c l_PathType (*tcl
11bf0 5f 47 65 74 50 61 74 68 54 79 70 65 29 20 5f 41 _GetPathType) _A
11c00 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 NSI_ARGS_((CONST
11c10 20 63 68 61 72 20 2a 20 70 61 74 68 29 29 3b 20 char * path));
11c20 2f 2a 20 31 36 38 20 2a 2f 0a 20 20 20 20 69 6e /* 168 */. in
11c30 74 20 28 2a 74 63 6c 5f 47 65 74 73 29 20 5f 41 t (*tcl_Gets) _A
11c40 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 NSI_ARGS_((Tcl_C
11c50 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 54 63 6c hannel chan, Tcl
11c60 5f 44 53 74 72 69 6e 67 20 2a 20 64 73 50 74 72 _DString * dsPtr
11c70 29 29 3b 20 2f 2a 20 31 36 39 20 2a 2f 0a 20 20 )); /* 169 */.
11c80 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 73 int (*tcl_Gets
11c90 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Obj) _ANSI_ARGS_
11ca0 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
11cb0 61 6e 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 an, Tcl_Obj * ob
11cc0 6a 50 74 72 29 29 3b 20 2f 2a 20 31 37 30 20 2a jPtr)); /* 170 *
11cd0 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
11ce0 47 65 74 53 65 72 76 69 63 65 4d 6f 64 65 29 20 GetServiceMode)
11cf0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 _ANSI_ARGS_((voi
11d00 64 29 29 3b 20 2f 2a 20 31 37 31 20 2a 2f 0a 20 d)); /* 171 */.
11d10 20 20 20 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 Tcl_Interp *
11d20 28 2a 74 63 6c 5f 47 65 74 53 6c 61 76 65 29 20 (*tcl_GetSlave)
11d30 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
11d40 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
11d50 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
11d60 6c 61 76 65 4e 61 6d 65 29 29 3b 20 2f 2a 20 31 laveName)); /* 1
11d70 37 32 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 43 68 72 */. Tcl_Ch
11d80 61 6e 6e 65 6c 20 28 2a 74 63 6c 5f 47 65 74 53 annel (*tcl_GetS
11d90 74 64 43 68 61 6e 6e 65 6c 29 20 5f 41 4e 53 49 tdChannel) _ANSI
11da0 5f 41 52 47 53 5f 28 28 69 6e 74 20 74 79 70 65 _ARGS_((int type
11db0 29 29 3b 20 2f 2a 20 31 37 33 20 2a 2f 0a 20 20 )); /* 173 */.
11dc0 20 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e CONST84_RETURN
11dd0 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 47 65 char * (*tcl_Ge
11de0 74 53 74 72 69 6e 67 52 65 73 75 6c 74 29 20 5f tStringResult) _
11df0 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
11e00 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 29 Interp * interp)
11e10 29 3b 20 2f 2a 20 31 37 34 20 2a 2f 0a 20 20 20 ); /* 174 */.
11e20 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 CONST84_RETURN
11e30 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 47 65 74 char * (*tcl_Get
11e40 56 61 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Var) _ANSI_ARGS_
11e50 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
11e60 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 nterp, CONST cha
11e70 72 20 2a 20 76 61 72 4e 61 6d 65 2c 20 69 6e 74 r * varName, int
11e80 20 66 6c 61 67 73 29 29 3b 20 2f 2a 20 31 37 35 flags)); /* 175
11e90 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f */. CONST84_
11ea0 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a RETURN char * (*
11eb0 74 63 6c 5f 47 65 74 56 61 72 32 29 20 5f 41 4e tcl_GetVar2) _AN
11ec0 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
11ed0 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
11ee0 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 ONST char * part
11ef0 31 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 1, CONST char *
11f00 70 61 72 74 32 2c 20 69 6e 74 20 66 6c 61 67 73 part2, int flags
11f10 29 29 3b 20 2f 2a 20 31 37 36 20 2a 2f 0a 20 20 )); /* 176 */.
11f20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 6c 6f 62 int (*tcl_Glob
11f30 61 6c 45 76 61 6c 29 20 5f 41 4e 53 49 5f 41 52 alEval) _ANSI_AR
11f40 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
11f50 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 * interp, CONST
11f60 63 68 61 72 20 2a 20 63 6f 6d 6d 61 6e 64 29 29 char * command))
11f70 3b 20 2f 2a 20 31 37 37 20 2a 2f 0a 20 20 20 20 ; /* 177 */.
11f80 69 6e 74 20 28 2a 74 63 6c 5f 47 6c 6f 62 61 6c int (*tcl_Global
11f90 45 76 61 6c 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 EvalObj) _ANSI_A
11fa0 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
11fb0 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
11fc0 62 6a 20 2a 20 6f 62 6a 50 74 72 29 29 3b 20 2f bj * objPtr)); /
11fd0 2a 20 31 37 38 20 2a 2f 0a 20 20 20 20 69 6e 74 * 178 */. int
11fe0 20 28 2a 74 63 6c 5f 48 69 64 65 43 6f 6d 6d 61 (*tcl_HideComma
11ff0 6e 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nd) _ANSI_ARGS_(
12000 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
12010 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 terp, CONST char
12020 20 2a 20 63 6d 64 4e 61 6d 65 2c 20 43 4f 4e 53 * cmdName, CONS
12030 54 20 63 68 61 72 20 2a 20 68 69 64 64 65 6e 43 T char * hiddenC
12040 6d 64 54 6f 6b 65 6e 29 29 3b 20 2f 2a 20 31 37 mdToken)); /* 17
12050 39 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 9 */. int (*t
12060 63 6c 5f 49 6e 69 74 29 20 5f 41 4e 53 49 5f 41 cl_Init) _ANSI_A
12070 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
12080 20 2a 20 69 6e 74 65 72 70 29 29 3b 20 2f 2a 20 * interp)); /*
12090 31 38 30 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 180 */. void
120a0 28 2a 74 63 6c 5f 49 6e 69 74 48 61 73 68 54 61 (*tcl_InitHashTa
120b0 62 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ble) _ANSI_ARGS_
120c0 28 28 54 63 6c 5f 48 61 73 68 54 61 62 6c 65 20 ((Tcl_HashTable
120d0 2a 20 74 61 62 6c 65 50 74 72 2c 20 69 6e 74 20 * tablePtr, int
120e0 6b 65 79 54 79 70 65 29 29 3b 20 2f 2a 20 31 38 keyType)); /* 18
120f0 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 1 */. int (*t
12100 63 6c 5f 49 6e 70 75 74 42 6c 6f 63 6b 65 64 29 cl_InputBlocked)
12110 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
12120 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 29 29 l_Channel chan))
12130 3b 20 2f 2a 20 31 38 32 20 2a 2f 0a 20 20 20 20 ; /* 182 */.
12140 69 6e 74 20 28 2a 74 63 6c 5f 49 6e 70 75 74 42 int (*tcl_InputB
12150 75 66 66 65 72 65 64 29 20 5f 41 4e 53 49 5f 41 uffered) _ANSI_A
12160 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 RGS_((Tcl_Channe
12170 6c 20 63 68 61 6e 29 29 3b 20 2f 2a 20 31 38 33 l chan)); /* 183
12180 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
12190 6c 5f 49 6e 74 65 72 70 44 65 6c 65 74 65 64 29 l_InterpDeleted)
121a0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
121b0 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
121c0 70 29 29 3b 20 2f 2a 20 31 38 34 20 2a 2f 0a 20 p)); /* 184 */.
121d0 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 49 73 53 int (*tcl_IsS
121e0 61 66 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f afe) _ANSI_ARGS_
121f0 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
12200 6e 74 65 72 70 29 29 3b 20 2f 2a 20 31 38 35 20 nterp)); /* 185
12210 2a 2f 0a 20 20 20 20 63 68 61 72 20 2a 20 28 2a */. char * (*
12220 74 63 6c 5f 4a 6f 69 6e 50 61 74 68 29 20 5f 41 tcl_JoinPath) _A
12230 4e 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 61 NSI_ARGS_((int a
12240 72 67 63 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 rgc, CONST84 cha
12250 72 20 2a 20 43 4f 4e 53 54 20 2a 20 61 72 67 76 r * CONST * argv
12260 2c 20 54 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 , Tcl_DString *
12270 72 65 73 75 6c 74 50 74 72 29 29 3b 20 2f 2a 20 resultPtr)); /*
12280 31 38 36 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 186 */. int (
12290 2a 74 63 6c 5f 4c 69 6e 6b 56 61 72 29 20 5f 41 *tcl_LinkVar) _A
122a0 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
122b0 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
122c0 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 61 72 CONST char * var
122d0 4e 61 6d 65 2c 20 63 68 61 72 20 2a 20 61 64 64 Name, char * add
122e0 72 2c 20 69 6e 74 20 74 79 70 65 29 29 3b 20 2f r, int type)); /
122f0 2a 20 31 38 37 20 2a 2f 0a 20 20 20 20 76 6f 69 * 187 */. voi
12300 64 20 2a 72 65 73 65 72 76 65 64 31 38 38 3b 0a d *reserved188;.
12310 20 20 20 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 Tcl_Channel
12320 28 2a 74 63 6c 5f 4d 61 6b 65 46 69 6c 65 43 68 (*tcl_MakeFileCh
12330 61 6e 6e 65 6c 29 20 5f 41 4e 53 49 5f 41 52 47 annel) _ANSI_ARG
12340 53 5f 28 28 43 6c 69 65 6e 74 44 61 74 61 20 68 S_((ClientData h
12350 61 6e 64 6c 65 2c 20 69 6e 74 20 6d 6f 64 65 29 andle, int mode)
12360 29 3b 20 2f 2a 20 31 38 39 20 2a 2f 0a 20 20 20 ); /* 189 */.
12370 20 69 6e 74 20 28 2a 74 63 6c 5f 4d 61 6b 65 53 int (*tcl_MakeS
12380 61 66 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f afe) _ANSI_ARGS_
12390 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
123a0 6e 74 65 72 70 29 29 3b 20 2f 2a 20 31 39 30 20 nterp)); /* 190
123b0 2a 2f 0a 20 20 20 20 54 63 6c 5f 43 68 61 6e 6e */. Tcl_Chann
123c0 65 6c 20 28 2a 74 63 6c 5f 4d 61 6b 65 54 63 70 el (*tcl_MakeTcp
123d0 43 6c 69 65 6e 74 43 68 61 6e 6e 65 6c 29 20 5f ClientChannel) _
123e0 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 6c 69 65 ANSI_ARGS_((Clie
123f0 6e 74 44 61 74 61 20 74 63 70 53 6f 63 6b 65 74 ntData tcpSocket
12400 29 29 3b 20 2f 2a 20 31 39 31 20 2a 2f 0a 20 20 )); /* 191 */.
12410 20 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 4d char * (*tcl_M
12420 65 72 67 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 erge) _ANSI_ARGS
12430 5f 28 28 69 6e 74 20 61 72 67 63 2c 20 43 4f 4e _((int argc, CON
12440 53 54 38 34 20 63 68 61 72 20 2a 20 43 4f 4e 53 ST84 char * CONS
12450 54 20 2a 20 61 72 67 76 29 29 3b 20 2f 2a 20 31 T * argv)); /* 1
12460 39 32 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 48 61 92 */. Tcl_Ha
12470 73 68 45 6e 74 72 79 20 2a 20 28 2a 74 63 6c 5f shEntry * (*tcl_
12480 4e 65 78 74 48 61 73 68 45 6e 74 72 79 29 20 5f NextHashEntry) _
12490 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
124a0 48 61 73 68 53 65 61 72 63 68 20 2a 20 73 65 61 HashSearch * sea
124b0 72 63 68 50 74 72 29 29 3b 20 2f 2a 20 31 39 33 rchPtr)); /* 193
124c0 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
124d0 63 6c 5f 4e 6f 74 69 66 79 43 68 61 6e 6e 65 6c cl_NotifyChannel
124e0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
124f0 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 6e cl_Channel chann
12500 65 6c 2c 20 69 6e 74 20 6d 61 73 6b 29 29 3b 20 el, int mask));
12510 2f 2a 20 31 39 34 20 2a 2f 0a 20 20 20 20 54 63 /* 194 */. Tc
12520 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f 4f 62 l_Obj * (*tcl_Ob
12530 6a 47 65 74 56 61 72 32 29 20 5f 41 4e 53 49 5f jGetVar2) _ANSI_
12540 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
12550 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f p * interp, Tcl_
12560 4f 62 6a 20 2a 20 70 61 72 74 31 50 74 72 2c 20 Obj * part1Ptr,
12570 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 72 74 32 50 Tcl_Obj * part2P
12580 74 72 2c 20 69 6e 74 20 66 6c 61 67 73 29 29 3b tr, int flags));
12590 20 2f 2a 20 31 39 35 20 2a 2f 0a 20 20 20 20 54 /* 195 */. T
125a0 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f 4f cl_Obj * (*tcl_O
125b0 62 6a 53 65 74 56 61 72 32 29 20 5f 41 4e 53 49 bjSetVar2) _ANSI
125c0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
125d0 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c rp * interp, Tcl
125e0 5f 4f 62 6a 20 2a 20 70 61 72 74 31 50 74 72 2c _Obj * part1Ptr,
125f0 20 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 72 74 32 Tcl_Obj * part2
12600 50 74 72 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 6e Ptr, Tcl_Obj * n
12610 65 77 56 61 6c 75 65 50 74 72 2c 20 69 6e 74 20 ewValuePtr, int
12620 66 6c 61 67 73 29 29 3b 20 2f 2a 20 31 39 36 20 flags)); /* 196
12630 2a 2f 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28 */.#if !defined(
12640 5f 5f 57 49 4e 33 32 5f 5f 29 20 26 26 20 21 64 __WIN32__) && !d
12650 65 66 69 6e 65 64 28 4d 41 43 5f 54 43 4c 29 20 efined(MAC_TCL)
12660 2f 2a 20 55 4e 49 58 20 2a 2f 0a 20 20 20 20 54 /* UNIX */. T
12670 63 6c 5f 43 68 61 6e 6e 65 6c 20 28 2a 74 63 6c cl_Channel (*tcl
12680 5f 4f 70 65 6e 43 6f 6d 6d 61 6e 64 43 68 61 6e _OpenCommandChan
12690 6e 65 6c 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f nel) _ANSI_ARGS_
126a0 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
126b0 6e 74 65 72 70 2c 20 69 6e 74 20 61 72 67 63 2c nterp, int argc,
126c0 20 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a 2a CONST84 char **
126d0 20 61 72 67 76 2c 20 69 6e 74 20 66 6c 61 67 73 argv, int flags
126e0 29 29 3b 20 2f 2a 20 31 39 37 20 2a 2f 0a 23 65 )); /* 197 */.#e
126f0 6e 64 69 66 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a ndif /* UNIX */.
12700 23 69 66 64 65 66 20 5f 5f 57 49 4e 33 32 5f 5f #ifdef __WIN32__
12710 0a 20 20 20 20 54 63 6c 5f 43 68 61 6e 6e 65 6c . Tcl_Channel
12720 20 28 2a 74 63 6c 5f 4f 70 65 6e 43 6f 6d 6d 61 (*tcl_OpenComma
12730 6e 64 43 68 61 6e 6e 65 6c 29 20 5f 41 4e 53 49 ndChannel) _ANSI
12740 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
12750 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e 74 rp * interp, int
12760 20 61 72 67 63 2c 20 43 4f 4e 53 54 38 34 20 63 argc, CONST84 c
12770 68 61 72 20 2a 2a 20 61 72 67 76 2c 20 69 6e 74 har ** argv, int
12780 20 66 6c 61 67 73 29 29 3b 20 2f 2a 20 31 39 37 flags)); /* 197
12790 20 2a 2f 0a 23 65 6e 64 69 66 20 2f 2a 20 5f 5f */.#endif /* __
127a0 57 49 4e 33 32 5f 5f 20 2a 2f 0a 23 69 66 64 65 WIN32__ */.#ifde
127b0 66 20 4d 41 43 5f 54 43 4c 0a 20 20 20 20 76 6f f MAC_TCL. vo
127c0 69 64 20 2a 72 65 73 65 72 76 65 64 31 39 37 3b id *reserved197;
127d0 0a 23 65 6e 64 69 66 20 2f 2a 20 4d 41 43 5f 54 .#endif /* MAC_T
127e0 43 4c 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 43 68 CL */. Tcl_Ch
127f0 61 6e 6e 65 6c 20 28 2a 74 63 6c 5f 4f 70 65 6e annel (*tcl_Open
12800 46 69 6c 65 43 68 61 6e 6e 65 6c 29 20 5f 41 4e FileChannel) _AN
12810 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
12820 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
12830 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 ONST char * file
12840 4e 61 6d 65 2c 20 43 4f 4e 53 54 20 63 68 61 72 Name, CONST char
12850 20 2a 20 6d 6f 64 65 53 74 72 69 6e 67 2c 20 69 * modeString, i
12860 6e 74 20 70 65 72 6d 69 73 73 69 6f 6e 73 29 29 nt permissions))
12870 3b 20 2f 2a 20 31 39 38 20 2a 2f 0a 20 20 20 20 ; /* 198 */.
12880 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 28 2a 74 63 Tcl_Channel (*tc
12890 6c 5f 4f 70 65 6e 54 63 70 43 6c 69 65 6e 74 29 l_OpenTcpClient)
128a0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
128b0 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
128c0 70 2c 20 69 6e 74 20 70 6f 72 74 2c 20 43 4f 4e p, int port, CON
128d0 53 54 20 63 68 61 72 20 2a 20 61 64 64 72 65 73 ST char * addres
128e0 73 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 s, CONST char *
128f0 6d 79 61 64 64 72 2c 20 69 6e 74 20 6d 79 70 6f myaddr, int mypo
12900 72 74 2c 20 69 6e 74 20 61 73 79 6e 63 29 29 3b rt, int async));
12910 20 2f 2a 20 31 39 39 20 2a 2f 0a 20 20 20 20 54 /* 199 */. T
12920 63 6c 5f 43 68 61 6e 6e 65 6c 20 28 2a 74 63 6c cl_Channel (*tcl
12930 5f 4f 70 65 6e 54 63 70 53 65 72 76 65 72 29 20 _OpenTcpServer)
12940 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
12950 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
12960 2c 20 69 6e 74 20 70 6f 72 74 2c 20 43 4f 4e 53 , int port, CONS
12970 54 20 63 68 61 72 20 2a 20 68 6f 73 74 2c 20 54 T char * host, T
12980 63 6c 5f 54 63 70 41 63 63 65 70 74 50 72 6f 63 cl_TcpAcceptProc
12990 20 2a 20 61 63 63 65 70 74 50 72 6f 63 2c 20 43 * acceptProc, C
129a0 6c 69 65 6e 74 44 61 74 61 20 63 61 6c 6c 62 61 lientData callba
129b0 63 6b 44 61 74 61 29 29 3b 20 2f 2a 20 32 30 30 ckData)); /* 200
129c0 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
129d0 63 6c 5f 50 72 65 73 65 72 76 65 29 20 5f 41 4e cl_Preserve) _AN
129e0 53 49 5f 41 52 47 53 5f 28 28 43 6c 69 65 6e 74 SI_ARGS_((Client
129f0 44 61 74 61 20 64 61 74 61 29 29 3b 20 2f 2a 20 Data data)); /*
12a00 32 30 31 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 201 */. void
12a10 28 2a 74 63 6c 5f 50 72 69 6e 74 44 6f 75 62 6c (*tcl_PrintDoubl
12a20 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 e) _ANSI_ARGS_((
12a30 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
12a40 65 72 70 2c 20 64 6f 75 62 6c 65 20 76 61 6c 75 erp, double valu
12a50 65 2c 20 63 68 61 72 20 2a 20 64 73 74 29 29 3b e, char * dst));
12a60 20 2f 2a 20 32 30 32 20 2a 2f 0a 20 20 20 20 69 /* 202 */. i
12a70 6e 74 20 28 2a 74 63 6c 5f 50 75 74 45 6e 76 29 nt (*tcl_PutEnv)
12a80 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f _ANSI_ARGS_((CO
12a90 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 69 6e NST char * strin
12aa0 67 29 29 3b 20 2f 2a 20 32 30 33 20 2a 2f 0a 20 g)); /* 203 */.
12ab0 20 20 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 CONST84_RETUR
12ac0 4e 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 50 N char * (*tcl_P
12ad0 6f 73 69 78 45 72 72 6f 72 29 20 5f 41 4e 53 49 osixError) _ANSI
12ae0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
12af0 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 20 2f rp * interp)); /
12b00 2a 20 32 30 34 20 2a 2f 0a 20 20 20 20 76 6f 69 * 204 */. voi
12b10 64 20 28 2a 74 63 6c 5f 51 75 65 75 65 45 76 65 d (*tcl_QueueEve
12b20 6e 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nt) _ANSI_ARGS_(
12b30 28 54 63 6c 5f 45 76 65 6e 74 20 2a 20 65 76 50 (Tcl_Event * evP
12b40 74 72 2c 20 54 63 6c 5f 51 75 65 75 65 50 6f 73 tr, Tcl_QueuePos
12b50 69 74 69 6f 6e 20 70 6f 73 69 74 69 6f 6e 29 29 ition position))
12b60 3b 20 2f 2a 20 32 30 35 20 2a 2f 0a 20 20 20 20 ; /* 205 */.
12b70 69 6e 74 20 28 2a 74 63 6c 5f 52 65 61 64 29 20 int (*tcl_Read)
12b80 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
12b90 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 63 _Channel chan, c
12ba0 68 61 72 20 2a 20 62 75 66 50 74 72 2c 20 69 6e har * bufPtr, in
12bb0 74 20 74 6f 52 65 61 64 29 29 3b 20 2f 2a 20 32 t toRead)); /* 2
12bc0 30 36 20 2a 2f 0a 23 69 66 20 21 64 65 66 69 6e 06 */.#if !defin
12bd0 65 64 28 5f 5f 57 49 4e 33 32 5f 5f 29 20 26 26 ed(__WIN32__) &&
12be0 20 21 64 65 66 69 6e 65 64 28 4d 41 43 5f 54 43 !defined(MAC_TC
12bf0 4c 29 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 20 20 L) /* UNIX */.
12c00 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 52 65 61 void (*tcl_Rea
12c10 70 44 65 74 61 63 68 65 64 50 72 6f 63 73 29 20 pDetachedProcs)
12c20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 _ANSI_ARGS_((voi
12c30 64 29 29 3b 20 2f 2a 20 32 30 37 20 2a 2f 0a 23 d)); /* 207 */.#
12c40 65 6e 64 69 66 20 2f 2a 20 55 4e 49 58 20 2a 2f endif /* UNIX */
12c50 0a 23 69 66 64 65 66 20 5f 5f 57 49 4e 33 32 5f .#ifdef __WIN32_
12c60 5f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c _. void (*tcl
12c70 5f 52 65 61 70 44 65 74 61 63 68 65 64 50 72 6f _ReapDetachedPro
12c80 63 73 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 cs) _ANSI_ARGS_(
12c90 28 76 6f 69 64 29 29 3b 20 2f 2a 20 32 30 37 20 (void)); /* 207
12ca0 2a 2f 0a 23 65 6e 64 69 66 20 2f 2a 20 5f 5f 57 */.#endif /* __W
12cb0 49 4e 33 32 5f 5f 20 2a 2f 0a 23 69 66 64 65 66 IN32__ */.#ifdef
12cc0 20 4d 41 43 5f 54 43 4c 0a 20 20 20 20 76 6f 69 MAC_TCL. voi
12cd0 64 20 2a 72 65 73 65 72 76 65 64 32 30 37 3b 0a d *reserved207;.
12ce0 23 65 6e 64 69 66 20 2f 2a 20 4d 41 43 5f 54 43 #endif /* MAC_TC
12cf0 4c 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 L */. int (*t
12d00 63 6c 5f 52 65 63 6f 72 64 41 6e 64 45 76 61 6c cl_RecordAndEval
12d10 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
12d20 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
12d30 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a rp, CONST char *
12d40 20 63 6d 64 2c 20 69 6e 74 20 66 6c 61 67 73 29 cmd, int flags)
12d50 29 3b 20 2f 2a 20 32 30 38 20 2a 2f 0a 20 20 20 ); /* 208 */.
12d60 20 69 6e 74 20 28 2a 74 63 6c 5f 52 65 63 6f 72 int (*tcl_Recor
12d70 64 41 6e 64 45 76 61 6c 4f 62 6a 29 20 5f 41 4e dAndEvalObj) _AN
12d80 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
12d90 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 terp * interp, T
12da0 63 6c 5f 4f 62 6a 20 2a 20 63 6d 64 50 74 72 2c cl_Obj * cmdPtr,
12db0 20 69 6e 74 20 66 6c 61 67 73 29 29 3b 20 2f 2a int flags)); /*
12dc0 20 32 30 39 20 2a 2f 0a 20 20 20 20 76 6f 69 64 209 */. void
12dd0 20 28 2a 74 63 6c 5f 52 65 67 69 73 74 65 72 43 (*tcl_RegisterC
12de0 68 61 6e 6e 65 6c 29 20 5f 41 4e 53 49 5f 41 52 hannel) _ANSI_AR
12df0 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
12e00 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 43 68 * interp, Tcl_Ch
12e10 61 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 20 2f 2a annel chan)); /*
12e20 20 32 31 30 20 2a 2f 0a 20 20 20 20 76 6f 69 64 210 */. void
12e30 20 28 2a 74 63 6c 5f 52 65 67 69 73 74 65 72 4f (*tcl_RegisterO
12e40 62 6a 54 79 70 65 29 20 5f 41 4e 53 49 5f 41 52 bjType) _ANSI_AR
12e50 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 54 79 70 65 GS_((Tcl_ObjType
12e60 20 2a 20 74 79 70 65 50 74 72 29 29 3b 20 2f 2a * typePtr)); /*
12e70 20 32 31 31 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 211 */. Tcl_
12e80 52 65 67 45 78 70 20 28 2a 74 63 6c 5f 52 65 67 RegExp (*tcl_Reg
12e90 45 78 70 43 6f 6d 70 69 6c 65 29 20 5f 41 4e 53 ExpCompile) _ANS
12ea0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
12eb0 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f erp * interp, CO
12ec0 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 69 6e NST char * strin
12ed0 67 29 29 3b 20 2f 2a 20 32 31 32 20 2a 2f 0a 20 g)); /* 212 */.
12ee0 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 52 65 67 int (*tcl_Reg
12ef0 45 78 70 45 78 65 63 29 20 5f 41 4e 53 49 5f 41 ExpExec) _ANSI_A
12f00 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
12f10 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 52 * interp, Tcl_R
12f20 65 67 45 78 70 20 72 65 67 65 78 70 2c 20 43 4f egExp regexp, CO
12f30 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 NST char * str,
12f40 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 61 CONST char * sta
12f50 72 74 29 29 3b 20 2f 2a 20 32 31 33 20 2a 2f 0a rt)); /* 213 */.
12f60 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 52 65 int (*tcl_Re
12f70 67 45 78 70 4d 61 74 63 68 29 20 5f 41 4e 53 49 gExpMatch) _ANSI
12f80 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
12f90 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e rp * interp, CON
12fa0 53 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 43 ST char * str, C
12fb0 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 74 74 ONST char * patt
12fc0 65 72 6e 29 29 3b 20 2f 2a 20 32 31 34 20 2a 2f ern)); /* 214 */
12fd0 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f . void (*tcl_
12fe0 52 65 67 45 78 70 52 61 6e 67 65 29 20 5f 41 4e RegExpRange) _AN
12ff0 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 52 65 SI_ARGS_((Tcl_Re
13000 67 45 78 70 20 72 65 67 65 78 70 2c 20 69 6e 74 gExp regexp, int
13010 20 69 6e 64 65 78 2c 20 43 4f 4e 53 54 38 34 20 index, CONST84
13020 63 68 61 72 20 2a 2a 20 73 74 61 72 74 50 74 72 char ** startPtr
13030 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a , CONST84 char *
13040 2a 20 65 6e 64 50 74 72 29 29 3b 20 2f 2a 20 32 * endPtr)); /* 2
13050 31 35 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 15 */. void (
13060 2a 74 63 6c 5f 52 65 6c 65 61 73 65 29 20 5f 41 *tcl_Release) _A
13070 4e 53 49 5f 41 52 47 53 5f 28 28 43 6c 69 65 6e NSI_ARGS_((Clien
13080 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 tData clientData
13090 29 29 3b 20 2f 2a 20 32 31 36 20 2a 2f 0a 20 20 )); /* 216 */.
130a0 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 52 65 73 void (*tcl_Res
130b0 65 74 52 65 73 75 6c 74 29 20 5f 41 4e 53 49 5f etResult) _ANSI_
130c0 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
130d0 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 20 2f 2a p * interp)); /*
130e0 20 32 31 37 20 2a 2f 0a 20 20 20 20 69 6e 74 20 217 */. int
130f0 28 2a 74 63 6c 5f 53 63 61 6e 45 6c 65 6d 65 6e (*tcl_ScanElemen
13100 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 t) _ANSI_ARGS_((
13110 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 CONST char * str
13120 2c 20 69 6e 74 20 2a 20 66 6c 61 67 50 74 72 29 , int * flagPtr)
13130 29 3b 20 2f 2a 20 32 31 38 20 2a 2f 0a 20 20 20 ); /* 218 */.
13140 20 69 6e 74 20 28 2a 74 63 6c 5f 53 63 61 6e 43 int (*tcl_ScanC
13150 6f 75 6e 74 65 64 45 6c 65 6d 65 6e 74 29 20 5f ountedElement) _
13160 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
13170 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 69 6e T char * str, in
13180 74 20 6c 65 6e 67 74 68 2c 20 69 6e 74 20 2a 20 t length, int *
13190 66 6c 61 67 50 74 72 29 29 3b 20 2f 2a 20 32 31 flagPtr)); /* 21
131a0 39 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 9 */. int (*t
131b0 63 6c 5f 53 65 65 6b 4f 6c 64 29 20 5f 41 4e 53 cl_SeekOld) _ANS
131c0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
131d0 6e 6e 65 6c 20 63 68 61 6e 2c 20 69 6e 74 20 6f nnel chan, int o
131e0 66 66 73 65 74 2c 20 69 6e 74 20 6d 6f 64 65 29 ffset, int mode)
131f0 29 3b 20 2f 2a 20 32 32 30 20 2a 2f 0a 20 20 20 ); /* 220 */.
13200 20 69 6e 74 20 28 2a 74 63 6c 5f 53 65 72 76 69 int (*tcl_Servi
13210 63 65 41 6c 6c 29 20 5f 41 4e 53 49 5f 41 52 47 ceAll) _ANSI_ARG
13220 53 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 32 S_((void)); /* 2
13230 32 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 21 */. int (*
13240 74 63 6c 5f 53 65 72 76 69 63 65 45 76 65 6e 74 tcl_ServiceEvent
13250 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 69 ) _ANSI_ARGS_((i
13260 6e 74 20 66 6c 61 67 73 29 29 3b 20 2f 2a 20 32 nt flags)); /* 2
13270 32 32 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 22 */. void (
13280 2a 74 63 6c 5f 53 65 74 41 73 73 6f 63 44 61 74 *tcl_SetAssocDat
13290 61 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 a) _ANSI_ARGS_((
132a0 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
132b0 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 erp, CONST char
132c0 2a 20 6e 61 6d 65 2c 20 54 63 6c 5f 49 6e 74 65 * name, Tcl_Inte
132d0 72 70 44 65 6c 65 74 65 50 72 6f 63 20 2a 20 70 rpDeleteProc * p
132e0 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 roc, ClientData
132f0 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a clientData)); /*
13300 20 32 32 33 20 2a 2f 0a 20 20 20 20 76 6f 69 64 223 */. void
13310 20 28 2a 74 63 6c 5f 53 65 74 43 68 61 6e 6e 65 (*tcl_SetChanne
13320 6c 42 75 66 66 65 72 53 69 7a 65 29 20 5f 41 4e lBufferSize) _AN
13330 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 SI_ARGS_((Tcl_Ch
13340 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 69 6e 74 20 annel chan, int
13350 73 7a 29 29 3b 20 2f 2a 20 32 32 34 20 2a 2f 0a sz)); /* 224 */.
13360 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 53 65 int (*tcl_Se
13370 74 43 68 61 6e 6e 65 6c 4f 70 74 69 6f 6e 29 20 tChannelOption)
13380 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
13390 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
133a0 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 , Tcl_Channel ch
133b0 61 6e 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a an, CONST char *
133c0 20 6f 70 74 69 6f 6e 4e 61 6d 65 2c 20 43 4f 4e optionName, CON
133d0 53 54 20 63 68 61 72 20 2a 20 6e 65 77 56 61 6c ST char * newVal
133e0 75 65 29 29 3b 20 2f 2a 20 32 32 35 20 2a 2f 0a ue)); /* 225 */.
133f0 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 53 65 int (*tcl_Se
13400 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 29 20 5f 41 tCommandInfo) _A
13410 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
13420 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
13430 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 63 6d 64 CONST char * cmd
13440 4e 61 6d 65 2c 20 43 4f 4e 53 54 20 54 63 6c 5f Name, CONST Tcl_
13450 43 6d 64 49 6e 66 6f 20 2a 20 69 6e 66 6f 50 74 CmdInfo * infoPt
13460 72 29 29 3b 20 2f 2a 20 32 32 36 20 2a 2f 0a 20 r)); /* 226 */.
13470 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 65 void (*tcl_Se
13480 74 45 72 72 6e 6f 29 20 5f 41 4e 53 49 5f 41 52 tErrno) _ANSI_AR
13490 47 53 5f 28 28 69 6e 74 20 65 72 72 29 29 3b 20 GS_((int err));
134a0 2f 2a 20 32 32 37 20 2a 2f 0a 20 20 20 20 76 6f /* 227 */. vo
134b0 69 64 20 28 2a 74 63 6c 5f 53 65 74 45 72 72 6f id (*tcl_SetErro
134c0 72 43 6f 64 65 29 20 5f 41 4e 53 49 5f 41 52 47 rCode) _ANSI_ARG
134d0 53 5f 28 54 43 4c 5f 56 41 52 41 52 47 53 28 54 S_(TCL_VARARGS(T
134e0 63 6c 5f 49 6e 74 65 72 70 20 2a 2c 69 6e 74 65 cl_Interp *,inte
134f0 72 70 29 29 3b 20 2f 2a 20 32 32 38 20 2a 2f 0a rp)); /* 228 */.
13500 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 void (*tcl_S
13510 65 74 4d 61 78 42 6c 6f 63 6b 54 69 6d 65 29 20 etMaxBlockTime)
13520 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
13530 5f 54 69 6d 65 20 2a 20 74 69 6d 65 50 74 72 29 _Time * timePtr)
13540 29 3b 20 2f 2a 20 32 32 39 20 2a 2f 0a 20 20 20 ); /* 229 */.
13550 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 65 74 50 void (*tcl_SetP
13560 61 6e 69 63 50 72 6f 63 29 20 5f 41 4e 53 49 5f anicProc) _ANSI_
13570 41 52 47 53 5f 28 28 54 63 6c 5f 50 61 6e 69 63 ARGS_((Tcl_Panic
13580 50 72 6f 63 20 2a 20 70 61 6e 69 63 50 72 6f 63 Proc * panicProc
13590 29 29 3b 20 2f 2a 20 32 33 30 20 2a 2f 0a 20 20 )); /* 230 */.
135a0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 53 65 74 52 int (*tcl_SetR
135b0 65 63 75 72 73 69 6f 6e 4c 69 6d 69 74 29 20 5f ecursionLimit) _
135c0 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
135d0 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
135e0 20 69 6e 74 20 64 65 70 74 68 29 29 3b 20 2f 2a int depth)); /*
135f0 20 32 33 31 20 2a 2f 0a 20 20 20 20 76 6f 69 64 231 */. void
13600 20 28 2a 74 63 6c 5f 53 65 74 52 65 73 75 6c 74 (*tcl_SetResult
13610 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
13620 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
13630 72 70 2c 20 63 68 61 72 20 2a 20 73 74 72 2c 20 rp, char * str,
13640 54 63 6c 5f 46 72 65 65 50 72 6f 63 20 2a 20 66 Tcl_FreeProc * f
13650 72 65 65 50 72 6f 63 29 29 3b 20 2f 2a 20 32 33 reeProc)); /* 23
13660 32 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 2 */. int (*t
13670 63 6c 5f 53 65 74 53 65 72 76 69 63 65 4d 6f 64 cl_SetServiceMod
13680 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 e) _ANSI_ARGS_((
13690 69 6e 74 20 6d 6f 64 65 29 29 3b 20 2f 2a 20 32 int mode)); /* 2
136a0 33 33 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 33 */. void (
136b0 2a 74 63 6c 5f 53 65 74 4f 62 6a 45 72 72 6f 72 *tcl_SetObjError
136c0 43 6f 64 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 Code) _ANSI_ARGS
136d0 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
136e0 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 interp, Tcl_Obj
136f0 2a 20 65 72 72 6f 72 4f 62 6a 50 74 72 29 29 3b * errorObjPtr));
13700 20 2f 2a 20 32 33 34 20 2a 2f 0a 20 20 20 20 76 /* 234 */. v
13710 6f 69 64 20 28 2a 74 63 6c 5f 53 65 74 4f 62 6a oid (*tcl_SetObj
13720 52 65 73 75 6c 74 29 20 5f 41 4e 53 49 5f 41 52 Result) _ANSI_AR
13730 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
13740 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 * interp, Tcl_Ob
13750 6a 20 2a 20 72 65 73 75 6c 74 4f 62 6a 50 74 72 j * resultObjPtr
13760 29 29 3b 20 2f 2a 20 32 33 35 20 2a 2f 0a 20 20 )); /* 235 */.
13770 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 65 74 void (*tcl_Set
13780 53 74 64 43 68 61 6e 6e 65 6c 29 20 5f 41 4e 53 StdChannel) _ANS
13790 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
137a0 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c 2c 20 69 6e nnel channel, in
137b0 74 20 74 79 70 65 29 29 3b 20 2f 2a 20 32 33 36 t type)); /* 236
137c0 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f */. CONST84_
137d0 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a RETURN char * (*
137e0 74 63 6c 5f 53 65 74 56 61 72 29 20 5f 41 4e 53 tcl_SetVar) _ANS
137f0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
13800 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f erp * interp, CO
13810 4e 53 54 20 63 68 61 72 20 2a 20 76 61 72 4e 61 NST char * varNa
13820 6d 65 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a me, CONST char *
13830 20 6e 65 77 56 61 6c 75 65 2c 20 69 6e 74 20 66 newValue, int f
13840 6c 61 67 73 29 29 3b 20 2f 2a 20 32 33 37 20 2a lags)); /* 237 *
13850 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f 52 45 /. CONST84_RE
13860 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a 74 63 TURN char * (*tc
13870 6c 5f 53 65 74 56 61 72 32 29 20 5f 41 4e 53 49 l_SetVar2) _ANSI
13880 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
13890 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e rp * interp, CON
138a0 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 31 2c ST char * part1,
138b0 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 CONST char * pa
138c0 72 74 32 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 rt2, CONST char
138d0 2a 20 6e 65 77 56 61 6c 75 65 2c 20 69 6e 74 20 * newValue, int
138e0 66 6c 61 67 73 29 29 3b 20 2f 2a 20 32 33 38 20 flags)); /* 238
138f0 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f 52 */. CONST84_R
13900 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a 74 ETURN char * (*t
13910 63 6c 5f 53 69 67 6e 61 6c 49 64 29 20 5f 41 4e cl_SignalId) _AN
13920 53 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 73 69 SI_ARGS_((int si
13930 67 29 29 3b 20 2f 2a 20 32 33 39 20 2a 2f 0a 20 g)); /* 239 */.
13940 20 20 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 CONST84_RETUR
13950 4e 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 53 N char * (*tcl_S
13960 69 67 6e 61 6c 4d 73 67 29 20 5f 41 4e 53 49 5f ignalMsg) _ANSI_
13970 41 52 47 53 5f 28 28 69 6e 74 20 73 69 67 29 29 ARGS_((int sig))
13980 3b 20 2f 2a 20 32 34 30 20 2a 2f 0a 20 20 20 20 ; /* 240 */.
13990 76 6f 69 64 20 28 2a 74 63 6c 5f 53 6f 75 72 63 void (*tcl_Sourc
139a0 65 52 43 46 69 6c 65 29 20 5f 41 4e 53 49 5f 41 eRCFile) _ANSI_A
139b0 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
139c0 20 2a 20 69 6e 74 65 72 70 29 29 3b 20 2f 2a 20 * interp)); /*
139d0 32 34 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 241 */. int (
139e0 2a 74 63 6c 5f 53 70 6c 69 74 4c 69 73 74 29 20 *tcl_SplitList)
139f0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
13a00 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
13a10 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 6c , CONST char * l
13a20 69 73 74 53 74 72 2c 20 69 6e 74 20 2a 20 61 72 istStr, int * ar
13a30 67 63 50 74 72 2c 20 43 4f 4e 53 54 38 34 20 63 gcPtr, CONST84 c
13a40 68 61 72 20 2a 2a 2a 20 61 72 67 76 50 74 72 29 har *** argvPtr)
13a50 29 3b 20 2f 2a 20 32 34 32 20 2a 2f 0a 20 20 20 ); /* 242 */.
13a60 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 70 6c 69 void (*tcl_Spli
13a70 74 50 61 74 68 29 20 5f 41 4e 53 49 5f 41 52 47 tPath) _ANSI_ARG
13a80 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a S_((CONST char *
13a90 20 70 61 74 68 2c 20 69 6e 74 20 2a 20 61 72 67 path, int * arg
13aa0 63 50 74 72 2c 20 43 4f 4e 53 54 38 34 20 63 68 cPtr, CONST84 ch
13ab0 61 72 20 2a 2a 2a 20 61 72 67 76 50 74 72 29 29 ar *** argvPtr))
13ac0 3b 20 2f 2a 20 32 34 33 20 2a 2f 0a 20 20 20 20 ; /* 243 */.
13ad0 76 6f 69 64 20 28 2a 74 63 6c 5f 53 74 61 74 69 void (*tcl_Stati
13ae0 63 50 61 63 6b 61 67 65 29 20 5f 41 4e 53 49 5f cPackage) _ANSI_
13af0 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
13b00 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 p * interp, CONS
13b10 54 20 63 68 61 72 20 2a 20 70 6b 67 4e 61 6d 65 T char * pkgName
13b20 2c 20 54 63 6c 5f 50 61 63 6b 61 67 65 49 6e 69 , Tcl_PackageIni
13b30 74 50 72 6f 63 20 2a 20 69 6e 69 74 50 72 6f 63 tProc * initProc
13b40 2c 20 54 63 6c 5f 50 61 63 6b 61 67 65 49 6e 69 , Tcl_PackageIni
13b50 74 50 72 6f 63 20 2a 20 73 61 66 65 49 6e 69 74 tProc * safeInit
13b60 50 72 6f 63 29 29 3b 20 2f 2a 20 32 34 34 20 2a Proc)); /* 244 *
13b70 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
13b80 53 74 72 69 6e 67 4d 61 74 63 68 29 20 5f 41 4e StringMatch) _AN
13b90 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 SI_ARGS_((CONST
13ba0 63 68 61 72 20 2a 20 73 74 72 2c 20 43 4f 4e 53 char * str, CONS
13bb0 54 20 63 68 61 72 20 2a 20 70 61 74 74 65 72 6e T char * pattern
13bc0 29 29 3b 20 2f 2a 20 32 34 35 20 2a 2f 0a 20 20 )); /* 245 */.
13bd0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 54 65 6c 6c int (*tcl_Tell
13be0 4f 6c 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Old) _ANSI_ARGS_
13bf0 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
13c00 61 6e 29 29 3b 20 2f 2a 20 32 34 36 20 2a 2f 0a an)); /* 246 */.
13c10 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 54 72 int (*tcl_Tr
13c20 61 63 65 56 61 72 29 20 5f 41 4e 53 49 5f 41 52 aceVar) _ANSI_AR
13c30 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
13c40 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 * interp, CONST
13c50 63 68 61 72 20 2a 20 76 61 72 4e 61 6d 65 2c 20 char * varName,
13c60 69 6e 74 20 66 6c 61 67 73 2c 20 54 63 6c 5f 56 int flags, Tcl_V
13c70 61 72 54 72 61 63 65 50 72 6f 63 20 2a 20 70 72 arTraceProc * pr
13c80 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 oc, ClientData c
13c90 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 lientData)); /*
13ca0 32 34 37 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 247 */. int (
13cb0 2a 74 63 6c 5f 54 72 61 63 65 56 61 72 32 29 20 *tcl_TraceVar2)
13cc0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
13cd0 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
13ce0 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 , CONST char * p
13cf0 61 72 74 31 2c 20 43 4f 4e 53 54 20 63 68 61 72 art1, CONST char
13d00 20 2a 20 70 61 72 74 32 2c 20 69 6e 74 20 66 6c * part2, int fl
13d10 61 67 73 2c 20 54 63 6c 5f 56 61 72 54 72 61 63 ags, Tcl_VarTrac
13d20 65 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c eProc * proc, Cl
13d30 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 ientData clientD
13d40 61 74 61 29 29 3b 20 2f 2a 20 32 34 38 20 2a 2f ata)); /* 248 */
13d50 0a 20 20 20 20 63 68 61 72 20 2a 20 28 2a 74 63 . char * (*tc
13d60 6c 5f 54 72 61 6e 73 6c 61 74 65 46 69 6c 65 4e l_TranslateFileN
13d70 61 6d 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ame) _ANSI_ARGS_
13d80 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
13d90 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 nterp, CONST cha
13da0 72 20 2a 20 6e 61 6d 65 2c 20 54 63 6c 5f 44 53 r * name, Tcl_DS
13db0 74 72 69 6e 67 20 2a 20 62 75 66 66 65 72 50 74 tring * bufferPt
13dc0 72 29 29 3b 20 2f 2a 20 32 34 39 20 2a 2f 0a 20 r)); /* 249 */.
13dd0 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 55 6e 67 int (*tcl_Ung
13de0 65 74 73 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ets) _ANSI_ARGS_
13df0 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
13e00 61 6e 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a an, CONST char *
13e10 20 73 74 72 2c 20 69 6e 74 20 6c 65 6e 2c 20 69 str, int len, i
13e20 6e 74 20 61 74 48 65 61 64 29 29 3b 20 2f 2a 20 nt atHead)); /*
13e30 32 35 30 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 250 */. void
13e40 28 2a 74 63 6c 5f 55 6e 6c 69 6e 6b 56 61 72 29 (*tcl_UnlinkVar)
13e50 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
13e60 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
13e70 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 p, CONST char *
13e80 76 61 72 4e 61 6d 65 29 29 3b 20 2f 2a 20 32 35 varName)); /* 25
13e90 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 1 */. int (*t
13ea0 63 6c 5f 55 6e 72 65 67 69 73 74 65 72 43 68 61 cl_UnregisterCha
13eb0 6e 6e 65 6c 29 20 5f 41 4e 53 49 5f 41 52 47 53 nnel) _ANSI_ARGS
13ec0 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
13ed0 69 6e 74 65 72 70 2c 20 54 63 6c 5f 43 68 61 6e interp, Tcl_Chan
13ee0 6e 65 6c 20 63 68 61 6e 29 29 3b 20 2f 2a 20 32 nel chan)); /* 2
13ef0 35 32 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 52 */. int (*
13f00 74 63 6c 5f 55 6e 73 65 74 56 61 72 29 20 5f 41 tcl_UnsetVar) _A
13f10 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
13f20 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
13f30 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 61 72 CONST char * var
13f40 4e 61 6d 65 2c 20 69 6e 74 20 66 6c 61 67 73 29 Name, int flags)
13f50 29 3b 20 2f 2a 20 32 35 33 20 2a 2f 0a 20 20 20 ); /* 253 */.
13f60 20 69 6e 74 20 28 2a 74 63 6c 5f 55 6e 73 65 74 int (*tcl_Unset
13f70 56 61 72 32 29 20 5f 41 4e 53 49 5f 41 52 47 53 Var2) _ANSI_ARGS
13f80 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
13f90 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 interp, CONST ch
13fa0 61 72 20 2a 20 70 61 72 74 31 2c 20 43 4f 4e 53 ar * part1, CONS
13fb0 54 20 63 68 61 72 20 2a 20 70 61 72 74 32 2c 20 T char * part2,
13fc0 69 6e 74 20 66 6c 61 67 73 29 29 3b 20 2f 2a 20 int flags)); /*
13fd0 32 35 34 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 254 */. void
13fe0 28 2a 74 63 6c 5f 55 6e 74 72 61 63 65 56 61 72 (*tcl_UntraceVar
13ff0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
14000 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
14010 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a rp, CONST char *
14020 20 76 61 72 4e 61 6d 65 2c 20 69 6e 74 20 66 6c varName, int fl
14030 61 67 73 2c 20 54 63 6c 5f 56 61 72 54 72 61 63 ags, Tcl_VarTrac
14040 65 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c eProc * proc, Cl
14050 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 ientData clientD
14060 61 74 61 29 29 3b 20 2f 2a 20 32 35 35 20 2a 2f ata)); /* 255 */
14070 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f . void (*tcl_
14080 55 6e 74 72 61 63 65 56 61 72 32 29 20 5f 41 4e UntraceVar2) _AN
14090 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
140a0 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
140b0 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 ONST char * part
140c0 31 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 1, CONST char *
140d0 70 61 72 74 32 2c 20 69 6e 74 20 66 6c 61 67 73 part2, int flags
140e0 2c 20 54 63 6c 5f 56 61 72 54 72 61 63 65 50 72 , Tcl_VarTracePr
140f0 6f 63 20 2a 20 70 72 6f 63 2c 20 43 6c 69 65 6e oc * proc, Clien
14100 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 61 tData clientData
14110 29 29 3b 20 2f 2a 20 32 35 36 20 2a 2f 0a 20 20 )); /* 256 */.
14120 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 55 70 64 void (*tcl_Upd
14130 61 74 65 4c 69 6e 6b 65 64 56 61 72 29 20 5f 41 ateLinkedVar) _A
14140 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
14150 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
14160 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 61 72 CONST char * var
14170 4e 61 6d 65 29 29 3b 20 2f 2a 20 32 35 37 20 2a Name)); /* 257 *
14180 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
14190 55 70 56 61 72 29 20 5f 41 4e 53 49 5f 41 52 47 UpVar) _ANSI_ARG
141a0 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
141b0 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 interp, CONST c
141c0 68 61 72 20 2a 20 66 72 61 6d 65 4e 61 6d 65 2c har * frameName,
141d0 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 61 CONST char * va
141e0 72 4e 61 6d 65 2c 20 43 4f 4e 53 54 20 63 68 61 rName, CONST cha
141f0 72 20 2a 20 6c 6f 63 61 6c 4e 61 6d 65 2c 20 69 r * localName, i
14200 6e 74 20 66 6c 61 67 73 29 29 3b 20 2f 2a 20 32 nt flags)); /* 2
14210 35 38 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 58 */. int (*
14220 74 63 6c 5f 55 70 56 61 72 32 29 20 5f 41 4e 53 tcl_UpVar2) _ANS
14230 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
14240 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f erp * interp, CO
14250 4e 53 54 20 63 68 61 72 20 2a 20 66 72 61 6d 65 NST char * frame
14260 4e 61 6d 65 2c 20 43 4f 4e 53 54 20 63 68 61 72 Name, CONST char
14270 20 2a 20 70 61 72 74 31 2c 20 43 4f 4e 53 54 20 * part1, CONST
14280 63 68 61 72 20 2a 20 70 61 72 74 32 2c 20 43 4f char * part2, CO
14290 4e 53 54 20 63 68 61 72 20 2a 20 6c 6f 63 61 6c NST char * local
142a0 4e 61 6d 65 2c 20 69 6e 74 20 66 6c 61 67 73 29 Name, int flags)
142b0 29 3b 20 2f 2a 20 32 35 39 20 2a 2f 0a 20 20 20 ); /* 259 */.
142c0 20 69 6e 74 20 28 2a 74 63 6c 5f 56 61 72 45 76 int (*tcl_VarEv
142d0 61 6c 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 al) _ANSI_ARGS_(
142e0 54 43 4c 5f 56 41 52 41 52 47 53 28 54 63 6c 5f TCL_VARARGS(Tcl_
142f0 49 6e 74 65 72 70 20 2a 2c 69 6e 74 65 72 70 29 Interp *,interp)
14300 29 3b 20 2f 2a 20 32 36 30 20 2a 2f 0a 20 20 20 ); /* 260 */.
14310 20 43 6c 69 65 6e 74 44 61 74 61 20 28 2a 74 63 ClientData (*tc
14320 6c 5f 56 61 72 54 72 61 63 65 49 6e 66 6f 29 20 l_VarTraceInfo)
14330 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
14340 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
14350 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 , CONST char * v
14360 61 72 4e 61 6d 65 2c 20 69 6e 74 20 66 6c 61 67 arName, int flag
14370 73 2c 20 54 63 6c 5f 56 61 72 54 72 61 63 65 50 s, Tcl_VarTraceP
14380 72 6f 63 20 2a 20 70 72 6f 63 50 74 72 2c 20 43 roc * procPtr, C
14390 6c 69 65 6e 74 44 61 74 61 20 70 72 65 76 43 6c lientData prevCl
143a0 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 32 ientData)); /* 2
143b0 36 31 20 2a 2f 0a 20 20 20 20 43 6c 69 65 6e 74 61 */. Client
143c0 44 61 74 61 20 28 2a 74 63 6c 5f 56 61 72 54 72 Data (*tcl_VarTr
143d0 61 63 65 49 6e 66 6f 32 29 20 5f 41 4e 53 49 5f aceInfo2) _ANSI_
143e0 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
143f0 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 p * interp, CONS
14400 54 20 63 68 61 72 20 2a 20 70 61 72 74 31 2c 20 T char * part1,
14410 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 72 CONST char * par
14420 74 32 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 54 t2, int flags, T
14430 63 6c 5f 56 61 72 54 72 61 63 65 50 72 6f 63 20 cl_VarTraceProc
14440 2a 20 70 72 6f 63 50 74 72 2c 20 43 6c 69 65 6e * procPtr, Clien
14450 74 44 61 74 61 20 70 72 65 76 43 6c 69 65 6e 74 tData prevClient
14460 44 61 74 61 29 29 3b 20 2f 2a 20 32 36 32 20 2a Data)); /* 262 *
14470 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
14480 57 72 69 74 65 29 20 5f 41 4e 53 49 5f 41 52 47 Write) _ANSI_ARG
14490 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 S_((Tcl_Channel
144a0 63 68 61 6e 2c 20 43 4f 4e 53 54 20 63 68 61 72 chan, CONST char
144b0 20 2a 20 73 2c 20 69 6e 74 20 73 6c 65 6e 29 29 * s, int slen))
144c0 3b 20 2f 2a 20 32 36 33 20 2a 2f 0a 20 20 20 20 ; /* 263 */.
144d0 76 6f 69 64 20 28 2a 74 63 6c 5f 57 72 6f 6e 67 void (*tcl_Wrong
144e0 4e 75 6d 41 72 67 73 29 20 5f 41 4e 53 49 5f 41 NumArgs) _ANSI_A
144f0 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
14500 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e 74 20 6f * interp, int o
14510 62 6a 63 2c 20 54 63 6c 5f 4f 62 6a 20 2a 43 4f bjc, Tcl_Obj *CO
14520 4e 53 54 20 6f 62 6a 76 5b 5d 2c 20 43 4f 4e 53 NST objv[], CONS
14530 54 20 63 68 61 72 20 2a 20 6d 65 73 73 61 67 65 T char * message
14540 29 29 3b 20 2f 2a 20 32 36 34 20 2a 2f 0a 20 20 )); /* 264 */.
14550 20 20 69 6e 74 20 28 2a 74 63 6c 5f 44 75 6d 70 int (*tcl_Dump
14560 41 63 74 69 76 65 4d 65 6d 6f 72 79 29 20 5f 41 ActiveMemory) _A
14570 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 NSI_ARGS_((CONST
14580 20 63 68 61 72 20 2a 20 66 69 6c 65 4e 61 6d 65 char * fileName
14590 29 29 3b 20 2f 2a 20 32 36 35 20 2a 2f 0a 20 20 )); /* 265 */.
145a0 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 56 61 6c void (*tcl_Val
145b0 69 64 61 74 65 41 6c 6c 4d 65 6d 6f 72 79 29 20 idateAllMemory)
145c0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
145d0 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 2c 20 ST char * file,
145e0 69 6e 74 20 6c 69 6e 65 29 29 3b 20 2f 2a 20 32 int line)); /* 2
145f0 36 36 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 66 */. void (
14600 2a 74 63 6c 5f 41 70 70 65 6e 64 52 65 73 75 6c *tcl_AppendResul
14610 74 56 41 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f tVA) _ANSI_ARGS_
14620 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
14630 6e 74 65 72 70 2c 20 76 61 5f 6c 69 73 74 20 61 nterp, va_list a
14640 72 67 4c 69 73 74 29 29 3b 20 2f 2a 20 32 36 37 rgList)); /* 267
14650 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
14660 63 6c 5f 41 70 70 65 6e 64 53 74 72 69 6e 67 73 cl_AppendStrings
14670 54 6f 4f 62 6a 56 41 29 20 5f 41 4e 53 49 5f 41 ToObjVA) _ANSI_A
14680 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 RGS_((Tcl_Obj *
14690 6f 62 6a 50 74 72 2c 20 76 61 5f 6c 69 73 74 20 objPtr, va_list
146a0 61 72 67 4c 69 73 74 29 29 3b 20 2f 2a 20 32 36 argList)); /* 26
146b0 38 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 8 */. CONST84
146c0 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 _RETURN char * (
146d0 2a 74 63 6c 5f 48 61 73 68 53 74 61 74 73 29 20 *tcl_HashStats)
146e0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
146f0 5f 48 61 73 68 54 61 62 6c 65 20 2a 20 74 61 62 _HashTable * tab
14700 6c 65 50 74 72 29 29 3b 20 2f 2a 20 32 36 39 20 lePtr)); /* 269
14710 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f 52 */. CONST84_R
14720 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a 74 ETURN char * (*t
14730 63 6c 5f 50 61 72 73 65 56 61 72 29 20 5f 41 4e cl_ParseVar) _AN
14740 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
14750 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
14760 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 2c ONST char * str,
14770 20 43 4f 4e 53 54 38 34 20 63 68 61 72 20 2a 2a CONST84 char **
14780 20 74 65 72 6d 50 74 72 29 29 3b 20 2f 2a 20 32 termPtr)); /* 2
14790 37 30 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 70 */. CONST8
147a0 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 4_RETURN char *
147b0 28 2a 74 63 6c 5f 50 6b 67 50 72 65 73 65 6e 74 (*tcl_PkgPresent
147c0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
147d0 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
147e0 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a rp, CONST char *
147f0 20 6e 61 6d 65 2c 20 43 4f 4e 53 54 20 63 68 61 name, CONST cha
14800 72 20 2a 20 76 65 72 73 69 6f 6e 2c 20 69 6e 74 r * version, int
14810 20 65 78 61 63 74 29 29 3b 20 2f 2a 20 32 37 31 exact)); /* 271
14820 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f */. CONST84_
14830 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a RETURN char * (*
14840 74 63 6c 5f 50 6b 67 50 72 65 73 65 6e 74 45 78 tcl_PkgPresentEx
14850 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
14860 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
14870 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a rp, CONST char *
14880 20 6e 61 6d 65 2c 20 43 4f 4e 53 54 20 63 68 61 name, CONST cha
14890 72 20 2a 20 76 65 72 73 69 6f 6e 2c 20 69 6e 74 r * version, int
148a0 20 65 78 61 63 74 2c 20 43 6c 69 65 6e 74 44 61 exact, ClientDa
148b0 74 61 20 2a 20 63 6c 69 65 6e 74 44 61 74 61 50 ta * clientDataP
148c0 74 72 29 29 3b 20 2f 2a 20 32 37 32 20 2a 2f 0a tr)); /* 272 */.
148d0 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 50 6b int (*tcl_Pk
148e0 67 50 72 6f 76 69 64 65 29 20 5f 41 4e 53 49 5f gProvide) _ANSI_
148f0 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
14900 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 p * interp, CONS
14910 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 2c 20 43 T char * name, C
14920 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 65 72 73 ONST char * vers
14930 69 6f 6e 29 29 3b 20 2f 2a 20 32 37 33 20 2a 2f ion)); /* 273 */
14940 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f 52 45 54 . CONST84_RET
14950 55 52 4e 20 63 68 61 72 20 2a 20 28 2a 74 63 6c URN char * (*tcl
14960 5f 50 6b 67 52 65 71 75 69 72 65 29 20 5f 41 4e _PkgRequire) _AN
14970 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
14980 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
14990 4f 4e 53 54 20 63 68 61 72 20 2a 20 6e 61 6d 65 ONST char * name
149a0 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 , CONST char * v
149b0 65 72 73 69 6f 6e 2c 20 69 6e 74 20 65 78 61 63 ersion, int exac
149c0 74 29 29 3b 20 2f 2a 20 32 37 34 20 2a 2f 0a 20 t)); /* 274 */.
149d0 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 65 void (*tcl_Se
149e0 74 45 72 72 6f 72 43 6f 64 65 56 41 29 20 5f 41 tErrorCodeVA) _A
149f0 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
14a00 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
14a10 76 61 5f 6c 69 73 74 20 61 72 67 4c 69 73 74 29 va_list argList)
14a20 29 3b 20 2f 2a 20 32 37 35 20 2a 2f 0a 20 20 20 ); /* 275 */.
14a30 20 69 6e 74 20 28 2a 74 63 6c 5f 56 61 72 45 76 int (*tcl_VarEv
14a40 61 6c 56 41 29 20 5f 41 4e 53 49 5f 41 52 47 53 alVA) _ANSI_ARGS
14a50 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
14a60 69 6e 74 65 72 70 2c 20 76 61 5f 6c 69 73 74 20 interp, va_list
14a70 61 72 67 4c 69 73 74 29 29 3b 20 2f 2a 20 32 37 argList)); /* 27
14a80 36 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 50 69 64 6 */. Tcl_Pid
14a90 20 28 2a 74 63 6c 5f 57 61 69 74 50 69 64 29 20 (*tcl_WaitPid)
14aa0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
14ab0 5f 50 69 64 20 70 69 64 2c 20 69 6e 74 20 2a 20 _Pid pid, int *
14ac0 73 74 61 74 50 74 72 2c 20 69 6e 74 20 6f 70 74 statPtr, int opt
14ad0 69 6f 6e 73 29 29 3b 20 2f 2a 20 32 37 37 20 2a ions)); /* 277 *
14ae0 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
14af0 5f 50 61 6e 69 63 56 41 29 20 5f 41 4e 53 49 5f _PanicVA) _ANSI_
14b00 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 ARGS_((CONST cha
14b10 72 20 2a 20 66 6f 72 6d 61 74 2c 20 76 61 5f 6c r * format, va_l
14b20 69 73 74 20 61 72 67 4c 69 73 74 29 29 3b 20 2f ist argList)); /
14b30 2a 20 32 37 38 20 2a 2f 0a 20 20 20 20 76 6f 69 * 278 */. voi
14b40 64 20 28 2a 74 63 6c 5f 47 65 74 56 65 72 73 69 d (*tcl_GetVersi
14b50 6f 6e 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 on) _ANSI_ARGS_(
14b60 28 69 6e 74 20 2a 20 6d 61 6a 6f 72 2c 20 69 6e (int * major, in
14b70 74 20 2a 20 6d 69 6e 6f 72 2c 20 69 6e 74 20 2a t * minor, int *
14b80 20 70 61 74 63 68 4c 65 76 65 6c 2c 20 69 6e 74 patchLevel, int
14b90 20 2a 20 74 79 70 65 29 29 3b 20 2f 2a 20 32 37 * type)); /* 27
14ba0 39 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 9 */. void (*
14bb0 74 63 6c 5f 49 6e 69 74 4d 65 6d 6f 72 79 29 20 tcl_InitMemory)
14bc0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
14bd0 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
14be0 29 29 3b 20 2f 2a 20 32 38 30 20 2a 2f 0a 20 20 )); /* 280 */.
14bf0 20 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 28 2a Tcl_Channel (*
14c00 74 63 6c 5f 53 74 61 63 6b 43 68 61 6e 6e 65 6c tcl_StackChannel
14c10 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
14c20 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
14c30 72 70 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 rp, Tcl_ChannelT
14c40 79 70 65 20 2a 20 74 79 70 65 50 74 72 2c 20 43 ype * typePtr, C
14c50 6c 69 65 6e 74 44 61 74 61 20 69 6e 73 74 61 6e lientData instan
14c60 63 65 44 61 74 61 2c 20 69 6e 74 20 6d 61 73 6b ceData, int mask
14c70 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 70 72 , Tcl_Channel pr
14c80 65 76 43 68 61 6e 29 29 3b 20 2f 2a 20 32 38 31 evChan)); /* 281
14c90 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
14ca0 6c 5f 55 6e 73 74 61 63 6b 43 68 61 6e 6e 65 6c l_UnstackChannel
14cb0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
14cc0 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
14cd0 72 70 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 rp, Tcl_Channel
14ce0 63 68 61 6e 29 29 3b 20 2f 2a 20 32 38 32 20 2a chan)); /* 282 *
14cf0 2f 0a 20 20 20 20 54 63 6c 5f 43 68 61 6e 6e 65 /. Tcl_Channe
14d00 6c 20 28 2a 74 63 6c 5f 47 65 74 53 74 61 63 6b l (*tcl_GetStack
14d10 65 64 43 68 61 6e 6e 65 6c 29 20 5f 41 4e 53 49 edChannel) _ANSI
14d20 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e _ARGS_((Tcl_Chan
14d30 6e 65 6c 20 63 68 61 6e 29 29 3b 20 2f 2a 20 32 nel chan)); /* 2
14d40 38 33 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 83 */. void (
14d50 2a 74 63 6c 5f 53 65 74 4d 61 69 6e 4c 6f 6f 70 *tcl_SetMainLoop
14d60 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
14d70 63 6c 5f 4d 61 69 6e 4c 6f 6f 70 50 72 6f 63 20 cl_MainLoopProc
14d80 2a 20 70 72 6f 63 29 29 3b 20 2f 2a 20 32 38 34 * proc)); /* 284
14d90 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 2a 72 65 */. void *re
14da0 73 65 72 76 65 64 32 38 35 3b 0a 20 20 20 20 76 served285;. v
14db0 6f 69 64 20 28 2a 74 63 6c 5f 41 70 70 65 6e 64 oid (*tcl_Append
14dc0 4f 62 6a 54 6f 4f 62 6a 29 20 5f 41 4e 53 49 5f ObjToObj) _ANSI_
14dd0 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a ARGS_((Tcl_Obj *
14de0 20 6f 62 6a 50 74 72 2c 20 54 63 6c 5f 4f 62 6a objPtr, Tcl_Obj
14df0 20 2a 20 61 70 70 65 6e 64 4f 62 6a 50 74 72 29 * appendObjPtr)
14e00 29 3b 20 2f 2a 20 32 38 36 20 2a 2f 0a 20 20 20 ); /* 286 */.
14e10 20 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 20 28 2a Tcl_Encoding (*
14e20 74 63 6c 5f 43 72 65 61 74 65 45 6e 63 6f 64 69 tcl_CreateEncodi
14e30 6e 67 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ng) _ANSI_ARGS_(
14e40 28 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 54 79 70 (Tcl_EncodingTyp
14e50 65 20 2a 20 74 79 70 65 50 74 72 29 29 3b 20 2f e * typePtr)); /
14e60 2a 20 32 38 37 20 2a 2f 0a 20 20 20 20 76 6f 69 * 287 */. voi
14e70 64 20 28 2a 74 63 6c 5f 43 72 65 61 74 65 54 68 d (*tcl_CreateTh
14e80 72 65 61 64 45 78 69 74 48 61 6e 64 6c 65 72 29 readExitHandler)
14e90 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
14ea0 6c 5f 45 78 69 74 50 72 6f 63 20 2a 20 70 72 6f l_ExitProc * pro
14eb0 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c c, ClientData cl
14ec0 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 32 ientData)); /* 2
14ed0 38 38 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 88 */. void (
14ee0 2a 74 63 6c 5f 44 65 6c 65 74 65 54 68 72 65 61 *tcl_DeleteThrea
14ef0 64 45 78 69 74 48 61 6e 64 6c 65 72 29 20 5f 41 dExitHandler) _A
14f00 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 45 NSI_ARGS_((Tcl_E
14f10 78 69 74 50 72 6f 63 20 2a 20 70 72 6f 63 2c 20 xitProc * proc,
14f20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e ClientData clien
14f30 74 44 61 74 61 29 29 3b 20 2f 2a 20 32 38 39 20 tData)); /* 289
14f40 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 */. void (*tc
14f50 6c 5f 44 69 73 63 61 72 64 52 65 73 75 6c 74 29 l_DiscardResult)
14f60 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
14f70 6c 5f 53 61 76 65 64 52 65 73 75 6c 74 20 2a 20 l_SavedResult *
14f80 73 74 61 74 65 50 74 72 29 29 3b 20 2f 2a 20 32 statePtr)); /* 2
14f90 39 30 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 90 */. int (*
14fa0 74 63 6c 5f 45 76 61 6c 45 78 29 20 5f 41 4e 53 tcl_EvalEx) _ANS
14fb0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
14fc0 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f erp * interp, CO
14fd0 4e 53 54 20 63 68 61 72 20 2a 20 73 63 72 69 70 NST char * scrip
14fe0 74 2c 20 69 6e 74 20 6e 75 6d 42 79 74 65 73 2c t, int numBytes,
14ff0 20 69 6e 74 20 66 6c 61 67 73 29 29 3b 20 2f 2a int flags)); /*
15000 20 32 39 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 291 */. int
15010 28 2a 74 63 6c 5f 45 76 61 6c 4f 62 6a 76 29 20 (*tcl_EvalObjv)
15020 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
15030 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
15040 2c 20 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c 5f , int objc, Tcl_
15050 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b Obj *CONST objv[
15060 5d 2c 20 69 6e 74 20 66 6c 61 67 73 29 29 3b 20 ], int flags));
15070 2f 2a 20 32 39 32 20 2a 2f 0a 20 20 20 20 69 6e /* 292 */. in
15080 74 20 28 2a 74 63 6c 5f 45 76 61 6c 4f 62 6a 45 t (*tcl_EvalObjE
15090 78 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 x) _ANSI_ARGS_((
150a0 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
150b0 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 6f erp, Tcl_Obj * o
150c0 62 6a 50 74 72 2c 20 69 6e 74 20 66 6c 61 67 73 bjPtr, int flags
150d0 29 29 3b 20 2f 2a 20 32 39 33 20 2a 2f 0a 20 20 )); /* 293 */.
150e0 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 45 78 69 void (*tcl_Exi
150f0 74 54 68 72 65 61 64 29 20 5f 41 4e 53 49 5f 41 tThread) _ANSI_A
15100 52 47 53 5f 28 28 69 6e 74 20 73 74 61 74 75 73 RGS_((int status
15110 29 29 3b 20 2f 2a 20 32 39 34 20 2a 2f 0a 20 20 )); /* 294 */.
15120 20 20 69 6e 74 20 28 2a 74 63 6c 5f 45 78 74 65 int (*tcl_Exte
15130 72 6e 61 6c 54 6f 55 74 66 29 20 5f 41 4e 53 49 rnalToUtf) _ANSI
15140 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
15150 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c rp * interp, Tcl
15160 5f 45 6e 63 6f 64 69 6e 67 20 65 6e 63 6f 64 69 _Encoding encodi
15170 6e 67 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a ng, CONST char *
15180 20 73 72 63 2c 20 69 6e 74 20 73 72 63 4c 65 6e src, int srcLen
15190 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 54 63 6c , int flags, Tcl
151a0 5f 45 6e 63 6f 64 69 6e 67 53 74 61 74 65 20 2a _EncodingState *
151b0 20 73 74 61 74 65 50 74 72 2c 20 63 68 61 72 20 statePtr, char
151c0 2a 20 64 73 74 2c 20 69 6e 74 20 64 73 74 4c 65 * dst, int dstLe
151d0 6e 2c 20 69 6e 74 20 2a 20 73 72 63 52 65 61 64 n, int * srcRead
151e0 50 74 72 2c 20 69 6e 74 20 2a 20 64 73 74 57 72 Ptr, int * dstWr
151f0 6f 74 65 50 74 72 2c 20 69 6e 74 20 2a 20 64 73 otePtr, int * ds
15200 74 43 68 61 72 73 50 74 72 29 29 3b 20 2f 2a 20 tCharsPtr)); /*
15210 32 39 35 20 2a 2f 0a 20 20 20 20 63 68 61 72 20 295 */. char
15220 2a 20 28 2a 74 63 6c 5f 45 78 74 65 72 6e 61 6c * (*tcl_External
15230 54 6f 55 74 66 44 53 74 72 69 6e 67 29 20 5f 41 ToUtfDString) _A
15240 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 45 NSI_ARGS_((Tcl_E
15250 6e 63 6f 64 69 6e 67 20 65 6e 63 6f 64 69 6e 67 ncoding encoding
15260 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
15270 72 63 2c 20 69 6e 74 20 73 72 63 4c 65 6e 2c 20 rc, int srcLen,
15280 54 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 64 73 Tcl_DString * ds
15290 50 74 72 29 29 3b 20 2f 2a 20 32 39 36 20 2a 2f Ptr)); /* 296 */
152a0 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f . void (*tcl_
152b0 46 69 6e 61 6c 69 7a 65 54 68 72 65 61 64 29 20 FinalizeThread)
152c0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 _ANSI_ARGS_((voi
152d0 64 29 29 3b 20 2f 2a 20 32 39 37 20 2a 2f 0a 20 d)); /* 297 */.
152e0 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 46 69 void (*tcl_Fi
152f0 6e 61 6c 69 7a 65 4e 6f 74 69 66 69 65 72 29 20 nalizeNotifier)
15300 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 6c 69 _ANSI_ARGS_((Cli
15310 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 entData clientDa
15320 74 61 29 29 3b 20 2f 2a 20 32 39 38 20 2a 2f 0a ta)); /* 298 */.
15330 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 46 void (*tcl_F
15340 72 65 65 45 6e 63 6f 64 69 6e 67 29 20 5f 41 4e reeEncoding) _AN
15350 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 45 6e SI_ARGS_((Tcl_En
15360 63 6f 64 69 6e 67 20 65 6e 63 6f 64 69 6e 67 29 coding encoding)
15370 29 3b 20 2f 2a 20 32 39 39 20 2a 2f 0a 20 20 20 ); /* 299 */.
15380 20 54 63 6c 5f 54 68 72 65 61 64 49 64 20 28 2a Tcl_ThreadId (*
15390 74 63 6c 5f 47 65 74 43 75 72 72 65 6e 74 54 68 tcl_GetCurrentTh
153a0 72 65 61 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 read) _ANSI_ARGS
153b0 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 33 30 _((void)); /* 30
153c0 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 45 6e 63 0 */. Tcl_Enc
153d0 6f 64 69 6e 67 20 28 2a 74 63 6c 5f 47 65 74 45 oding (*tcl_GetE
153e0 6e 63 6f 64 69 6e 67 29 20 5f 41 4e 53 49 5f 41 ncoding) _ANSI_A
153f0 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
15400 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 * interp, CONST
15410 20 63 68 61 72 20 2a 20 6e 61 6d 65 29 29 3b 20 char * name));
15420 2f 2a 20 33 30 31 20 2a 2f 0a 20 20 20 20 43 4f /* 301 */. CO
15430 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 68 61 NST84_RETURN cha
15440 72 20 2a 20 28 2a 74 63 6c 5f 47 65 74 45 6e 63 r * (*tcl_GetEnc
15450 6f 64 69 6e 67 4e 61 6d 65 29 20 5f 41 4e 53 49 odingName) _ANSI
15460 5f 41 52 47 53 5f 28 28 54 63 6c 5f 45 6e 63 6f _ARGS_((Tcl_Enco
15470 64 69 6e 67 20 65 6e 63 6f 64 69 6e 67 29 29 3b ding encoding));
15480 20 2f 2a 20 33 30 32 20 2a 2f 0a 20 20 20 20 76 /* 302 */. v
15490 6f 69 64 20 28 2a 74 63 6c 5f 47 65 74 45 6e 63 oid (*tcl_GetEnc
154a0 6f 64 69 6e 67 4e 61 6d 65 73 29 20 5f 41 4e 53 odingNames) _ANS
154b0 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
154c0 65 72 70 20 2a 20 69 6e 74 65 72 70 29 29 3b 20 erp * interp));
154d0 2f 2a 20 33 30 33 20 2a 2f 0a 20 20 20 20 69 6e /* 303 */. in
154e0 74 20 28 2a 74 63 6c 5f 47 65 74 49 6e 64 65 78 t (*tcl_GetIndex
154f0 46 72 6f 6d 4f 62 6a 53 74 72 75 63 74 29 20 5f FromObjStruct) _
15500 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
15510 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c Interp * interp,
15520 20 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 Tcl_Obj * objPt
15530 72 2c 20 43 4f 4e 53 54 20 56 4f 49 44 20 2a 20 r, CONST VOID *
15540 74 61 62 6c 65 50 74 72 2c 20 69 6e 74 20 6f 66 tablePtr, int of
15550 66 73 65 74 2c 20 43 4f 4e 53 54 20 63 68 61 72 fset, CONST char
15560 20 2a 20 6d 73 67 2c 20 69 6e 74 20 66 6c 61 67 * msg, int flag
15570 73 2c 20 69 6e 74 20 2a 20 69 6e 64 65 78 50 74 s, int * indexPt
15580 72 29 29 3b 20 2f 2a 20 33 30 34 20 2a 2f 0a 20 r)); /* 304 */.
15590 20 20 20 56 4f 49 44 20 2a 20 28 2a 74 63 6c 5f VOID * (*tcl_
155a0 47 65 74 54 68 72 65 61 64 44 61 74 61 29 20 5f GetThreadData) _
155b0 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
155c0 54 68 72 65 61 64 44 61 74 61 4b 65 79 20 2a 20 ThreadDataKey *
155d0 6b 65 79 50 74 72 2c 20 69 6e 74 20 73 69 7a 65 keyPtr, int size
155e0 29 29 3b 20 2f 2a 20 33 30 35 20 2a 2f 0a 20 20 )); /* 305 */.
155f0 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 Tcl_Obj * (*tc
15600 6c 5f 47 65 74 56 61 72 32 45 78 29 20 5f 41 4e l_GetVar2Ex) _AN
15610 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
15620 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
15630 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 ONST char * part
15640 31 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 1, CONST char *
15650 70 61 72 74 32 2c 20 69 6e 74 20 66 6c 61 67 73 part2, int flags
15660 29 29 3b 20 2f 2a 20 33 30 36 20 2a 2f 0a 20 20 )); /* 306 */.
15670 20 20 43 6c 69 65 6e 74 44 61 74 61 20 28 2a 74 ClientData (*t
15680 63 6c 5f 49 6e 69 74 4e 6f 74 69 66 69 65 72 29 cl_InitNotifier)
15690 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 76 6f _ANSI_ARGS_((vo
156a0 69 64 29 29 3b 20 2f 2a 20 33 30 37 20 2a 2f 0a id)); /* 307 */.
156b0 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 4d void (*tcl_M
156c0 75 74 65 78 4c 6f 63 6b 29 20 5f 41 4e 53 49 5f utexLock) _ANSI_
156d0 41 52 47 53 5f 28 28 54 63 6c 5f 4d 75 74 65 78 ARGS_((Tcl_Mutex
156e0 20 2a 20 6d 75 74 65 78 50 74 72 29 29 3b 20 2f * mutexPtr)); /
156f0 2a 20 33 30 38 20 2a 2f 0a 20 20 20 20 76 6f 69 * 308 */. voi
15700 64 20 28 2a 74 63 6c 5f 4d 75 74 65 78 55 6e 6c d (*tcl_MutexUnl
15710 6f 63 6b 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ock) _ANSI_ARGS_
15720 28 28 54 63 6c 5f 4d 75 74 65 78 20 2a 20 6d 75 ((Tcl_Mutex * mu
15730 74 65 78 50 74 72 29 29 3b 20 2f 2a 20 33 30 39 texPtr)); /* 309
15740 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
15750 63 6c 5f 43 6f 6e 64 69 74 69 6f 6e 4e 6f 74 69 cl_ConditionNoti
15760 66 79 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 fy) _ANSI_ARGS_(
15770 28 54 63 6c 5f 43 6f 6e 64 69 74 69 6f 6e 20 2a (Tcl_Condition *
15780 20 63 6f 6e 64 50 74 72 29 29 3b 20 2f 2a 20 33 condPtr)); /* 3
15790 31 30 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 10 */. void (
157a0 2a 74 63 6c 5f 43 6f 6e 64 69 74 69 6f 6e 57 61 *tcl_ConditionWa
157b0 69 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 it) _ANSI_ARGS_(
157c0 28 54 63 6c 5f 43 6f 6e 64 69 74 69 6f 6e 20 2a (Tcl_Condition *
157d0 20 63 6f 6e 64 50 74 72 2c 20 54 63 6c 5f 4d 75 condPtr, Tcl_Mu
157e0 74 65 78 20 2a 20 6d 75 74 65 78 50 74 72 2c 20 tex * mutexPtr,
157f0 54 63 6c 5f 54 69 6d 65 20 2a 20 74 69 6d 65 50 Tcl_Time * timeP
15800 74 72 29 29 3b 20 2f 2a 20 33 31 31 20 2a 2f 0a tr)); /* 311 */.
15810 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 4e 75 int (*tcl_Nu
15820 6d 55 74 66 43 68 61 72 73 29 20 5f 41 4e 53 49 mUtfChars) _ANSI
15830 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 _ARGS_((CONST ch
15840 61 72 20 2a 20 73 72 63 2c 20 69 6e 74 20 6c 65 ar * src, int le
15850 6e 29 29 3b 20 2f 2a 20 33 31 32 20 2a 2f 0a 20 n)); /* 312 */.
15860 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 52 65 61 int (*tcl_Rea
15870 64 43 68 61 72 73 29 20 5f 41 4e 53 49 5f 41 52 dChars) _ANSI_AR
15880 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c GS_((Tcl_Channel
15890 20 63 68 61 6e 6e 65 6c 2c 20 54 63 6c 5f 4f 62 channel, Tcl_Ob
158a0 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 j * objPtr, int
158b0 63 68 61 72 73 54 6f 52 65 61 64 2c 20 69 6e 74 charsToRead, int
158c0 20 61 70 70 65 6e 64 46 6c 61 67 29 29 3b 20 2f appendFlag)); /
158d0 2a 20 33 31 33 20 2a 2f 0a 20 20 20 20 76 6f 69 * 313 */. voi
158e0 64 20 28 2a 74 63 6c 5f 52 65 73 74 6f 72 65 52 d (*tcl_RestoreR
158f0 65 73 75 6c 74 29 20 5f 41 4e 53 49 5f 41 52 47 esult) _ANSI_ARG
15900 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
15910 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 53 61 76 interp, Tcl_Sav
15920 65 64 52 65 73 75 6c 74 20 2a 20 73 74 61 74 65 edResult * state
15930 50 74 72 29 29 3b 20 2f 2a 20 33 31 34 20 2a 2f Ptr)); /* 314 */
15940 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f . void (*tcl_
15950 53 61 76 65 52 65 73 75 6c 74 29 20 5f 41 4e 53 SaveResult) _ANS
15960 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
15970 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 erp * interp, Tc
15980 6c 5f 53 61 76 65 64 52 65 73 75 6c 74 20 2a 20 l_SavedResult *
15990 73 74 61 74 65 50 74 72 29 29 3b 20 2f 2a 20 33 statePtr)); /* 3
159a0 31 35 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 15 */. int (*
159b0 74 63 6c 5f 53 65 74 53 79 73 74 65 6d 45 6e 63 tcl_SetSystemEnc
159c0 6f 64 69 6e 67 29 20 5f 41 4e 53 49 5f 41 52 47 oding) _ANSI_ARG
159d0 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
159e0 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 interp, CONST c
159f0 68 61 72 20 2a 20 6e 61 6d 65 29 29 3b 20 2f 2a har * name)); /*
15a00 20 33 31 36 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 316 */. Tcl_
15a10 4f 62 6a 20 2a 20 28 2a 74 63 6c 5f 53 65 74 56 Obj * (*tcl_SetV
15a20 61 72 32 45 78 29 20 5f 41 4e 53 49 5f 41 52 47 ar2Ex) _ANSI_ARG
15a30 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
15a40 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 interp, CONST c
15a50 68 61 72 20 2a 20 70 61 72 74 31 2c 20 43 4f 4e har * part1, CON
15a60 53 54 20 63 68 61 72 20 2a 20 70 61 72 74 32 2c ST char * part2,
15a70 20 54 63 6c 5f 4f 62 6a 20 2a 20 6e 65 77 56 61 Tcl_Obj * newVa
15a80 6c 75 65 50 74 72 2c 20 69 6e 74 20 66 6c 61 67 luePtr, int flag
15a90 73 29 29 3b 20 2f 2a 20 33 31 37 20 2a 2f 0a 20 s)); /* 317 */.
15aa0 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 54 68 void (*tcl_Th
15ab0 72 65 61 64 41 6c 65 72 74 29 20 5f 41 4e 53 49 readAlert) _ANSI
15ac0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 54 68 72 65 _ARGS_((Tcl_Thre
15ad0 61 64 49 64 20 74 68 72 65 61 64 49 64 29 29 3b adId threadId));
15ae0 20 2f 2a 20 33 31 38 20 2a 2f 0a 20 20 20 20 76 /* 318 */. v
15af0 6f 69 64 20 28 2a 74 63 6c 5f 54 68 72 65 61 64 oid (*tcl_Thread
15b00 51 75 65 75 65 45 76 65 6e 74 29 20 5f 41 4e 53 QueueEvent) _ANS
15b10 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 54 68 72 I_ARGS_((Tcl_Thr
15b20 65 61 64 49 64 20 74 68 72 65 61 64 49 64 2c 20 eadId threadId,
15b30 54 63 6c 5f 45 76 65 6e 74 2a 20 65 76 50 74 72 Tcl_Event* evPtr
15b40 2c 20 54 63 6c 5f 51 75 65 75 65 50 6f 73 69 74 , Tcl_QueuePosit
15b50 69 6f 6e 20 70 6f 73 69 74 69 6f 6e 29 29 3b 20 ion position));
15b60 2f 2a 20 33 31 39 20 2a 2f 0a 20 20 20 20 54 63 /* 319 */. Tc
15b70 6c 5f 55 6e 69 43 68 61 72 20 28 2a 74 63 6c 5f l_UniChar (*tcl_
15b80 55 6e 69 43 68 61 72 41 74 49 6e 64 65 78 29 20 UniCharAtIndex)
15b90 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
15ba0 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 69 ST char * src, i
15bb0 6e 74 20 69 6e 64 65 78 29 29 3b 20 2f 2a 20 33 nt index)); /* 3
15bc0 32 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 55 6e 20 */. Tcl_Un
15bd0 69 43 68 61 72 20 28 2a 74 63 6c 5f 55 6e 69 43 iChar (*tcl_UniC
15be0 68 61 72 54 6f 4c 6f 77 65 72 29 20 5f 41 4e 53 harToLower) _ANS
15bf0 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 63 68 29 I_ARGS_((int ch)
15c00 29 3b 20 2f 2a 20 33 32 31 20 2a 2f 0a 20 20 20 ); /* 321 */.
15c10 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 28 2a 74 Tcl_UniChar (*t
15c20 63 6c 5f 55 6e 69 43 68 61 72 54 6f 54 69 74 6c cl_UniCharToTitl
15c30 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 e) _ANSI_ARGS_((
15c40 69 6e 74 20 63 68 29 29 3b 20 2f 2a 20 33 32 32 int ch)); /* 322
15c50 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 55 6e 69 43 */. Tcl_UniC
15c60 68 61 72 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 har (*tcl_UniCha
15c70 72 54 6f 55 70 70 65 72 29 20 5f 41 4e 53 49 5f rToUpper) _ANSI_
15c80 41 52 47 53 5f 28 28 69 6e 74 20 63 68 29 29 3b ARGS_((int ch));
15c90 20 2f 2a 20 33 32 33 20 2a 2f 0a 20 20 20 20 69 /* 323 */. i
15ca0 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 nt (*tcl_UniChar
15cb0 54 6f 55 74 66 29 20 5f 41 4e 53 49 5f 41 52 47 ToUtf) _ANSI_ARG
15cc0 53 5f 28 28 69 6e 74 20 63 68 2c 20 63 68 61 72 S_((int ch, char
15cd0 20 2a 20 62 75 66 29 29 3b 20 2f 2a 20 33 32 34 * buf)); /* 324
15ce0 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f */. CONST84_
15cf0 52 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a RETURN char * (*
15d00 74 63 6c 5f 55 74 66 41 74 49 6e 64 65 78 29 20 tcl_UtfAtIndex)
15d10 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
15d20 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 69 ST char * src, i
15d30 6e 74 20 69 6e 64 65 78 29 29 3b 20 2f 2a 20 33 nt index)); /* 3
15d40 32 35 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 25 */. int (*
15d50 74 63 6c 5f 55 74 66 43 68 61 72 43 6f 6d 70 6c tcl_UtfCharCompl
15d60 65 74 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ete) _ANSI_ARGS_
15d70 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ((CONST char * s
15d80 72 63 2c 20 69 6e 74 20 6c 65 6e 29 29 3b 20 2f rc, int len)); /
15d90 2a 20 33 32 36 20 2a 2f 0a 20 20 20 20 69 6e 74 * 326 */. int
15da0 20 28 2a 74 63 6c 5f 55 74 66 42 61 63 6b 73 6c (*tcl_UtfBacksl
15db0 61 73 68 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ash) _ANSI_ARGS_
15dc0 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ((CONST char * s
15dd0 72 63 2c 20 69 6e 74 20 2a 20 72 65 61 64 50 74 rc, int * readPt
15de0 72 2c 20 63 68 61 72 20 2a 20 64 73 74 29 29 3b r, char * dst));
15df0 20 2f 2a 20 33 32 37 20 2a 2f 0a 20 20 20 20 43 /* 327 */. C
15e00 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 68 ONST84_RETURN ch
15e10 61 72 20 2a 20 28 2a 74 63 6c 5f 55 74 66 46 69 ar * (*tcl_UtfFi
15e20 6e 64 46 69 72 73 74 29 20 5f 41 4e 53 49 5f 41 ndFirst) _ANSI_A
15e30 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
15e40 20 2a 20 73 72 63 2c 20 69 6e 74 20 63 68 29 29 * src, int ch))
15e50 3b 20 2f 2a 20 33 32 38 20 2a 2f 0a 20 20 20 20 ; /* 328 */.
15e60 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 CONST84_RETURN c
15e70 68 61 72 20 2a 20 28 2a 74 63 6c 5f 55 74 66 46 har * (*tcl_UtfF
15e80 69 6e 64 4c 61 73 74 29 20 5f 41 4e 53 49 5f 41 indLast) _ANSI_A
15e90 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
15ea0 20 2a 20 73 72 63 2c 20 69 6e 74 20 63 68 29 29 * src, int ch))
15eb0 3b 20 2f 2a 20 33 32 39 20 2a 2f 0a 20 20 20 20 ; /* 329 */.
15ec0 43 4f 4e 53 54 38 34 5f 52 45 54 55 52 4e 20 63 CONST84_RETURN c
15ed0 68 61 72 20 2a 20 28 2a 74 63 6c 5f 55 74 66 4e har * (*tcl_UtfN
15ee0 65 78 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ext) _ANSI_ARGS_
15ef0 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ((CONST char * s
15f00 72 63 29 29 3b 20 2f 2a 20 33 33 30 20 2a 2f 0a rc)); /* 330 */.
15f10 20 20 20 20 43 4f 4e 53 54 38 34 5f 52 45 54 55 CONST84_RETU
15f20 52 4e 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f RN char * (*tcl_
15f30 55 74 66 50 72 65 76 29 20 5f 41 4e 53 49 5f 41 UtfPrev) _ANSI_A
15f40 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
15f50 20 2a 20 73 72 63 2c 20 43 4f 4e 53 54 20 63 68 * src, CONST ch
15f60 61 72 20 2a 20 73 74 61 72 74 29 29 3b 20 2f 2a ar * start)); /*
15f70 20 33 33 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 331 */. int
15f80 28 2a 74 63 6c 5f 55 74 66 54 6f 45 78 74 65 72 (*tcl_UtfToExter
15f90 6e 61 6c 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f nal) _ANSI_ARGS_
15fa0 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
15fb0 6e 74 65 72 70 2c 20 54 63 6c 5f 45 6e 63 6f 64 nterp, Tcl_Encod
15fc0 69 6e 67 20 65 6e 63 6f 64 69 6e 67 2c 20 43 4f ing encoding, CO
15fd0 4e 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 NST char * src,
15fe0 69 6e 74 20 73 72 63 4c 65 6e 2c 20 69 6e 74 20 int srcLen, int
15ff0 66 6c 61 67 73 2c 20 54 63 6c 5f 45 6e 63 6f 64 flags, Tcl_Encod
16000 69 6e 67 53 74 61 74 65 20 2a 20 73 74 61 74 65 ingState * state
16010 50 74 72 2c 20 63 68 61 72 20 2a 20 64 73 74 2c Ptr, char * dst,
16020 20 69 6e 74 20 64 73 74 4c 65 6e 2c 20 69 6e 74 int dstLen, int
16030 20 2a 20 73 72 63 52 65 61 64 50 74 72 2c 20 69 * srcReadPtr, i
16040 6e 74 20 2a 20 64 73 74 57 72 6f 74 65 50 74 72 nt * dstWrotePtr
16050 2c 20 69 6e 74 20 2a 20 64 73 74 43 68 61 72 73 , int * dstChars
16060 50 74 72 29 29 3b 20 2f 2a 20 33 33 32 20 2a 2f Ptr)); /* 332 */
16070 0a 20 20 20 20 63 68 61 72 20 2a 20 28 2a 74 63 . char * (*tc
16080 6c 5f 55 74 66 54 6f 45 78 74 65 72 6e 61 6c 44 l_UtfToExternalD
16090 53 74 72 69 6e 67 29 20 5f 41 4e 53 49 5f 41 52 String) _ANSI_AR
160a0 47 53 5f 28 28 54 63 6c 5f 45 6e 63 6f 64 69 6e GS_((Tcl_Encodin
160b0 67 20 65 6e 63 6f 64 69 6e 67 2c 20 43 4f 4e 53 g encoding, CONS
160c0 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 69 6e T char * src, in
160d0 74 20 73 72 63 4c 65 6e 2c 20 54 63 6c 5f 44 53 t srcLen, Tcl_DS
160e0 74 72 69 6e 67 20 2a 20 64 73 50 74 72 29 29 3b tring * dsPtr));
160f0 20 2f 2a 20 33 33 33 20 2a 2f 0a 20 20 20 20 69 /* 333 */. i
16100 6e 74 20 28 2a 74 63 6c 5f 55 74 66 54 6f 4c 6f nt (*tcl_UtfToLo
16110 77 65 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f wer) _ANSI_ARGS_
16120 28 28 63 68 61 72 20 2a 20 73 72 63 29 29 3b 20 ((char * src));
16130 2f 2a 20 33 33 34 20 2a 2f 0a 20 20 20 20 69 6e /* 334 */. in
16140 74 20 28 2a 74 63 6c 5f 55 74 66 54 6f 54 69 74 t (*tcl_UtfToTit
16150 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 le) _ANSI_ARGS_(
16160 28 63 68 61 72 20 2a 20 73 72 63 29 29 3b 20 2f (char * src)); /
16170 2a 20 33 33 35 20 2a 2f 0a 20 20 20 20 69 6e 74 * 335 */. int
16180 20 28 2a 74 63 6c 5f 55 74 66 54 6f 55 6e 69 43 (*tcl_UtfToUniC
16190 68 61 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f har) _ANSI_ARGS_
161a0 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 ((CONST char * s
161b0 72 63 2c 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 rc, Tcl_UniChar
161c0 2a 20 63 68 50 74 72 29 29 3b 20 2f 2a 20 33 33 * chPtr)); /* 33
161d0 36 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 6 */. int (*t
161e0 63 6c 5f 55 74 66 54 6f 55 70 70 65 72 29 20 5f cl_UtfToUpper) _
161f0 41 4e 53 49 5f 41 52 47 53 5f 28 28 63 68 61 72 ANSI_ARGS_((char
16200 20 2a 20 73 72 63 29 29 3b 20 2f 2a 20 33 33 37 * src)); /* 337
16210 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
16220 6c 5f 57 72 69 74 65 43 68 61 72 73 29 20 5f 41 l_WriteChars) _A
16230 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 NSI_ARGS_((Tcl_C
16240 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 43 4f 4e hannel chan, CON
16250 53 54 20 63 68 61 72 20 2a 20 73 72 63 2c 20 69 ST char * src, i
16260 6e 74 20 73 72 63 4c 65 6e 29 29 3b 20 2f 2a 20 nt srcLen)); /*
16270 33 33 38 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 338 */. int (
16280 2a 74 63 6c 5f 57 72 69 74 65 4f 62 6a 29 20 5f *tcl_WriteObj) _
16290 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
162a0 43 68 61 6e 6e 65 6c 20 63 68 61 6e 2c 20 54 63 Channel chan, Tc
162b0 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 29 29 l_Obj * objPtr))
162c0 3b 20 2f 2a 20 33 33 39 20 2a 2f 0a 20 20 20 20 ; /* 339 */.
162d0 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f 47 65 74 char * (*tcl_Get
162e0 53 74 72 69 6e 67 29 20 5f 41 4e 53 49 5f 41 52 String) _ANSI_AR
162f0 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f GS_((Tcl_Obj * o
16300 62 6a 50 74 72 29 29 3b 20 2f 2a 20 33 34 30 20 bjPtr)); /* 340
16310 2a 2f 0a 20 20 20 20 43 4f 4e 53 54 38 34 5f 52 */. CONST84_R
16320 45 54 55 52 4e 20 63 68 61 72 20 2a 20 28 2a 74 ETURN char * (*t
16330 63 6c 5f 47 65 74 44 65 66 61 75 6c 74 45 6e 63 cl_GetDefaultEnc
16340 6f 64 69 6e 67 44 69 72 29 20 5f 41 4e 53 49 5f odingDir) _ANSI_
16350 41 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 20 2f ARGS_((void)); /
16360 2a 20 33 34 31 20 2a 2f 0a 20 20 20 20 76 6f 69 * 341 */. voi
16370 64 20 28 2a 74 63 6c 5f 53 65 74 44 65 66 61 75 d (*tcl_SetDefau
16380 6c 74 45 6e 63 6f 64 69 6e 67 44 69 72 29 20 5f ltEncodingDir) _
16390 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
163a0 54 20 63 68 61 72 20 2a 20 70 61 74 68 29 29 3b T char * path));
163b0 20 2f 2a 20 33 34 32 20 2a 2f 0a 20 20 20 20 76 /* 342 */. v
163c0 6f 69 64 20 28 2a 74 63 6c 5f 41 6c 65 72 74 4e oid (*tcl_AlertN
163d0 6f 74 69 66 69 65 72 29 20 5f 41 4e 53 49 5f 41 otifier) _ANSI_A
163e0 52 47 53 5f 28 28 43 6c 69 65 6e 74 44 61 74 61 RGS_((ClientData
163f0 20 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f clientData)); /
16400 2a 20 33 34 33 20 2a 2f 0a 20 20 20 20 76 6f 69 * 343 */. voi
16410 64 20 28 2a 74 63 6c 5f 53 65 72 76 69 63 65 4d d (*tcl_ServiceM
16420 6f 64 65 48 6f 6f 6b 29 20 5f 41 4e 53 49 5f 41 odeHook) _ANSI_A
16430 52 47 53 5f 28 28 69 6e 74 20 6d 6f 64 65 29 29 RGS_((int mode))
16440 3b 20 2f 2a 20 33 34 34 20 2a 2f 0a 20 20 20 20 ; /* 344 */.
16450 69 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 int (*tcl_UniCha
16460 72 49 73 41 6c 6e 75 6d 29 20 5f 41 4e 53 49 5f rIsAlnum) _ANSI_
16470 41 52 47 53 5f 28 28 69 6e 74 20 63 68 29 29 3b ARGS_((int ch));
16480 20 2f 2a 20 33 34 35 20 2a 2f 0a 20 20 20 20 69 /* 345 */. i
16490 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 nt (*tcl_UniChar
164a0 49 73 41 6c 70 68 61 29 20 5f 41 4e 53 49 5f 41 IsAlpha) _ANSI_A
164b0 52 47 53 5f 28 28 69 6e 74 20 63 68 29 29 3b 20 RGS_((int ch));
164c0 2f 2a 20 33 34 36 20 2a 2f 0a 20 20 20 20 69 6e /* 346 */. in
164d0 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 49 t (*tcl_UniCharI
164e0 73 44 69 67 69 74 29 20 5f 41 4e 53 49 5f 41 52 sDigit) _ANSI_AR
164f0 47 53 5f 28 28 69 6e 74 20 63 68 29 29 3b 20 2f GS_((int ch)); /
16500 2a 20 33 34 37 20 2a 2f 0a 20 20 20 20 69 6e 74 * 347 */. int
16510 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 (*tcl_UniCharIs
16520 4c 6f 77 65 72 29 20 5f 41 4e 53 49 5f 41 52 47 Lower) _ANSI_ARG
16530 53 5f 28 28 69 6e 74 20 63 68 29 29 3b 20 2f 2a S_((int ch)); /*
16540 20 33 34 38 20 2a 2f 0a 20 20 20 20 69 6e 74 20 348 */. int
16550 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 53 (*tcl_UniCharIsS
16560 70 61 63 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 pace) _ANSI_ARGS
16570 5f 28 28 69 6e 74 20 63 68 29 29 3b 20 2f 2a 20 _((int ch)); /*
16580 33 34 39 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 349 */. int (
16590 2a 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 55 70 *tcl_UniCharIsUp
165a0 70 65 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f per) _ANSI_ARGS_
165b0 28 28 69 6e 74 20 63 68 29 29 3b 20 2f 2a 20 33 ((int ch)); /* 3
165c0 35 30 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 50 */. int (*
165d0 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 57 6f 72 tcl_UniCharIsWor
165e0 64 43 68 61 72 29 20 5f 41 4e 53 49 5f 41 52 47 dChar) _ANSI_ARG
165f0 53 5f 28 28 69 6e 74 20 63 68 29 29 3b 20 2f 2a S_((int ch)); /*
16600 20 33 35 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 351 */. int
16610 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 4c 65 6e (*tcl_UniCharLen
16620 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 ) _ANSI_ARGS_((C
16630 4f 4e 53 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 ONST Tcl_UniChar
16640 20 2a 20 73 74 72 29 29 3b 20 2f 2a 20 33 35 32 * str)); /* 352
16650 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
16660 6c 5f 55 6e 69 43 68 61 72 4e 63 6d 70 29 20 5f l_UniCharNcmp) _
16670 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
16680 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a 20 T Tcl_UniChar *
16690 63 73 2c 20 43 4f 4e 53 54 20 54 63 6c 5f 55 6e cs, CONST Tcl_Un
166a0 69 43 68 61 72 20 2a 20 63 74 2c 20 75 6e 73 69 iChar * ct, unsi
166b0 67 6e 65 64 20 6c 6f 6e 67 20 6e 29 29 3b 20 2f gned long n)); /
166c0 2a 20 33 35 33 20 2a 2f 0a 20 20 20 20 63 68 61 * 353 */. cha
166d0 72 20 2a 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 r * (*tcl_UniCha
166e0 72 54 6f 55 74 66 44 53 74 72 69 6e 67 29 20 5f rToUtfDString) _
166f0 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
16700 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a 20 T Tcl_UniChar *
16710 73 74 72 69 6e 67 2c 20 69 6e 74 20 6e 75 6d 43 string, int numC
16720 68 61 72 73 2c 20 54 63 6c 5f 44 53 74 72 69 6e hars, Tcl_DStrin
16730 67 20 2a 20 64 73 50 74 72 29 29 3b 20 2f 2a 20 g * dsPtr)); /*
16740 33 35 34 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 55 354 */. Tcl_U
16750 6e 69 43 68 61 72 20 2a 20 28 2a 74 63 6c 5f 55 niChar * (*tcl_U
16760 74 66 54 6f 55 6e 69 43 68 61 72 44 53 74 72 69 tfToUniCharDStri
16770 6e 67 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ng) _ANSI_ARGS_(
16780 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 74 (CONST char * st
16790 72 69 6e 67 2c 20 69 6e 74 20 6c 65 6e 67 74 68 ring, int length
167a0 2c 20 54 63 6c 5f 44 53 74 72 69 6e 67 20 2a 20 , Tcl_DString *
167b0 64 73 50 74 72 29 29 3b 20 2f 2a 20 33 35 35 20 dsPtr)); /* 355
167c0 2a 2f 0a 20 20 20 20 54 63 6c 5f 52 65 67 45 78 */. Tcl_RegEx
167d0 70 20 28 2a 74 63 6c 5f 47 65 74 52 65 67 45 78 p (*tcl_GetRegEx
167e0 70 46 72 6f 6d 4f 62 6a 29 20 5f 41 4e 53 49 5f pFromObj) _ANSI_
167f0 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
16800 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f p * interp, Tcl_
16810 4f 62 6a 20 2a 20 70 61 74 4f 62 6a 2c 20 69 6e Obj * patObj, in
16820 74 20 66 6c 61 67 73 29 29 3b 20 2f 2a 20 33 35 t flags)); /* 35
16830 36 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 6 */. Tcl_Obj
16840 20 2a 20 28 2a 74 63 6c 5f 45 76 61 6c 54 6f 6b * (*tcl_EvalTok
16850 65 6e 73 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ens) _ANSI_ARGS_
16860 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
16870 6e 74 65 72 70 2c 20 54 63 6c 5f 54 6f 6b 65 6e nterp, Tcl_Token
16880 20 2a 20 74 6f 6b 65 6e 50 74 72 2c 20 69 6e 74 * tokenPtr, int
16890 20 63 6f 75 6e 74 29 29 3b 20 2f 2a 20 33 35 37 count)); /* 357
168a0 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 */. void (*t
168b0 63 6c 5f 46 72 65 65 50 61 72 73 65 29 20 5f 41 cl_FreeParse) _A
168c0 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 50 NSI_ARGS_((Tcl_P
168d0 61 72 73 65 20 2a 20 70 61 72 73 65 50 74 72 29 arse * parsePtr)
168e0 29 3b 20 2f 2a 20 33 35 38 20 2a 2f 0a 20 20 20 ); /* 358 */.
168f0 20 76 6f 69 64 20 28 2a 74 63 6c 5f 4c 6f 67 43 void (*tcl_LogC
16900 6f 6d 6d 61 6e 64 49 6e 66 6f 29 20 5f 41 4e 53 ommandInfo) _ANS
16910 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
16920 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f erp * interp, CO
16930 4e 53 54 20 63 68 61 72 20 2a 20 73 63 72 69 70 NST char * scrip
16940 74 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 t, CONST char *
16950 63 6f 6d 6d 61 6e 64 2c 20 69 6e 74 20 6c 65 6e command, int len
16960 67 74 68 29 29 3b 20 2f 2a 20 33 35 39 20 2a 2f gth)); /* 359 */
16970 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 50 . int (*tcl_P
16980 61 72 73 65 42 72 61 63 65 73 29 20 5f 41 4e 53 arseBraces) _ANS
16990 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
169a0 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f erp * interp, CO
169b0 4e 53 54 20 63 68 61 72 20 2a 20 73 74 72 69 6e NST char * strin
169c0 67 2c 20 69 6e 74 20 6e 75 6d 42 79 74 65 73 2c g, int numBytes,
169d0 20 54 63 6c 5f 50 61 72 73 65 20 2a 20 70 61 72 Tcl_Parse * par
169e0 73 65 50 74 72 2c 20 69 6e 74 20 61 70 70 65 6e sePtr, int appen
169f0 64 2c 20 43 4f 4e 53 54 38 34 20 63 68 61 72 20 d, CONST84 char
16a00 2a 2a 20 74 65 72 6d 50 74 72 29 29 3b 20 2f 2a ** termPtr)); /*
16a10 20 33 36 30 20 2a 2f 0a 20 20 20 20 69 6e 74 20 360 */. int
16a20 28 2a 74 63 6c 5f 50 61 72 73 65 43 6f 6d 6d 61 (*tcl_ParseComma
16a30 6e 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 nd) _ANSI_ARGS_(
16a40 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
16a50 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 terp, CONST char
16a60 20 2a 20 73 74 72 69 6e 67 2c 20 69 6e 74 20 6e * string, int n
16a70 75 6d 42 79 74 65 73 2c 20 69 6e 74 20 6e 65 73 umBytes, int nes
16a80 74 65 64 2c 20 54 63 6c 5f 50 61 72 73 65 20 2a ted, Tcl_Parse *
16a90 20 70 61 72 73 65 50 74 72 29 29 3b 20 2f 2a 20 parsePtr)); /*
16aa0 33 36 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 361 */. int (
16ab0 2a 74 63 6c 5f 50 61 72 73 65 45 78 70 72 29 20 *tcl_ParseExpr)
16ac0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
16ad0 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
16ae0 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
16af0 74 72 69 6e 67 2c 20 69 6e 74 20 6e 75 6d 42 79 tring, int numBy
16b00 74 65 73 2c 20 54 63 6c 5f 50 61 72 73 65 20 2a tes, Tcl_Parse *
16b10 20 70 61 72 73 65 50 74 72 29 29 3b 20 2f 2a 20 parsePtr)); /*
16b20 33 36 32 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 362 */. int (
16b30 2a 74 63 6c 5f 50 61 72 73 65 51 75 6f 74 65 64 *tcl_ParseQuoted
16b40 53 74 72 69 6e 67 29 20 5f 41 4e 53 49 5f 41 52 String) _ANSI_AR
16b50 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
16b60 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 * interp, CONST
16b70 63 68 61 72 20 2a 20 73 74 72 69 6e 67 2c 20 69 char * string, i
16b80 6e 74 20 6e 75 6d 42 79 74 65 73 2c 20 54 63 6c nt numBytes, Tcl
16b90 5f 50 61 72 73 65 20 2a 20 70 61 72 73 65 50 74 _Parse * parsePt
16ba0 72 2c 20 69 6e 74 20 61 70 70 65 6e 64 2c 20 43 r, int append, C
16bb0 4f 4e 53 54 38 34 20 63 68 61 72 20 2a 2a 20 74 ONST84 char ** t
16bc0 65 72 6d 50 74 72 29 29 3b 20 2f 2a 20 33 36 33 ermPtr)); /* 363
16bd0 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
16be0 6c 5f 50 61 72 73 65 56 61 72 4e 61 6d 65 29 20 l_ParseVarName)
16bf0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
16c00 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
16c10 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
16c20 74 72 69 6e 67 2c 20 69 6e 74 20 6e 75 6d 42 79 tring, int numBy
16c30 74 65 73 2c 20 54 63 6c 5f 50 61 72 73 65 20 2a tes, Tcl_Parse *
16c40 20 70 61 72 73 65 50 74 72 2c 20 69 6e 74 20 61 parsePtr, int a
16c50 70 70 65 6e 64 29 29 3b 20 2f 2a 20 33 36 34 20 ppend)); /* 364
16c60 2a 2f 0a 20 20 20 20 63 68 61 72 20 2a 20 28 2a */. char * (*
16c70 74 63 6c 5f 47 65 74 43 77 64 29 20 5f 41 4e 53 tcl_GetCwd) _ANS
16c80 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
16c90 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 erp * interp, Tc
16ca0 6c 5f 44 53 74 72 69 6e 67 20 2a 20 63 77 64 50 l_DString * cwdP
16cb0 74 72 29 29 3b 20 2f 2a 20 33 36 35 20 2a 2f 0a tr)); /* 365 */.
16cc0 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 43 68 int (*tcl_Ch
16cd0 64 69 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f dir) _ANSI_ARGS_
16ce0 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 64 ((CONST char * d
16cf0 69 72 4e 61 6d 65 29 29 3b 20 2f 2a 20 33 36 36 irName)); /* 366
16d00 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
16d10 6c 5f 41 63 63 65 73 73 29 20 5f 41 4e 53 49 5f l_Access) _ANSI_
16d20 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 ARGS_((CONST cha
16d30 72 20 2a 20 70 61 74 68 2c 20 69 6e 74 20 6d 6f r * path, int mo
16d40 64 65 29 29 3b 20 2f 2a 20 33 36 37 20 2a 2f 0a de)); /* 367 */.
16d50 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 53 74 int (*tcl_St
16d60 61 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 at) _ANSI_ARGS_(
16d70 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 70 61 (CONST char * pa
16d80 74 68 2c 20 73 74 72 75 63 74 20 73 74 61 74 20 th, struct stat
16d90 2a 20 62 75 66 50 74 72 29 29 3b 20 2f 2a 20 33 * bufPtr)); /* 3
16da0 36 38 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 68 */. int (*
16db0 74 63 6c 5f 55 74 66 4e 63 6d 70 29 20 5f 41 4e tcl_UtfNcmp) _AN
16dc0 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 SI_ARGS_((CONST
16dd0 63 68 61 72 20 2a 20 73 31 2c 20 43 4f 4e 53 54 char * s1, CONST
16de0 20 63 68 61 72 20 2a 20 73 32 2c 20 75 6e 73 69 char * s2, unsi
16df0 67 6e 65 64 20 6c 6f 6e 67 20 6e 29 29 3b 20 2f gned long n)); /
16e00 2a 20 33 36 39 20 2a 2f 0a 20 20 20 20 69 6e 74 * 369 */. int
16e10 20 28 2a 74 63 6c 5f 55 74 66 4e 63 61 73 65 63 (*tcl_UtfNcasec
16e20 6d 70 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 mp) _ANSI_ARGS_(
16e30 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 31 (CONST char * s1
16e40 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 73 , CONST char * s
16e50 32 2c 20 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 2, unsigned long
16e60 20 6e 29 29 3b 20 2f 2a 20 33 37 30 20 2a 2f 0a n)); /* 370 */.
16e70 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 53 74 int (*tcl_St
16e80 72 69 6e 67 43 61 73 65 4d 61 74 63 68 29 20 5f ringCaseMatch) _
16e90 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e 53 ANSI_ARGS_((CONS
16ea0 54 20 63 68 61 72 20 2a 20 73 74 72 2c 20 43 4f T char * str, CO
16eb0 4e 53 54 20 63 68 61 72 20 2a 20 70 61 74 74 65 NST char * patte
16ec0 72 6e 2c 20 69 6e 74 20 6e 6f 63 61 73 65 29 29 rn, int nocase))
16ed0 3b 20 2f 2a 20 33 37 31 20 2a 2f 0a 20 20 20 20 ; /* 371 */.
16ee0 69 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 int (*tcl_UniCha
16ef0 72 49 73 43 6f 6e 74 72 6f 6c 29 20 5f 41 4e 53 rIsControl) _ANS
16f00 49 5f 41 52 47 53 5f 28 28 69 6e 74 20 63 68 29 I_ARGS_((int ch)
16f10 29 3b 20 2f 2a 20 33 37 32 20 2a 2f 0a 20 20 20 ); /* 372 */.
16f20 20 69 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 int (*tcl_UniCh
16f30 61 72 49 73 47 72 61 70 68 29 20 5f 41 4e 53 49 arIsGraph) _ANSI
16f40 5f 41 52 47 53 5f 28 28 69 6e 74 20 63 68 29 29 _ARGS_((int ch))
16f50 3b 20 2f 2a 20 33 37 33 20 2a 2f 0a 20 20 20 20 ; /* 373 */.
16f60 69 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 int (*tcl_UniCha
16f70 72 49 73 50 72 69 6e 74 29 20 5f 41 4e 53 49 5f rIsPrint) _ANSI_
16f80 41 52 47 53 5f 28 28 69 6e 74 20 63 68 29 29 3b ARGS_((int ch));
16f90 20 2f 2a 20 33 37 34 20 2a 2f 0a 20 20 20 20 69 /* 374 */. i
16fa0 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 nt (*tcl_UniChar
16fb0 49 73 50 75 6e 63 74 29 20 5f 41 4e 53 49 5f 41 IsPunct) _ANSI_A
16fc0 52 47 53 5f 28 28 69 6e 74 20 63 68 29 29 3b 20 RGS_((int ch));
16fd0 2f 2a 20 33 37 35 20 2a 2f 0a 20 20 20 20 69 6e /* 375 */. in
16fe0 74 20 28 2a 74 63 6c 5f 52 65 67 45 78 70 45 78 t (*tcl_RegExpEx
16ff0 65 63 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 ecObj) _ANSI_ARG
17000 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a S_((Tcl_Interp *
17010 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 52 65 67 interp, Tcl_Reg
17020 45 78 70 20 72 65 67 65 78 70 2c 20 54 63 6c 5f Exp regexp, Tcl_
17030 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e Obj * objPtr, in
17040 74 20 6f 66 66 73 65 74 2c 20 69 6e 74 20 6e 6d t offset, int nm
17050 61 74 63 68 65 73 2c 20 69 6e 74 20 66 6c 61 67 atches, int flag
17060 73 29 29 3b 20 2f 2a 20 33 37 36 20 2a 2f 0a 20 s)); /* 376 */.
17070 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 52 65 void (*tcl_Re
17080 67 45 78 70 47 65 74 49 6e 66 6f 29 20 5f 41 4e gExpGetInfo) _AN
17090 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 52 65 SI_ARGS_((Tcl_Re
170a0 67 45 78 70 20 72 65 67 65 78 70 2c 20 54 63 6c gExp regexp, Tcl
170b0 5f 52 65 67 45 78 70 49 6e 66 6f 20 2a 20 69 6e _RegExpInfo * in
170c0 66 6f 50 74 72 29 29 3b 20 2f 2a 20 33 37 37 20 foPtr)); /* 377
170d0 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a */. Tcl_Obj *
170e0 20 28 2a 74 63 6c 5f 4e 65 77 55 6e 69 63 6f 64 (*tcl_NewUnicod
170f0 65 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 eObj) _ANSI_ARGS
17100 5f 28 28 43 4f 4e 53 54 20 54 63 6c 5f 55 6e 69 _((CONST Tcl_Uni
17110 43 68 61 72 20 2a 20 75 6e 69 63 6f 64 65 2c 20 Char * unicode,
17120 69 6e 74 20 6e 75 6d 43 68 61 72 73 29 29 3b 20 int numChars));
17130 2f 2a 20 33 37 38 20 2a 2f 0a 20 20 20 20 76 6f /* 378 */. vo
17140 69 64 20 28 2a 74 63 6c 5f 53 65 74 55 6e 69 63 id (*tcl_SetUnic
17150 6f 64 65 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 odeObj) _ANSI_AR
17160 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f GS_((Tcl_Obj * o
17170 62 6a 50 74 72 2c 20 43 4f 4e 53 54 20 54 63 6c bjPtr, CONST Tcl
17180 5f 55 6e 69 43 68 61 72 20 2a 20 75 6e 69 63 6f _UniChar * unico
17190 64 65 2c 20 69 6e 74 20 6e 75 6d 43 68 61 72 73 de, int numChars
171a0 29 29 3b 20 2f 2a 20 33 37 39 20 2a 2f 0a 20 20 )); /* 379 */.
171b0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 43 int (*tcl_GetC
171c0 68 61 72 4c 65 6e 67 74 68 29 20 5f 41 4e 53 49 harLength) _ANSI
171d0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 _ARGS_((Tcl_Obj
171e0 2a 20 6f 62 6a 50 74 72 29 29 3b 20 2f 2a 20 33 * objPtr)); /* 3
171f0 38 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 55 6e 80 */. Tcl_Un
17200 69 43 68 61 72 20 28 2a 74 63 6c 5f 47 65 74 55 iChar (*tcl_GetU
17210 6e 69 43 68 61 72 29 20 5f 41 4e 53 49 5f 41 52 niChar) _ANSI_AR
17220 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f GS_((Tcl_Obj * o
17230 62 6a 50 74 72 2c 20 69 6e 74 20 69 6e 64 65 78 bjPtr, int index
17240 29 29 3b 20 2f 2a 20 33 38 31 20 2a 2f 0a 20 20 )); /* 381 */.
17250 20 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a 20 Tcl_UniChar *
17260 28 2a 74 63 6c 5f 47 65 74 55 6e 69 63 6f 64 65 (*tcl_GetUnicode
17270 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
17280 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 29 cl_Obj * objPtr)
17290 29 3b 20 2f 2a 20 33 38 32 20 2a 2f 0a 20 20 20 ); /* 382 */.
172a0 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 63 6c Tcl_Obj * (*tcl
172b0 5f 47 65 74 52 61 6e 67 65 29 20 5f 41 4e 53 49 _GetRange) _ANSI
172c0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 _ARGS_((Tcl_Obj
172d0 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 20 66 69 * objPtr, int fi
172e0 72 73 74 2c 20 69 6e 74 20 6c 61 73 74 29 29 3b rst, int last));
172f0 20 2f 2a 20 33 38 33 20 2a 2f 0a 20 20 20 20 76 /* 383 */. v
17300 6f 69 64 20 28 2a 74 63 6c 5f 41 70 70 65 6e 64 oid (*tcl_Append
17310 55 6e 69 63 6f 64 65 54 6f 4f 62 6a 29 20 5f 41 UnicodeToObj) _A
17320 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
17330 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 43 4f 4e bj * objPtr, CON
17340 53 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 2a ST Tcl_UniChar *
17350 20 75 6e 69 63 6f 64 65 2c 20 69 6e 74 20 6c 65 unicode, int le
17360 6e 67 74 68 29 29 3b 20 2f 2a 20 33 38 34 20 2a ngth)); /* 384 *
17370 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
17380 52 65 67 45 78 70 4d 61 74 63 68 4f 62 6a 29 20 RegExpMatchObj)
17390 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
173a0 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
173b0 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 73 74 72 69 , Tcl_Obj * stri
173c0 6e 67 4f 62 6a 2c 20 54 63 6c 5f 4f 62 6a 20 2a ngObj, Tcl_Obj *
173d0 20 70 61 74 74 65 72 6e 4f 62 6a 29 29 3b 20 2f patternObj)); /
173e0 2a 20 33 38 35 20 2a 2f 0a 20 20 20 20 76 6f 69 * 385 */. voi
173f0 64 20 28 2a 74 63 6c 5f 53 65 74 4e 6f 74 69 66 d (*tcl_SetNotif
17400 69 65 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ier) _ANSI_ARGS_
17410 28 28 54 63 6c 5f 4e 6f 74 69 66 69 65 72 50 72 ((Tcl_NotifierPr
17420 6f 63 73 20 2a 20 6e 6f 74 69 66 69 65 72 50 72 ocs * notifierPr
17430 6f 63 50 74 72 29 29 3b 20 2f 2a 20 33 38 36 20 ocPtr)); /* 386
17440 2a 2f 0a 20 20 20 20 54 63 6c 5f 4d 75 74 65 78 */. Tcl_Mutex
17450 20 2a 20 28 2a 74 63 6c 5f 47 65 74 41 6c 6c 6f * (*tcl_GetAllo
17460 63 4d 75 74 65 78 29 20 5f 41 4e 53 49 5f 41 52 cMutex) _ANSI_AR
17470 47 53 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a 20 GS_((void)); /*
17480 33 38 37 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 387 */. int (
17490 2a 74 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 4e *tcl_GetChannelN
174a0 61 6d 65 73 29 20 5f 41 4e 53 49 5f 41 52 47 53 ames) _ANSI_ARGS
174b0 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
174c0 69 6e 74 65 72 70 29 29 3b 20 2f 2a 20 33 38 38 interp)); /* 388
174d0 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
174e0 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 4e 61 6d 65 l_GetChannelName
174f0 73 45 78 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f sEx) _ANSI_ARGS_
17500 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
17510 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 nterp, CONST cha
17520 72 20 2a 20 70 61 74 74 65 72 6e 29 29 3b 20 2f r * pattern)); /
17530 2a 20 33 38 39 20 2a 2f 0a 20 20 20 20 69 6e 74 * 389 */. int
17540 20 28 2a 74 63 6c 5f 50 72 6f 63 4f 62 6a 43 6d (*tcl_ProcObjCm
17550 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 d) _ANSI_ARGS_((
17560 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e ClientData clien
17570 74 44 61 74 61 2c 20 54 63 6c 5f 49 6e 74 65 72 tData, Tcl_Inter
17580 70 20 2a 20 69 6e 74 65 72 70 2c 20 69 6e 74 20 p * interp, int
17590 6f 62 6a 63 2c 20 54 63 6c 5f 4f 62 6a 20 2a 43 objc, Tcl_Obj *C
175a0 4f 4e 53 54 20 6f 62 6a 76 5b 5d 29 29 3b 20 2f ONST objv[])); /
175b0 2a 20 33 39 30 20 2a 2f 0a 20 20 20 20 76 6f 69 * 390 */. voi
175c0 64 20 28 2a 74 63 6c 5f 43 6f 6e 64 69 74 69 6f d (*tcl_Conditio
175d0 6e 46 69 6e 61 6c 69 7a 65 29 20 5f 41 4e 53 49 nFinalize) _ANSI
175e0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 6f 6e 64 _ARGS_((Tcl_Cond
175f0 69 74 69 6f 6e 20 2a 20 63 6f 6e 64 50 74 72 29 ition * condPtr)
17600 29 3b 20 2f 2a 20 33 39 31 20 2a 2f 0a 20 20 20 ); /* 391 */.
17610 20 76 6f 69 64 20 28 2a 74 63 6c 5f 4d 75 74 65 void (*tcl_Mute
17620 78 46 69 6e 61 6c 69 7a 65 29 20 5f 41 4e 53 49 xFinalize) _ANSI
17630 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4d 75 74 65 _ARGS_((Tcl_Mute
17640 78 20 2a 20 6d 75 74 65 78 29 29 3b 20 2f 2a 20 x * mutex)); /*
17650 33 39 32 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 392 */. int (
17660 2a 74 63 6c 5f 43 72 65 61 74 65 54 68 72 65 61 *tcl_CreateThrea
17670 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 d) _ANSI_ARGS_((
17680 54 63 6c 5f 54 68 72 65 61 64 49 64 20 2a 20 69 Tcl_ThreadId * i
17690 64 50 74 72 2c 20 54 63 6c 5f 54 68 72 65 61 64 dPtr, Tcl_Thread
176a0 43 72 65 61 74 65 50 72 6f 63 20 70 72 6f 63 2c CreateProc proc,
176b0 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 ClientData clie
176c0 6e 74 44 61 74 61 2c 20 69 6e 74 20 73 74 61 63 ntData, int stac
176d0 6b 53 69 7a 65 2c 20 69 6e 74 20 66 6c 61 67 73 kSize, int flags
176e0 29 29 3b 20 2f 2a 20 33 39 33 20 2a 2f 0a 20 20 )); /* 393 */.
176f0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 52 65 61 64 int (*tcl_Read
17700 52 61 77 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Raw) _ANSI_ARGS_
17710 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
17720 61 6e 2c 20 63 68 61 72 20 2a 20 64 73 74 2c 20 an, char * dst,
17730 69 6e 74 20 62 79 74 65 73 54 6f 52 65 61 64 29 int bytesToRead)
17740 29 3b 20 2f 2a 20 33 39 34 20 2a 2f 0a 20 20 20 ); /* 394 */.
17750 20 69 6e 74 20 28 2a 74 63 6c 5f 57 72 69 74 65 int (*tcl_Write
17760 52 61 77 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f Raw) _ANSI_ARGS_
17770 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
17780 61 6e 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a an, CONST char *
17790 20 73 72 63 2c 20 69 6e 74 20 73 72 63 4c 65 6e src, int srcLen
177a0 29 29 3b 20 2f 2a 20 33 39 35 20 2a 2f 0a 20 20 )); /* 395 */.
177b0 20 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 28 2a Tcl_Channel (*
177c0 74 63 6c 5f 47 65 74 54 6f 70 43 68 61 6e 6e 65 tcl_GetTopChanne
177d0 6c 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 l) _ANSI_ARGS_((
177e0 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e Tcl_Channel chan
177f0 29 29 3b 20 2f 2a 20 33 39 36 20 2a 2f 0a 20 20 )); /* 396 */.
17800 20 20 69 6e 74 20 28 2a 74 63 6c 5f 43 68 61 6e int (*tcl_Chan
17810 6e 65 6c 42 75 66 66 65 72 65 64 29 20 5f 41 4e nelBuffered) _AN
17820 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 SI_ARGS_((Tcl_Ch
17830 61 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 20 2f 2a annel chan)); /*
17840 20 33 39 37 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 397 */. CONS
17850 54 38 34 5f 52 45 54 55 52 4e 20 63 68 61 72 20 T84_RETURN char
17860 2a 20 28 2a 74 63 6c 5f 43 68 61 6e 6e 65 6c 4e * (*tcl_ChannelN
17870 61 6d 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ame) _ANSI_ARGS_
17880 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 ((Tcl_ChannelTyp
17890 65 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 29 e * chanTypePtr)
178a0 29 3b 20 2f 2a 20 33 39 38 20 2a 2f 0a 20 20 20 ); /* 398 */.
178b0 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 Tcl_ChannelType
178c0 56 65 72 73 69 6f 6e 20 28 2a 74 63 6c 5f 43 68 Version (*tcl_Ch
178d0 61 6e 6e 65 6c 56 65 72 73 69 6f 6e 29 20 5f 41 annelVersion) _A
178e0 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 NSI_ARGS_((Tcl_C
178f0 68 61 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 61 hannelType * cha
17900 6e 54 79 70 65 50 74 72 29 29 3b 20 2f 2a 20 33 nTypePtr)); /* 3
17910 39 39 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 44 72 99 */. Tcl_Dr
17920 69 76 65 72 42 6c 6f 63 6b 4d 6f 64 65 50 72 6f iverBlockModePro
17930 63 20 2a 20 28 2a 74 63 6c 5f 43 68 61 6e 6e 65 c * (*tcl_Channe
17940 6c 42 6c 6f 63 6b 4d 6f 64 65 50 72 6f 63 29 20 lBlockModeProc)
17950 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
17960 5f 43 68 61 6e 6e 65 6c 54 79 70 65 20 2a 20 63 _ChannelType * c
17970 68 61 6e 54 79 70 65 50 74 72 29 29 3b 20 2f 2a hanTypePtr)); /*
17980 20 34 30 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 400 */. Tcl_
17990 44 72 69 76 65 72 43 6c 6f 73 65 50 72 6f 63 20 DriverCloseProc
179a0 2a 20 28 2a 74 63 6c 5f 43 68 61 6e 6e 65 6c 43 * (*tcl_ChannelC
179b0 6c 6f 73 65 50 72 6f 63 29 20 5f 41 4e 53 49 5f loseProc) _ANSI_
179c0 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e ARGS_((Tcl_Chann
179d0 65 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 elType * chanTyp
179e0 65 50 74 72 29 29 3b 20 2f 2a 20 34 30 31 20 2a ePtr)); /* 401 *
179f0 2f 0a 20 20 20 20 54 63 6c 5f 44 72 69 76 65 72 /. Tcl_Driver
17a00 43 6c 6f 73 65 32 50 72 6f 63 20 2a 20 28 2a 74 Close2Proc * (*t
17a10 63 6c 5f 43 68 61 6e 6e 65 6c 43 6c 6f 73 65 32 cl_ChannelClose2
17a20 50 72 6f 63 29 20 5f 41 4e 53 49 5f 41 52 47 53 Proc) _ANSI_ARGS
17a30 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 _((Tcl_ChannelTy
17a40 70 65 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 pe * chanTypePtr
17a50 29 29 3b 20 2f 2a 20 34 30 32 20 2a 2f 0a 20 20 )); /* 402 */.
17a60 20 20 54 63 6c 5f 44 72 69 76 65 72 49 6e 70 75 Tcl_DriverInpu
17a70 74 50 72 6f 63 20 2a 20 28 2a 74 63 6c 5f 43 68 tProc * (*tcl_Ch
17a80 61 6e 6e 65 6c 49 6e 70 75 74 50 72 6f 63 29 20 annelInputProc)
17a90 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
17aa0 5f 43 68 61 6e 6e 65 6c 54 79 70 65 20 2a 20 63 _ChannelType * c
17ab0 68 61 6e 54 79 70 65 50 74 72 29 29 3b 20 2f 2a hanTypePtr)); /*
17ac0 20 34 30 33 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 403 */. Tcl_
17ad0 44 72 69 76 65 72 4f 75 74 70 75 74 50 72 6f 63 DriverOutputProc
17ae0 20 2a 20 28 2a 74 63 6c 5f 43 68 61 6e 6e 65 6c * (*tcl_Channel
17af0 4f 75 74 70 75 74 50 72 6f 63 29 20 5f 41 4e 53 OutputProc) _ANS
17b00 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
17b10 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 nnelType * chanT
17b20 79 70 65 50 74 72 29 29 3b 20 2f 2a 20 34 30 34 ypePtr)); /* 404
17b30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 44 72 69 76 */. Tcl_Driv
17b40 65 72 53 65 65 6b 50 72 6f 63 20 2a 20 28 2a 74 erSeekProc * (*t
17b50 63 6c 5f 43 68 61 6e 6e 65 6c 53 65 65 6b 50 72 cl_ChannelSeekPr
17b60 6f 63 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 oc) _ANSI_ARGS_(
17b70 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 (Tcl_ChannelType
17b80 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 29 29 * chanTypePtr))
17b90 3b 20 2f 2a 20 34 30 35 20 2a 2f 0a 20 20 20 20 ; /* 405 */.
17ba0 54 63 6c 5f 44 72 69 76 65 72 53 65 74 4f 70 74 Tcl_DriverSetOpt
17bb0 69 6f 6e 50 72 6f 63 20 2a 20 28 2a 74 63 6c 5f ionProc * (*tcl_
17bc0 43 68 61 6e 6e 65 6c 53 65 74 4f 70 74 69 6f 6e ChannelSetOption
17bd0 50 72 6f 63 29 20 5f 41 4e 53 49 5f 41 52 47 53 Proc) _ANSI_ARGS
17be0 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 _((Tcl_ChannelTy
17bf0 70 65 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 pe * chanTypePtr
17c00 29 29 3b 20 2f 2a 20 34 30 36 20 2a 2f 0a 20 20 )); /* 406 */.
17c10 20 20 54 63 6c 5f 44 72 69 76 65 72 47 65 74 4f Tcl_DriverGetO
17c20 70 74 69 6f 6e 50 72 6f 63 20 2a 20 28 2a 74 63 ptionProc * (*tc
17c30 6c 5f 43 68 61 6e 6e 65 6c 47 65 74 4f 70 74 69 l_ChannelGetOpti
17c40 6f 6e 50 72 6f 63 29 20 5f 41 4e 53 49 5f 41 52 onProc) _ANSI_AR
17c50 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c GS_((Tcl_Channel
17c60 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 50 Type * chanTypeP
17c70 74 72 29 29 3b 20 2f 2a 20 34 30 37 20 2a 2f 0a tr)); /* 407 */.
17c80 20 20 20 20 54 63 6c 5f 44 72 69 76 65 72 57 61 Tcl_DriverWa
17c90 74 63 68 50 72 6f 63 20 2a 20 28 2a 74 63 6c 5f tchProc * (*tcl_
17ca0 43 68 61 6e 6e 65 6c 57 61 74 63 68 50 72 6f 63 ChannelWatchProc
17cb0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
17cc0 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 20 2a cl_ChannelType *
17cd0 20 63 68 61 6e 54 79 70 65 50 74 72 29 29 3b 20 chanTypePtr));
17ce0 2f 2a 20 34 30 38 20 2a 2f 0a 20 20 20 20 54 63 /* 408 */. Tc
17cf0 6c 5f 44 72 69 76 65 72 47 65 74 48 61 6e 64 6c l_DriverGetHandl
17d00 65 50 72 6f 63 20 2a 20 28 2a 74 63 6c 5f 43 68 eProc * (*tcl_Ch
17d10 61 6e 6e 65 6c 47 65 74 48 61 6e 64 6c 65 50 72 annelGetHandlePr
17d20 6f 63 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 oc) _ANSI_ARGS_(
17d30 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 65 (Tcl_ChannelType
17d40 20 2a 20 63 68 61 6e 54 79 70 65 50 74 72 29 29 * chanTypePtr))
17d50 3b 20 2f 2a 20 34 30 39 20 2a 2f 0a 20 20 20 20 ; /* 409 */.
17d60 54 63 6c 5f 44 72 69 76 65 72 46 6c 75 73 68 50 Tcl_DriverFlushP
17d70 72 6f 63 20 2a 20 28 2a 74 63 6c 5f 43 68 61 6e roc * (*tcl_Chan
17d80 6e 65 6c 46 6c 75 73 68 50 72 6f 63 29 20 5f 41 nelFlushProc) _A
17d90 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 NSI_ARGS_((Tcl_C
17da0 68 61 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 61 hannelType * cha
17db0 6e 54 79 70 65 50 74 72 29 29 3b 20 2f 2a 20 34 nTypePtr)); /* 4
17dc0 31 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 44 72 10 */. Tcl_Dr
17dd0 69 76 65 72 48 61 6e 64 6c 65 72 50 72 6f 63 20 iverHandlerProc
17de0 2a 20 28 2a 74 63 6c 5f 43 68 61 6e 6e 65 6c 48 * (*tcl_ChannelH
17df0 61 6e 64 6c 65 72 50 72 6f 63 29 20 5f 41 4e 53 andlerProc) _ANS
17e00 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
17e10 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 nnelType * chanT
17e20 79 70 65 50 74 72 29 29 3b 20 2f 2a 20 34 31 31 ypePtr)); /* 411
17e30 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
17e40 6c 5f 4a 6f 69 6e 54 68 72 65 61 64 29 20 5f 41 l_JoinThread) _A
17e50 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 54 NSI_ARGS_((Tcl_T
17e60 68 72 65 61 64 49 64 20 69 64 2c 20 69 6e 74 2a hreadId id, int*
17e70 20 72 65 73 75 6c 74 29 29 3b 20 2f 2a 20 34 31 result)); /* 41
17e80 32 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 2 */. int (*t
17e90 63 6c 5f 49 73 43 68 61 6e 6e 65 6c 53 68 61 72 cl_IsChannelShar
17ea0 65 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ed) _ANSI_ARGS_(
17eb0 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 (Tcl_Channel cha
17ec0 6e 6e 65 6c 29 29 3b 20 2f 2a 20 34 31 33 20 2a nnel)); /* 413 *
17ed0 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
17ee0 49 73 43 68 61 6e 6e 65 6c 52 65 67 69 73 74 65 IsChannelRegiste
17ef0 72 65 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f red) _ANSI_ARGS_
17f00 28 28 54 63 6c 5f 49 6e 74 65 72 70 2a 20 69 6e ((Tcl_Interp* in
17f10 74 65 72 70 2c 20 54 63 6c 5f 43 68 61 6e 6e 65 terp, Tcl_Channe
17f20 6c 20 63 68 61 6e 6e 65 6c 29 29 3b 20 2f 2a 20 l channel)); /*
17f30 34 31 34 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 414 */. void
17f40 28 2a 74 63 6c 5f 43 75 74 43 68 61 6e 6e 65 6c (*tcl_CutChannel
17f50 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
17f60 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 6e cl_Channel chann
17f70 65 6c 29 29 3b 20 2f 2a 20 34 31 35 20 2a 2f 0a el)); /* 415 */.
17f80 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c 5f 53 void (*tcl_S
17f90 70 6c 69 63 65 43 68 61 6e 6e 65 6c 29 20 5f 41 pliceChannel) _A
17fa0 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 NSI_ARGS_((Tcl_C
17fb0 68 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c 29 29 hannel channel))
17fc0 3b 20 2f 2a 20 34 31 36 20 2a 2f 0a 20 20 20 20 ; /* 416 */.
17fd0 76 6f 69 64 20 28 2a 74 63 6c 5f 43 6c 65 61 72 void (*tcl_Clear
17fe0 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 73 29 ChannelHandlers)
17ff0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
18000 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 l_Channel channe
18010 6c 29 29 3b 20 2f 2a 20 34 31 37 20 2a 2f 0a 20 l)); /* 417 */.
18020 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 49 73 43 int (*tcl_IsC
18030 68 61 6e 6e 65 6c 45 78 69 73 74 69 6e 67 29 20 hannelExisting)
18040 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f 4e _ANSI_ARGS_((CON
18050 53 54 20 63 68 61 72 2a 20 63 68 61 6e 6e 65 6c ST char* channel
18060 4e 61 6d 65 29 29 3b 20 2f 2a 20 34 31 38 20 2a Name)); /* 418 *
18070 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
18080 55 6e 69 43 68 61 72 4e 63 61 73 65 63 6d 70 29 UniCharNcasecmp)
18090 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 4f _ANSI_ARGS_((CO
180a0 4e 53 54 20 54 63 6c 5f 55 6e 69 43 68 61 72 20 NST Tcl_UniChar
180b0 2a 20 63 73 2c 20 43 4f 4e 53 54 20 54 63 6c 5f * cs, CONST Tcl_
180c0 55 6e 69 43 68 61 72 20 2a 20 63 74 2c 20 75 6e UniChar * ct, un
180d0 73 69 67 6e 65 64 20 6c 6f 6e 67 20 6e 29 29 3b signed long n));
180e0 20 2f 2a 20 34 31 39 20 2a 2f 0a 20 20 20 20 69 /* 419 */. i
180f0 6e 74 20 28 2a 74 63 6c 5f 55 6e 69 43 68 61 72 nt (*tcl_UniChar
18100 43 61 73 65 4d 61 74 63 68 29 20 5f 41 4e 53 49 CaseMatch) _ANSI
18110 5f 41 52 47 53 5f 28 28 43 4f 4e 53 54 20 54 63 _ARGS_((CONST Tc
18120 6c 5f 55 6e 69 43 68 61 72 20 2a 20 75 73 74 72 l_UniChar * ustr
18130 2c 20 43 4f 4e 53 54 20 54 63 6c 5f 55 6e 69 43 , CONST Tcl_UniC
18140 68 61 72 20 2a 20 70 61 74 74 65 72 6e 2c 20 69 har * pattern, i
18150 6e 74 20 6e 6f 63 61 73 65 29 29 3b 20 2f 2a 20 nt nocase)); /*
18160 34 32 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 48 420 */. Tcl_H
18170 61 73 68 45 6e 74 72 79 20 2a 20 28 2a 74 63 6c ashEntry * (*tcl
18180 5f 46 69 6e 64 48 61 73 68 45 6e 74 72 79 29 20 _FindHashEntry)
18190 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
181a0 5f 48 61 73 68 54 61 62 6c 65 20 2a 20 74 61 62 _HashTable * tab
181b0 6c 65 50 74 72 2c 20 43 4f 4e 53 54 20 63 68 61 lePtr, CONST cha
181c0 72 20 2a 20 6b 65 79 29 29 3b 20 2f 2a 20 34 32 r * key)); /* 42
181d0 31 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 48 61 73 1 */. Tcl_Has
181e0 68 45 6e 74 72 79 20 2a 20 28 2a 74 63 6c 5f 43 hEntry * (*tcl_C
181f0 72 65 61 74 65 48 61 73 68 45 6e 74 72 79 29 20 reateHashEntry)
18200 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
18210 5f 48 61 73 68 54 61 62 6c 65 20 2a 20 74 61 62 _HashTable * tab
18220 6c 65 50 74 72 2c 20 43 4f 4e 53 54 20 63 68 61 lePtr, CONST cha
18230 72 20 2a 20 6b 65 79 2c 20 69 6e 74 20 2a 20 6e r * key, int * n
18240 65 77 50 74 72 29 29 3b 20 2f 2a 20 34 32 32 20 ewPtr)); /* 422
18250 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 */. void (*tc
18260 6c 5f 49 6e 69 74 43 75 73 74 6f 6d 48 61 73 68 l_InitCustomHash
18270 54 61 62 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 Table) _ANSI_ARG
18280 53 5f 28 28 54 63 6c 5f 48 61 73 68 54 61 62 6c S_((Tcl_HashTabl
18290 65 20 2a 20 74 61 62 6c 65 50 74 72 2c 20 69 6e e * tablePtr, in
182a0 74 20 6b 65 79 54 79 70 65 2c 20 54 63 6c 5f 48 t keyType, Tcl_H
182b0 61 73 68 4b 65 79 54 79 70 65 20 2a 20 74 79 70 ashKeyType * typ
182c0 65 50 74 72 29 29 3b 20 2f 2a 20 34 32 33 20 2a ePtr)); /* 423 *
182d0 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 6c /. void (*tcl
182e0 5f 49 6e 69 74 4f 62 6a 48 61 73 68 54 61 62 6c _InitObjHashTabl
182f0 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 e) _ANSI_ARGS_((
18300 54 63 6c 5f 48 61 73 68 54 61 62 6c 65 20 2a 20 Tcl_HashTable *
18310 74 61 62 6c 65 50 74 72 29 29 3b 20 2f 2a 20 34 tablePtr)); /* 4
18320 32 34 20 2a 2f 0a 20 20 20 20 43 6c 69 65 6e 74 24 */. Client
18330 44 61 74 61 20 28 2a 74 63 6c 5f 43 6f 6d 6d 61 Data (*tcl_Comma
18340 6e 64 54 72 61 63 65 49 6e 66 6f 29 20 5f 41 4e ndTraceInfo) _AN
18350 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
18360 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 43 terp * interp, C
18370 4f 4e 53 54 20 63 68 61 72 20 2a 20 76 61 72 4e ONST char * varN
18380 61 6d 65 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 ame, int flags,
18390 54 63 6c 5f 43 6f 6d 6d 61 6e 64 54 72 61 63 65 Tcl_CommandTrace
183a0 50 72 6f 63 20 2a 20 70 72 6f 63 50 74 72 2c 20 Proc * procPtr,
183b0 43 6c 69 65 6e 74 44 61 74 61 20 70 72 65 76 43 ClientData prevC
183c0 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 lientData)); /*
183d0 34 32 35 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 425 */. int (
183e0 2a 74 63 6c 5f 54 72 61 63 65 43 6f 6d 6d 61 6e *tcl_TraceComman
183f0 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 d) _ANSI_ARGS_((
18400 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 Tcl_Interp * int
18410 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 erp, CONST char
18420 2a 20 76 61 72 4e 61 6d 65 2c 20 69 6e 74 20 66 * varName, int f
18430 6c 61 67 73 2c 20 54 63 6c 5f 43 6f 6d 6d 61 6e lags, Tcl_Comman
18440 64 54 72 61 63 65 50 72 6f 63 20 2a 20 70 72 6f dTraceProc * pro
18450 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 63 6c c, ClientData cl
18460 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a 20 34 ientData)); /* 4
18470 32 36 20 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 26 */. void (
18480 2a 74 63 6c 5f 55 6e 74 72 61 63 65 43 6f 6d 6d *tcl_UntraceComm
18490 61 6e 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f and) _ANSI_ARGS_
184a0 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
184b0 6e 74 65 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 nterp, CONST cha
184c0 72 20 2a 20 76 61 72 4e 61 6d 65 2c 20 69 6e 74 r * varName, int
184d0 20 66 6c 61 67 73 2c 20 54 63 6c 5f 43 6f 6d 6d flags, Tcl_Comm
184e0 61 6e 64 54 72 61 63 65 50 72 6f 63 20 2a 20 70 andTraceProc * p
184f0 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 61 20 roc, ClientData
18500 63 6c 69 65 6e 74 44 61 74 61 29 29 3b 20 2f 2a clientData)); /*
18510 20 34 32 37 20 2a 2f 0a 20 20 20 20 63 68 61 72 427 */. char
18520 20 2a 20 28 2a 74 63 6c 5f 41 74 74 65 6d 70 74 * (*tcl_Attempt
18530 41 6c 6c 6f 63 29 20 5f 41 4e 53 49 5f 41 52 47 Alloc) _ANSI_ARG
18540 53 5f 28 28 75 6e 73 69 67 6e 65 64 20 69 6e 74 S_((unsigned int
18550 20 73 69 7a 65 29 29 3b 20 2f 2a 20 34 32 38 20 size)); /* 428
18560 2a 2f 0a 20 20 20 20 63 68 61 72 20 2a 20 28 2a */. char * (*
18570 74 63 6c 5f 41 74 74 65 6d 70 74 44 62 43 6b 61 tcl_AttemptDbCka
18580 6c 6c 6f 63 29 20 5f 41 4e 53 49 5f 41 52 47 53 lloc) _ANSI_ARGS
18590 5f 28 28 75 6e 73 69 67 6e 65 64 20 69 6e 74 20 _((unsigned int
185a0 73 69 7a 65 2c 20 43 4f 4e 53 54 20 63 68 61 72 size, CONST char
185b0 20 2a 20 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e * file, int lin
185c0 65 29 29 3b 20 2f 2a 20 34 32 39 20 2a 2f 0a 20 e)); /* 429 */.
185d0 20 20 20 63 68 61 72 20 2a 20 28 2a 74 63 6c 5f char * (*tcl_
185e0 41 74 74 65 6d 70 74 52 65 61 6c 6c 6f 63 29 20 AttemptRealloc)
185f0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 63 68 61 _ANSI_ARGS_((cha
18600 72 20 2a 20 70 74 72 2c 20 75 6e 73 69 67 6e 65 r * ptr, unsigne
18610 64 20 69 6e 74 20 73 69 7a 65 29 29 3b 20 2f 2a d int size)); /*
18620 20 34 33 30 20 2a 2f 0a 20 20 20 20 63 68 61 72 430 */. char
18630 20 2a 20 28 2a 74 63 6c 5f 41 74 74 65 6d 70 74 * (*tcl_Attempt
18640 44 62 43 6b 72 65 61 6c 6c 6f 63 29 20 5f 41 4e DbCkrealloc) _AN
18650 53 49 5f 41 52 47 53 5f 28 28 63 68 61 72 20 2a SI_ARGS_((char *
18660 20 70 74 72 2c 20 75 6e 73 69 67 6e 65 64 20 69 ptr, unsigned i
18670 6e 74 20 73 69 7a 65 2c 20 43 4f 4e 53 54 20 63 nt size, CONST c
18680 68 61 72 20 2a 20 66 69 6c 65 2c 20 69 6e 74 20 har * file, int
18690 6c 69 6e 65 29 29 3b 20 2f 2a 20 34 33 31 20 2a line)); /* 431 *
186a0 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
186b0 41 74 74 65 6d 70 74 53 65 74 4f 62 6a 4c 65 6e AttemptSetObjLen
186c0 67 74 68 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f gth) _ANSI_ARGS_
186d0 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 ((Tcl_Obj * objP
186e0 74 72 2c 20 69 6e 74 20 6c 65 6e 67 74 68 29 29 tr, int length))
186f0 3b 20 2f 2a 20 34 33 32 20 2a 2f 0a 20 20 20 20 ; /* 432 */.
18700 54 63 6c 5f 54 68 72 65 61 64 49 64 20 28 2a 74 Tcl_ThreadId (*t
18710 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 54 68 72 cl_GetChannelThr
18720 65 61 64 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ead) _ANSI_ARGS_
18730 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
18740 61 6e 6e 65 6c 29 29 3b 20 2f 2a 20 34 33 33 20 annel)); /* 433
18750 2a 2f 0a 20 20 20 20 54 63 6c 5f 55 6e 69 43 68 */. Tcl_UniCh
18760 61 72 20 2a 20 28 2a 74 63 6c 5f 47 65 74 55 6e ar * (*tcl_GetUn
18770 69 63 6f 64 65 46 72 6f 6d 4f 62 6a 29 20 5f 41 icodeFromObj) _A
18780 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
18790 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 69 6e 74 bj * objPtr, int
187a0 20 2a 20 6c 65 6e 67 74 68 50 74 72 29 29 3b 20 * lengthPtr));
187b0 2f 2a 20 34 33 34 20 2a 2f 0a 20 20 20 20 69 6e /* 434 */. in
187c0 74 20 28 2a 74 63 6c 5f 47 65 74 4d 61 74 68 46 t (*tcl_GetMathF
187d0 75 6e 63 49 6e 66 6f 29 20 5f 41 4e 53 49 5f 41 uncInfo) _ANSI_A
187e0 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
187f0 20 2a 20 69 6e 74 65 72 70 2c 20 43 4f 4e 53 54 * interp, CONST
18800 20 63 68 61 72 20 2a 20 6e 61 6d 65 2c 20 69 6e char * name, in
18810 74 20 2a 20 6e 75 6d 41 72 67 73 50 74 72 2c 20 t * numArgsPtr,
18820 54 63 6c 5f 56 61 6c 75 65 54 79 70 65 20 2a 2a Tcl_ValueType **
18830 20 61 72 67 54 79 70 65 73 50 74 72 2c 20 54 63 argTypesPtr, Tc
18840 6c 5f 4d 61 74 68 50 72 6f 63 20 2a 2a 20 70 72 l_MathProc ** pr
18850 6f 63 50 74 72 2c 20 43 6c 69 65 6e 74 44 61 74 ocPtr, ClientDat
18860 61 20 2a 20 63 6c 69 65 6e 74 44 61 74 61 50 74 a * clientDataPt
18870 72 29 29 3b 20 2f 2a 20 34 33 35 20 2a 2f 0a 20 r)); /* 435 */.
18880 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a 74 Tcl_Obj * (*t
18890 63 6c 5f 4c 69 73 74 4d 61 74 68 46 75 6e 63 73 cl_ListMathFuncs
188a0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
188b0 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
188c0 72 70 2c 20 43 4f 4e 53 54 20 63 68 61 72 20 2a rp, CONST char *
188d0 20 70 61 74 74 65 72 6e 29 29 3b 20 2f 2a 20 34 pattern)); /* 4
188e0 33 36 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 36 */. Tcl_Ob
188f0 6a 20 2a 20 28 2a 74 63 6c 5f 53 75 62 73 74 4f j * (*tcl_SubstO
18900 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
18910 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
18920 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 terp, Tcl_Obj *
18930 6f 62 6a 50 74 72 2c 20 69 6e 74 20 66 6c 61 67 objPtr, int flag
18940 73 29 29 3b 20 2f 2a 20 34 33 37 20 2a 2f 0a 20 s)); /* 437 */.
18950 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 44 65 74 int (*tcl_Det
18960 61 63 68 43 68 61 6e 6e 65 6c 29 20 5f 41 4e 53 achChannel) _ANS
18970 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
18980 65 72 70 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c erp* interp, Tcl
18990 5f 43 68 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c _Channel channel
189a0 29 29 3b 20 2f 2a 20 34 33 38 20 2a 2f 0a 20 20 )); /* 438 */.
189b0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 49 73 53 74 int (*tcl_IsSt
189c0 61 6e 64 61 72 64 43 68 61 6e 6e 65 6c 29 20 5f andardChannel) _
189d0 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
189e0 43 68 61 6e 6e 65 6c 20 63 68 61 6e 6e 65 6c 29 Channel channel)
189f0 29 3b 20 2f 2a 20 34 33 39 20 2a 2f 0a 20 20 20 ); /* 439 */.
18a00 20 69 6e 74 20 28 2a 74 63 6c 5f 46 53 43 6f 70 int (*tcl_FSCop
18a10 79 46 69 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 yFile) _ANSI_ARG
18a20 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 73 72 S_((Tcl_Obj * sr
18a30 63 50 61 74 68 50 74 72 2c 20 54 63 6c 5f 4f 62 cPathPtr, Tcl_Ob
18a40 6a 20 2a 20 64 65 73 74 50 61 74 68 50 74 72 29 j * destPathPtr)
18a50 29 3b 20 2f 2a 20 34 34 30 20 2a 2f 0a 20 20 20 ); /* 440 */.
18a60 20 69 6e 74 20 28 2a 74 63 6c 5f 46 53 43 6f 70 int (*tcl_FSCop
18a70 79 44 69 72 65 63 74 6f 72 79 29 20 5f 41 4e 53 yDirectory) _ANS
18a80 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a I_ARGS_((Tcl_Obj
18a90 20 2a 20 73 72 63 50 61 74 68 50 74 72 2c 20 54 * srcPathPtr, T
18aa0 63 6c 5f 4f 62 6a 20 2a 20 64 65 73 74 50 61 74 cl_Obj * destPat
18ab0 68 50 74 72 2c 20 54 63 6c 5f 4f 62 6a 20 2a 2a hPtr, Tcl_Obj **
18ac0 20 65 72 72 6f 72 50 74 72 29 29 3b 20 2f 2a 20 errorPtr)); /*
18ad0 34 34 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 441 */. int (
18ae0 2a 74 63 6c 5f 46 53 43 72 65 61 74 65 44 69 72 *tcl_FSCreateDir
18af0 65 63 74 6f 72 79 29 20 5f 41 4e 53 49 5f 41 52 ectory) _ANSI_AR
18b00 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 70 GS_((Tcl_Obj * p
18b10 61 74 68 50 74 72 29 29 3b 20 2f 2a 20 34 34 32 athPtr)); /* 442
18b20 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 */. int (*tc
18b30 6c 5f 46 53 44 65 6c 65 74 65 46 69 6c 65 29 20 l_FSDeleteFile)
18b40 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
18b50 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 29 29 _Obj * pathPtr))
18b60 3b 20 2f 2a 20 34 34 33 20 2a 2f 0a 20 20 20 20 ; /* 443 */.
18b70 69 6e 74 20 28 2a 74 63 6c 5f 46 53 4c 6f 61 64 int (*tcl_FSLoad
18b80 46 69 6c 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 File) _ANSI_ARGS
18b90 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
18ba0 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 interp, Tcl_Obj
18bb0 2a 20 70 61 74 68 50 74 72 2c 20 43 4f 4e 53 54 * pathPtr, CONST
18bc0 20 63 68 61 72 20 2a 20 73 79 6d 31 2c 20 43 4f char * sym1, CO
18bd0 4e 53 54 20 63 68 61 72 20 2a 20 73 79 6d 32 2c NST char * sym2,
18be0 20 54 63 6c 5f 50 61 63 6b 61 67 65 49 6e 69 74 Tcl_PackageInit
18bf0 50 72 6f 63 20 2a 2a 20 70 72 6f 63 31 50 74 72 Proc ** proc1Ptr
18c00 2c 20 54 63 6c 5f 50 61 63 6b 61 67 65 49 6e 69 , Tcl_PackageIni
18c10 74 50 72 6f 63 20 2a 2a 20 70 72 6f 63 32 50 74 tProc ** proc2Pt
18c20 72 2c 20 54 63 6c 5f 4c 6f 61 64 48 61 6e 64 6c r, Tcl_LoadHandl
18c30 65 20 2a 20 68 61 6e 64 6c 65 50 74 72 2c 20 54 e * handlePtr, T
18c40 63 6c 5f 46 53 55 6e 6c 6f 61 64 46 69 6c 65 50 cl_FSUnloadFileP
18c50 72 6f 63 20 2a 2a 20 75 6e 6c 6f 61 64 50 72 6f roc ** unloadPro
18c60 63 50 74 72 29 29 3b 20 2f 2a 20 34 34 34 20 2a cPtr)); /* 444 *
18c70 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f /. int (*tcl_
18c80 46 53 4d 61 74 63 68 49 6e 44 69 72 65 63 74 6f FSMatchInDirecto
18c90 72 79 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ry) _ANSI_ARGS_(
18ca0 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
18cb0 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 terp, Tcl_Obj *
18cc0 72 65 73 75 6c 74 2c 20 54 63 6c 5f 4f 62 6a 20 result, Tcl_Obj
18cd0 2a 20 70 61 74 68 50 74 72 2c 20 43 4f 4e 53 54 * pathPtr, CONST
18ce0 20 63 68 61 72 20 2a 20 70 61 74 74 65 72 6e 2c char * pattern,
18cf0 20 54 63 6c 5f 47 6c 6f 62 54 79 70 65 44 61 74 Tcl_GlobTypeDat
18d00 61 20 2a 20 74 79 70 65 73 29 29 3b 20 2f 2a 20 a * types)); /*
18d10 34 34 35 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 445 */. Tcl_O
18d20 62 6a 20 2a 20 28 2a 74 63 6c 5f 46 53 4c 69 6e bj * (*tcl_FSLin
18d30 6b 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 k) _ANSI_ARGS_((
18d40 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 Tcl_Obj * pathPt
18d50 72 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 74 6f 50 r, Tcl_Obj * toP
18d60 74 72 2c 20 69 6e 74 20 6c 69 6e 6b 41 63 74 69 tr, int linkActi
18d70 6f 6e 29 29 3b 20 2f 2a 20 34 34 36 20 2a 2f 0a on)); /* 446 */.
18d80 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 46 53 int (*tcl_FS
18d90 52 65 6d 6f 76 65 44 69 72 65 63 74 6f 72 79 29 RemoveDirectory)
18da0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
18db0 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 2c l_Obj * pathPtr,
18dc0 20 69 6e 74 20 72 65 63 75 72 73 69 76 65 2c 20 int recursive,
18dd0 54 63 6c 5f 4f 62 6a 20 2a 2a 20 65 72 72 6f 72 Tcl_Obj ** error
18de0 50 74 72 29 29 3b 20 2f 2a 20 34 34 37 20 2a 2f Ptr)); /* 447 */
18df0 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 46 . int (*tcl_F
18e00 53 52 65 6e 61 6d 65 46 69 6c 65 29 20 5f 41 4e SRenameFile) _AN
18e10 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
18e20 6a 20 2a 20 73 72 63 50 61 74 68 50 74 72 2c 20 j * srcPathPtr,
18e30 54 63 6c 5f 4f 62 6a 20 2a 20 64 65 73 74 50 61 Tcl_Obj * destPa
18e40 74 68 50 74 72 29 29 3b 20 2f 2a 20 34 34 38 20 thPtr)); /* 448
18e50 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c */. int (*tcl
18e60 5f 46 53 4c 73 74 61 74 29 20 5f 41 4e 53 49 5f _FSLstat) _ANSI_
18e70 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a ARGS_((Tcl_Obj *
18e80 20 70 61 74 68 50 74 72 2c 20 54 63 6c 5f 53 74 pathPtr, Tcl_St
18e90 61 74 42 75 66 20 2a 20 62 75 66 29 29 3b 20 2f atBuf * buf)); /
18ea0 2a 20 34 34 39 20 2a 2f 0a 20 20 20 20 69 6e 74 * 449 */. int
18eb0 20 28 2a 74 63 6c 5f 46 53 55 74 69 6d 65 29 20 (*tcl_FSUtime)
18ec0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
18ed0 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 2c 20 _Obj * pathPtr,
18ee0 73 74 72 75 63 74 20 75 74 69 6d 62 75 66 20 2a struct utimbuf *
18ef0 20 74 76 61 6c 29 29 3b 20 2f 2a 20 34 35 30 20 tval)); /* 450
18f00 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c */. int (*tcl
18f10 5f 46 53 46 69 6c 65 41 74 74 72 73 47 65 74 29 _FSFileAttrsGet)
18f20 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
18f30 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
18f40 70 2c 20 69 6e 74 20 69 6e 64 65 78 2c 20 54 63 p, int index, Tc
18f50 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 2c l_Obj * pathPtr,
18f60 20 54 63 6c 5f 4f 62 6a 20 2a 2a 20 6f 62 6a 50 Tcl_Obj ** objP
18f70 74 72 52 65 66 29 29 3b 20 2f 2a 20 34 35 31 20 trRef)); /* 451
18f80 2a 2f 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c */. int (*tcl
18f90 5f 46 53 46 69 6c 65 41 74 74 72 73 53 65 74 29 _FSFileAttrsSet)
18fa0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
18fb0 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
18fc0 70 2c 20 69 6e 74 20 69 6e 64 65 78 2c 20 54 63 p, int index, Tc
18fd0 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 2c l_Obj * pathPtr,
18fe0 20 54 63 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 Tcl_Obj * objPt
18ff0 72 29 29 3b 20 2f 2a 20 34 35 32 20 2a 2f 0a 20 r)); /* 452 */.
19000 20 20 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 2a CONST char **
19010 20 28 2a 74 63 6c 5f 46 53 46 69 6c 65 41 74 74 (*tcl_FSFileAtt
19020 72 53 74 72 69 6e 67 73 29 20 5f 41 4e 53 49 5f rStrings) _ANSI_
19030 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a ARGS_((Tcl_Obj *
19040 20 70 61 74 68 50 74 72 2c 20 54 63 6c 5f 4f 62 pathPtr, Tcl_Ob
19050 6a 20 2a 2a 20 6f 62 6a 50 74 72 52 65 66 29 29 j ** objPtrRef))
19060 3b 20 2f 2a 20 34 35 33 20 2a 2f 0a 20 20 20 20 ; /* 453 */.
19070 69 6e 74 20 28 2a 74 63 6c 5f 46 53 53 74 61 74 int (*tcl_FSStat
19080 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
19090 63 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 50 74 72 cl_Obj * pathPtr
190a0 2c 20 54 63 6c 5f 53 74 61 74 42 75 66 20 2a 20 , Tcl_StatBuf *
190b0 62 75 66 29 29 3b 20 2f 2a 20 34 35 34 20 2a 2f buf)); /* 454 */
190c0 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 46 . int (*tcl_F
190d0 53 41 63 63 65 73 73 29 20 5f 41 4e 53 49 5f 41 SAccess) _ANSI_A
190e0 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 RGS_((Tcl_Obj *
190f0 70 61 74 68 50 74 72 2c 20 69 6e 74 20 6d 6f 64 pathPtr, int mod
19100 65 29 29 3b 20 2f 2a 20 34 35 35 20 2a 2f 0a 20 e)); /* 455 */.
19110 20 20 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 28 Tcl_Channel (
19120 2a 74 63 6c 5f 46 53 4f 70 65 6e 46 69 6c 65 43 *tcl_FSOpenFileC
19130 68 61 6e 6e 65 6c 29 20 5f 41 4e 53 49 5f 41 52 hannel) _ANSI_AR
19140 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 GS_((Tcl_Interp
19150 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 * interp, Tcl_Ob
19160 6a 20 2a 20 70 61 74 68 50 74 72 2c 20 43 4f 4e j * pathPtr, CON
19170 53 54 20 63 68 61 72 20 2a 20 6d 6f 64 65 53 74 ST char * modeSt
19180 72 69 6e 67 2c 20 69 6e 74 20 70 65 72 6d 69 73 ring, int permis
19190 73 69 6f 6e 73 29 29 3b 20 2f 2a 20 34 35 36 20 sions)); /* 456
191a0 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 2a 20 */. Tcl_Obj*
191b0 28 2a 74 63 6c 5f 46 53 47 65 74 43 77 64 29 20 (*tcl_FSGetCwd)
191c0 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
191d0 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 _Interp * interp
191e0 29 29 3b 20 2f 2a 20 34 35 37 20 2a 2f 0a 20 20 )); /* 457 */.
191f0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 46 53 43 68 int (*tcl_FSCh
19200 64 69 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f dir) _ANSI_ARGS_
19210 28 28 54 63 6c 5f 4f 62 6a 20 2a 20 70 61 74 68 ((Tcl_Obj * path
19220 50 74 72 29 29 3b 20 2f 2a 20 34 35 38 20 2a 2f Ptr)); /* 458 */
19230 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 46 . int (*tcl_F
19240 53 43 6f 6e 76 65 72 74 54 6f 50 61 74 68 54 79 SConvertToPathTy
19250 70 65 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 pe) _ANSI_ARGS_(
19260 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
19270 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 terp, Tcl_Obj *
19280 70 61 74 68 50 74 72 29 29 3b 20 2f 2a 20 34 35 pathPtr)); /* 45
19290 39 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 9 */. Tcl_Obj
192a0 2a 20 28 2a 74 63 6c 5f 46 53 4a 6f 69 6e 50 61 * (*tcl_FSJoinPa
192b0 74 68 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 th) _ANSI_ARGS_(
192c0 28 54 63 6c 5f 4f 62 6a 20 2a 20 6c 69 73 74 4f (Tcl_Obj * listO
192d0 62 6a 2c 20 69 6e 74 20 65 6c 65 6d 65 6e 74 73 bj, int elements
192e0 29 29 3b 20 2f 2a 20 34 36 30 20 2a 2f 0a 20 20 )); /* 460 */.
192f0 20 20 54 63 6c 5f 4f 62 6a 2a 20 28 2a 74 63 6c Tcl_Obj* (*tcl
19300 5f 46 53 53 70 6c 69 74 50 61 74 68 29 20 5f 41 _FSSplitPath) _A
19310 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f NSI_ARGS_((Tcl_O
19320 62 6a 2a 20 70 61 74 68 50 74 72 2c 20 69 6e 74 bj* pathPtr, int
19330 20 2a 20 6c 65 6e 50 74 72 29 29 3b 20 2f 2a 20 * lenPtr)); /*
19340 34 36 31 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 461 */. int (
19350 2a 74 63 6c 5f 46 53 45 71 75 61 6c 50 61 74 68 *tcl_FSEqualPath
19360 73 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 s) _ANSI_ARGS_((
19370 54 63 6c 5f 4f 62 6a 2a 20 66 69 72 73 74 50 74 Tcl_Obj* firstPt
19380 72 2c 20 54 63 6c 5f 4f 62 6a 2a 20 73 65 63 6f r, Tcl_Obj* seco
19390 6e 64 50 74 72 29 29 3b 20 2f 2a 20 34 36 32 20 ndPtr)); /* 462
193a0 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 6a 2a 20 */. Tcl_Obj*
193b0 28 2a 74 63 6c 5f 46 53 47 65 74 4e 6f 72 6d 61 (*tcl_FSGetNorma
193c0 6c 69 7a 65 64 50 61 74 68 29 20 5f 41 4e 53 49 lizedPath) _ANSI
193d0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
193e0 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c rp * interp, Tcl
193f0 5f 4f 62 6a 2a 20 70 61 74 68 4f 62 6a 50 74 72 _Obj* pathObjPtr
19400 29 29 3b 20 2f 2a 20 34 36 33 20 2a 2f 0a 20 20 )); /* 463 */.
19410 20 20 54 63 6c 5f 4f 62 6a 2a 20 28 2a 74 63 6c Tcl_Obj* (*tcl
19420 5f 46 53 4a 6f 69 6e 54 6f 50 61 74 68 29 20 5f _FSJoinToPath) _
19430 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
19440 4f 62 6a 20 2a 20 62 61 73 65 50 74 72 2c 20 69 Obj * basePtr, i
19450 6e 74 20 6f 62 6a 63 2c 20 54 63 6c 5f 4f 62 6a nt objc, Tcl_Obj
19460 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 29 29 *CONST objv[]))
19470 3b 20 2f 2a 20 34 36 34 20 2a 2f 0a 20 20 20 20 ; /* 464 */.
19480 43 6c 69 65 6e 74 44 61 74 61 20 28 2a 74 63 6c ClientData (*tcl
19490 5f 46 53 47 65 74 49 6e 74 65 72 6e 61 6c 52 65 _FSGetInternalRe
194a0 70 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 p) _ANSI_ARGS_((
194b0 54 63 6c 5f 4f 62 6a 2a 20 70 61 74 68 4f 62 6a Tcl_Obj* pathObj
194c0 50 74 72 2c 20 54 63 6c 5f 46 69 6c 65 73 79 73 Ptr, Tcl_Filesys
194d0 74 65 6d 20 2a 20 66 73 50 74 72 29 29 3b 20 2f tem * fsPtr)); /
194e0 2a 20 34 36 35 20 2a 2f 0a 20 20 20 20 54 63 6c * 465 */. Tcl
194f0 5f 4f 62 6a 2a 20 28 2a 74 63 6c 5f 46 53 47 65 _Obj* (*tcl_FSGe
19500 74 54 72 61 6e 73 6c 61 74 65 64 50 61 74 68 29 tTranslatedPath)
19510 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
19520 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
19530 70 2c 20 54 63 6c 5f 4f 62 6a 2a 20 70 61 74 68 p, Tcl_Obj* path
19540 50 74 72 29 29 3b 20 2f 2a 20 34 36 36 20 2a 2f Ptr)); /* 466 */
19550 0a 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 46 . int (*tcl_F
19560 53 45 76 61 6c 46 69 6c 65 29 20 5f 41 4e 53 49 SEvalFile) _ANSI
19570 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
19580 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c rp * interp, Tcl
19590 5f 4f 62 6a 20 2a 20 66 69 6c 65 4e 61 6d 65 29 _Obj * fileName)
195a0 29 3b 20 2f 2a 20 34 36 37 20 2a 2f 0a 20 20 20 ); /* 467 */.
195b0 20 54 63 6c 5f 4f 62 6a 2a 20 28 2a 74 63 6c 5f Tcl_Obj* (*tcl_
195c0 46 53 4e 65 77 4e 61 74 69 76 65 50 61 74 68 29 FSNewNativePath)
195d0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
195e0 6c 5f 46 69 6c 65 73 79 73 74 65 6d 2a 20 66 72 l_Filesystem* fr
195f0 6f 6d 46 69 6c 65 73 79 73 74 65 6d 2c 20 43 6c omFilesystem, Cl
19600 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 ientData clientD
19610 61 74 61 29 29 3b 20 2f 2a 20 34 36 38 20 2a 2f ata)); /* 468 */
19620 0a 20 20 20 20 43 4f 4e 53 54 20 63 68 61 72 2a . CONST char*
19630 20 28 2a 74 63 6c 5f 46 53 47 65 74 4e 61 74 69 (*tcl_FSGetNati
19640 76 65 50 61 74 68 29 20 5f 41 4e 53 49 5f 41 52 vePath) _ANSI_AR
19650 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 2a 20 70 61 GS_((Tcl_Obj* pa
19660 74 68 4f 62 6a 50 74 72 29 29 3b 20 2f 2a 20 34 thObjPtr)); /* 4
19670 36 39 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 69 */. Tcl_Ob
19680 6a 2a 20 28 2a 74 63 6c 5f 46 53 46 69 6c 65 53 j* (*tcl_FSFileS
19690 79 73 74 65 6d 49 6e 66 6f 29 20 5f 41 4e 53 49 ystemInfo) _ANSI
196a0 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a 2a _ARGS_((Tcl_Obj*
196b0 20 70 61 74 68 4f 62 6a 50 74 72 29 29 3b 20 2f pathObjPtr)); /
196c0 2a 20 34 37 30 20 2a 2f 0a 20 20 20 20 54 63 6c * 470 */. Tcl
196d0 5f 4f 62 6a 2a 20 28 2a 74 63 6c 5f 46 53 50 61 _Obj* (*tcl_FSPa
196e0 74 68 53 65 70 61 72 61 74 6f 72 29 20 5f 41 4e thSeparator) _AN
196f0 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 SI_ARGS_((Tcl_Ob
19700 6a 2a 20 70 61 74 68 4f 62 6a 50 74 72 29 29 3b j* pathObjPtr));
19710 20 2f 2a 20 34 37 31 20 2a 2f 0a 20 20 20 20 54 /* 471 */. T
19720 63 6c 5f 4f 62 6a 2a 20 28 2a 74 63 6c 5f 46 53 cl_Obj* (*tcl_FS
19730 4c 69 73 74 56 6f 6c 75 6d 65 73 29 20 5f 41 4e ListVolumes) _AN
19740 53 49 5f 41 52 47 53 5f 28 28 76 6f 69 64 29 29 SI_ARGS_((void))
19750 3b 20 2f 2a 20 34 37 32 20 2a 2f 0a 20 20 20 20 ; /* 472 */.
19760 69 6e 74 20 28 2a 74 63 6c 5f 46 53 52 65 67 69 int (*tcl_FSRegi
19770 73 74 65 72 29 20 5f 41 4e 53 49 5f 41 52 47 53 ster) _ANSI_ARGS
19780 5f 28 28 43 6c 69 65 6e 74 44 61 74 61 20 63 6c _((ClientData cl
19790 69 65 6e 74 44 61 74 61 2c 20 54 63 6c 5f 46 69 ientData, Tcl_Fi
197a0 6c 65 73 79 73 74 65 6d 20 2a 20 66 73 50 74 72 lesystem * fsPtr
197b0 29 29 3b 20 2f 2a 20 34 37 33 20 2a 2f 0a 20 20 )); /* 473 */.
197c0 20 20 69 6e 74 20 28 2a 74 63 6c 5f 46 53 55 6e int (*tcl_FSUn
197d0 72 65 67 69 73 74 65 72 29 20 5f 41 4e 53 49 5f register) _ANSI_
197e0 41 52 47 53 5f 28 28 54 63 6c 5f 46 69 6c 65 73 ARGS_((Tcl_Files
197f0 79 73 74 65 6d 20 2a 20 66 73 50 74 72 29 29 3b ystem * fsPtr));
19800 20 2f 2a 20 34 37 34 20 2a 2f 0a 20 20 20 20 43 /* 474 */. C
19810 6c 69 65 6e 74 44 61 74 61 20 28 2a 74 63 6c 5f lientData (*tcl_
19820 46 53 44 61 74 61 29 20 5f 41 4e 53 49 5f 41 52 FSData) _ANSI_AR
19830 47 53 5f 28 28 54 63 6c 5f 46 69 6c 65 73 79 73 GS_((Tcl_Filesys
19840 74 65 6d 20 2a 20 66 73 50 74 72 29 29 3b 20 2f tem * fsPtr)); /
19850 2a 20 34 37 35 20 2a 2f 0a 20 20 20 20 43 4f 4e * 475 */. CON
19860 53 54 20 63 68 61 72 2a 20 28 2a 74 63 6c 5f 46 ST char* (*tcl_F
19870 53 47 65 74 54 72 61 6e 73 6c 61 74 65 64 53 74 SGetTranslatedSt
19880 72 69 6e 67 50 61 74 68 29 20 5f 41 4e 53 49 5f ringPath) _ANSI_
19890 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 ARGS_((Tcl_Inter
198a0 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f p * interp, Tcl_
198b0 4f 62 6a 2a 20 70 61 74 68 50 74 72 29 29 3b 20 Obj* pathPtr));
198c0 2f 2a 20 34 37 36 20 2a 2f 0a 20 20 20 20 54 63 /* 476 */. Tc
198d0 6c 5f 46 69 6c 65 73 79 73 74 65 6d 2a 20 28 2a l_Filesystem* (*
198e0 74 63 6c 5f 46 53 47 65 74 46 69 6c 65 53 79 73 tcl_FSGetFileSys
198f0 74 65 6d 46 6f 72 50 61 74 68 29 20 5f 41 4e 53 temForPath) _ANS
19900 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 4f 62 6a I_ARGS_((Tcl_Obj
19910 2a 20 70 61 74 68 4f 62 6a 50 74 72 29 29 3b 20 * pathObjPtr));
19920 2f 2a 20 34 37 37 20 2a 2f 0a 20 20 20 20 54 63 /* 477 */. Tc
19930 6c 5f 50 61 74 68 54 79 70 65 20 28 2a 74 63 6c l_PathType (*tcl
19940 5f 46 53 47 65 74 50 61 74 68 54 79 70 65 29 20 _FSGetPathType)
19950 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
19960 5f 4f 62 6a 20 2a 20 70 61 74 68 4f 62 6a 50 74 _Obj * pathObjPt
19970 72 29 29 3b 20 2f 2a 20 34 37 38 20 2a 2f 0a 20 r)); /* 478 */.
19980 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 4f 75 74 int (*tcl_Out
19990 70 75 74 42 75 66 66 65 72 65 64 29 20 5f 41 4e putBuffered) _AN
199a0 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 SI_ARGS_((Tcl_Ch
199b0 61 6e 6e 65 6c 20 63 68 61 6e 29 29 3b 20 2f 2a annel chan)); /*
199c0 20 34 37 39 20 2a 2f 0a 20 20 20 20 76 6f 69 64 479 */. void
199d0 20 28 2a 74 63 6c 5f 46 53 4d 6f 75 6e 74 73 43 (*tcl_FSMountsC
199e0 68 61 6e 67 65 64 29 20 5f 41 4e 53 49 5f 41 52 hanged) _ANSI_AR
199f0 47 53 5f 28 28 54 63 6c 5f 46 69 6c 65 73 79 73 GS_((Tcl_Filesys
19a00 74 65 6d 20 2a 20 66 73 50 74 72 29 29 3b 20 2f tem * fsPtr)); /
19a10 2a 20 34 38 30 20 2a 2f 0a 20 20 20 20 69 6e 74 * 480 */. int
19a20 20 28 2a 74 63 6c 5f 45 76 61 6c 54 6f 6b 65 6e (*tcl_EvalToken
19a30 73 53 74 61 6e 64 61 72 64 29 20 5f 41 4e 53 49 sStandard) _ANSI
19a40 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 _ARGS_((Tcl_Inte
19a50 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c rp * interp, Tcl
19a60 5f 54 6f 6b 65 6e 20 2a 20 74 6f 6b 65 6e 50 74 _Token * tokenPt
19a70 72 2c 20 69 6e 74 20 63 6f 75 6e 74 29 29 3b 20 r, int count));
19a80 2f 2a 20 34 38 31 20 2a 2f 0a 20 20 20 20 76 6f /* 481 */. vo
19a90 69 64 20 28 2a 74 63 6c 5f 47 65 74 54 69 6d 65 id (*tcl_GetTime
19aa0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
19ab0 63 6c 5f 54 69 6d 65 2a 20 74 69 6d 65 42 75 66 cl_Time* timeBuf
19ac0 29 29 3b 20 2f 2a 20 34 38 32 20 2a 2f 0a 20 20 )); /* 482 */.
19ad0 20 20 54 63 6c 5f 54 72 61 63 65 20 28 2a 74 63 Tcl_Trace (*tc
19ae0 6c 5f 43 72 65 61 74 65 4f 62 6a 54 72 61 63 65 l_CreateObjTrace
19af0 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
19b00 63 6c 5f 49 6e 74 65 72 70 2a 20 69 6e 74 65 72 cl_Interp* inter
19b10 70 2c 20 69 6e 74 20 6c 65 76 65 6c 2c 20 69 6e p, int level, in
19b20 74 20 66 6c 61 67 73 2c 20 54 63 6c 5f 43 6d 64 t flags, Tcl_Cmd
19b30 4f 62 6a 54 72 61 63 65 50 72 6f 63 2a 20 6f 62 ObjTraceProc* ob
19b40 6a 50 72 6f 63 2c 20 43 6c 69 65 6e 74 44 61 74 jProc, ClientDat
19b50 61 20 63 6c 69 65 6e 74 44 61 74 61 2c 20 54 63 a clientData, Tc
19b60 6c 5f 43 6d 64 4f 62 6a 54 72 61 63 65 44 65 6c l_CmdObjTraceDel
19b70 65 74 65 50 72 6f 63 2a 20 64 65 6c 50 72 6f 63 eteProc* delProc
19b80 29 29 3b 20 2f 2a 20 34 38 33 20 2a 2f 0a 20 20 )); /* 483 */.
19b90 20 20 69 6e 74 20 28 2a 74 63 6c 5f 47 65 74 43 int (*tcl_GetC
19ba0 6f 6d 6d 61 6e 64 49 6e 66 6f 46 72 6f 6d 54 6f ommandInfoFromTo
19bb0 6b 65 6e 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f ken) _ANSI_ARGS_
19bc0 28 28 54 63 6c 5f 43 6f 6d 6d 61 6e 64 20 74 6f ((Tcl_Command to
19bd0 6b 65 6e 2c 20 54 63 6c 5f 43 6d 64 49 6e 66 6f ken, Tcl_CmdInfo
19be0 2a 20 69 6e 66 6f 50 74 72 29 29 3b 20 2f 2a 20 * infoPtr)); /*
19bf0 34 38 34 20 2a 2f 0a 20 20 20 20 69 6e 74 20 28 484 */. int (
19c00 2a 74 63 6c 5f 53 65 74 43 6f 6d 6d 61 6e 64 49 *tcl_SetCommandI
19c10 6e 66 6f 46 72 6f 6d 54 6f 6b 65 6e 29 20 5f 41 nfoFromToken) _A
19c20 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 NSI_ARGS_((Tcl_C
19c30 6f 6d 6d 61 6e 64 20 74 6f 6b 65 6e 2c 20 43 4f ommand token, CO
19c40 4e 53 54 20 54 63 6c 5f 43 6d 64 49 6e 66 6f 2a NST Tcl_CmdInfo*
19c50 20 69 6e 66 6f 50 74 72 29 29 3b 20 2f 2a 20 34 infoPtr)); /* 4
19c60 38 35 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 4f 62 85 */. Tcl_Ob
19c70 6a 20 2a 20 28 2a 74 63 6c 5f 44 62 4e 65 77 57 j * (*tcl_DbNewW
19c80 69 64 65 49 6e 74 4f 62 6a 29 20 5f 41 4e 53 49 ideIntObj) _ANSI
19c90 5f 41 52 47 53 5f 28 28 54 63 6c 5f 57 69 64 65 _ARGS_((Tcl_Wide
19ca0 49 6e 74 20 77 69 64 65 56 61 6c 75 65 2c 20 43 Int wideValue, C
19cb0 4f 4e 53 54 20 63 68 61 72 20 2a 20 66 69 6c 65 ONST char * file
19cc0 2c 20 69 6e 74 20 6c 69 6e 65 29 29 3b 20 2f 2a , int line)); /*
19cd0 20 34 38 36 20 2a 2f 0a 20 20 20 20 69 6e 74 20 486 */. int
19ce0 28 2a 74 63 6c 5f 47 65 74 57 69 64 65 49 6e 74 (*tcl_GetWideInt
19cf0 46 72 6f 6d 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 FromObj) _ANSI_A
19d00 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
19d10 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
19d20 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 54 63 6c bj * objPtr, Tcl
19d30 5f 57 69 64 65 49 6e 74 20 2a 20 77 69 64 65 50 _WideInt * wideP
19d40 74 72 29 29 3b 20 2f 2a 20 34 38 37 20 2a 2f 0a tr)); /* 487 */.
19d50 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 20 28 2a Tcl_Obj * (*
19d60 74 63 6c 5f 4e 65 77 57 69 64 65 49 6e 74 4f 62 tcl_NewWideIntOb
19d70 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 j) _ANSI_ARGS_((
19d80 54 63 6c 5f 57 69 64 65 49 6e 74 20 77 69 64 65 Tcl_WideInt wide
19d90 56 61 6c 75 65 29 29 3b 20 2f 2a 20 34 38 38 20 Value)); /* 488
19da0 2a 2f 0a 20 20 20 20 76 6f 69 64 20 28 2a 74 63 */. void (*tc
19db0 6c 5f 53 65 74 57 69 64 65 49 6e 74 4f 62 6a 29 l_SetWideIntObj)
19dc0 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
19dd0 6c 5f 4f 62 6a 20 2a 20 6f 62 6a 50 74 72 2c 20 l_Obj * objPtr,
19de0 54 63 6c 5f 57 69 64 65 49 6e 74 20 77 69 64 65 Tcl_WideInt wide
19df0 56 61 6c 75 65 29 29 3b 20 2f 2a 20 34 38 39 20 Value)); /* 489
19e00 2a 2f 0a 20 20 20 20 54 63 6c 5f 53 74 61 74 42 */. Tcl_StatB
19e10 75 66 20 2a 20 28 2a 74 63 6c 5f 41 6c 6c 6f 63 uf * (*tcl_Alloc
19e20 53 74 61 74 42 75 66 29 20 5f 41 4e 53 49 5f 41 StatBuf) _ANSI_A
19e30 52 47 53 5f 28 28 76 6f 69 64 29 29 3b 20 2f 2a RGS_((void)); /*
19e40 20 34 39 30 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 490 */. Tcl_
19e50 57 69 64 65 49 6e 74 20 28 2a 74 63 6c 5f 53 65 WideInt (*tcl_Se
19e60 65 6b 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ek) _ANSI_ARGS_(
19e70 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 61 (Tcl_Channel cha
19e80 6e 2c 20 54 63 6c 5f 57 69 64 65 49 6e 74 20 6f n, Tcl_WideInt o
19e90 66 66 73 65 74 2c 20 69 6e 74 20 6d 6f 64 65 29 ffset, int mode)
19ea0 29 3b 20 2f 2a 20 34 39 31 20 2a 2f 0a 20 20 20 ); /* 491 */.
19eb0 20 54 63 6c 5f 57 69 64 65 49 6e 74 20 28 2a 74 Tcl_WideInt (*t
19ec0 63 6c 5f 54 65 6c 6c 29 20 5f 41 4e 53 49 5f 41 cl_Tell) _ANSI_A
19ed0 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e 6e 65 RGS_((Tcl_Channe
19ee0 6c 20 63 68 61 6e 29 29 3b 20 2f 2a 20 34 39 32 l chan)); /* 492
19ef0 20 2a 2f 0a 20 20 20 20 54 63 6c 5f 44 72 69 76 */. Tcl_Driv
19f00 65 72 57 69 64 65 53 65 65 6b 50 72 6f 63 20 2a erWideSeekProc *
19f10 20 28 2a 74 63 6c 5f 43 68 61 6e 6e 65 6c 57 69 (*tcl_ChannelWi
19f20 64 65 53 65 65 6b 50 72 6f 63 29 20 5f 41 4e 53 deSeekProc) _ANS
19f30 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 I_ARGS_((Tcl_Cha
19f40 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 nnelType * chanT
19f50 79 70 65 50 74 72 29 29 3b 20 2f 2a 20 34 39 33 ypePtr)); /* 493
19f60 20 2a 2f 0a 7d 20 54 63 6c 53 74 75 62 73 3b 0a */.} TclStubs;.
19f70 0a 23 69 66 64 65 66 20 5f 5f 63 70 6c 75 73 70 .#ifdef __cplusp
19f80 6c 75 73 0a 65 78 74 65 72 6e 20 22 43 22 20 7b lus.extern "C" {
19f90 0a 23 65 6e 64 69 66 0a 65 78 74 65 72 6e 20 54 .#endif.extern T
19fa0 63 6c 53 74 75 62 73 20 2a 74 63 6c 53 74 75 62 clStubs *tclStub
19fb0 73 50 74 72 3b 0a 23 69 66 64 65 66 20 5f 5f 63 sPtr;.#ifdef __c
19fc0 70 6c 75 73 70 6c 75 73 0a 7d 0a 23 65 6e 64 69 plusplus.}.#endi
19fd0 66 0a 0a 23 69 66 20 64 65 66 69 6e 65 64 28 55 f..#if defined(U
19fe0 53 45 5f 54 43 4c 5f 53 54 55 42 53 29 20 26 26 SE_TCL_STUBS) &&
19ff0 20 21 64 65 66 69 6e 65 64 28 55 53 45 5f 54 43 !defined(USE_TC
1a000 4c 5f 53 54 55 42 5f 50 52 4f 43 53 29 0a 0a 2f L_STUB_PROCS)../
1a010 2a 0a 20 2a 20 49 6e 6c 69 6e 65 20 66 75 6e 63 *. * Inline func
1a020 74 69 6f 6e 20 64 65 63 6c 61 72 61 74 69 6f 6e tion declaration
1a030 73 3a 0a 20 2a 2f 0a 0a 23 69 66 6e 64 65 66 20 s:. */..#ifndef
1a040 54 63 6c 5f 50 6b 67 50 72 6f 76 69 64 65 45 78 Tcl_PkgProvideEx
1a050 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 50 6b 67 .#define Tcl_Pkg
1a060 50 72 6f 76 69 64 65 45 78 20 5c 0a 09 28 74 63 ProvideEx \..(tc
1a070 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 50 lStubsPtr->tcl_P
1a080 6b 67 50 72 6f 76 69 64 65 45 78 29 20 2f 2a 20 kgProvideEx) /*
1a090 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 0 */.#endif.#ifn
1a0a0 64 65 66 20 54 63 6c 5f 50 6b 67 52 65 71 75 69 def Tcl_PkgRequi
1a0b0 72 65 45 78 0a 23 64 65 66 69 6e 65 20 54 63 6c reEx.#define Tcl
1a0c0 5f 50 6b 67 52 65 71 75 69 72 65 45 78 20 5c 0a _PkgRequireEx \.
1a0d0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1a0e0 63 6c 5f 50 6b 67 52 65 71 75 69 72 65 45 78 29 cl_PkgRequireEx)
1a0f0 20 2f 2a 20 31 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 1 */.#endif.
1a100 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 61 6e 69 #ifndef Tcl_Pani
1a110 63 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 50 61 c.#define Tcl_Pa
1a120 6e 69 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 nic \..(tclStubs
1a130 50 74 72 2d 3e 74 63 6c 5f 50 61 6e 69 63 29 20 Ptr->tcl_Panic)
1a140 2f 2a 20 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 /* 2 */.#endif.#
1a150 69 66 6e 64 65 66 20 54 63 6c 5f 41 6c 6c 6f 63 ifndef Tcl_Alloc
1a160 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 41 6c 6c .#define Tcl_All
1a170 6f 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 oc \..(tclStubsP
1a180 74 72 2d 3e 74 63 6c 5f 41 6c 6c 6f 63 29 20 2f tr->tcl_Alloc) /
1a190 2a 20 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 * 3 */.#endif.#i
1a1a0 66 6e 64 65 66 20 54 63 6c 5f 46 72 65 65 0a 23 fndef Tcl_Free.#
1a1b0 64 65 66 69 6e 65 20 54 63 6c 5f 46 72 65 65 20 define Tcl_Free
1a1c0 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1a1d0 3e 74 63 6c 5f 46 72 65 65 29 20 2f 2a 20 34 20 >tcl_Free) /* 4
1a1e0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1a1f0 66 20 54 63 6c 5f 52 65 61 6c 6c 6f 63 0a 23 64 f Tcl_Realloc.#d
1a200 65 66 69 6e 65 20 54 63 6c 5f 52 65 61 6c 6c 6f efine Tcl_Reallo
1a210 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 c \..(tclStubsPt
1a220 72 2d 3e 74 63 6c 5f 52 65 61 6c 6c 6f 63 29 20 r->tcl_Realloc)
1a230 2f 2a 20 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 /* 5 */.#endif.#
1a240 69 66 6e 64 65 66 20 54 63 6c 5f 44 62 43 6b 61 ifndef Tcl_DbCka
1a250 6c 6c 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 6c lloc.#define Tcl
1a260 5f 44 62 43 6b 61 6c 6c 6f 63 20 5c 0a 09 28 74 _DbCkalloc \..(t
1a270 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1a280 44 62 43 6b 61 6c 6c 6f 63 29 20 2f 2a 20 36 20 DbCkalloc) /* 6
1a290 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1a2a0 66 20 54 63 6c 5f 44 62 43 6b 66 72 65 65 0a 23 f Tcl_DbCkfree.#
1a2b0 64 65 66 69 6e 65 20 54 63 6c 5f 44 62 43 6b 66 define Tcl_DbCkf
1a2c0 72 65 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ree \..(tclStubs
1a2d0 50 74 72 2d 3e 74 63 6c 5f 44 62 43 6b 66 72 65 Ptr->tcl_DbCkfre
1a2e0 65 29 20 2f 2a 20 37 20 2a 2f 0a 23 65 6e 64 69 e) /* 7 */.#endi
1a2f0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 62 f.#ifndef Tcl_Db
1a300 43 6b 72 65 61 6c 6c 6f 63 0a 23 64 65 66 69 6e Ckrealloc.#defin
1a310 65 20 54 63 6c 5f 44 62 43 6b 72 65 61 6c 6c 6f e Tcl_DbCkreallo
1a320 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 c \..(tclStubsPt
1a330 72 2d 3e 74 63 6c 5f 44 62 43 6b 72 65 61 6c 6c r->tcl_DbCkreall
1a340 6f 63 29 20 2f 2a 20 38 20 2a 2f 0a 23 65 6e 64 oc) /* 8 */.#end
1a350 69 66 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28 if.#if !defined(
1a360 5f 5f 57 49 4e 33 32 5f 5f 29 20 26 26 20 21 64 __WIN32__) && !d
1a370 65 66 69 6e 65 64 28 4d 41 43 5f 54 43 4c 29 20 efined(MAC_TCL)
1a380 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 66 6e 64 /* UNIX */.#ifnd
1a390 65 66 20 54 63 6c 5f 43 72 65 61 74 65 46 69 6c ef Tcl_CreateFil
1a3a0 65 48 61 6e 64 6c 65 72 0a 23 64 65 66 69 6e 65 eHandler.#define
1a3b0 20 54 63 6c 5f 43 72 65 61 74 65 46 69 6c 65 48 Tcl_CreateFileH
1a3c0 61 6e 64 6c 65 72 20 5c 0a 09 28 74 63 6c 53 74 andler \..(tclSt
1a3d0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 72 65 61 ubsPtr->tcl_Crea
1a3e0 74 65 46 69 6c 65 48 61 6e 64 6c 65 72 29 20 2f teFileHandler) /
1a3f0 2a 20 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 65 * 9 */.#endif.#e
1a400 6e 64 69 66 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a ndif /* UNIX */.
1a410 23 69 66 20 21 64 65 66 69 6e 65 64 28 5f 5f 57 #if !defined(__W
1a420 49 4e 33 32 5f 5f 29 20 26 26 20 21 64 65 66 69 IN32__) && !defi
1a430 6e 65 64 28 4d 41 43 5f 54 43 4c 29 20 2f 2a 20 ned(MAC_TCL) /*
1a440 55 4e 49 58 20 2a 2f 0a 23 69 66 6e 64 65 66 20 UNIX */.#ifndef
1a450 54 63 6c 5f 44 65 6c 65 74 65 46 69 6c 65 48 61 Tcl_DeleteFileHa
1a460 6e 64 6c 65 72 0a 23 64 65 66 69 6e 65 20 54 63 ndler.#define Tc
1a470 6c 5f 44 65 6c 65 74 65 46 69 6c 65 48 61 6e 64 l_DeleteFileHand
1a480 6c 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ler \..(tclStubs
1a490 50 74 72 2d 3e 74 63 6c 5f 44 65 6c 65 74 65 46 Ptr->tcl_DeleteF
1a4a0 69 6c 65 48 61 6e 64 6c 65 72 29 20 2f 2a 20 31 ileHandler) /* 1
1a4b0 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 65 6e 64 0 */.#endif.#end
1a4c0 69 66 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 if /* UNIX */.#i
1a4d0 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 54 69 6d fndef Tcl_SetTim
1a4e0 65 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 er.#define Tcl_S
1a4f0 65 74 54 69 6d 65 72 20 5c 0a 09 28 74 63 6c 53 etTimer \..(tclS
1a500 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 tubsPtr->tcl_Set
1a510 54 69 6d 65 72 29 20 2f 2a 20 31 31 20 2a 2f 0a Timer) /* 11 */.
1a520 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1a530 63 6c 5f 53 6c 65 65 70 0a 23 64 65 66 69 6e 65 cl_Sleep.#define
1a540 20 54 63 6c 5f 53 6c 65 65 70 20 5c 0a 09 28 74 Tcl_Sleep \..(t
1a550 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1a560 53 6c 65 65 70 29 20 2f 2a 20 31 32 20 2a 2f 0a Sleep) /* 12 */.
1a570 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1a580 63 6c 5f 57 61 69 74 46 6f 72 45 76 65 6e 74 0a cl_WaitForEvent.
1a590 23 64 65 66 69 6e 65 20 54 63 6c 5f 57 61 69 74 #define Tcl_Wait
1a5a0 46 6f 72 45 76 65 6e 74 20 5c 0a 09 28 74 63 6c ForEvent \..(tcl
1a5b0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 57 61 StubsPtr->tcl_Wa
1a5c0 69 74 46 6f 72 45 76 65 6e 74 29 20 2f 2a 20 31 itForEvent) /* 1
1a5d0 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
1a5e0 64 65 66 20 54 63 6c 5f 41 70 70 65 6e 64 41 6c def Tcl_AppendAl
1a5f0 6c 4f 62 6a 54 79 70 65 73 0a 23 64 65 66 69 6e lObjTypes.#defin
1a600 65 20 54 63 6c 5f 41 70 70 65 6e 64 41 6c 6c 4f e Tcl_AppendAllO
1a610 62 6a 54 79 70 65 73 20 5c 0a 09 28 74 63 6c 53 bjTypes \..(tclS
1a620 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 70 70 tubsPtr->tcl_App
1a630 65 6e 64 41 6c 6c 4f 62 6a 54 79 70 65 73 29 20 endAllObjTypes)
1a640 2f 2a 20 31 34 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 14 */.#endif.
1a650 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 70 70 65 #ifndef Tcl_Appe
1a660 6e 64 53 74 72 69 6e 67 73 54 6f 4f 62 6a 0a 23 ndStringsToObj.#
1a670 64 65 66 69 6e 65 20 54 63 6c 5f 41 70 70 65 6e define Tcl_Appen
1a680 64 53 74 72 69 6e 67 73 54 6f 4f 62 6a 20 5c 0a dStringsToObj \.
1a690 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1a6a0 63 6c 5f 41 70 70 65 6e 64 53 74 72 69 6e 67 73 cl_AppendStrings
1a6b0 54 6f 4f 62 6a 29 20 2f 2a 20 31 35 20 2a 2f 0a ToObj) /* 15 */.
1a6c0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1a6d0 63 6c 5f 41 70 70 65 6e 64 54 6f 4f 62 6a 0a 23 cl_AppendToObj.#
1a6e0 64 65 66 69 6e 65 20 54 63 6c 5f 41 70 70 65 6e define Tcl_Appen
1a6f0 64 54 6f 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 dToObj \..(tclSt
1a700 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 70 70 65 ubsPtr->tcl_Appe
1a710 6e 64 54 6f 4f 62 6a 29 20 2f 2a 20 31 36 20 2a ndToObj) /* 16 *
1a720 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1a730 20 54 63 6c 5f 43 6f 6e 63 61 74 4f 62 6a 0a 23 Tcl_ConcatObj.#
1a740 64 65 66 69 6e 65 20 54 63 6c 5f 43 6f 6e 63 61 define Tcl_Conca
1a750 74 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 tObj \..(tclStub
1a760 73 50 74 72 2d 3e 74 63 6c 5f 43 6f 6e 63 61 74 sPtr->tcl_Concat
1a770 4f 62 6a 29 20 2f 2a 20 31 37 20 2a 2f 0a 23 65 Obj) /* 17 */.#e
1a780 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1a790 5f 43 6f 6e 76 65 72 74 54 6f 54 79 70 65 0a 23 _ConvertToType.#
1a7a0 64 65 66 69 6e 65 20 54 63 6c 5f 43 6f 6e 76 65 define Tcl_Conve
1a7b0 72 74 54 6f 54 79 70 65 20 5c 0a 09 28 74 63 6c rtToType \..(tcl
1a7c0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 6f StubsPtr->tcl_Co
1a7d0 6e 76 65 72 74 54 6f 54 79 70 65 29 20 2f 2a 20 nvertToType) /*
1a7e0 31 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 18 */.#endif.#if
1a7f0 6e 64 65 66 20 54 63 6c 5f 44 62 44 65 63 72 52 ndef Tcl_DbDecrR
1a800 65 66 43 6f 75 6e 74 0a 23 64 65 66 69 6e 65 20 efCount.#define
1a810 54 63 6c 5f 44 62 44 65 63 72 52 65 66 43 6f 75 Tcl_DbDecrRefCou
1a820 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 nt \..(tclStubsP
1a830 74 72 2d 3e 74 63 6c 5f 44 62 44 65 63 72 52 65 tr->tcl_DbDecrRe
1a840 66 43 6f 75 6e 74 29 20 2f 2a 20 31 39 20 2a 2f fCount) /* 19 */
1a850 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1a860 54 63 6c 5f 44 62 49 6e 63 72 52 65 66 43 6f 75 Tcl_DbIncrRefCou
1a870 6e 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 nt.#define Tcl_D
1a880 62 49 6e 63 72 52 65 66 43 6f 75 6e 74 20 5c 0a bIncrRefCount \.
1a890 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1a8a0 63 6c 5f 44 62 49 6e 63 72 52 65 66 43 6f 75 6e cl_DbIncrRefCoun
1a8b0 74 29 20 2f 2a 20 32 30 20 2a 2f 0a 23 65 6e 64 t) /* 20 */.#end
1a8c0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 if.#ifndef Tcl_D
1a8d0 62 49 73 53 68 61 72 65 64 0a 23 64 65 66 69 6e bIsShared.#defin
1a8e0 65 20 54 63 6c 5f 44 62 49 73 53 68 61 72 65 64 e Tcl_DbIsShared
1a8f0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1a900 2d 3e 74 63 6c 5f 44 62 49 73 53 68 61 72 65 64 ->tcl_DbIsShared
1a910 29 20 2f 2a 20 32 31 20 2a 2f 0a 23 65 6e 64 69 ) /* 21 */.#endi
1a920 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 62 f.#ifndef Tcl_Db
1a930 4e 65 77 42 6f 6f 6c 65 61 6e 4f 62 6a 0a 23 64 NewBooleanObj.#d
1a940 65 66 69 6e 65 20 54 63 6c 5f 44 62 4e 65 77 42 efine Tcl_DbNewB
1a950 6f 6f 6c 65 61 6e 4f 62 6a 20 5c 0a 09 28 74 63 ooleanObj \..(tc
1a960 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 lStubsPtr->tcl_D
1a970 62 4e 65 77 42 6f 6f 6c 65 61 6e 4f 62 6a 29 20 bNewBooleanObj)
1a980 2f 2a 20 32 32 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 22 */.#endif.
1a990 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 62 4e 65 #ifndef Tcl_DbNe
1a9a0 77 42 79 74 65 41 72 72 61 79 4f 62 6a 0a 23 64 wByteArrayObj.#d
1a9b0 65 66 69 6e 65 20 54 63 6c 5f 44 62 4e 65 77 42 efine Tcl_DbNewB
1a9c0 79 74 65 41 72 72 61 79 4f 62 6a 20 5c 0a 09 28 yteArrayObj \..(
1a9d0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1a9e0 5f 44 62 4e 65 77 42 79 74 65 41 72 72 61 79 4f _DbNewByteArrayO
1a9f0 62 6a 29 20 2f 2a 20 32 33 20 2a 2f 0a 23 65 6e bj) /* 23 */.#en
1aa00 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1aa10 44 62 4e 65 77 44 6f 75 62 6c 65 4f 62 6a 0a 23 DbNewDoubleObj.#
1aa20 64 65 66 69 6e 65 20 54 63 6c 5f 44 62 4e 65 77 define Tcl_DbNew
1aa30 44 6f 75 62 6c 65 4f 62 6a 20 5c 0a 09 28 74 63 DoubleObj \..(tc
1aa40 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 lStubsPtr->tcl_D
1aa50 62 4e 65 77 44 6f 75 62 6c 65 4f 62 6a 29 20 2f bNewDoubleObj) /
1aa60 2a 20 32 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 * 24 */.#endif.#
1aa70 69 66 6e 64 65 66 20 54 63 6c 5f 44 62 4e 65 77 ifndef Tcl_DbNew
1aa80 4c 69 73 74 4f 62 6a 0a 23 64 65 66 69 6e 65 20 ListObj.#define
1aa90 54 63 6c 5f 44 62 4e 65 77 4c 69 73 74 4f 62 6a Tcl_DbNewListObj
1aaa0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1aab0 2d 3e 74 63 6c 5f 44 62 4e 65 77 4c 69 73 74 4f ->tcl_DbNewListO
1aac0 62 6a 29 20 2f 2a 20 32 35 20 2a 2f 0a 23 65 6e bj) /* 25 */.#en
1aad0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1aae0 44 62 4e 65 77 4c 6f 6e 67 4f 62 6a 0a 23 64 65 DbNewLongObj.#de
1aaf0 66 69 6e 65 20 54 63 6c 5f 44 62 4e 65 77 4c 6f fine Tcl_DbNewLo
1ab00 6e 67 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 ngObj \..(tclStu
1ab10 62 73 50 74 72 2d 3e 74 63 6c 5f 44 62 4e 65 77 bsPtr->tcl_DbNew
1ab20 4c 6f 6e 67 4f 62 6a 29 20 2f 2a 20 32 36 20 2a LongObj) /* 26 *
1ab30 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1ab40 20 54 63 6c 5f 44 62 4e 65 77 4f 62 6a 0a 23 64 Tcl_DbNewObj.#d
1ab50 65 66 69 6e 65 20 54 63 6c 5f 44 62 4e 65 77 4f efine Tcl_DbNewO
1ab60 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 bj \..(tclStubsP
1ab70 74 72 2d 3e 74 63 6c 5f 44 62 4e 65 77 4f 62 6a tr->tcl_DbNewObj
1ab80 29 20 2f 2a 20 32 37 20 2a 2f 0a 23 65 6e 64 69 ) /* 27 */.#endi
1ab90 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 62 f.#ifndef Tcl_Db
1aba0 4e 65 77 53 74 72 69 6e 67 4f 62 6a 0a 23 64 65 NewStringObj.#de
1abb0 66 69 6e 65 20 54 63 6c 5f 44 62 4e 65 77 53 74 fine Tcl_DbNewSt
1abc0 72 69 6e 67 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 ringObj \..(tclS
1abd0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 62 4e tubsPtr->tcl_DbN
1abe0 65 77 53 74 72 69 6e 67 4f 62 6a 29 20 2f 2a 20 ewStringObj) /*
1abf0 32 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 28 */.#endif.#if
1ac00 6e 64 65 66 20 54 63 6c 5f 44 75 70 6c 69 63 61 ndef Tcl_Duplica
1ac10 74 65 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 teObj.#define Tc
1ac20 6c 5f 44 75 70 6c 69 63 61 74 65 4f 62 6a 20 5c l_DuplicateObj \
1ac30 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1ac40 74 63 6c 5f 44 75 70 6c 69 63 61 74 65 4f 62 6a tcl_DuplicateObj
1ac50 29 20 2f 2a 20 32 39 20 2a 2f 0a 23 65 6e 64 69 ) /* 29 */.#endi
1ac60 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 46 72 65 f.#ifndef TclFre
1ac70 65 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c eObj.#define Tcl
1ac80 46 72 65 65 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 FreeObj \..(tclS
1ac90 74 75 62 73 50 74 72 2d 3e 74 63 6c 46 72 65 65 tubsPtr->tclFree
1aca0 4f 62 6a 29 20 2f 2a 20 33 30 20 2a 2f 0a 23 65 Obj) /* 30 */.#e
1acb0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1acc0 5f 47 65 74 42 6f 6f 6c 65 61 6e 0a 23 64 65 66 _GetBoolean.#def
1acd0 69 6e 65 20 54 63 6c 5f 47 65 74 42 6f 6f 6c 65 ine Tcl_GetBoole
1ace0 61 6e 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 an \..(tclStubsP
1acf0 74 72 2d 3e 74 63 6c 5f 47 65 74 42 6f 6f 6c 65 tr->tcl_GetBoole
1ad00 61 6e 29 20 2f 2a 20 33 31 20 2a 2f 0a 23 65 6e an) /* 31 */.#en
1ad10 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1ad20 47 65 74 42 6f 6f 6c 65 61 6e 46 72 6f 6d 4f 62 GetBooleanFromOb
1ad30 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 j.#define Tcl_Ge
1ad40 74 42 6f 6f 6c 65 61 6e 46 72 6f 6d 4f 62 6a 20 tBooleanFromObj
1ad50 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1ad60 3e 74 63 6c 5f 47 65 74 42 6f 6f 6c 65 61 6e 46 >tcl_GetBooleanF
1ad70 72 6f 6d 4f 62 6a 29 20 2f 2a 20 33 32 20 2a 2f romObj) /* 32 */
1ad80 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1ad90 54 63 6c 5f 47 65 74 42 79 74 65 41 72 72 61 79 Tcl_GetByteArray
1ada0 46 72 6f 6d 4f 62 6a 0a 23 64 65 66 69 6e 65 20 FromObj.#define
1adb0 54 63 6c 5f 47 65 74 42 79 74 65 41 72 72 61 79 Tcl_GetByteArray
1adc0 46 72 6f 6d 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 FromObj \..(tclS
1add0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
1ade0 42 79 74 65 41 72 72 61 79 46 72 6f 6d 4f 62 6a ByteArrayFromObj
1adf0 29 20 2f 2a 20 33 33 20 2a 2f 0a 23 65 6e 64 69 ) /* 33 */.#endi
1ae00 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 f.#ifndef Tcl_Ge
1ae10 74 44 6f 75 62 6c 65 0a 23 64 65 66 69 6e 65 20 tDouble.#define
1ae20 54 63 6c 5f 47 65 74 44 6f 75 62 6c 65 20 5c 0a Tcl_GetDouble \.
1ae30 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1ae40 63 6c 5f 47 65 74 44 6f 75 62 6c 65 29 20 2f 2a cl_GetDouble) /*
1ae50 20 33 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 34 */.#endif.#i
1ae60 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 44 6f 75 fndef Tcl_GetDou
1ae70 62 6c 65 46 72 6f 6d 4f 62 6a 0a 23 64 65 66 69 bleFromObj.#defi
1ae80 6e 65 20 54 63 6c 5f 47 65 74 44 6f 75 62 6c 65 ne Tcl_GetDouble
1ae90 46 72 6f 6d 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 FromObj \..(tclS
1aea0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
1aeb0 44 6f 75 62 6c 65 46 72 6f 6d 4f 62 6a 29 20 2f DoubleFromObj) /
1aec0 2a 20 33 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 * 35 */.#endif.#
1aed0 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 49 6e ifndef Tcl_GetIn
1aee0 64 65 78 46 72 6f 6d 4f 62 6a 0a 23 64 65 66 69 dexFromObj.#defi
1aef0 6e 65 20 54 63 6c 5f 47 65 74 49 6e 64 65 78 46 ne Tcl_GetIndexF
1af00 72 6f 6d 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 romObj \..(tclSt
1af10 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 49 ubsPtr->tcl_GetI
1af20 6e 64 65 78 46 72 6f 6d 4f 62 6a 29 20 2f 2a 20 ndexFromObj) /*
1af30 33 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 36 */.#endif.#if
1af40 6e 64 65 66 20 54 63 6c 5f 47 65 74 49 6e 74 0a ndef Tcl_GetInt.
1af50 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 49 #define Tcl_GetI
1af60 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 nt \..(tclStubsP
1af70 74 72 2d 3e 74 63 6c 5f 47 65 74 49 6e 74 29 20 tr->tcl_GetInt)
1af80 2f 2a 20 33 37 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 37 */.#endif.
1af90 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 49 #ifndef Tcl_GetI
1afa0 6e 74 46 72 6f 6d 4f 62 6a 0a 23 64 65 66 69 6e ntFromObj.#defin
1afb0 65 20 54 63 6c 5f 47 65 74 49 6e 74 46 72 6f 6d e Tcl_GetIntFrom
1afc0 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Obj \..(tclStubs
1afd0 50 74 72 2d 3e 74 63 6c 5f 47 65 74 49 6e 74 46 Ptr->tcl_GetIntF
1afe0 72 6f 6d 4f 62 6a 29 20 2f 2a 20 33 38 20 2a 2f romObj) /* 38 */
1aff0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1b000 54 63 6c 5f 47 65 74 4c 6f 6e 67 46 72 6f 6d 4f Tcl_GetLongFromO
1b010 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 bj.#define Tcl_G
1b020 65 74 4c 6f 6e 67 46 72 6f 6d 4f 62 6a 20 5c 0a etLongFromObj \.
1b030 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1b040 63 6c 5f 47 65 74 4c 6f 6e 67 46 72 6f 6d 4f 62 cl_GetLongFromOb
1b050 6a 29 20 2f 2a 20 33 39 20 2a 2f 0a 23 65 6e 64 j) /* 39 */.#end
1b060 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 if.#ifndef Tcl_G
1b070 65 74 4f 62 6a 54 79 70 65 0a 23 64 65 66 69 6e etObjType.#defin
1b080 65 20 54 63 6c 5f 47 65 74 4f 62 6a 54 79 70 65 e Tcl_GetObjType
1b090 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1b0a0 2d 3e 74 63 6c 5f 47 65 74 4f 62 6a 54 79 70 65 ->tcl_GetObjType
1b0b0 29 20 2f 2a 20 34 30 20 2a 2f 0a 23 65 6e 64 69 ) /* 40 */.#endi
1b0c0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 f.#ifndef Tcl_Ge
1b0d0 74 53 74 72 69 6e 67 46 72 6f 6d 4f 62 6a 0a 23 tStringFromObj.#
1b0e0 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 53 74 define Tcl_GetSt
1b0f0 72 69 6e 67 46 72 6f 6d 4f 62 6a 20 5c 0a 09 28 ringFromObj \..(
1b100 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1b110 5f 47 65 74 53 74 72 69 6e 67 46 72 6f 6d 4f 62 _GetStringFromOb
1b120 6a 29 20 2f 2a 20 34 31 20 2a 2f 0a 23 65 6e 64 j) /* 41 */.#end
1b130 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 49 if.#ifndef Tcl_I
1b140 6e 76 61 6c 69 64 61 74 65 53 74 72 69 6e 67 52 nvalidateStringR
1b150 65 70 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 49 ep.#define Tcl_I
1b160 6e 76 61 6c 69 64 61 74 65 53 74 72 69 6e 67 52 nvalidateStringR
1b170 65 70 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 ep \..(tclStubsP
1b180 74 72 2d 3e 74 63 6c 5f 49 6e 76 61 6c 69 64 61 tr->tcl_Invalida
1b190 74 65 53 74 72 69 6e 67 52 65 70 29 20 2f 2a 20 teStringRep) /*
1b1a0 34 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 42 */.#endif.#if
1b1b0 6e 64 65 66 20 54 63 6c 5f 4c 69 73 74 4f 62 6a ndef Tcl_ListObj
1b1c0 41 70 70 65 6e 64 4c 69 73 74 0a 23 64 65 66 69 AppendList.#defi
1b1d0 6e 65 20 54 63 6c 5f 4c 69 73 74 4f 62 6a 41 70 ne Tcl_ListObjAp
1b1e0 70 65 6e 64 4c 69 73 74 20 5c 0a 09 28 74 63 6c pendList \..(tcl
1b1f0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4c 69 StubsPtr->tcl_Li
1b200 73 74 4f 62 6a 41 70 70 65 6e 64 4c 69 73 74 29 stObjAppendList)
1b210 20 2f 2a 20 34 33 20 2a 2f 0a 23 65 6e 64 69 66 /* 43 */.#endif
1b220 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4c 69 73 .#ifndef Tcl_Lis
1b230 74 4f 62 6a 41 70 70 65 6e 64 45 6c 65 6d 65 6e tObjAppendElemen
1b240 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 4c 69 t.#define Tcl_Li
1b250 73 74 4f 62 6a 41 70 70 65 6e 64 45 6c 65 6d 65 stObjAppendEleme
1b260 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 nt \..(tclStubsP
1b270 74 72 2d 3e 74 63 6c 5f 4c 69 73 74 4f 62 6a 41 tr->tcl_ListObjA
1b280 70 70 65 6e 64 45 6c 65 6d 65 6e 74 29 20 2f 2a ppendElement) /*
1b290 20 34 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 44 */.#endif.#i
1b2a0 66 6e 64 65 66 20 54 63 6c 5f 4c 69 73 74 4f 62 fndef Tcl_ListOb
1b2b0 6a 47 65 74 45 6c 65 6d 65 6e 74 73 0a 23 64 65 jGetElements.#de
1b2c0 66 69 6e 65 20 54 63 6c 5f 4c 69 73 74 4f 62 6a fine Tcl_ListObj
1b2d0 47 65 74 45 6c 65 6d 65 6e 74 73 20 5c 0a 09 28 GetElements \..(
1b2e0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1b2f0 5f 4c 69 73 74 4f 62 6a 47 65 74 45 6c 65 6d 65 _ListObjGetEleme
1b300 6e 74 73 29 20 2f 2a 20 34 35 20 2a 2f 0a 23 65 nts) /* 45 */.#e
1b310 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1b320 5f 4c 69 73 74 4f 62 6a 49 6e 64 65 78 0a 23 64 _ListObjIndex.#d
1b330 65 66 69 6e 65 20 54 63 6c 5f 4c 69 73 74 4f 62 efine Tcl_ListOb
1b340 6a 49 6e 64 65 78 20 5c 0a 09 28 74 63 6c 53 74 jIndex \..(tclSt
1b350 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4c 69 73 74 ubsPtr->tcl_List
1b360 4f 62 6a 49 6e 64 65 78 29 20 2f 2a 20 34 36 20 ObjIndex) /* 46
1b370 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1b380 66 20 54 63 6c 5f 4c 69 73 74 4f 62 6a 4c 65 6e f Tcl_ListObjLen
1b390 67 74 68 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f gth.#define Tcl_
1b3a0 4c 69 73 74 4f 62 6a 4c 65 6e 67 74 68 20 5c 0a ListObjLength \.
1b3b0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1b3c0 63 6c 5f 4c 69 73 74 4f 62 6a 4c 65 6e 67 74 68 cl_ListObjLength
1b3d0 29 20 2f 2a 20 34 37 20 2a 2f 0a 23 65 6e 64 69 ) /* 47 */.#endi
1b3e0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4c 69 f.#ifndef Tcl_Li
1b3f0 73 74 4f 62 6a 52 65 70 6c 61 63 65 0a 23 64 65 stObjReplace.#de
1b400 66 69 6e 65 20 54 63 6c 5f 4c 69 73 74 4f 62 6a fine Tcl_ListObj
1b410 52 65 70 6c 61 63 65 20 5c 0a 09 28 74 63 6c 53 Replace \..(tclS
1b420 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4c 69 73 tubsPtr->tcl_Lis
1b430 74 4f 62 6a 52 65 70 6c 61 63 65 29 20 2f 2a 20 tObjReplace) /*
1b440 34 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 48 */.#endif.#if
1b450 6e 64 65 66 20 54 63 6c 5f 4e 65 77 42 6f 6f 6c ndef Tcl_NewBool
1b460 65 61 6e 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 eanObj.#define T
1b470 63 6c 5f 4e 65 77 42 6f 6f 6c 65 61 6e 4f 62 6a cl_NewBooleanObj
1b480 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1b490 2d 3e 74 63 6c 5f 4e 65 77 42 6f 6f 6c 65 61 6e ->tcl_NewBoolean
1b4a0 4f 62 6a 29 20 2f 2a 20 34 39 20 2a 2f 0a 23 65 Obj) /* 49 */.#e
1b4b0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1b4c0 5f 4e 65 77 42 79 74 65 41 72 72 61 79 4f 62 6a _NewByteArrayObj
1b4d0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 4e 65 77 .#define Tcl_New
1b4e0 42 79 74 65 41 72 72 61 79 4f 62 6a 20 5c 0a 09 ByteArrayObj \..
1b4f0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1b500 6c 5f 4e 65 77 42 79 74 65 41 72 72 61 79 4f 62 l_NewByteArrayOb
1b510 6a 29 20 2f 2a 20 35 30 20 2a 2f 0a 23 65 6e 64 j) /* 50 */.#end
1b520 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4e if.#ifndef Tcl_N
1b530 65 77 44 6f 75 62 6c 65 4f 62 6a 0a 23 64 65 66 ewDoubleObj.#def
1b540 69 6e 65 20 54 63 6c 5f 4e 65 77 44 6f 75 62 6c ine Tcl_NewDoubl
1b550 65 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 eObj \..(tclStub
1b560 73 50 74 72 2d 3e 74 63 6c 5f 4e 65 77 44 6f 75 sPtr->tcl_NewDou
1b570 62 6c 65 4f 62 6a 29 20 2f 2a 20 35 31 20 2a 2f bleObj) /* 51 */
1b580 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1b590 54 63 6c 5f 4e 65 77 49 6e 74 4f 62 6a 0a 23 64 Tcl_NewIntObj.#d
1b5a0 65 66 69 6e 65 20 54 63 6c 5f 4e 65 77 49 6e 74 efine Tcl_NewInt
1b5b0 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Obj \..(tclStubs
1b5c0 50 74 72 2d 3e 74 63 6c 5f 4e 65 77 49 6e 74 4f Ptr->tcl_NewIntO
1b5d0 62 6a 29 20 2f 2a 20 35 32 20 2a 2f 0a 23 65 6e bj) /* 52 */.#en
1b5e0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1b5f0 4e 65 77 4c 69 73 74 4f 62 6a 0a 23 64 65 66 69 NewListObj.#defi
1b600 6e 65 20 54 63 6c 5f 4e 65 77 4c 69 73 74 4f 62 ne Tcl_NewListOb
1b610 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 j \..(tclStubsPt
1b620 72 2d 3e 74 63 6c 5f 4e 65 77 4c 69 73 74 4f 62 r->tcl_NewListOb
1b630 6a 29 20 2f 2a 20 35 33 20 2a 2f 0a 23 65 6e 64 j) /* 53 */.#end
1b640 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4e if.#ifndef Tcl_N
1b650 65 77 4c 6f 6e 67 4f 62 6a 0a 23 64 65 66 69 6e ewLongObj.#defin
1b660 65 20 54 63 6c 5f 4e 65 77 4c 6f 6e 67 4f 62 6a e Tcl_NewLongObj
1b670 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1b680 2d 3e 74 63 6c 5f 4e 65 77 4c 6f 6e 67 4f 62 6a ->tcl_NewLongObj
1b690 29 20 2f 2a 20 35 34 20 2a 2f 0a 23 65 6e 64 69 ) /* 54 */.#endi
1b6a0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4e 65 f.#ifndef Tcl_Ne
1b6b0 77 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c wObj.#define Tcl
1b6c0 5f 4e 65 77 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 _NewObj \..(tclS
1b6d0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4e 65 77 tubsPtr->tcl_New
1b6e0 4f 62 6a 29 20 2f 2a 20 35 35 20 2a 2f 0a 23 65 Obj) /* 55 */.#e
1b6f0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1b700 5f 4e 65 77 53 74 72 69 6e 67 4f 62 6a 0a 23 64 _NewStringObj.#d
1b710 65 66 69 6e 65 20 54 63 6c 5f 4e 65 77 53 74 72 efine Tcl_NewStr
1b720 69 6e 67 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 ingObj \..(tclSt
1b730 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4e 65 77 53 ubsPtr->tcl_NewS
1b740 74 72 69 6e 67 4f 62 6a 29 20 2f 2a 20 35 36 20 tringObj) /* 56
1b750 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1b760 66 20 54 63 6c 5f 53 65 74 42 6f 6f 6c 65 61 6e f Tcl_SetBoolean
1b770 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Obj.#define Tcl_
1b780 53 65 74 42 6f 6f 6c 65 61 6e 4f 62 6a 20 5c 0a SetBooleanObj \.
1b790 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1b7a0 63 6c 5f 53 65 74 42 6f 6f 6c 65 61 6e 4f 62 6a cl_SetBooleanObj
1b7b0 29 20 2f 2a 20 35 37 20 2a 2f 0a 23 65 6e 64 69 ) /* 57 */.#endi
1b7c0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 f.#ifndef Tcl_Se
1b7d0 74 42 79 74 65 41 72 72 61 79 4c 65 6e 67 74 68 tByteArrayLength
1b7e0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 .#define Tcl_Set
1b7f0 42 79 74 65 41 72 72 61 79 4c 65 6e 67 74 68 20 ByteArrayLength
1b800 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1b810 3e 74 63 6c 5f 53 65 74 42 79 74 65 41 72 72 61 >tcl_SetByteArra
1b820 79 4c 65 6e 67 74 68 29 20 2f 2a 20 35 38 20 2a yLength) /* 58 *
1b830 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1b840 20 54 63 6c 5f 53 65 74 42 79 74 65 41 72 72 61 Tcl_SetByteArra
1b850 79 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c yObj.#define Tcl
1b860 5f 53 65 74 42 79 74 65 41 72 72 61 79 4f 62 6a _SetByteArrayObj
1b870 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1b880 2d 3e 74 63 6c 5f 53 65 74 42 79 74 65 41 72 72 ->tcl_SetByteArr
1b890 61 79 4f 62 6a 29 20 2f 2a 20 35 39 20 2a 2f 0a ayObj) /* 59 */.
1b8a0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1b8b0 63 6c 5f 53 65 74 44 6f 75 62 6c 65 4f 62 6a 0a cl_SetDoubleObj.
1b8c0 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 44 #define Tcl_SetD
1b8d0 6f 75 62 6c 65 4f 62 6a 20 5c 0a 09 28 74 63 6c oubleObj \..(tcl
1b8e0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 StubsPtr->tcl_Se
1b8f0 74 44 6f 75 62 6c 65 4f 62 6a 29 20 2f 2a 20 36 tDoubleObj) /* 6
1b900 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 0 */.#endif.#ifn
1b910 64 65 66 20 54 63 6c 5f 53 65 74 49 6e 74 4f 62 def Tcl_SetIntOb
1b920 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 j.#define Tcl_Se
1b930 74 49 6e 74 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 tIntObj \..(tclS
1b940 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 tubsPtr->tcl_Set
1b950 49 6e 74 4f 62 6a 29 20 2f 2a 20 36 31 20 2a 2f IntObj) /* 61 */
1b960 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1b970 54 63 6c 5f 53 65 74 4c 69 73 74 4f 62 6a 0a 23 Tcl_SetListObj.#
1b980 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 4c 69 define Tcl_SetLi
1b990 73 74 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 stObj \..(tclStu
1b9a0 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 4c 69 bsPtr->tcl_SetLi
1b9b0 73 74 4f 62 6a 29 20 2f 2a 20 36 32 20 2a 2f 0a stObj) /* 62 */.
1b9c0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1b9d0 63 6c 5f 53 65 74 4c 6f 6e 67 4f 62 6a 0a 23 64 cl_SetLongObj.#d
1b9e0 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 4c 6f 6e efine Tcl_SetLon
1b9f0 67 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 gObj \..(tclStub
1ba00 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 4c 6f 6e sPtr->tcl_SetLon
1ba10 67 4f 62 6a 29 20 2f 2a 20 36 33 20 2a 2f 0a 23 gObj) /* 63 */.#
1ba20 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1ba30 6c 5f 53 65 74 4f 62 6a 4c 65 6e 67 74 68 0a 23 l_SetObjLength.#
1ba40 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 4f 62 define Tcl_SetOb
1ba50 6a 4c 65 6e 67 74 68 20 5c 0a 09 28 74 63 6c 53 jLength \..(tclS
1ba60 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 tubsPtr->tcl_Set
1ba70 4f 62 6a 4c 65 6e 67 74 68 29 20 2f 2a 20 36 34 ObjLength) /* 64
1ba80 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
1ba90 65 66 20 54 63 6c 5f 53 65 74 53 74 72 69 6e 67 ef Tcl_SetString
1baa0 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Obj.#define Tcl_
1bab0 53 65 74 53 74 72 69 6e 67 4f 62 6a 20 5c 0a 09 SetStringObj \..
1bac0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1bad0 6c 5f 53 65 74 53 74 72 69 6e 67 4f 62 6a 29 20 l_SetStringObj)
1bae0 2f 2a 20 36 35 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 65 */.#endif.
1baf0 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 64 64 45 #ifndef Tcl_AddE
1bb00 72 72 6f 72 49 6e 66 6f 0a 23 64 65 66 69 6e 65 rrorInfo.#define
1bb10 20 54 63 6c 5f 41 64 64 45 72 72 6f 72 49 6e 66 Tcl_AddErrorInf
1bb20 6f 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 o \..(tclStubsPt
1bb30 72 2d 3e 74 63 6c 5f 41 64 64 45 72 72 6f 72 49 r->tcl_AddErrorI
1bb40 6e 66 6f 29 20 2f 2a 20 36 36 20 2a 2f 0a 23 65 nfo) /* 66 */.#e
1bb50 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1bb60 5f 41 64 64 4f 62 6a 45 72 72 6f 72 49 6e 66 6f _AddObjErrorInfo
1bb70 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 41 64 64 .#define Tcl_Add
1bb80 4f 62 6a 45 72 72 6f 72 49 6e 66 6f 20 5c 0a 09 ObjErrorInfo \..
1bb90 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1bba0 6c 5f 41 64 64 4f 62 6a 45 72 72 6f 72 49 6e 66 l_AddObjErrorInf
1bbb0 6f 29 20 2f 2a 20 36 37 20 2a 2f 0a 23 65 6e 64 o) /* 67 */.#end
1bbc0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 if.#ifndef Tcl_A
1bbd0 6c 6c 6f 77 45 78 63 65 70 74 69 6f 6e 73 0a 23 llowExceptions.#
1bbe0 64 65 66 69 6e 65 20 54 63 6c 5f 41 6c 6c 6f 77 define Tcl_Allow
1bbf0 45 78 63 65 70 74 69 6f 6e 73 20 5c 0a 09 28 74 Exceptions \..(t
1bc00 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1bc10 41 6c 6c 6f 77 45 78 63 65 70 74 69 6f 6e 73 29 AllowExceptions)
1bc20 20 2f 2a 20 36 38 20 2a 2f 0a 23 65 6e 64 69 66 /* 68 */.#endif
1bc30 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 70 70 .#ifndef Tcl_App
1bc40 65 6e 64 45 6c 65 6d 65 6e 74 0a 23 64 65 66 69 endElement.#defi
1bc50 6e 65 20 54 63 6c 5f 41 70 70 65 6e 64 45 6c 65 ne Tcl_AppendEle
1bc60 6d 65 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 ment \..(tclStub
1bc70 73 50 74 72 2d 3e 74 63 6c 5f 41 70 70 65 6e 64 sPtr->tcl_Append
1bc80 45 6c 65 6d 65 6e 74 29 20 2f 2a 20 36 39 20 2a Element) /* 69 *
1bc90 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1bca0 20 54 63 6c 5f 41 70 70 65 6e 64 52 65 73 75 6c Tcl_AppendResul
1bcb0 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 41 70 t.#define Tcl_Ap
1bcc0 70 65 6e 64 52 65 73 75 6c 74 20 5c 0a 09 28 74 pendResult \..(t
1bcd0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1bce0 41 70 70 65 6e 64 52 65 73 75 6c 74 29 20 2f 2a AppendResult) /*
1bcf0 20 37 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 70 */.#endif.#i
1bd00 66 6e 64 65 66 20 54 63 6c 5f 41 73 79 6e 63 43 fndef Tcl_AsyncC
1bd10 72 65 61 74 65 0a 23 64 65 66 69 6e 65 20 54 63 reate.#define Tc
1bd20 6c 5f 41 73 79 6e 63 43 72 65 61 74 65 20 5c 0a l_AsyncCreate \.
1bd30 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1bd40 63 6c 5f 41 73 79 6e 63 43 72 65 61 74 65 29 20 cl_AsyncCreate)
1bd50 2f 2a 20 37 31 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 71 */.#endif.
1bd60 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 73 79 6e #ifndef Tcl_Asyn
1bd70 63 44 65 6c 65 74 65 0a 23 64 65 66 69 6e 65 20 cDelete.#define
1bd80 54 63 6c 5f 41 73 79 6e 63 44 65 6c 65 74 65 20 Tcl_AsyncDelete
1bd90 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1bda0 3e 74 63 6c 5f 41 73 79 6e 63 44 65 6c 65 74 65 >tcl_AsyncDelete
1bdb0 29 20 2f 2a 20 37 32 20 2a 2f 0a 23 65 6e 64 69 ) /* 72 */.#endi
1bdc0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 73 f.#ifndef Tcl_As
1bdd0 79 6e 63 49 6e 76 6f 6b 65 0a 23 64 65 66 69 6e yncInvoke.#defin
1bde0 65 20 54 63 6c 5f 41 73 79 6e 63 49 6e 76 6f 6b e Tcl_AsyncInvok
1bdf0 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 e \..(tclStubsPt
1be00 72 2d 3e 74 63 6c 5f 41 73 79 6e 63 49 6e 76 6f r->tcl_AsyncInvo
1be10 6b 65 29 20 2f 2a 20 37 33 20 2a 2f 0a 23 65 6e ke) /* 73 */.#en
1be20 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1be30 41 73 79 6e 63 4d 61 72 6b 0a 23 64 65 66 69 6e AsyncMark.#defin
1be40 65 20 54 63 6c 5f 41 73 79 6e 63 4d 61 72 6b 20 e Tcl_AsyncMark
1be50 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1be60 3e 74 63 6c 5f 41 73 79 6e 63 4d 61 72 6b 29 20 >tcl_AsyncMark)
1be70 2f 2a 20 37 34 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 74 */.#endif.
1be80 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 73 79 6e #ifndef Tcl_Asyn
1be90 63 52 65 61 64 79 0a 23 64 65 66 69 6e 65 20 54 cReady.#define T
1bea0 63 6c 5f 41 73 79 6e 63 52 65 61 64 79 20 5c 0a cl_AsyncReady \.
1beb0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1bec0 63 6c 5f 41 73 79 6e 63 52 65 61 64 79 29 20 2f cl_AsyncReady) /
1bed0 2a 20 37 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 * 75 */.#endif.#
1bee0 69 66 6e 64 65 66 20 54 63 6c 5f 42 61 63 6b 67 ifndef Tcl_Backg
1bef0 72 6f 75 6e 64 45 72 72 6f 72 0a 23 64 65 66 69 roundError.#defi
1bf00 6e 65 20 54 63 6c 5f 42 61 63 6b 67 72 6f 75 6e ne Tcl_Backgroun
1bf10 64 45 72 72 6f 72 20 5c 0a 09 28 74 63 6c 53 74 dError \..(tclSt
1bf20 75 62 73 50 74 72 2d 3e 74 63 6c 5f 42 61 63 6b ubsPtr->tcl_Back
1bf30 67 72 6f 75 6e 64 45 72 72 6f 72 29 20 2f 2a 20 groundError) /*
1bf40 37 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 76 */.#endif.#if
1bf50 6e 64 65 66 20 54 63 6c 5f 42 61 63 6b 73 6c 61 ndef Tcl_Backsla
1bf60 73 68 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 42 sh.#define Tcl_B
1bf70 61 63 6b 73 6c 61 73 68 20 5c 0a 09 28 74 63 6c ackslash \..(tcl
1bf80 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 42 61 StubsPtr->tcl_Ba
1bf90 63 6b 73 6c 61 73 68 29 20 2f 2a 20 37 37 20 2a ckslash) /* 77 *
1bfa0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1bfb0 20 54 63 6c 5f 42 61 64 43 68 61 6e 6e 65 6c 4f Tcl_BadChannelO
1bfc0 70 74 69 6f 6e 0a 23 64 65 66 69 6e 65 20 54 63 ption.#define Tc
1bfd0 6c 5f 42 61 64 43 68 61 6e 6e 65 6c 4f 70 74 69 l_BadChannelOpti
1bfe0 6f 6e 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 on \..(tclStubsP
1bff0 74 72 2d 3e 74 63 6c 5f 42 61 64 43 68 61 6e 6e tr->tcl_BadChann
1c000 65 6c 4f 70 74 69 6f 6e 29 20 2f 2a 20 37 38 20 elOption) /* 78
1c010 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1c020 66 20 54 63 6c 5f 43 61 6c 6c 57 68 65 6e 44 65 f Tcl_CallWhenDe
1c030 6c 65 74 65 64 0a 23 64 65 66 69 6e 65 20 54 63 leted.#define Tc
1c040 6c 5f 43 61 6c 6c 57 68 65 6e 44 65 6c 65 74 65 l_CallWhenDelete
1c050 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 d \..(tclStubsPt
1c060 72 2d 3e 74 63 6c 5f 43 61 6c 6c 57 68 65 6e 44 r->tcl_CallWhenD
1c070 65 6c 65 74 65 64 29 20 2f 2a 20 37 39 20 2a 2f eleted) /* 79 */
1c080 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1c090 54 63 6c 5f 43 61 6e 63 65 6c 49 64 6c 65 43 61 Tcl_CancelIdleCa
1c0a0 6c 6c 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 ll.#define Tcl_C
1c0b0 61 6e 63 65 6c 49 64 6c 65 43 61 6c 6c 20 5c 0a ancelIdleCall \.
1c0c0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1c0d0 63 6c 5f 43 61 6e 63 65 6c 49 64 6c 65 43 61 6c cl_CancelIdleCal
1c0e0 6c 29 20 2f 2a 20 38 30 20 2a 2f 0a 23 65 6e 64 l) /* 80 */.#end
1c0f0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 if.#ifndef Tcl_C
1c100 6c 6f 73 65 0a 23 64 65 66 69 6e 65 20 54 63 6c lose.#define Tcl
1c110 5f 43 6c 6f 73 65 20 5c 0a 09 28 74 63 6c 53 74 _Close \..(tclSt
1c120 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 6c 6f 73 ubsPtr->tcl_Clos
1c130 65 29 20 2f 2a 20 38 31 20 2a 2f 0a 23 65 6e 64 e) /* 81 */.#end
1c140 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 if.#ifndef Tcl_C
1c150 6f 6d 6d 61 6e 64 43 6f 6d 70 6c 65 74 65 0a 23 ommandComplete.#
1c160 64 65 66 69 6e 65 20 54 63 6c 5f 43 6f 6d 6d 61 define Tcl_Comma
1c170 6e 64 43 6f 6d 70 6c 65 74 65 20 5c 0a 09 28 74 ndComplete \..(t
1c180 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1c190 43 6f 6d 6d 61 6e 64 43 6f 6d 70 6c 65 74 65 29 CommandComplete)
1c1a0 20 2f 2a 20 38 32 20 2a 2f 0a 23 65 6e 64 69 66 /* 82 */.#endif
1c1b0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 6f 6e .#ifndef Tcl_Con
1c1c0 63 61 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f cat.#define Tcl_
1c1d0 43 6f 6e 63 61 74 20 5c 0a 09 28 74 63 6c 53 74 Concat \..(tclSt
1c1e0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 6f 6e 63 ubsPtr->tcl_Conc
1c1f0 61 74 29 20 2f 2a 20 38 33 20 2a 2f 0a 23 65 6e at) /* 83 */.#en
1c200 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1c210 43 6f 6e 76 65 72 74 45 6c 65 6d 65 6e 74 0a 23 ConvertElement.#
1c220 64 65 66 69 6e 65 20 54 63 6c 5f 43 6f 6e 76 65 define Tcl_Conve
1c230 72 74 45 6c 65 6d 65 6e 74 20 5c 0a 09 28 74 63 rtElement \..(tc
1c240 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 lStubsPtr->tcl_C
1c250 6f 6e 76 65 72 74 45 6c 65 6d 65 6e 74 29 20 2f onvertElement) /
1c260 2a 20 38 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 * 84 */.#endif.#
1c270 69 66 6e 64 65 66 20 54 63 6c 5f 43 6f 6e 76 65 ifndef Tcl_Conve
1c280 72 74 43 6f 75 6e 74 65 64 45 6c 65 6d 65 6e 74 rtCountedElement
1c290 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 6f 6e .#define Tcl_Con
1c2a0 76 65 72 74 43 6f 75 6e 74 65 64 45 6c 65 6d 65 vertCountedEleme
1c2b0 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 nt \..(tclStubsP
1c2c0 74 72 2d 3e 74 63 6c 5f 43 6f 6e 76 65 72 74 43 tr->tcl_ConvertC
1c2d0 6f 75 6e 74 65 64 45 6c 65 6d 65 6e 74 29 20 2f ountedElement) /
1c2e0 2a 20 38 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 * 85 */.#endif.#
1c2f0 69 66 6e 64 65 66 20 54 63 6c 5f 43 72 65 61 74 ifndef Tcl_Creat
1c300 65 41 6c 69 61 73 0a 23 64 65 66 69 6e 65 20 54 eAlias.#define T
1c310 63 6c 5f 43 72 65 61 74 65 41 6c 69 61 73 20 5c cl_CreateAlias \
1c320 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1c330 74 63 6c 5f 43 72 65 61 74 65 41 6c 69 61 73 29 tcl_CreateAlias)
1c340 20 2f 2a 20 38 36 20 2a 2f 0a 23 65 6e 64 69 66 /* 86 */.#endif
1c350 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 72 65 .#ifndef Tcl_Cre
1c360 61 74 65 41 6c 69 61 73 4f 62 6a 0a 23 64 65 66 ateAliasObj.#def
1c370 69 6e 65 20 54 63 6c 5f 43 72 65 61 74 65 41 6c ine Tcl_CreateAl
1c380 69 61 73 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 iasObj \..(tclSt
1c390 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 72 65 61 ubsPtr->tcl_Crea
1c3a0 74 65 41 6c 69 61 73 4f 62 6a 29 20 2f 2a 20 38 teAliasObj) /* 8
1c3b0 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 7 */.#endif.#ifn
1c3c0 64 65 66 20 54 63 6c 5f 43 72 65 61 74 65 43 68 def Tcl_CreateCh
1c3d0 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 63 annel.#define Tc
1c3e0 6c 5f 43 72 65 61 74 65 43 68 61 6e 6e 65 6c 20 l_CreateChannel
1c3f0 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1c400 3e 74 63 6c 5f 43 72 65 61 74 65 43 68 61 6e 6e >tcl_CreateChann
1c410 65 6c 29 20 2f 2a 20 38 38 20 2a 2f 0a 23 65 6e el) /* 88 */.#en
1c420 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1c430 43 72 65 61 74 65 43 68 61 6e 6e 65 6c 48 61 6e CreateChannelHan
1c440 64 6c 65 72 0a 23 64 65 66 69 6e 65 20 54 63 6c dler.#define Tcl
1c450 5f 43 72 65 61 74 65 43 68 61 6e 6e 65 6c 48 61 _CreateChannelHa
1c460 6e 64 6c 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 ndler \..(tclStu
1c470 62 73 50 74 72 2d 3e 74 63 6c 5f 43 72 65 61 74 bsPtr->tcl_Creat
1c480 65 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 29 eChannelHandler)
1c490 20 2f 2a 20 38 39 20 2a 2f 0a 23 65 6e 64 69 66 /* 89 */.#endif
1c4a0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 72 65 .#ifndef Tcl_Cre
1c4b0 61 74 65 43 6c 6f 73 65 48 61 6e 64 6c 65 72 0a ateCloseHandler.
1c4c0 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 72 65 61 #define Tcl_Crea
1c4d0 74 65 43 6c 6f 73 65 48 61 6e 64 6c 65 72 20 5c teCloseHandler \
1c4e0 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1c4f0 74 63 6c 5f 43 72 65 61 74 65 43 6c 6f 73 65 48 tcl_CreateCloseH
1c500 61 6e 64 6c 65 72 29 20 2f 2a 20 39 30 20 2a 2f andler) /* 90 */
1c510 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1c520 54 63 6c 5f 43 72 65 61 74 65 43 6f 6d 6d 61 6e Tcl_CreateComman
1c530 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 72 d.#define Tcl_Cr
1c540 65 61 74 65 43 6f 6d 6d 61 6e 64 20 5c 0a 09 28 eateCommand \..(
1c550 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1c560 5f 43 72 65 61 74 65 43 6f 6d 6d 61 6e 64 29 20 _CreateCommand)
1c570 2f 2a 20 39 31 20 2a 2f 0a 23 65 6e 64 69 66 0a /* 91 */.#endif.
1c580 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 72 65 61 #ifndef Tcl_Crea
1c590 74 65 45 76 65 6e 74 53 6f 75 72 63 65 0a 23 64 teEventSource.#d
1c5a0 65 66 69 6e 65 20 54 63 6c 5f 43 72 65 61 74 65 efine Tcl_Create
1c5b0 45 76 65 6e 74 53 6f 75 72 63 65 20 5c 0a 09 28 EventSource \..(
1c5c0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1c5d0 5f 43 72 65 61 74 65 45 76 65 6e 74 53 6f 75 72 _CreateEventSour
1c5e0 63 65 29 20 2f 2a 20 39 32 20 2a 2f 0a 23 65 6e ce) /* 92 */.#en
1c5f0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1c600 43 72 65 61 74 65 45 78 69 74 48 61 6e 64 6c 65 CreateExitHandle
1c610 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 72 r.#define Tcl_Cr
1c620 65 61 74 65 45 78 69 74 48 61 6e 64 6c 65 72 20 eateExitHandler
1c630 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1c640 3e 74 63 6c 5f 43 72 65 61 74 65 45 78 69 74 48 >tcl_CreateExitH
1c650 61 6e 64 6c 65 72 29 20 2f 2a 20 39 33 20 2a 2f andler) /* 93 */
1c660 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1c670 54 63 6c 5f 43 72 65 61 74 65 49 6e 74 65 72 70 Tcl_CreateInterp
1c680 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 72 65 .#define Tcl_Cre
1c690 61 74 65 49 6e 74 65 72 70 20 5c 0a 09 28 74 63 ateInterp \..(tc
1c6a0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 lStubsPtr->tcl_C
1c6b0 72 65 61 74 65 49 6e 74 65 72 70 29 20 2f 2a 20 reateInterp) /*
1c6c0 39 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 94 */.#endif.#if
1c6d0 6e 64 65 66 20 54 63 6c 5f 43 72 65 61 74 65 4d ndef Tcl_CreateM
1c6e0 61 74 68 46 75 6e 63 0a 23 64 65 66 69 6e 65 20 athFunc.#define
1c6f0 54 63 6c 5f 43 72 65 61 74 65 4d 61 74 68 46 75 Tcl_CreateMathFu
1c700 6e 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 nc \..(tclStubsP
1c710 74 72 2d 3e 74 63 6c 5f 43 72 65 61 74 65 4d 61 tr->tcl_CreateMa
1c720 74 68 46 75 6e 63 29 20 2f 2a 20 39 35 20 2a 2f thFunc) /* 95 */
1c730 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1c740 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 43 6f 6d Tcl_CreateObjCom
1c750 6d 61 6e 64 0a 23 64 65 66 69 6e 65 20 54 63 6c mand.#define Tcl
1c760 5f 43 72 65 61 74 65 4f 62 6a 43 6f 6d 6d 61 6e _CreateObjComman
1c770 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 d \..(tclStubsPt
1c780 72 2d 3e 74 63 6c 5f 43 72 65 61 74 65 4f 62 6a r->tcl_CreateObj
1c790 43 6f 6d 6d 61 6e 64 29 20 2f 2a 20 39 36 20 2a Command) /* 96 *
1c7a0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1c7b0 20 54 63 6c 5f 43 72 65 61 74 65 53 6c 61 76 65 Tcl_CreateSlave
1c7c0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 72 65 .#define Tcl_Cre
1c7d0 61 74 65 53 6c 61 76 65 20 5c 0a 09 28 74 63 6c ateSlave \..(tcl
1c7e0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 72 StubsPtr->tcl_Cr
1c7f0 65 61 74 65 53 6c 61 76 65 29 20 2f 2a 20 39 37 eateSlave) /* 97
1c800 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
1c810 65 66 20 54 63 6c 5f 43 72 65 61 74 65 54 69 6d ef Tcl_CreateTim
1c820 65 72 48 61 6e 64 6c 65 72 0a 23 64 65 66 69 6e erHandler.#defin
1c830 65 20 54 63 6c 5f 43 72 65 61 74 65 54 69 6d 65 e Tcl_CreateTime
1c840 72 48 61 6e 64 6c 65 72 20 5c 0a 09 28 74 63 6c rHandler \..(tcl
1c850 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 72 StubsPtr->tcl_Cr
1c860 65 61 74 65 54 69 6d 65 72 48 61 6e 64 6c 65 72 eateTimerHandler
1c870 29 20 2f 2a 20 39 38 20 2a 2f 0a 23 65 6e 64 69 ) /* 98 */.#endi
1c880 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 72 f.#ifndef Tcl_Cr
1c890 65 61 74 65 54 72 61 63 65 0a 23 64 65 66 69 6e eateTrace.#defin
1c8a0 65 20 54 63 6c 5f 43 72 65 61 74 65 54 72 61 63 e Tcl_CreateTrac
1c8b0 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 e \..(tclStubsPt
1c8c0 72 2d 3e 74 63 6c 5f 43 72 65 61 74 65 54 72 61 r->tcl_CreateTra
1c8d0 63 65 29 20 2f 2a 20 39 39 20 2a 2f 0a 23 65 6e ce) /* 99 */.#en
1c8e0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1c8f0 44 65 6c 65 74 65 41 73 73 6f 63 44 61 74 61 0a DeleteAssocData.
1c900 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 65 6c 65 #define Tcl_Dele
1c910 74 65 41 73 73 6f 63 44 61 74 61 20 5c 0a 09 28 teAssocData \..(
1c920 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1c930 5f 44 65 6c 65 74 65 41 73 73 6f 63 44 61 74 61 _DeleteAssocData
1c940 29 20 2f 2a 20 31 30 30 20 2a 2f 0a 23 65 6e 64 ) /* 100 */.#end
1c950 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 if.#ifndef Tcl_D
1c960 65 6c 65 74 65 43 68 61 6e 6e 65 6c 48 61 6e 64 eleteChannelHand
1c970 6c 65 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ler.#define Tcl_
1c980 44 65 6c 65 74 65 43 68 61 6e 6e 65 6c 48 61 6e DeleteChannelHan
1c990 64 6c 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 dler \..(tclStub
1c9a0 73 50 74 72 2d 3e 74 63 6c 5f 44 65 6c 65 74 65 sPtr->tcl_Delete
1c9b0 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 29 20 ChannelHandler)
1c9c0 2f 2a 20 31 30 31 20 2a 2f 0a 23 65 6e 64 69 66 /* 101 */.#endif
1c9d0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 65 6c .#ifndef Tcl_Del
1c9e0 65 74 65 43 6c 6f 73 65 48 61 6e 64 6c 65 72 0a eteCloseHandler.
1c9f0 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 65 6c 65 #define Tcl_Dele
1ca00 74 65 43 6c 6f 73 65 48 61 6e 64 6c 65 72 20 5c teCloseHandler \
1ca10 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1ca20 74 63 6c 5f 44 65 6c 65 74 65 43 6c 6f 73 65 48 tcl_DeleteCloseH
1ca30 61 6e 64 6c 65 72 29 20 2f 2a 20 31 30 32 20 2a andler) /* 102 *
1ca40 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1ca50 20 54 63 6c 5f 44 65 6c 65 74 65 43 6f 6d 6d 61 Tcl_DeleteComma
1ca60 6e 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 nd.#define Tcl_D
1ca70 65 6c 65 74 65 43 6f 6d 6d 61 6e 64 20 5c 0a 09 eleteCommand \..
1ca80 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1ca90 6c 5f 44 65 6c 65 74 65 43 6f 6d 6d 61 6e 64 29 l_DeleteCommand)
1caa0 20 2f 2a 20 31 30 33 20 2a 2f 0a 23 65 6e 64 69 /* 103 */.#endi
1cab0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 65 f.#ifndef Tcl_De
1cac0 6c 65 74 65 43 6f 6d 6d 61 6e 64 46 72 6f 6d 54 leteCommandFromT
1cad0 6f 6b 65 6e 0a 23 64 65 66 69 6e 65 20 54 63 6c oken.#define Tcl
1cae0 5f 44 65 6c 65 74 65 43 6f 6d 6d 61 6e 64 46 72 _DeleteCommandFr
1caf0 6f 6d 54 6f 6b 65 6e 20 5c 0a 09 28 74 63 6c 53 omToken \..(tclS
1cb00 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 65 6c tubsPtr->tcl_Del
1cb10 65 74 65 43 6f 6d 6d 61 6e 64 46 72 6f 6d 54 6f eteCommandFromTo
1cb20 6b 65 6e 29 20 2f 2a 20 31 30 34 20 2a 2f 0a 23 ken) /* 104 */.#
1cb30 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1cb40 6c 5f 44 65 6c 65 74 65 45 76 65 6e 74 73 0a 23 l_DeleteEvents.#
1cb50 64 65 66 69 6e 65 20 54 63 6c 5f 44 65 6c 65 74 define Tcl_Delet
1cb60 65 45 76 65 6e 74 73 20 5c 0a 09 28 74 63 6c 53 eEvents \..(tclS
1cb70 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 65 6c tubsPtr->tcl_Del
1cb80 65 74 65 45 76 65 6e 74 73 29 20 2f 2a 20 31 30 eteEvents) /* 10
1cb90 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 5 */.#endif.#ifn
1cba0 64 65 66 20 54 63 6c 5f 44 65 6c 65 74 65 45 76 def Tcl_DeleteEv
1cbb0 65 6e 74 53 6f 75 72 63 65 0a 23 64 65 66 69 6e entSource.#defin
1cbc0 65 20 54 63 6c 5f 44 65 6c 65 74 65 45 76 65 6e e Tcl_DeleteEven
1cbd0 74 53 6f 75 72 63 65 20 5c 0a 09 28 74 63 6c 53 tSource \..(tclS
1cbe0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 65 6c tubsPtr->tcl_Del
1cbf0 65 74 65 45 76 65 6e 74 53 6f 75 72 63 65 29 20 eteEventSource)
1cc00 2f 2a 20 31 30 36 20 2a 2f 0a 23 65 6e 64 69 66 /* 106 */.#endif
1cc10 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 65 6c .#ifndef Tcl_Del
1cc20 65 74 65 45 78 69 74 48 61 6e 64 6c 65 72 0a 23 eteExitHandler.#
1cc30 64 65 66 69 6e 65 20 54 63 6c 5f 44 65 6c 65 74 define Tcl_Delet
1cc40 65 45 78 69 74 48 61 6e 64 6c 65 72 20 5c 0a 09 eExitHandler \..
1cc50 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1cc60 6c 5f 44 65 6c 65 74 65 45 78 69 74 48 61 6e 64 l_DeleteExitHand
1cc70 6c 65 72 29 20 2f 2a 20 31 30 37 20 2a 2f 0a 23 ler) /* 107 */.#
1cc80 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1cc90 6c 5f 44 65 6c 65 74 65 48 61 73 68 45 6e 74 72 l_DeleteHashEntr
1cca0 79 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 65 y.#define Tcl_De
1ccb0 6c 65 74 65 48 61 73 68 45 6e 74 72 79 20 5c 0a leteHashEntry \.
1ccc0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1ccd0 63 6c 5f 44 65 6c 65 74 65 48 61 73 68 45 6e 74 cl_DeleteHashEnt
1cce0 72 79 29 20 2f 2a 20 31 30 38 20 2a 2f 0a 23 65 ry) /* 108 */.#e
1ccf0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1cd00 5f 44 65 6c 65 74 65 48 61 73 68 54 61 62 6c 65 _DeleteHashTable
1cd10 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 65 6c .#define Tcl_Del
1cd20 65 74 65 48 61 73 68 54 61 62 6c 65 20 5c 0a 09 eteHashTable \..
1cd30 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1cd40 6c 5f 44 65 6c 65 74 65 48 61 73 68 54 61 62 6c l_DeleteHashTabl
1cd50 65 29 20 2f 2a 20 31 30 39 20 2a 2f 0a 23 65 6e e) /* 109 */.#en
1cd60 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1cd70 44 65 6c 65 74 65 49 6e 74 65 72 70 0a 23 64 65 DeleteInterp.#de
1cd80 66 69 6e 65 20 54 63 6c 5f 44 65 6c 65 74 65 49 fine Tcl_DeleteI
1cd90 6e 74 65 72 70 20 5c 0a 09 28 74 63 6c 53 74 75 nterp \..(tclStu
1cda0 62 73 50 74 72 2d 3e 74 63 6c 5f 44 65 6c 65 74 bsPtr->tcl_Delet
1cdb0 65 49 6e 74 65 72 70 29 20 2f 2a 20 31 31 30 20 eInterp) /* 110
1cdc0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 20 21 64 */.#endif.#if !d
1cdd0 65 66 69 6e 65 64 28 5f 5f 57 49 4e 33 32 5f 5f efined(__WIN32__
1cde0 29 20 26 26 20 21 64 65 66 69 6e 65 64 28 4d 41 ) && !defined(MA
1cdf0 43 5f 54 43 4c 29 20 2f 2a 20 55 4e 49 58 20 2a C_TCL) /* UNIX *
1ce00 2f 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 65 /.#ifndef Tcl_De
1ce10 74 61 63 68 50 69 64 73 0a 23 64 65 66 69 6e 65 tachPids.#define
1ce20 20 54 63 6c 5f 44 65 74 61 63 68 50 69 64 73 20 Tcl_DetachPids
1ce30 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1ce40 3e 74 63 6c 5f 44 65 74 61 63 68 50 69 64 73 29 >tcl_DetachPids)
1ce50 20 2f 2a 20 31 31 31 20 2a 2f 0a 23 65 6e 64 69 /* 111 */.#endi
1ce60 66 0a 23 65 6e 64 69 66 20 2f 2a 20 55 4e 49 58 f.#endif /* UNIX
1ce70 20 2a 2f 0a 23 69 66 64 65 66 20 5f 5f 57 49 4e */.#ifdef __WIN
1ce80 33 32 5f 5f 0a 23 69 66 6e 64 65 66 20 54 63 6c 32__.#ifndef Tcl
1ce90 5f 44 65 74 61 63 68 50 69 64 73 0a 23 64 65 66 _DetachPids.#def
1cea0 69 6e 65 20 54 63 6c 5f 44 65 74 61 63 68 50 69 ine Tcl_DetachPi
1ceb0 64 73 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 ds \..(tclStubsP
1cec0 74 72 2d 3e 74 63 6c 5f 44 65 74 61 63 68 50 69 tr->tcl_DetachPi
1ced0 64 73 29 20 2f 2a 20 31 31 31 20 2a 2f 0a 23 65 ds) /* 111 */.#e
1cee0 6e 64 69 66 0a 23 65 6e 64 69 66 20 2f 2a 20 5f ndif.#endif /* _
1cef0 5f 57 49 4e 33 32 5f 5f 20 2a 2f 0a 23 69 66 6e _WIN32__ */.#ifn
1cf00 64 65 66 20 54 63 6c 5f 44 65 6c 65 74 65 54 69 def Tcl_DeleteTi
1cf10 6d 65 72 48 61 6e 64 6c 65 72 0a 23 64 65 66 69 merHandler.#defi
1cf20 6e 65 20 54 63 6c 5f 44 65 6c 65 74 65 54 69 6d ne Tcl_DeleteTim
1cf30 65 72 48 61 6e 64 6c 65 72 20 5c 0a 09 28 74 63 erHandler \..(tc
1cf40 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 lStubsPtr->tcl_D
1cf50 65 6c 65 74 65 54 69 6d 65 72 48 61 6e 64 6c 65 eleteTimerHandle
1cf60 72 29 20 2f 2a 20 31 31 32 20 2a 2f 0a 23 65 6e r) /* 112 */.#en
1cf70 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1cf80 44 65 6c 65 74 65 54 72 61 63 65 0a 23 64 65 66 DeleteTrace.#def
1cf90 69 6e 65 20 54 63 6c 5f 44 65 6c 65 74 65 54 72 ine Tcl_DeleteTr
1cfa0 61 63 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ace \..(tclStubs
1cfb0 50 74 72 2d 3e 74 63 6c 5f 44 65 6c 65 74 65 54 Ptr->tcl_DeleteT
1cfc0 72 61 63 65 29 20 2f 2a 20 31 31 33 20 2a 2f 0a race) /* 113 */.
1cfd0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1cfe0 63 6c 5f 44 6f 6e 74 43 61 6c 6c 57 68 65 6e 44 cl_DontCallWhenD
1cff0 65 6c 65 74 65 64 0a 23 64 65 66 69 6e 65 20 54 eleted.#define T
1d000 63 6c 5f 44 6f 6e 74 43 61 6c 6c 57 68 65 6e 44 cl_DontCallWhenD
1d010 65 6c 65 74 65 64 20 5c 0a 09 28 74 63 6c 53 74 eleted \..(tclSt
1d020 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 6f 6e 74 ubsPtr->tcl_Dont
1d030 43 61 6c 6c 57 68 65 6e 44 65 6c 65 74 65 64 29 CallWhenDeleted)
1d040 20 2f 2a 20 31 31 34 20 2a 2f 0a 23 65 6e 64 69 /* 114 */.#endi
1d050 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 6f f.#ifndef Tcl_Do
1d060 4f 6e 65 45 76 65 6e 74 0a 23 64 65 66 69 6e 65 OneEvent.#define
1d070 20 54 63 6c 5f 44 6f 4f 6e 65 45 76 65 6e 74 20 Tcl_DoOneEvent
1d080 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1d090 3e 74 63 6c 5f 44 6f 4f 6e 65 45 76 65 6e 74 29 >tcl_DoOneEvent)
1d0a0 20 2f 2a 20 31 31 35 20 2a 2f 0a 23 65 6e 64 69 /* 115 */.#endi
1d0b0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 6f f.#ifndef Tcl_Do
1d0c0 57 68 65 6e 49 64 6c 65 0a 23 64 65 66 69 6e 65 WhenIdle.#define
1d0d0 20 54 63 6c 5f 44 6f 57 68 65 6e 49 64 6c 65 20 Tcl_DoWhenIdle
1d0e0 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1d0f0 3e 74 63 6c 5f 44 6f 57 68 65 6e 49 64 6c 65 29 >tcl_DoWhenIdle)
1d100 20 2f 2a 20 31 31 36 20 2a 2f 0a 23 65 6e 64 69 /* 116 */.#endi
1d110 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 53 f.#ifndef Tcl_DS
1d120 74 72 69 6e 67 41 70 70 65 6e 64 0a 23 64 65 66 tringAppend.#def
1d130 69 6e 65 20 54 63 6c 5f 44 53 74 72 69 6e 67 41 ine Tcl_DStringA
1d140 70 70 65 6e 64 20 5c 0a 09 28 74 63 6c 53 74 75 ppend \..(tclStu
1d150 62 73 50 74 72 2d 3e 74 63 6c 5f 44 53 74 72 69 bsPtr->tcl_DStri
1d160 6e 67 41 70 70 65 6e 64 29 20 2f 2a 20 31 31 37 ngAppend) /* 117
1d170 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
1d180 65 66 20 54 63 6c 5f 44 53 74 72 69 6e 67 41 70 ef Tcl_DStringAp
1d190 70 65 6e 64 45 6c 65 6d 65 6e 74 0a 23 64 65 66 pendElement.#def
1d1a0 69 6e 65 20 54 63 6c 5f 44 53 74 72 69 6e 67 41 ine Tcl_DStringA
1d1b0 70 70 65 6e 64 45 6c 65 6d 65 6e 74 20 5c 0a 09 ppendElement \..
1d1c0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1d1d0 6c 5f 44 53 74 72 69 6e 67 41 70 70 65 6e 64 45 l_DStringAppendE
1d1e0 6c 65 6d 65 6e 74 29 20 2f 2a 20 31 31 38 20 2a lement) /* 118 *
1d1f0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1d200 20 54 63 6c 5f 44 53 74 72 69 6e 67 45 6e 64 53 Tcl_DStringEndS
1d210 75 62 6c 69 73 74 0a 23 64 65 66 69 6e 65 20 54 ublist.#define T
1d220 63 6c 5f 44 53 74 72 69 6e 67 45 6e 64 53 75 62 cl_DStringEndSub
1d230 6c 69 73 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 list \..(tclStub
1d240 73 50 74 72 2d 3e 74 63 6c 5f 44 53 74 72 69 6e sPtr->tcl_DStrin
1d250 67 45 6e 64 53 75 62 6c 69 73 74 29 20 2f 2a 20 gEndSublist) /*
1d260 31 31 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 119 */.#endif.#i
1d270 66 6e 64 65 66 20 54 63 6c 5f 44 53 74 72 69 6e fndef Tcl_DStrin
1d280 67 46 72 65 65 0a 23 64 65 66 69 6e 65 20 54 63 gFree.#define Tc
1d290 6c 5f 44 53 74 72 69 6e 67 46 72 65 65 20 5c 0a l_DStringFree \.
1d2a0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1d2b0 63 6c 5f 44 53 74 72 69 6e 67 46 72 65 65 29 20 cl_DStringFree)
1d2c0 2f 2a 20 31 32 30 20 2a 2f 0a 23 65 6e 64 69 66 /* 120 */.#endif
1d2d0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 53 74 .#ifndef Tcl_DSt
1d2e0 72 69 6e 67 47 65 74 52 65 73 75 6c 74 0a 23 64 ringGetResult.#d
1d2f0 65 66 69 6e 65 20 54 63 6c 5f 44 53 74 72 69 6e efine Tcl_DStrin
1d300 67 47 65 74 52 65 73 75 6c 74 20 5c 0a 09 28 74 gGetResult \..(t
1d310 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1d320 44 53 74 72 69 6e 67 47 65 74 52 65 73 75 6c 74 DStringGetResult
1d330 29 20 2f 2a 20 31 32 31 20 2a 2f 0a 23 65 6e 64 ) /* 121 */.#end
1d340 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 if.#ifndef Tcl_D
1d350 53 74 72 69 6e 67 49 6e 69 74 0a 23 64 65 66 69 StringInit.#defi
1d360 6e 65 20 54 63 6c 5f 44 53 74 72 69 6e 67 49 6e ne Tcl_DStringIn
1d370 69 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 it \..(tclStubsP
1d380 74 72 2d 3e 74 63 6c 5f 44 53 74 72 69 6e 67 49 tr->tcl_DStringI
1d390 6e 69 74 29 20 2f 2a 20 31 32 32 20 2a 2f 0a 23 nit) /* 122 */.#
1d3a0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1d3b0 6c 5f 44 53 74 72 69 6e 67 52 65 73 75 6c 74 0a l_DStringResult.
1d3c0 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 53 74 72 #define Tcl_DStr
1d3d0 69 6e 67 52 65 73 75 6c 74 20 5c 0a 09 28 74 63 ingResult \..(tc
1d3e0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 lStubsPtr->tcl_D
1d3f0 53 74 72 69 6e 67 52 65 73 75 6c 74 29 20 2f 2a StringResult) /*
1d400 20 31 32 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 123 */.#endif.#
1d410 69 66 6e 64 65 66 20 54 63 6c 5f 44 53 74 72 69 ifndef Tcl_DStri
1d420 6e 67 53 65 74 4c 65 6e 67 74 68 0a 23 64 65 66 ngSetLength.#def
1d430 69 6e 65 20 54 63 6c 5f 44 53 74 72 69 6e 67 53 ine Tcl_DStringS
1d440 65 74 4c 65 6e 67 74 68 20 5c 0a 09 28 74 63 6c etLength \..(tcl
1d450 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 53 StubsPtr->tcl_DS
1d460 74 72 69 6e 67 53 65 74 4c 65 6e 67 74 68 29 20 tringSetLength)
1d470 2f 2a 20 31 32 34 20 2a 2f 0a 23 65 6e 64 69 66 /* 124 */.#endif
1d480 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 53 74 .#ifndef Tcl_DSt
1d490 72 69 6e 67 53 74 61 72 74 53 75 62 6c 69 73 74 ringStartSublist
1d4a0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 53 74 .#define Tcl_DSt
1d4b0 72 69 6e 67 53 74 61 72 74 53 75 62 6c 69 73 74 ringStartSublist
1d4c0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1d4d0 2d 3e 74 63 6c 5f 44 53 74 72 69 6e 67 53 74 61 ->tcl_DStringSta
1d4e0 72 74 53 75 62 6c 69 73 74 29 20 2f 2a 20 31 32 rtSublist) /* 12
1d4f0 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 5 */.#endif.#ifn
1d500 64 65 66 20 54 63 6c 5f 45 6f 66 0a 23 64 65 66 def Tcl_Eof.#def
1d510 69 6e 65 20 54 63 6c 5f 45 6f 66 20 5c 0a 09 28 ine Tcl_Eof \..(
1d520 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1d530 5f 45 6f 66 29 20 2f 2a 20 31 32 36 20 2a 2f 0a _Eof) /* 126 */.
1d540 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1d550 63 6c 5f 45 72 72 6e 6f 49 64 0a 23 64 65 66 69 cl_ErrnoId.#defi
1d560 6e 65 20 54 63 6c 5f 45 72 72 6e 6f 49 64 20 5c ne Tcl_ErrnoId \
1d570 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1d580 74 63 6c 5f 45 72 72 6e 6f 49 64 29 20 2f 2a 20 tcl_ErrnoId) /*
1d590 31 32 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 127 */.#endif.#i
1d5a0 66 6e 64 65 66 20 54 63 6c 5f 45 72 72 6e 6f 4d fndef Tcl_ErrnoM
1d5b0 73 67 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 sg.#define Tcl_E
1d5c0 72 72 6e 6f 4d 73 67 20 5c 0a 09 28 74 63 6c 53 rrnoMsg \..(tclS
1d5d0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 72 72 tubsPtr->tcl_Err
1d5e0 6e 6f 4d 73 67 29 20 2f 2a 20 31 32 38 20 2a 2f noMsg) /* 128 */
1d5f0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1d600 54 63 6c 5f 45 76 61 6c 0a 23 64 65 66 69 6e 65 Tcl_Eval.#define
1d610 20 54 63 6c 5f 45 76 61 6c 20 5c 0a 09 28 74 63 Tcl_Eval \..(tc
1d620 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 lStubsPtr->tcl_E
1d630 76 61 6c 29 20 2f 2a 20 31 32 39 20 2a 2f 0a 23 val) /* 129 */.#
1d640 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1d650 6c 5f 45 76 61 6c 46 69 6c 65 0a 23 64 65 66 69 l_EvalFile.#defi
1d660 6e 65 20 54 63 6c 5f 45 76 61 6c 46 69 6c 65 20 ne Tcl_EvalFile
1d670 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1d680 3e 74 63 6c 5f 45 76 61 6c 46 69 6c 65 29 20 2f >tcl_EvalFile) /
1d690 2a 20 31 33 30 20 2a 2f 0a 23 65 6e 64 69 66 0a * 130 */.#endif.
1d6a0 23 69 66 6e 64 65 66 20 54 63 6c 5f 45 76 61 6c #ifndef Tcl_Eval
1d6b0 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Obj.#define Tcl_
1d6c0 45 76 61 6c 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 EvalObj \..(tclS
1d6d0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 76 61 tubsPtr->tcl_Eva
1d6e0 6c 4f 62 6a 29 20 2f 2a 20 31 33 31 20 2a 2f 0a lObj) /* 131 */.
1d6f0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1d700 63 6c 5f 45 76 65 6e 74 75 61 6c 6c 79 46 72 65 cl_EventuallyFre
1d710 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 76 e.#define Tcl_Ev
1d720 65 6e 74 75 61 6c 6c 79 46 72 65 65 20 5c 0a 09 entuallyFree \..
1d730 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1d740 6c 5f 45 76 65 6e 74 75 61 6c 6c 79 46 72 65 65 l_EventuallyFree
1d750 29 20 2f 2a 20 31 33 32 20 2a 2f 0a 23 65 6e 64 ) /* 132 */.#end
1d760 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 45 if.#ifndef Tcl_E
1d770 78 69 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f xit.#define Tcl_
1d780 45 78 69 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 Exit \..(tclStub
1d790 73 50 74 72 2d 3e 74 63 6c 5f 45 78 69 74 29 20 sPtr->tcl_Exit)
1d7a0 2f 2a 20 31 33 33 20 2a 2f 0a 23 65 6e 64 69 66 /* 133 */.#endif
1d7b0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 45 78 70 .#ifndef Tcl_Exp
1d7c0 6f 73 65 43 6f 6d 6d 61 6e 64 0a 23 64 65 66 69 oseCommand.#defi
1d7d0 6e 65 20 54 63 6c 5f 45 78 70 6f 73 65 43 6f 6d ne Tcl_ExposeCom
1d7e0 6d 61 6e 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 mand \..(tclStub
1d7f0 73 50 74 72 2d 3e 74 63 6c 5f 45 78 70 6f 73 65 sPtr->tcl_Expose
1d800 43 6f 6d 6d 61 6e 64 29 20 2f 2a 20 31 33 34 20 Command) /* 134
1d810 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1d820 66 20 54 63 6c 5f 45 78 70 72 42 6f 6f 6c 65 61 f Tcl_ExprBoolea
1d830 6e 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 78 n.#define Tcl_Ex
1d840 70 72 42 6f 6f 6c 65 61 6e 20 5c 0a 09 28 74 63 prBoolean \..(tc
1d850 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 lStubsPtr->tcl_E
1d860 78 70 72 42 6f 6f 6c 65 61 6e 29 20 2f 2a 20 31 xprBoolean) /* 1
1d870 33 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 35 */.#endif.#if
1d880 6e 64 65 66 20 54 63 6c 5f 45 78 70 72 42 6f 6f ndef Tcl_ExprBoo
1d890 6c 65 61 6e 4f 62 6a 0a 23 64 65 66 69 6e 65 20 leanObj.#define
1d8a0 54 63 6c 5f 45 78 70 72 42 6f 6f 6c 65 61 6e 4f Tcl_ExprBooleanO
1d8b0 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 bj \..(tclStubsP
1d8c0 74 72 2d 3e 74 63 6c 5f 45 78 70 72 42 6f 6f 6c tr->tcl_ExprBool
1d8d0 65 61 6e 4f 62 6a 29 20 2f 2a 20 31 33 36 20 2a eanObj) /* 136 *
1d8e0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1d8f0 20 54 63 6c 5f 45 78 70 72 44 6f 75 62 6c 65 0a Tcl_ExprDouble.
1d900 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 78 70 72 #define Tcl_Expr
1d910 44 6f 75 62 6c 65 20 5c 0a 09 28 74 63 6c 53 74 Double \..(tclSt
1d920 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 78 70 72 ubsPtr->tcl_Expr
1d930 44 6f 75 62 6c 65 29 20 2f 2a 20 31 33 37 20 2a Double) /* 137 *
1d940 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1d950 20 54 63 6c 5f 45 78 70 72 44 6f 75 62 6c 65 4f Tcl_ExprDoubleO
1d960 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 bj.#define Tcl_E
1d970 78 70 72 44 6f 75 62 6c 65 4f 62 6a 20 5c 0a 09 xprDoubleObj \..
1d980 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1d990 6c 5f 45 78 70 72 44 6f 75 62 6c 65 4f 62 6a 29 l_ExprDoubleObj)
1d9a0 20 2f 2a 20 31 33 38 20 2a 2f 0a 23 65 6e 64 69 /* 138 */.#endi
1d9b0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 45 78 f.#ifndef Tcl_Ex
1d9c0 70 72 4c 6f 6e 67 0a 23 64 65 66 69 6e 65 20 54 prLong.#define T
1d9d0 63 6c 5f 45 78 70 72 4c 6f 6e 67 20 5c 0a 09 28 cl_ExprLong \..(
1d9e0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1d9f0 5f 45 78 70 72 4c 6f 6e 67 29 20 2f 2a 20 31 33 _ExprLong) /* 13
1da00 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 9 */.#endif.#ifn
1da10 64 65 66 20 54 63 6c 5f 45 78 70 72 4c 6f 6e 67 def Tcl_ExprLong
1da20 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Obj.#define Tcl_
1da30 45 78 70 72 4c 6f 6e 67 4f 62 6a 20 5c 0a 09 28 ExprLongObj \..(
1da40 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1da50 5f 45 78 70 72 4c 6f 6e 67 4f 62 6a 29 20 2f 2a _ExprLongObj) /*
1da60 20 31 34 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 140 */.#endif.#
1da70 69 66 6e 64 65 66 20 54 63 6c 5f 45 78 70 72 4f ifndef Tcl_ExprO
1da80 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 bj.#define Tcl_E
1da90 78 70 72 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 xprObj \..(tclSt
1daa0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 78 70 72 ubsPtr->tcl_Expr
1dab0 4f 62 6a 29 20 2f 2a 20 31 34 31 20 2a 2f 0a 23 Obj) /* 141 */.#
1dac0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1dad0 6c 5f 45 78 70 72 53 74 72 69 6e 67 0a 23 64 65 l_ExprString.#de
1dae0 66 69 6e 65 20 54 63 6c 5f 45 78 70 72 53 74 72 fine Tcl_ExprStr
1daf0 69 6e 67 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ing \..(tclStubs
1db00 50 74 72 2d 3e 74 63 6c 5f 45 78 70 72 53 74 72 Ptr->tcl_ExprStr
1db10 69 6e 67 29 20 2f 2a 20 31 34 32 20 2a 2f 0a 23 ing) /* 142 */.#
1db20 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1db30 6c 5f 46 69 6e 61 6c 69 7a 65 0a 23 64 65 66 69 l_Finalize.#defi
1db40 6e 65 20 54 63 6c 5f 46 69 6e 61 6c 69 7a 65 20 ne Tcl_Finalize
1db50 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1db60 3e 74 63 6c 5f 46 69 6e 61 6c 69 7a 65 29 20 2f >tcl_Finalize) /
1db70 2a 20 31 34 33 20 2a 2f 0a 23 65 6e 64 69 66 0a * 143 */.#endif.
1db80 23 69 66 6e 64 65 66 20 54 63 6c 5f 46 69 6e 64 #ifndef Tcl_Find
1db90 45 78 65 63 75 74 61 62 6c 65 0a 23 64 65 66 69 Executable.#defi
1dba0 6e 65 20 54 63 6c 5f 46 69 6e 64 45 78 65 63 75 ne Tcl_FindExecu
1dbb0 74 61 62 6c 65 20 5c 0a 09 28 74 63 6c 53 74 75 table \..(tclStu
1dbc0 62 73 50 74 72 2d 3e 74 63 6c 5f 46 69 6e 64 45 bsPtr->tcl_FindE
1dbd0 78 65 63 75 74 61 62 6c 65 29 20 2f 2a 20 31 34 xecutable) /* 14
1dbe0 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 4 */.#endif.#ifn
1dbf0 64 65 66 20 54 63 6c 5f 46 69 72 73 74 48 61 73 def Tcl_FirstHas
1dc00 68 45 6e 74 72 79 0a 23 64 65 66 69 6e 65 20 54 hEntry.#define T
1dc10 63 6c 5f 46 69 72 73 74 48 61 73 68 45 6e 74 72 cl_FirstHashEntr
1dc20 79 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 y \..(tclStubsPt
1dc30 72 2d 3e 74 63 6c 5f 46 69 72 73 74 48 61 73 68 r->tcl_FirstHash
1dc40 45 6e 74 72 79 29 20 2f 2a 20 31 34 35 20 2a 2f Entry) /* 145 */
1dc50 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1dc60 54 63 6c 5f 46 6c 75 73 68 0a 23 64 65 66 69 6e Tcl_Flush.#defin
1dc70 65 20 54 63 6c 5f 46 6c 75 73 68 20 5c 0a 09 28 e Tcl_Flush \..(
1dc80 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1dc90 5f 46 6c 75 73 68 29 20 2f 2a 20 31 34 36 20 2a _Flush) /* 146 *
1dca0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1dcb0 20 54 63 6c 5f 46 72 65 65 52 65 73 75 6c 74 0a Tcl_FreeResult.
1dcc0 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 72 65 65 #define Tcl_Free
1dcd0 52 65 73 75 6c 74 20 5c 0a 09 28 74 63 6c 53 74 Result \..(tclSt
1dce0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 72 65 65 ubsPtr->tcl_Free
1dcf0 52 65 73 75 6c 74 29 20 2f 2a 20 31 34 37 20 2a Result) /* 147 *
1dd00 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1dd10 20 54 63 6c 5f 47 65 74 41 6c 69 61 73 0a 23 64 Tcl_GetAlias.#d
1dd20 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 41 6c 69 efine Tcl_GetAli
1dd30 61 73 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 as \..(tclStubsP
1dd40 74 72 2d 3e 74 63 6c 5f 47 65 74 41 6c 69 61 73 tr->tcl_GetAlias
1dd50 29 20 2f 2a 20 31 34 38 20 2a 2f 0a 23 65 6e 64 ) /* 148 */.#end
1dd60 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 if.#ifndef Tcl_G
1dd70 65 74 41 6c 69 61 73 4f 62 6a 0a 23 64 65 66 69 etAliasObj.#defi
1dd80 6e 65 20 54 63 6c 5f 47 65 74 41 6c 69 61 73 4f ne Tcl_GetAliasO
1dd90 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 bj \..(tclStubsP
1dda0 74 72 2d 3e 74 63 6c 5f 47 65 74 41 6c 69 61 73 tr->tcl_GetAlias
1ddb0 4f 62 6a 29 20 2f 2a 20 31 34 39 20 2a 2f 0a 23 Obj) /* 149 */.#
1ddc0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1ddd0 6c 5f 47 65 74 41 73 73 6f 63 44 61 74 61 0a 23 l_GetAssocData.#
1dde0 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 41 73 define Tcl_GetAs
1ddf0 73 6f 63 44 61 74 61 20 5c 0a 09 28 74 63 6c 53 socData \..(tclS
1de00 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
1de10 41 73 73 6f 63 44 61 74 61 29 20 2f 2a 20 31 35 AssocData) /* 15
1de20 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 0 */.#endif.#ifn
1de30 64 65 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e def Tcl_GetChann
1de40 65 6c 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 el.#define Tcl_G
1de50 65 74 43 68 61 6e 6e 65 6c 20 5c 0a 09 28 74 63 etChannel \..(tc
1de60 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 lStubsPtr->tcl_G
1de70 65 74 43 68 61 6e 6e 65 6c 29 20 2f 2a 20 31 35 etChannel) /* 15
1de80 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 1 */.#endif.#ifn
1de90 64 65 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e def Tcl_GetChann
1dea0 65 6c 42 75 66 66 65 72 53 69 7a 65 0a 23 64 65 elBufferSize.#de
1deb0 66 69 6e 65 20 54 63 6c 5f 47 65 74 43 68 61 6e fine Tcl_GetChan
1dec0 6e 65 6c 42 75 66 66 65 72 53 69 7a 65 20 5c 0a nelBufferSize \.
1ded0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1dee0 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 42 75 66 cl_GetChannelBuf
1def0 66 65 72 53 69 7a 65 29 20 2f 2a 20 31 35 32 20 ferSize) /* 152
1df00 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1df10 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c f Tcl_GetChannel
1df20 48 61 6e 64 6c 65 0a 23 64 65 66 69 6e 65 20 54 Handle.#define T
1df30 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 48 61 6e cl_GetChannelHan
1df40 64 6c 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 dle \..(tclStubs
1df50 50 74 72 2d 3e 74 63 6c 5f 47 65 74 43 68 61 6e Ptr->tcl_GetChan
1df60 6e 65 6c 48 61 6e 64 6c 65 29 20 2f 2a 20 31 35 nelHandle) /* 15
1df70 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
1df80 64 65 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e def Tcl_GetChann
1df90 65 6c 49 6e 73 74 61 6e 63 65 44 61 74 61 0a 23 elInstanceData.#
1dfa0 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 43 68 define Tcl_GetCh
1dfb0 61 6e 6e 65 6c 49 6e 73 74 61 6e 63 65 44 61 74 annelInstanceDat
1dfc0 61 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 a \..(tclStubsPt
1dfd0 72 2d 3e 74 63 6c 5f 47 65 74 43 68 61 6e 6e 65 r->tcl_GetChanne
1dfe0 6c 49 6e 73 74 61 6e 63 65 44 61 74 61 29 20 2f lInstanceData) /
1dff0 2a 20 31 35 34 20 2a 2f 0a 23 65 6e 64 69 66 0a * 154 */.#endif.
1e000 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 43 #ifndef Tcl_GetC
1e010 68 61 6e 6e 65 6c 4d 6f 64 65 0a 23 64 65 66 69 hannelMode.#defi
1e020 6e 65 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 ne Tcl_GetChanne
1e030 6c 4d 6f 64 65 20 5c 0a 09 28 74 63 6c 53 74 75 lMode \..(tclStu
1e040 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 43 68 bsPtr->tcl_GetCh
1e050 61 6e 6e 65 6c 4d 6f 64 65 29 20 2f 2a 20 31 35 annelMode) /* 15
1e060 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 5 */.#endif.#ifn
1e070 64 65 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e def Tcl_GetChann
1e080 65 6c 4e 61 6d 65 0a 23 64 65 66 69 6e 65 20 54 elName.#define T
1e090 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 4e 61 6d cl_GetChannelNam
1e0a0 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 e \..(tclStubsPt
1e0b0 72 2d 3e 74 63 6c 5f 47 65 74 43 68 61 6e 6e 65 r->tcl_GetChanne
1e0c0 6c 4e 61 6d 65 29 20 2f 2a 20 31 35 36 20 2a 2f lName) /* 156 */
1e0d0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1e0e0 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 4f 70 Tcl_GetChannelOp
1e0f0 74 69 6f 6e 0a 23 64 65 66 69 6e 65 20 54 63 6c tion.#define Tcl
1e100 5f 47 65 74 43 68 61 6e 6e 65 6c 4f 70 74 69 6f _GetChannelOptio
1e110 6e 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 n \..(tclStubsPt
1e120 72 2d 3e 74 63 6c 5f 47 65 74 43 68 61 6e 6e 65 r->tcl_GetChanne
1e130 6c 4f 70 74 69 6f 6e 29 20 2f 2a 20 31 35 37 20 lOption) /* 157
1e140 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1e150 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c f Tcl_GetChannel
1e160 54 79 70 65 0a 23 64 65 66 69 6e 65 20 54 63 6c Type.#define Tcl
1e170 5f 47 65 74 43 68 61 6e 6e 65 6c 54 79 70 65 20 _GetChannelType
1e180 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1e190 3e 74 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 54 >tcl_GetChannelT
1e1a0 79 70 65 29 20 2f 2a 20 31 35 38 20 2a 2f 0a 23 ype) /* 158 */.#
1e1b0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1e1c0 6c 5f 47 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f l_GetCommandInfo
1e1d0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 .#define Tcl_Get
1e1e0 43 6f 6d 6d 61 6e 64 49 6e 66 6f 20 5c 0a 09 28 CommandInfo \..(
1e1f0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
1e200 5f 47 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 29 _GetCommandInfo)
1e210 20 2f 2a 20 31 35 39 20 2a 2f 0a 23 65 6e 64 69 /* 159 */.#endi
1e220 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 f.#ifndef Tcl_Ge
1e230 74 43 6f 6d 6d 61 6e 64 4e 61 6d 65 0a 23 64 65 tCommandName.#de
1e240 66 69 6e 65 20 54 63 6c 5f 47 65 74 43 6f 6d 6d fine Tcl_GetComm
1e250 61 6e 64 4e 61 6d 65 20 5c 0a 09 28 74 63 6c 53 andName \..(tclS
1e260 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
1e270 43 6f 6d 6d 61 6e 64 4e 61 6d 65 29 20 2f 2a 20 CommandName) /*
1e280 31 36 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 160 */.#endif.#i
1e290 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 45 72 72 fndef Tcl_GetErr
1e2a0 6e 6f 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 no.#define Tcl_G
1e2b0 65 74 45 72 72 6e 6f 20 5c 0a 09 28 74 63 6c 53 etErrno \..(tclS
1e2c0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
1e2d0 45 72 72 6e 6f 29 20 2f 2a 20 31 36 31 20 2a 2f Errno) /* 161 */
1e2e0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1e2f0 54 63 6c 5f 47 65 74 48 6f 73 74 4e 61 6d 65 0a Tcl_GetHostName.
1e300 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 48 #define Tcl_GetH
1e310 6f 73 74 4e 61 6d 65 20 5c 0a 09 28 74 63 6c 53 ostName \..(tclS
1e320 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
1e330 48 6f 73 74 4e 61 6d 65 29 20 2f 2a 20 31 36 32 HostName) /* 162
1e340 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
1e350 65 66 20 54 63 6c 5f 47 65 74 49 6e 74 65 72 70 ef Tcl_GetInterp
1e360 50 61 74 68 0a 23 64 65 66 69 6e 65 20 54 63 6c Path.#define Tcl
1e370 5f 47 65 74 49 6e 74 65 72 70 50 61 74 68 20 5c _GetInterpPath \
1e380 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1e390 74 63 6c 5f 47 65 74 49 6e 74 65 72 70 50 61 74 tcl_GetInterpPat
1e3a0 68 29 20 2f 2a 20 31 36 33 20 2a 2f 0a 23 65 6e h) /* 163 */.#en
1e3b0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1e3c0 47 65 74 4d 61 73 74 65 72 0a 23 64 65 66 69 6e GetMaster.#defin
1e3d0 65 20 54 63 6c 5f 47 65 74 4d 61 73 74 65 72 20 e Tcl_GetMaster
1e3e0 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1e3f0 3e 74 63 6c 5f 47 65 74 4d 61 73 74 65 72 29 20 >tcl_GetMaster)
1e400 2f 2a 20 31 36 34 20 2a 2f 0a 23 65 6e 64 69 66 /* 164 */.#endif
1e410 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 .#ifndef Tcl_Get
1e420 4e 61 6d 65 4f 66 45 78 65 63 75 74 61 62 6c 65 NameOfExecutable
1e430 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 .#define Tcl_Get
1e440 4e 61 6d 65 4f 66 45 78 65 63 75 74 61 62 6c 65 NameOfExecutable
1e450 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1e460 2d 3e 74 63 6c 5f 47 65 74 4e 61 6d 65 4f 66 45 ->tcl_GetNameOfE
1e470 78 65 63 75 74 61 62 6c 65 29 20 2f 2a 20 31 36 xecutable) /* 16
1e480 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 5 */.#endif.#ifn
1e490 64 65 66 20 54 63 6c 5f 47 65 74 4f 62 6a 52 65 def Tcl_GetObjRe
1e4a0 73 75 6c 74 0a 23 64 65 66 69 6e 65 20 54 63 6c sult.#define Tcl
1e4b0 5f 47 65 74 4f 62 6a 52 65 73 75 6c 74 20 5c 0a _GetObjResult \.
1e4c0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1e4d0 63 6c 5f 47 65 74 4f 62 6a 52 65 73 75 6c 74 29 cl_GetObjResult)
1e4e0 20 2f 2a 20 31 36 36 20 2a 2f 0a 23 65 6e 64 69 /* 166 */.#endi
1e4f0 66 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28 5f f.#if !defined(_
1e500 5f 57 49 4e 33 32 5f 5f 29 20 26 26 20 21 64 65 _WIN32__) && !de
1e510 66 69 6e 65 64 28 4d 41 43 5f 54 43 4c 29 20 2f fined(MAC_TCL) /
1e520 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 66 6e 64 65 * UNIX */.#ifnde
1e530 66 20 54 63 6c 5f 47 65 74 4f 70 65 6e 46 69 6c f Tcl_GetOpenFil
1e540 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 e.#define Tcl_Ge
1e550 74 4f 70 65 6e 46 69 6c 65 20 5c 0a 09 28 74 63 tOpenFile \..(tc
1e560 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 lStubsPtr->tcl_G
1e570 65 74 4f 70 65 6e 46 69 6c 65 29 20 2f 2a 20 31 etOpenFile) /* 1
1e580 36 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 65 6e 67 */.#endif.#en
1e590 64 69 66 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 dif /* UNIX */.#
1e5a0 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 50 61 ifndef Tcl_GetPa
1e5b0 74 68 54 79 70 65 0a 23 64 65 66 69 6e 65 20 54 thType.#define T
1e5c0 63 6c 5f 47 65 74 50 61 74 68 54 79 70 65 20 5c cl_GetPathType \
1e5d0 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1e5e0 74 63 6c 5f 47 65 74 50 61 74 68 54 79 70 65 29 tcl_GetPathType)
1e5f0 20 2f 2a 20 31 36 38 20 2a 2f 0a 23 65 6e 64 69 /* 168 */.#endi
1e600 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 f.#ifndef Tcl_Ge
1e610 74 73 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 ts.#define Tcl_G
1e620 65 74 73 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ets \..(tclStubs
1e630 50 74 72 2d 3e 74 63 6c 5f 47 65 74 73 29 20 2f Ptr->tcl_Gets) /
1e640 2a 20 31 36 39 20 2a 2f 0a 23 65 6e 64 69 66 0a * 169 */.#endif.
1e650 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 73 #ifndef Tcl_Gets
1e660 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Obj.#define Tcl_
1e670 47 65 74 73 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 GetsObj \..(tclS
1e680 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
1e690 73 4f 62 6a 29 20 2f 2a 20 31 37 30 20 2a 2f 0a sObj) /* 170 */.
1e6a0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1e6b0 63 6c 5f 47 65 74 53 65 72 76 69 63 65 4d 6f 64 cl_GetServiceMod
1e6c0 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 e.#define Tcl_Ge
1e6d0 74 53 65 72 76 69 63 65 4d 6f 64 65 20 5c 0a 09 tServiceMode \..
1e6e0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1e6f0 6c 5f 47 65 74 53 65 72 76 69 63 65 4d 6f 64 65 l_GetServiceMode
1e700 29 20 2f 2a 20 31 37 31 20 2a 2f 0a 23 65 6e 64 ) /* 171 */.#end
1e710 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 if.#ifndef Tcl_G
1e720 65 74 53 6c 61 76 65 0a 23 64 65 66 69 6e 65 20 etSlave.#define
1e730 54 63 6c 5f 47 65 74 53 6c 61 76 65 20 5c 0a 09 Tcl_GetSlave \..
1e740 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1e750 6c 5f 47 65 74 53 6c 61 76 65 29 20 2f 2a 20 31 l_GetSlave) /* 1
1e760 37 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 72 */.#endif.#if
1e770 6e 64 65 66 20 54 63 6c 5f 47 65 74 53 74 64 43 ndef Tcl_GetStdC
1e780 68 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 hannel.#define T
1e790 63 6c 5f 47 65 74 53 74 64 43 68 61 6e 6e 65 6c cl_GetStdChannel
1e7a0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1e7b0 2d 3e 74 63 6c 5f 47 65 74 53 74 64 43 68 61 6e ->tcl_GetStdChan
1e7c0 6e 65 6c 29 20 2f 2a 20 31 37 33 20 2a 2f 0a 23 nel) /* 173 */.#
1e7d0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1e7e0 6c 5f 47 65 74 53 74 72 69 6e 67 52 65 73 75 6c l_GetStringResul
1e7f0 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 t.#define Tcl_Ge
1e800 74 53 74 72 69 6e 67 52 65 73 75 6c 74 20 5c 0a tStringResult \.
1e810 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1e820 63 6c 5f 47 65 74 53 74 72 69 6e 67 52 65 73 75 cl_GetStringResu
1e830 6c 74 29 20 2f 2a 20 31 37 34 20 2a 2f 0a 23 65 lt) /* 174 */.#e
1e840 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1e850 5f 47 65 74 56 61 72 0a 23 64 65 66 69 6e 65 20 _GetVar.#define
1e860 54 63 6c 5f 47 65 74 56 61 72 20 5c 0a 09 28 74 Tcl_GetVar \..(t
1e870 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1e880 47 65 74 56 61 72 29 20 2f 2a 20 31 37 35 20 2a GetVar) /* 175 *
1e890 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1e8a0 20 54 63 6c 5f 47 65 74 56 61 72 32 0a 23 64 65 Tcl_GetVar2.#de
1e8b0 66 69 6e 65 20 54 63 6c 5f 47 65 74 56 61 72 32 fine Tcl_GetVar2
1e8c0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1e8d0 2d 3e 74 63 6c 5f 47 65 74 56 61 72 32 29 20 2f ->tcl_GetVar2) /
1e8e0 2a 20 31 37 36 20 2a 2f 0a 23 65 6e 64 69 66 0a * 176 */.#endif.
1e8f0 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 6c 6f 62 #ifndef Tcl_Glob
1e900 61 6c 45 76 61 6c 0a 23 64 65 66 69 6e 65 20 54 alEval.#define T
1e910 63 6c 5f 47 6c 6f 62 61 6c 45 76 61 6c 20 5c 0a cl_GlobalEval \.
1e920 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1e930 63 6c 5f 47 6c 6f 62 61 6c 45 76 61 6c 29 20 2f cl_GlobalEval) /
1e940 2a 20 31 37 37 20 2a 2f 0a 23 65 6e 64 69 66 0a * 177 */.#endif.
1e950 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 6c 6f 62 #ifndef Tcl_Glob
1e960 61 6c 45 76 61 6c 4f 62 6a 0a 23 64 65 66 69 6e alEvalObj.#defin
1e970 65 20 54 63 6c 5f 47 6c 6f 62 61 6c 45 76 61 6c e Tcl_GlobalEval
1e980 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Obj \..(tclStubs
1e990 50 74 72 2d 3e 74 63 6c 5f 47 6c 6f 62 61 6c 45 Ptr->tcl_GlobalE
1e9a0 76 61 6c 4f 62 6a 29 20 2f 2a 20 31 37 38 20 2a valObj) /* 178 *
1e9b0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1e9c0 20 54 63 6c 5f 48 69 64 65 43 6f 6d 6d 61 6e 64 Tcl_HideCommand
1e9d0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 48 69 64 .#define Tcl_Hid
1e9e0 65 43 6f 6d 6d 61 6e 64 20 5c 0a 09 28 74 63 6c eCommand \..(tcl
1e9f0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 48 69 StubsPtr->tcl_Hi
1ea00 64 65 43 6f 6d 6d 61 6e 64 29 20 2f 2a 20 31 37 deCommand) /* 17
1ea10 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 9 */.#endif.#ifn
1ea20 64 65 66 20 54 63 6c 5f 49 6e 69 74 0a 23 64 65 def Tcl_Init.#de
1ea30 66 69 6e 65 20 54 63 6c 5f 49 6e 69 74 20 5c 0a fine Tcl_Init \.
1ea40 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1ea50 63 6c 5f 49 6e 69 74 29 20 2f 2a 20 31 38 30 20 cl_Init) /* 180
1ea60 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1ea70 66 20 54 63 6c 5f 49 6e 69 74 48 61 73 68 54 61 f Tcl_InitHashTa
1ea80 62 6c 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ble.#define Tcl_
1ea90 49 6e 69 74 48 61 73 68 54 61 62 6c 65 20 5c 0a InitHashTable \.
1eaa0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1eab0 63 6c 5f 49 6e 69 74 48 61 73 68 54 61 62 6c 65 cl_InitHashTable
1eac0 29 20 2f 2a 20 31 38 31 20 2a 2f 0a 23 65 6e 64 ) /* 181 */.#end
1ead0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 49 if.#ifndef Tcl_I
1eae0 6e 70 75 74 42 6c 6f 63 6b 65 64 0a 23 64 65 66 nputBlocked.#def
1eaf0 69 6e 65 20 54 63 6c 5f 49 6e 70 75 74 42 6c 6f ine Tcl_InputBlo
1eb00 63 6b 65 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 cked \..(tclStub
1eb10 73 50 74 72 2d 3e 74 63 6c 5f 49 6e 70 75 74 42 sPtr->tcl_InputB
1eb20 6c 6f 63 6b 65 64 29 20 2f 2a 20 31 38 32 20 2a locked) /* 182 *
1eb30 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1eb40 20 54 63 6c 5f 49 6e 70 75 74 42 75 66 66 65 72 Tcl_InputBuffer
1eb50 65 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 49 ed.#define Tcl_I
1eb60 6e 70 75 74 42 75 66 66 65 72 65 64 20 5c 0a 09 nputBuffered \..
1eb70 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1eb80 6c 5f 49 6e 70 75 74 42 75 66 66 65 72 65 64 29 l_InputBuffered)
1eb90 20 2f 2a 20 31 38 33 20 2a 2f 0a 23 65 6e 64 69 /* 183 */.#endi
1eba0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 49 6e f.#ifndef Tcl_In
1ebb0 74 65 72 70 44 65 6c 65 74 65 64 0a 23 64 65 66 terpDeleted.#def
1ebc0 69 6e 65 20 54 63 6c 5f 49 6e 74 65 72 70 44 65 ine Tcl_InterpDe
1ebd0 6c 65 74 65 64 20 5c 0a 09 28 74 63 6c 53 74 75 leted \..(tclStu
1ebe0 62 73 50 74 72 2d 3e 74 63 6c 5f 49 6e 74 65 72 bsPtr->tcl_Inter
1ebf0 70 44 65 6c 65 74 65 64 29 20 2f 2a 20 31 38 34 pDeleted) /* 184
1ec00 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
1ec10 65 66 20 54 63 6c 5f 49 73 53 61 66 65 0a 23 64 ef Tcl_IsSafe.#d
1ec20 65 66 69 6e 65 20 54 63 6c 5f 49 73 53 61 66 65 efine Tcl_IsSafe
1ec30 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1ec40 2d 3e 74 63 6c 5f 49 73 53 61 66 65 29 20 2f 2a ->tcl_IsSafe) /*
1ec50 20 31 38 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 185 */.#endif.#
1ec60 69 66 6e 64 65 66 20 54 63 6c 5f 4a 6f 69 6e 50 ifndef Tcl_JoinP
1ec70 61 74 68 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ath.#define Tcl_
1ec80 4a 6f 69 6e 50 61 74 68 20 5c 0a 09 28 74 63 6c JoinPath \..(tcl
1ec90 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4a 6f StubsPtr->tcl_Jo
1eca0 69 6e 50 61 74 68 29 20 2f 2a 20 31 38 36 20 2a inPath) /* 186 *
1ecb0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1ecc0 20 54 63 6c 5f 4c 69 6e 6b 56 61 72 0a 23 64 65 Tcl_LinkVar.#de
1ecd0 66 69 6e 65 20 54 63 6c 5f 4c 69 6e 6b 56 61 72 fine Tcl_LinkVar
1ece0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
1ecf0 2d 3e 74 63 6c 5f 4c 69 6e 6b 56 61 72 29 20 2f ->tcl_LinkVar) /
1ed00 2a 20 31 38 37 20 2a 2f 0a 23 65 6e 64 69 66 0a * 187 */.#endif.
1ed10 2f 2a 20 53 6c 6f 74 20 31 38 38 20 69 73 20 72 /* Slot 188 is r
1ed20 65 73 65 72 76 65 64 20 2a 2f 0a 23 69 66 6e 64 eserved */.#ifnd
1ed30 65 66 20 54 63 6c 5f 4d 61 6b 65 46 69 6c 65 43 ef Tcl_MakeFileC
1ed40 68 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 hannel.#define T
1ed50 63 6c 5f 4d 61 6b 65 46 69 6c 65 43 68 61 6e 6e cl_MakeFileChann
1ed60 65 6c 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 el \..(tclStubsP
1ed70 74 72 2d 3e 74 63 6c 5f 4d 61 6b 65 46 69 6c 65 tr->tcl_MakeFile
1ed80 43 68 61 6e 6e 65 6c 29 20 2f 2a 20 31 38 39 20 Channel) /* 189
1ed90 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
1eda0 66 20 54 63 6c 5f 4d 61 6b 65 53 61 66 65 0a 23 f Tcl_MakeSafe.#
1edb0 64 65 66 69 6e 65 20 54 63 6c 5f 4d 61 6b 65 53 define Tcl_MakeS
1edc0 61 66 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 afe \..(tclStubs
1edd0 50 74 72 2d 3e 74 63 6c 5f 4d 61 6b 65 53 61 66 Ptr->tcl_MakeSaf
1ede0 65 29 20 2f 2a 20 31 39 30 20 2a 2f 0a 23 65 6e e) /* 190 */.#en
1edf0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1ee00 4d 61 6b 65 54 63 70 43 6c 69 65 6e 74 43 68 61 MakeTcpClientCha
1ee10 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 63 6c nnel.#define Tcl
1ee20 5f 4d 61 6b 65 54 63 70 43 6c 69 65 6e 74 43 68 _MakeTcpClientCh
1ee30 61 6e 6e 65 6c 20 5c 0a 09 28 74 63 6c 53 74 75 annel \..(tclStu
1ee40 62 73 50 74 72 2d 3e 74 63 6c 5f 4d 61 6b 65 54 bsPtr->tcl_MakeT
1ee50 63 70 43 6c 69 65 6e 74 43 68 61 6e 6e 65 6c 29 cpClientChannel)
1ee60 20 2f 2a 20 31 39 31 20 2a 2f 0a 23 65 6e 64 69 /* 191 */.#endi
1ee70 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4d 65 f.#ifndef Tcl_Me
1ee80 72 67 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f rge.#define Tcl_
1ee90 4d 65 72 67 65 20 5c 0a 09 28 74 63 6c 53 74 75 Merge \..(tclStu
1eea0 62 73 50 74 72 2d 3e 74 63 6c 5f 4d 65 72 67 65 bsPtr->tcl_Merge
1eeb0 29 20 2f 2a 20 31 39 32 20 2a 2f 0a 23 65 6e 64 ) /* 192 */.#end
1eec0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4e if.#ifndef Tcl_N
1eed0 65 78 74 48 61 73 68 45 6e 74 72 79 0a 23 64 65 extHashEntry.#de
1eee0 66 69 6e 65 20 54 63 6c 5f 4e 65 78 74 48 61 73 fine Tcl_NextHas
1eef0 68 45 6e 74 72 79 20 5c 0a 09 28 74 63 6c 53 74 hEntry \..(tclSt
1ef00 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4e 65 78 74 ubsPtr->tcl_Next
1ef10 48 61 73 68 45 6e 74 72 79 29 20 2f 2a 20 31 39 HashEntry) /* 19
1ef20 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
1ef30 64 65 66 20 54 63 6c 5f 4e 6f 74 69 66 79 43 68 def Tcl_NotifyCh
1ef40 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 63 annel.#define Tc
1ef50 6c 5f 4e 6f 74 69 66 79 43 68 61 6e 6e 65 6c 20 l_NotifyChannel
1ef60 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1ef70 3e 74 63 6c 5f 4e 6f 74 69 66 79 43 68 61 6e 6e >tcl_NotifyChann
1ef80 65 6c 29 20 2f 2a 20 31 39 34 20 2a 2f 0a 23 65 el) /* 194 */.#e
1ef90 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1efa0 5f 4f 62 6a 47 65 74 56 61 72 32 0a 23 64 65 66 _ObjGetVar2.#def
1efb0 69 6e 65 20 54 63 6c 5f 4f 62 6a 47 65 74 56 61 ine Tcl_ObjGetVa
1efc0 72 32 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 r2 \..(tclStubsP
1efd0 74 72 2d 3e 74 63 6c 5f 4f 62 6a 47 65 74 56 61 tr->tcl_ObjGetVa
1efe0 72 32 29 20 2f 2a 20 31 39 35 20 2a 2f 0a 23 65 r2) /* 195 */.#e
1eff0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1f000 5f 4f 62 6a 53 65 74 56 61 72 32 0a 23 64 65 66 _ObjSetVar2.#def
1f010 69 6e 65 20 54 63 6c 5f 4f 62 6a 53 65 74 56 61 ine Tcl_ObjSetVa
1f020 72 32 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 r2 \..(tclStubsP
1f030 74 72 2d 3e 74 63 6c 5f 4f 62 6a 53 65 74 56 61 tr->tcl_ObjSetVa
1f040 72 32 29 20 2f 2a 20 31 39 36 20 2a 2f 0a 23 65 r2) /* 196 */.#e
1f050 6e 64 69 66 0a 23 69 66 20 21 64 65 66 69 6e 65 ndif.#if !define
1f060 64 28 5f 5f 57 49 4e 33 32 5f 5f 29 20 26 26 20 d(__WIN32__) &&
1f070 21 64 65 66 69 6e 65 64 28 4d 41 43 5f 54 43 4c !defined(MAC_TCL
1f080 29 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 69 66 ) /* UNIX */.#if
1f090 6e 64 65 66 20 54 63 6c 5f 4f 70 65 6e 43 6f 6d ndef Tcl_OpenCom
1f0a0 6d 61 6e 64 43 68 61 6e 6e 65 6c 0a 23 64 65 66 mandChannel.#def
1f0b0 69 6e 65 20 54 63 6c 5f 4f 70 65 6e 43 6f 6d 6d ine Tcl_OpenComm
1f0c0 61 6e 64 43 68 61 6e 6e 65 6c 20 5c 0a 09 28 74 andChannel \..(t
1f0d0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1f0e0 4f 70 65 6e 43 6f 6d 6d 61 6e 64 43 68 61 6e 6e OpenCommandChann
1f0f0 65 6c 29 20 2f 2a 20 31 39 37 20 2a 2f 0a 23 65 el) /* 197 */.#e
1f100 6e 64 69 66 0a 23 65 6e 64 69 66 20 2f 2a 20 55 ndif.#endif /* U
1f110 4e 49 58 20 2a 2f 0a 23 69 66 64 65 66 20 5f 5f NIX */.#ifdef __
1f120 57 49 4e 33 32 5f 5f 0a 23 69 66 6e 64 65 66 20 WIN32__.#ifndef
1f130 54 63 6c 5f 4f 70 65 6e 43 6f 6d 6d 61 6e 64 43 Tcl_OpenCommandC
1f140 68 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 hannel.#define T
1f150 63 6c 5f 4f 70 65 6e 43 6f 6d 6d 61 6e 64 43 68 cl_OpenCommandCh
1f160 61 6e 6e 65 6c 20 5c 0a 09 28 74 63 6c 53 74 75 annel \..(tclStu
1f170 62 73 50 74 72 2d 3e 74 63 6c 5f 4f 70 65 6e 43 bsPtr->tcl_OpenC
1f180 6f 6d 6d 61 6e 64 43 68 61 6e 6e 65 6c 29 20 2f ommandChannel) /
1f190 2a 20 31 39 37 20 2a 2f 0a 23 65 6e 64 69 66 0a * 197 */.#endif.
1f1a0 23 65 6e 64 69 66 20 2f 2a 20 5f 5f 57 49 4e 33 #endif /* __WIN3
1f1b0 32 5f 5f 20 2a 2f 0a 23 69 66 6e 64 65 66 20 54 2__ */.#ifndef T
1f1c0 63 6c 5f 4f 70 65 6e 46 69 6c 65 43 68 61 6e 6e cl_OpenFileChann
1f1d0 65 6c 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 4f el.#define Tcl_O
1f1e0 70 65 6e 46 69 6c 65 43 68 61 6e 6e 65 6c 20 5c penFileChannel \
1f1f0 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1f200 74 63 6c 5f 4f 70 65 6e 46 69 6c 65 43 68 61 6e tcl_OpenFileChan
1f210 6e 65 6c 29 20 2f 2a 20 31 39 38 20 2a 2f 0a 23 nel) /* 198 */.#
1f220 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
1f230 6c 5f 4f 70 65 6e 54 63 70 43 6c 69 65 6e 74 0a l_OpenTcpClient.
1f240 23 64 65 66 69 6e 65 20 54 63 6c 5f 4f 70 65 6e #define Tcl_Open
1f250 54 63 70 43 6c 69 65 6e 74 20 5c 0a 09 28 74 63 TcpClient \..(tc
1f260 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4f lStubsPtr->tcl_O
1f270 70 65 6e 54 63 70 43 6c 69 65 6e 74 29 20 2f 2a penTcpClient) /*
1f280 20 31 39 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 199 */.#endif.#
1f290 69 66 6e 64 65 66 20 54 63 6c 5f 4f 70 65 6e 54 ifndef Tcl_OpenT
1f2a0 63 70 53 65 72 76 65 72 0a 23 64 65 66 69 6e 65 cpServer.#define
1f2b0 20 54 63 6c 5f 4f 70 65 6e 54 63 70 53 65 72 76 Tcl_OpenTcpServ
1f2c0 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 er \..(tclStubsP
1f2d0 74 72 2d 3e 74 63 6c 5f 4f 70 65 6e 54 63 70 53 tr->tcl_OpenTcpS
1f2e0 65 72 76 65 72 29 20 2f 2a 20 32 30 30 20 2a 2f erver) /* 200 */
1f2f0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1f300 54 63 6c 5f 50 72 65 73 65 72 76 65 0a 23 64 65 Tcl_Preserve.#de
1f310 66 69 6e 65 20 54 63 6c 5f 50 72 65 73 65 72 76 fine Tcl_Preserv
1f320 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 e \..(tclStubsPt
1f330 72 2d 3e 74 63 6c 5f 50 72 65 73 65 72 76 65 29 r->tcl_Preserve)
1f340 20 2f 2a 20 32 30 31 20 2a 2f 0a 23 65 6e 64 69 /* 201 */.#endi
1f350 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 72 f.#ifndef Tcl_Pr
1f360 69 6e 74 44 6f 75 62 6c 65 0a 23 64 65 66 69 6e intDouble.#defin
1f370 65 20 54 63 6c 5f 50 72 69 6e 74 44 6f 75 62 6c e Tcl_PrintDoubl
1f380 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 e \..(tclStubsPt
1f390 72 2d 3e 74 63 6c 5f 50 72 69 6e 74 44 6f 75 62 r->tcl_PrintDoub
1f3a0 6c 65 29 20 2f 2a 20 32 30 32 20 2a 2f 0a 23 65 le) /* 202 */.#e
1f3b0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1f3c0 5f 50 75 74 45 6e 76 0a 23 64 65 66 69 6e 65 20 _PutEnv.#define
1f3d0 54 63 6c 5f 50 75 74 45 6e 76 20 5c 0a 09 28 74 Tcl_PutEnv \..(t
1f3e0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1f3f0 50 75 74 45 6e 76 29 20 2f 2a 20 32 30 33 20 2a PutEnv) /* 203 *
1f400 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1f410 20 54 63 6c 5f 50 6f 73 69 78 45 72 72 6f 72 0a Tcl_PosixError.
1f420 23 64 65 66 69 6e 65 20 54 63 6c 5f 50 6f 73 69 #define Tcl_Posi
1f430 78 45 72 72 6f 72 20 5c 0a 09 28 74 63 6c 53 74 xError \..(tclSt
1f440 75 62 73 50 74 72 2d 3e 74 63 6c 5f 50 6f 73 69 ubsPtr->tcl_Posi
1f450 78 45 72 72 6f 72 29 20 2f 2a 20 32 30 34 20 2a xError) /* 204 *
1f460 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1f470 20 54 63 6c 5f 51 75 65 75 65 45 76 65 6e 74 0a Tcl_QueueEvent.
1f480 23 64 65 66 69 6e 65 20 54 63 6c 5f 51 75 65 75 #define Tcl_Queu
1f490 65 45 76 65 6e 74 20 5c 0a 09 28 74 63 6c 53 74 eEvent \..(tclSt
1f4a0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 51 75 65 75 ubsPtr->tcl_Queu
1f4b0 65 45 76 65 6e 74 29 20 2f 2a 20 32 30 35 20 2a eEvent) /* 205 *
1f4c0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1f4d0 20 54 63 6c 5f 52 65 61 64 0a 23 64 65 66 69 6e Tcl_Read.#defin
1f4e0 65 20 54 63 6c 5f 52 65 61 64 20 5c 0a 09 28 74 e Tcl_Read \..(t
1f4f0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1f500 52 65 61 64 29 20 2f 2a 20 32 30 36 20 2a 2f 0a Read) /* 206 */.
1f510 23 65 6e 64 69 66 0a 23 69 66 20 21 64 65 66 69 #endif.#if !defi
1f520 6e 65 64 28 5f 5f 57 49 4e 33 32 5f 5f 29 20 26 ned(__WIN32__) &
1f530 26 20 21 64 65 66 69 6e 65 64 28 4d 41 43 5f 54 & !defined(MAC_T
1f540 43 4c 29 20 2f 2a 20 55 4e 49 58 20 2a 2f 0a 23 CL) /* UNIX */.#
1f550 69 66 6e 64 65 66 20 54 63 6c 5f 52 65 61 70 44 ifndef Tcl_ReapD
1f560 65 74 61 63 68 65 64 50 72 6f 63 73 0a 23 64 65 etachedProcs.#de
1f570 66 69 6e 65 20 54 63 6c 5f 52 65 61 70 44 65 74 fine Tcl_ReapDet
1f580 61 63 68 65 64 50 72 6f 63 73 20 5c 0a 09 28 74 achedProcs \..(t
1f590 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1f5a0 52 65 61 70 44 65 74 61 63 68 65 64 50 72 6f 63 ReapDetachedProc
1f5b0 73 29 20 2f 2a 20 32 30 37 20 2a 2f 0a 23 65 6e s) /* 207 */.#en
1f5c0 64 69 66 0a 23 65 6e 64 69 66 20 2f 2a 20 55 4e dif.#endif /* UN
1f5d0 49 58 20 2a 2f 0a 23 69 66 64 65 66 20 5f 5f 57 IX */.#ifdef __W
1f5e0 49 4e 33 32 5f 5f 0a 23 69 66 6e 64 65 66 20 54 IN32__.#ifndef T
1f5f0 63 6c 5f 52 65 61 70 44 65 74 61 63 68 65 64 50 cl_ReapDetachedP
1f600 72 6f 63 73 0a 23 64 65 66 69 6e 65 20 54 63 6c rocs.#define Tcl
1f610 5f 52 65 61 70 44 65 74 61 63 68 65 64 50 72 6f _ReapDetachedPro
1f620 63 73 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 cs \..(tclStubsP
1f630 74 72 2d 3e 74 63 6c 5f 52 65 61 70 44 65 74 61 tr->tcl_ReapDeta
1f640 63 68 65 64 50 72 6f 63 73 29 20 2f 2a 20 32 30 chedProcs) /* 20
1f650 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 65 6e 64 7 */.#endif.#end
1f660 69 66 20 2f 2a 20 5f 5f 57 49 4e 33 32 5f 5f 20 if /* __WIN32__
1f670 2a 2f 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 52 */.#ifndef Tcl_R
1f680 65 63 6f 72 64 41 6e 64 45 76 61 6c 0a 23 64 65 ecordAndEval.#de
1f690 66 69 6e 65 20 54 63 6c 5f 52 65 63 6f 72 64 41 fine Tcl_RecordA
1f6a0 6e 64 45 76 61 6c 20 5c 0a 09 28 74 63 6c 53 74 ndEval \..(tclSt
1f6b0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 52 65 63 6f ubsPtr->tcl_Reco
1f6c0 72 64 41 6e 64 45 76 61 6c 29 20 2f 2a 20 32 30 rdAndEval) /* 20
1f6d0 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 8 */.#endif.#ifn
1f6e0 64 65 66 20 54 63 6c 5f 52 65 63 6f 72 64 41 6e def Tcl_RecordAn
1f6f0 64 45 76 61 6c 4f 62 6a 0a 23 64 65 66 69 6e 65 dEvalObj.#define
1f700 20 54 63 6c 5f 52 65 63 6f 72 64 41 6e 64 45 76 Tcl_RecordAndEv
1f710 61 6c 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 alObj \..(tclStu
1f720 62 73 50 74 72 2d 3e 74 63 6c 5f 52 65 63 6f 72 bsPtr->tcl_Recor
1f730 64 41 6e 64 45 76 61 6c 4f 62 6a 29 20 2f 2a 20 dAndEvalObj) /*
1f740 32 30 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 209 */.#endif.#i
1f750 66 6e 64 65 66 20 54 63 6c 5f 52 65 67 69 73 74 fndef Tcl_Regist
1f760 65 72 43 68 61 6e 6e 65 6c 0a 23 64 65 66 69 6e erChannel.#defin
1f770 65 20 54 63 6c 5f 52 65 67 69 73 74 65 72 43 68 e Tcl_RegisterCh
1f780 61 6e 6e 65 6c 20 5c 0a 09 28 74 63 6c 53 74 75 annel \..(tclStu
1f790 62 73 50 74 72 2d 3e 74 63 6c 5f 52 65 67 69 73 bsPtr->tcl_Regis
1f7a0 74 65 72 43 68 61 6e 6e 65 6c 29 20 2f 2a 20 32 terChannel) /* 2
1f7b0 31 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 10 */.#endif.#if
1f7c0 6e 64 65 66 20 54 63 6c 5f 52 65 67 69 73 74 65 ndef Tcl_Registe
1f7d0 72 4f 62 6a 54 79 70 65 0a 23 64 65 66 69 6e 65 rObjType.#define
1f7e0 20 54 63 6c 5f 52 65 67 69 73 74 65 72 4f 62 6a Tcl_RegisterObj
1f7f0 54 79 70 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 Type \..(tclStub
1f800 73 50 74 72 2d 3e 74 63 6c 5f 52 65 67 69 73 74 sPtr->tcl_Regist
1f810 65 72 4f 62 6a 54 79 70 65 29 20 2f 2a 20 32 31 erObjType) /* 21
1f820 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 1 */.#endif.#ifn
1f830 64 65 66 20 54 63 6c 5f 52 65 67 45 78 70 43 6f def Tcl_RegExpCo
1f840 6d 70 69 6c 65 0a 23 64 65 66 69 6e 65 20 54 63 mpile.#define Tc
1f850 6c 5f 52 65 67 45 78 70 43 6f 6d 70 69 6c 65 20 l_RegExpCompile
1f860 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1f870 3e 74 63 6c 5f 52 65 67 45 78 70 43 6f 6d 70 69 >tcl_RegExpCompi
1f880 6c 65 29 20 2f 2a 20 32 31 32 20 2a 2f 0a 23 65 le) /* 212 */.#e
1f890 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1f8a0 5f 52 65 67 45 78 70 45 78 65 63 0a 23 64 65 66 _RegExpExec.#def
1f8b0 69 6e 65 20 54 63 6c 5f 52 65 67 45 78 70 45 78 ine Tcl_RegExpEx
1f8c0 65 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 ec \..(tclStubsP
1f8d0 74 72 2d 3e 74 63 6c 5f 52 65 67 45 78 70 45 78 tr->tcl_RegExpEx
1f8e0 65 63 29 20 2f 2a 20 32 31 33 20 2a 2f 0a 23 65 ec) /* 213 */.#e
1f8f0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1f900 5f 52 65 67 45 78 70 4d 61 74 63 68 0a 23 64 65 _RegExpMatch.#de
1f910 66 69 6e 65 20 54 63 6c 5f 52 65 67 45 78 70 4d fine Tcl_RegExpM
1f920 61 74 63 68 20 5c 0a 09 28 74 63 6c 53 74 75 62 atch \..(tclStub
1f930 73 50 74 72 2d 3e 74 63 6c 5f 52 65 67 45 78 70 sPtr->tcl_RegExp
1f940 4d 61 74 63 68 29 20 2f 2a 20 32 31 34 20 2a 2f Match) /* 214 */
1f950 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1f960 54 63 6c 5f 52 65 67 45 78 70 52 61 6e 67 65 0a Tcl_RegExpRange.
1f970 23 64 65 66 69 6e 65 20 54 63 6c 5f 52 65 67 45 #define Tcl_RegE
1f980 78 70 52 61 6e 67 65 20 5c 0a 09 28 74 63 6c 53 xpRange \..(tclS
1f990 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 52 65 67 tubsPtr->tcl_Reg
1f9a0 45 78 70 52 61 6e 67 65 29 20 2f 2a 20 32 31 35 ExpRange) /* 215
1f9b0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
1f9c0 65 66 20 54 63 6c 5f 52 65 6c 65 61 73 65 0a 23 ef Tcl_Release.#
1f9d0 64 65 66 69 6e 65 20 54 63 6c 5f 52 65 6c 65 61 define Tcl_Relea
1f9e0 73 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 se \..(tclStubsP
1f9f0 74 72 2d 3e 74 63 6c 5f 52 65 6c 65 61 73 65 29 tr->tcl_Release)
1fa00 20 2f 2a 20 32 31 36 20 2a 2f 0a 23 65 6e 64 69 /* 216 */.#endi
1fa10 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 52 65 f.#ifndef Tcl_Re
1fa20 73 65 74 52 65 73 75 6c 74 0a 23 64 65 66 69 6e setResult.#defin
1fa30 65 20 54 63 6c 5f 52 65 73 65 74 52 65 73 75 6c e Tcl_ResetResul
1fa40 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 t \..(tclStubsPt
1fa50 72 2d 3e 74 63 6c 5f 52 65 73 65 74 52 65 73 75 r->tcl_ResetResu
1fa60 6c 74 29 20 2f 2a 20 32 31 37 20 2a 2f 0a 23 65 lt) /* 217 */.#e
1fa70 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
1fa80 5f 53 63 61 6e 45 6c 65 6d 65 6e 74 0a 23 64 65 _ScanElement.#de
1fa90 66 69 6e 65 20 54 63 6c 5f 53 63 61 6e 45 6c 65 fine Tcl_ScanEle
1faa0 6d 65 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 ment \..(tclStub
1fab0 73 50 74 72 2d 3e 74 63 6c 5f 53 63 61 6e 45 6c sPtr->tcl_ScanEl
1fac0 65 6d 65 6e 74 29 20 2f 2a 20 32 31 38 20 2a 2f ement) /* 218 */
1fad0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
1fae0 54 63 6c 5f 53 63 61 6e 43 6f 75 6e 74 65 64 45 Tcl_ScanCountedE
1faf0 6c 65 6d 65 6e 74 0a 23 64 65 66 69 6e 65 20 54 lement.#define T
1fb00 63 6c 5f 53 63 61 6e 43 6f 75 6e 74 65 64 45 6c cl_ScanCountedEl
1fb10 65 6d 65 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 ement \..(tclStu
1fb20 62 73 50 74 72 2d 3e 74 63 6c 5f 53 63 61 6e 43 bsPtr->tcl_ScanC
1fb30 6f 75 6e 74 65 64 45 6c 65 6d 65 6e 74 29 20 2f ountedElement) /
1fb40 2a 20 32 31 39 20 2a 2f 0a 23 65 6e 64 69 66 0a * 219 */.#endif.
1fb50 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 65 6b #ifndef Tcl_Seek
1fb60 4f 6c 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Old.#define Tcl_
1fb70 53 65 65 6b 4f 6c 64 20 5c 0a 09 28 74 63 6c 53 SeekOld \..(tclS
1fb80 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 65 tubsPtr->tcl_See
1fb90 6b 4f 6c 64 29 20 2f 2a 20 32 32 30 20 2a 2f 0a kOld) /* 220 */.
1fba0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1fbb0 63 6c 5f 53 65 72 76 69 63 65 41 6c 6c 0a 23 64 cl_ServiceAll.#d
1fbc0 65 66 69 6e 65 20 54 63 6c 5f 53 65 72 76 69 63 efine Tcl_Servic
1fbd0 65 41 6c 6c 20 5c 0a 09 28 74 63 6c 53 74 75 62 eAll \..(tclStub
1fbe0 73 50 74 72 2d 3e 74 63 6c 5f 53 65 72 76 69 63 sPtr->tcl_Servic
1fbf0 65 41 6c 6c 29 20 2f 2a 20 32 32 31 20 2a 2f 0a eAll) /* 221 */.
1fc00 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
1fc10 63 6c 5f 53 65 72 76 69 63 65 45 76 65 6e 74 0a cl_ServiceEvent.
1fc20 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 72 76 #define Tcl_Serv
1fc30 69 63 65 45 76 65 6e 74 20 5c 0a 09 28 74 63 6c iceEvent \..(tcl
1fc40 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 StubsPtr->tcl_Se
1fc50 72 76 69 63 65 45 76 65 6e 74 29 20 2f 2a 20 32 rviceEvent) /* 2
1fc60 32 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 22 */.#endif.#if
1fc70 6e 64 65 66 20 54 63 6c 5f 53 65 74 41 73 73 6f ndef Tcl_SetAsso
1fc80 63 44 61 74 61 0a 23 64 65 66 69 6e 65 20 54 63 cData.#define Tc
1fc90 6c 5f 53 65 74 41 73 73 6f 63 44 61 74 61 20 5c l_SetAssocData \
1fca0 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
1fcb0 74 63 6c 5f 53 65 74 41 73 73 6f 63 44 61 74 61 tcl_SetAssocData
1fcc0 29 20 2f 2a 20 32 32 33 20 2a 2f 0a 23 65 6e 64 ) /* 223 */.#end
1fcd0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 if.#ifndef Tcl_S
1fce0 65 74 43 68 61 6e 6e 65 6c 42 75 66 66 65 72 53 etChannelBufferS
1fcf0 69 7a 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ize.#define Tcl_
1fd00 53 65 74 43 68 61 6e 6e 65 6c 42 75 66 66 65 72 SetChannelBuffer
1fd10 53 69 7a 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 Size \..(tclStub
1fd20 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 43 68 61 sPtr->tcl_SetCha
1fd30 6e 6e 65 6c 42 75 66 66 65 72 53 69 7a 65 29 20 nnelBufferSize)
1fd40 2f 2a 20 32 32 34 20 2a 2f 0a 23 65 6e 64 69 66 /* 224 */.#endif
1fd50 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 .#ifndef Tcl_Set
1fd60 43 68 61 6e 6e 65 6c 4f 70 74 69 6f 6e 0a 23 64 ChannelOption.#d
1fd70 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 43 68 61 efine Tcl_SetCha
1fd80 6e 6e 65 6c 4f 70 74 69 6f 6e 20 5c 0a 09 28 74 nnelOption \..(t
1fd90 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1fda0 53 65 74 43 68 61 6e 6e 65 6c 4f 70 74 69 6f 6e SetChannelOption
1fdb0 29 20 2f 2a 20 32 32 35 20 2a 2f 0a 23 65 6e 64 ) /* 225 */.#end
1fdc0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 if.#ifndef Tcl_S
1fdd0 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 0a 23 64 etCommandInfo.#d
1fde0 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 43 6f 6d efine Tcl_SetCom
1fdf0 6d 61 6e 64 49 6e 66 6f 20 5c 0a 09 28 74 63 6c mandInfo \..(tcl
1fe00 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 StubsPtr->tcl_Se
1fe10 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 29 20 2f 2a tCommandInfo) /*
1fe20 20 32 32 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 226 */.#endif.#
1fe30 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 45 72 ifndef Tcl_SetEr
1fe40 72 6e 6f 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f rno.#define Tcl_
1fe50 53 65 74 45 72 72 6e 6f 20 5c 0a 09 28 74 63 6c SetErrno \..(tcl
1fe60 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 StubsPtr->tcl_Se
1fe70 74 45 72 72 6e 6f 29 20 2f 2a 20 32 32 37 20 2a tErrno) /* 227 *
1fe80 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
1fe90 20 54 63 6c 5f 53 65 74 45 72 72 6f 72 43 6f 64 Tcl_SetErrorCod
1fea0 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 e.#define Tcl_Se
1feb0 74 45 72 72 6f 72 43 6f 64 65 20 5c 0a 09 28 74 tErrorCode \..(t
1fec0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
1fed0 53 65 74 45 72 72 6f 72 43 6f 64 65 29 20 2f 2a SetErrorCode) /*
1fee0 20 32 32 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 228 */.#endif.#
1fef0 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 4d 61 ifndef Tcl_SetMa
1ff00 78 42 6c 6f 63 6b 54 69 6d 65 0a 23 64 65 66 69 xBlockTime.#defi
1ff10 6e 65 20 54 63 6c 5f 53 65 74 4d 61 78 42 6c 6f ne Tcl_SetMaxBlo
1ff20 63 6b 54 69 6d 65 20 5c 0a 09 28 74 63 6c 53 74 ckTime \..(tclSt
1ff30 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 4d ubsPtr->tcl_SetM
1ff40 61 78 42 6c 6f 63 6b 54 69 6d 65 29 20 2f 2a 20 axBlockTime) /*
1ff50 32 32 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 229 */.#endif.#i
1ff60 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 50 61 6e fndef Tcl_SetPan
1ff70 69 63 50 72 6f 63 0a 23 64 65 66 69 6e 65 20 54 icProc.#define T
1ff80 63 6c 5f 53 65 74 50 61 6e 69 63 50 72 6f 63 20 cl_SetPanicProc
1ff90 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
1ffa0 3e 74 63 6c 5f 53 65 74 50 61 6e 69 63 50 72 6f >tcl_SetPanicPro
1ffb0 63 29 20 2f 2a 20 32 33 30 20 2a 2f 0a 23 65 6e c) /* 230 */.#en
1ffc0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
1ffd0 53 65 74 52 65 63 75 72 73 69 6f 6e 4c 69 6d 69 SetRecursionLimi
1ffe0 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 t.#define Tcl_Se
1fff0 74 52 65 63 75 72 73 69 6f 6e 4c 69 6d 69 74 20 tRecursionLimit
20000 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
20010 3e 74 63 6c 5f 53 65 74 52 65 63 75 72 73 69 6f >tcl_SetRecursio
20020 6e 4c 69 6d 69 74 29 20 2f 2a 20 32 33 31 20 2a nLimit) /* 231 *
20030 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
20040 20 54 63 6c 5f 53 65 74 52 65 73 75 6c 74 0a 23 Tcl_SetResult.#
20050 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 52 65 define Tcl_SetRe
20060 73 75 6c 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 sult \..(tclStub
20070 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 52 65 73 sPtr->tcl_SetRes
20080 75 6c 74 29 20 2f 2a 20 32 33 32 20 2a 2f 0a 23 ult) /* 232 */.#
20090 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
200a0 6c 5f 53 65 74 53 65 72 76 69 63 65 4d 6f 64 65 l_SetServiceMode
200b0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 .#define Tcl_Set
200c0 53 65 72 76 69 63 65 4d 6f 64 65 20 5c 0a 09 28 ServiceMode \..(
200d0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
200e0 5f 53 65 74 53 65 72 76 69 63 65 4d 6f 64 65 29 _SetServiceMode)
200f0 20 2f 2a 20 32 33 33 20 2a 2f 0a 23 65 6e 64 69 /* 233 */.#endi
20100 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 f.#ifndef Tcl_Se
20110 74 4f 62 6a 45 72 72 6f 72 43 6f 64 65 0a 23 64 tObjErrorCode.#d
20120 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 4f 62 6a efine Tcl_SetObj
20130 45 72 72 6f 72 43 6f 64 65 20 5c 0a 09 28 74 63 ErrorCode \..(tc
20140 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 lStubsPtr->tcl_S
20150 65 74 4f 62 6a 45 72 72 6f 72 43 6f 64 65 29 20 etObjErrorCode)
20160 2f 2a 20 32 33 34 20 2a 2f 0a 23 65 6e 64 69 66 /* 234 */.#endif
20170 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 .#ifndef Tcl_Set
20180 4f 62 6a 52 65 73 75 6c 74 0a 23 64 65 66 69 6e ObjResult.#defin
20190 65 20 54 63 6c 5f 53 65 74 4f 62 6a 52 65 73 75 e Tcl_SetObjResu
201a0 6c 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 lt \..(tclStubsP
201b0 74 72 2d 3e 74 63 6c 5f 53 65 74 4f 62 6a 52 65 tr->tcl_SetObjRe
201c0 73 75 6c 74 29 20 2f 2a 20 32 33 35 20 2a 2f 0a sult) /* 235 */.
201d0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
201e0 63 6c 5f 53 65 74 53 74 64 43 68 61 6e 6e 65 6c cl_SetStdChannel
201f0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 .#define Tcl_Set
20200 53 74 64 43 68 61 6e 6e 65 6c 20 5c 0a 09 28 74 StdChannel \..(t
20210 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
20220 53 65 74 53 74 64 43 68 61 6e 6e 65 6c 29 20 2f SetStdChannel) /
20230 2a 20 32 33 36 20 2a 2f 0a 23 65 6e 64 69 66 0a * 236 */.#endif.
20240 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 56 #ifndef Tcl_SetV
20250 61 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 ar.#define Tcl_S
20260 65 74 56 61 72 20 5c 0a 09 28 74 63 6c 53 74 75 etVar \..(tclStu
20270 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 56 61 bsPtr->tcl_SetVa
20280 72 29 20 2f 2a 20 32 33 37 20 2a 2f 0a 23 65 6e r) /* 237 */.#en
20290 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
202a0 53 65 74 56 61 72 32 0a 23 64 65 66 69 6e 65 20 SetVar2.#define
202b0 54 63 6c 5f 53 65 74 56 61 72 32 20 5c 0a 09 28 Tcl_SetVar2 \..(
202c0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
202d0 5f 53 65 74 56 61 72 32 29 20 2f 2a 20 32 33 38 _SetVar2) /* 238
202e0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
202f0 65 66 20 54 63 6c 5f 53 69 67 6e 61 6c 49 64 0a ef Tcl_SignalId.
20300 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 69 67 6e #define Tcl_Sign
20310 61 6c 49 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 alId \..(tclStub
20320 73 50 74 72 2d 3e 74 63 6c 5f 53 69 67 6e 61 6c sPtr->tcl_Signal
20330 49 64 29 20 2f 2a 20 32 33 39 20 2a 2f 0a 23 65 Id) /* 239 */.#e
20340 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
20350 5f 53 69 67 6e 61 6c 4d 73 67 0a 23 64 65 66 69 _SignalMsg.#defi
20360 6e 65 20 54 63 6c 5f 53 69 67 6e 61 6c 4d 73 67 ne Tcl_SignalMsg
20370 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
20380 2d 3e 74 63 6c 5f 53 69 67 6e 61 6c 4d 73 67 29 ->tcl_SignalMsg)
20390 20 2f 2a 20 32 34 30 20 2a 2f 0a 23 65 6e 64 69 /* 240 */.#endi
203a0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 6f f.#ifndef Tcl_So
203b0 75 72 63 65 52 43 46 69 6c 65 0a 23 64 65 66 69 urceRCFile.#defi
203c0 6e 65 20 54 63 6c 5f 53 6f 75 72 63 65 52 43 46 ne Tcl_SourceRCF
203d0 69 6c 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ile \..(tclStubs
203e0 50 74 72 2d 3e 74 63 6c 5f 53 6f 75 72 63 65 52 Ptr->tcl_SourceR
203f0 43 46 69 6c 65 29 20 2f 2a 20 32 34 31 20 2a 2f CFile) /* 241 */
20400 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
20410 54 63 6c 5f 53 70 6c 69 74 4c 69 73 74 0a 23 64 Tcl_SplitList.#d
20420 65 66 69 6e 65 20 54 63 6c 5f 53 70 6c 69 74 4c efine Tcl_SplitL
20430 69 73 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ist \..(tclStubs
20440 50 74 72 2d 3e 74 63 6c 5f 53 70 6c 69 74 4c 69 Ptr->tcl_SplitLi
20450 73 74 29 20 2f 2a 20 32 34 32 20 2a 2f 0a 23 65 st) /* 242 */.#e
20460 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
20470 5f 53 70 6c 69 74 50 61 74 68 0a 23 64 65 66 69 _SplitPath.#defi
20480 6e 65 20 54 63 6c 5f 53 70 6c 69 74 50 61 74 68 ne Tcl_SplitPath
20490 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
204a0 2d 3e 74 63 6c 5f 53 70 6c 69 74 50 61 74 68 29 ->tcl_SplitPath)
204b0 20 2f 2a 20 32 34 33 20 2a 2f 0a 23 65 6e 64 69 /* 243 */.#endi
204c0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 74 f.#ifndef Tcl_St
204d0 61 74 69 63 50 61 63 6b 61 67 65 0a 23 64 65 66 aticPackage.#def
204e0 69 6e 65 20 54 63 6c 5f 53 74 61 74 69 63 50 61 ine Tcl_StaticPa
204f0 63 6b 61 67 65 20 5c 0a 09 28 74 63 6c 53 74 75 ckage \..(tclStu
20500 62 73 50 74 72 2d 3e 74 63 6c 5f 53 74 61 74 69 bsPtr->tcl_Stati
20510 63 50 61 63 6b 61 67 65 29 20 2f 2a 20 32 34 34 cPackage) /* 244
20520 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
20530 65 66 20 54 63 6c 5f 53 74 72 69 6e 67 4d 61 74 ef Tcl_StringMat
20540 63 68 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 ch.#define Tcl_S
20550 74 72 69 6e 67 4d 61 74 63 68 20 5c 0a 09 28 74 tringMatch \..(t
20560 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
20570 53 74 72 69 6e 67 4d 61 74 63 68 29 20 2f 2a 20 StringMatch) /*
20580 32 34 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 245 */.#endif.#i
20590 66 6e 64 65 66 20 54 63 6c 5f 54 65 6c 6c 4f 6c fndef Tcl_TellOl
205a0 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 54 65 d.#define Tcl_Te
205b0 6c 6c 4f 6c 64 20 5c 0a 09 28 74 63 6c 53 74 75 llOld \..(tclStu
205c0 62 73 50 74 72 2d 3e 74 63 6c 5f 54 65 6c 6c 4f bsPtr->tcl_TellO
205d0 6c 64 29 20 2f 2a 20 32 34 36 20 2a 2f 0a 23 65 ld) /* 246 */.#e
205e0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
205f0 5f 54 72 61 63 65 56 61 72 0a 23 64 65 66 69 6e _TraceVar.#defin
20600 65 20 54 63 6c 5f 54 72 61 63 65 56 61 72 20 5c e Tcl_TraceVar \
20610 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
20620 74 63 6c 5f 54 72 61 63 65 56 61 72 29 20 2f 2a tcl_TraceVar) /*
20630 20 32 34 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 247 */.#endif.#
20640 69 66 6e 64 65 66 20 54 63 6c 5f 54 72 61 63 65 ifndef Tcl_Trace
20650 56 61 72 32 0a 23 64 65 66 69 6e 65 20 54 63 6c Var2.#define Tcl
20660 5f 54 72 61 63 65 56 61 72 32 20 5c 0a 09 28 74 _TraceVar2 \..(t
20670 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
20680 54 72 61 63 65 56 61 72 32 29 20 2f 2a 20 32 34 TraceVar2) /* 24
20690 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 8 */.#endif.#ifn
206a0 64 65 66 20 54 63 6c 5f 54 72 61 6e 73 6c 61 74 def Tcl_Translat
206b0 65 46 69 6c 65 4e 61 6d 65 0a 23 64 65 66 69 6e eFileName.#defin
206c0 65 20 54 63 6c 5f 54 72 61 6e 73 6c 61 74 65 46 e Tcl_TranslateF
206d0 69 6c 65 4e 61 6d 65 20 5c 0a 09 28 74 63 6c 53 ileName \..(tclS
206e0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 54 72 61 tubsPtr->tcl_Tra
206f0 6e 73 6c 61 74 65 46 69 6c 65 4e 61 6d 65 29 20 nslateFileName)
20700 2f 2a 20 32 34 39 20 2a 2f 0a 23 65 6e 64 69 66 /* 249 */.#endif
20710 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e 67 .#ifndef Tcl_Ung
20720 65 74 73 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ets.#define Tcl_
20730 55 6e 67 65 74 73 20 5c 0a 09 28 74 63 6c 53 74 Ungets \..(tclSt
20740 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e 67 65 ubsPtr->tcl_Unge
20750 74 73 29 20 2f 2a 20 32 35 30 20 2a 2f 0a 23 65 ts) /* 250 */.#e
20760 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
20770 5f 55 6e 6c 69 6e 6b 56 61 72 0a 23 64 65 66 69 _UnlinkVar.#defi
20780 6e 65 20 54 63 6c 5f 55 6e 6c 69 6e 6b 56 61 72 ne Tcl_UnlinkVar
20790 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
207a0 2d 3e 74 63 6c 5f 55 6e 6c 69 6e 6b 56 61 72 29 ->tcl_UnlinkVar)
207b0 20 2f 2a 20 32 35 31 20 2a 2f 0a 23 65 6e 64 69 /* 251 */.#endi
207c0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e f.#ifndef Tcl_Un
207d0 72 65 67 69 73 74 65 72 43 68 61 6e 6e 65 6c 0a registerChannel.
207e0 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 6e 72 65 #define Tcl_Unre
207f0 67 69 73 74 65 72 43 68 61 6e 6e 65 6c 20 5c 0a gisterChannel \.
20800 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
20810 63 6c 5f 55 6e 72 65 67 69 73 74 65 72 43 68 61 cl_UnregisterCha
20820 6e 6e 65 6c 29 20 2f 2a 20 32 35 32 20 2a 2f 0a nnel) /* 252 */.
20830 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
20840 63 6c 5f 55 6e 73 65 74 56 61 72 0a 23 64 65 66 cl_UnsetVar.#def
20850 69 6e 65 20 54 63 6c 5f 55 6e 73 65 74 56 61 72 ine Tcl_UnsetVar
20860 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
20870 2d 3e 74 63 6c 5f 55 6e 73 65 74 56 61 72 29 20 ->tcl_UnsetVar)
20880 2f 2a 20 32 35 33 20 2a 2f 0a 23 65 6e 64 69 66 /* 253 */.#endif
20890 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e 73 .#ifndef Tcl_Uns
208a0 65 74 56 61 72 32 0a 23 64 65 66 69 6e 65 20 54 etVar2.#define T
208b0 63 6c 5f 55 6e 73 65 74 56 61 72 32 20 5c 0a 09 cl_UnsetVar2 \..
208c0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
208d0 6c 5f 55 6e 73 65 74 56 61 72 32 29 20 2f 2a 20 l_UnsetVar2) /*
208e0 32 35 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 254 */.#endif.#i
208f0 66 6e 64 65 66 20 54 63 6c 5f 55 6e 74 72 61 63 fndef Tcl_Untrac
20900 65 56 61 72 0a 23 64 65 66 69 6e 65 20 54 63 6c eVar.#define Tcl
20910 5f 55 6e 74 72 61 63 65 56 61 72 20 5c 0a 09 28 _UntraceVar \..(
20920 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
20930 5f 55 6e 74 72 61 63 65 56 61 72 29 20 2f 2a 20 _UntraceVar) /*
20940 32 35 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 255 */.#endif.#i
20950 66 6e 64 65 66 20 54 63 6c 5f 55 6e 74 72 61 63 fndef Tcl_Untrac
20960 65 56 61 72 32 0a 23 64 65 66 69 6e 65 20 54 63 eVar2.#define Tc
20970 6c 5f 55 6e 74 72 61 63 65 56 61 72 32 20 5c 0a l_UntraceVar2 \.
20980 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
20990 63 6c 5f 55 6e 74 72 61 63 65 56 61 72 32 29 20 cl_UntraceVar2)
209a0 2f 2a 20 32 35 36 20 2a 2f 0a 23 65 6e 64 69 66 /* 256 */.#endif
209b0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 70 64 .#ifndef Tcl_Upd
209c0 61 74 65 4c 69 6e 6b 65 64 56 61 72 0a 23 64 65 ateLinkedVar.#de
209d0 66 69 6e 65 20 54 63 6c 5f 55 70 64 61 74 65 4c fine Tcl_UpdateL
209e0 69 6e 6b 65 64 56 61 72 20 5c 0a 09 28 74 63 6c inkedVar \..(tcl
209f0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 70 StubsPtr->tcl_Up
20a00 64 61 74 65 4c 69 6e 6b 65 64 56 61 72 29 20 2f dateLinkedVar) /
20a10 2a 20 32 35 37 20 2a 2f 0a 23 65 6e 64 69 66 0a * 257 */.#endif.
20a20 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 70 56 61 #ifndef Tcl_UpVa
20a30 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 70 r.#define Tcl_Up
20a40 56 61 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Var \..(tclStubs
20a50 50 74 72 2d 3e 74 63 6c 5f 55 70 56 61 72 29 20 Ptr->tcl_UpVar)
20a60 2f 2a 20 32 35 38 20 2a 2f 0a 23 65 6e 64 69 66 /* 258 */.#endif
20a70 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 70 56 .#ifndef Tcl_UpV
20a80 61 72 32 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ar2.#define Tcl_
20a90 55 70 56 61 72 32 20 5c 0a 09 28 74 63 6c 53 74 UpVar2 \..(tclSt
20aa0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 70 56 61 ubsPtr->tcl_UpVa
20ab0 72 32 29 20 2f 2a 20 32 35 39 20 2a 2f 0a 23 65 r2) /* 259 */.#e
20ac0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
20ad0 5f 56 61 72 45 76 61 6c 0a 23 64 65 66 69 6e 65 _VarEval.#define
20ae0 20 54 63 6c 5f 56 61 72 45 76 61 6c 20 5c 0a 09 Tcl_VarEval \..
20af0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
20b00 6c 5f 56 61 72 45 76 61 6c 29 20 2f 2a 20 32 36 l_VarEval) /* 26
20b10 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 0 */.#endif.#ifn
20b20 64 65 66 20 54 63 6c 5f 56 61 72 54 72 61 63 65 def Tcl_VarTrace
20b30 49 6e 66 6f 0a 23 64 65 66 69 6e 65 20 54 63 6c Info.#define Tcl
20b40 5f 56 61 72 54 72 61 63 65 49 6e 66 6f 20 5c 0a _VarTraceInfo \.
20b50 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
20b60 63 6c 5f 56 61 72 54 72 61 63 65 49 6e 66 6f 29 cl_VarTraceInfo)
20b70 20 2f 2a 20 32 36 31 20 2a 2f 0a 23 65 6e 64 69 /* 261 */.#endi
20b80 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 56 61 f.#ifndef Tcl_Va
20b90 72 54 72 61 63 65 49 6e 66 6f 32 0a 23 64 65 66 rTraceInfo2.#def
20ba0 69 6e 65 20 54 63 6c 5f 56 61 72 54 72 61 63 65 ine Tcl_VarTrace
20bb0 49 6e 66 6f 32 20 5c 0a 09 28 74 63 6c 53 74 75 Info2 \..(tclStu
20bc0 62 73 50 74 72 2d 3e 74 63 6c 5f 56 61 72 54 72 bsPtr->tcl_VarTr
20bd0 61 63 65 49 6e 66 6f 32 29 20 2f 2a 20 32 36 32 aceInfo2) /* 262
20be0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
20bf0 65 66 20 54 63 6c 5f 57 72 69 74 65 0a 23 64 65 ef Tcl_Write.#de
20c00 66 69 6e 65 20 54 63 6c 5f 57 72 69 74 65 20 5c fine Tcl_Write \
20c10 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
20c20 74 63 6c 5f 57 72 69 74 65 29 20 2f 2a 20 32 36 tcl_Write) /* 26
20c30 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
20c40 64 65 66 20 54 63 6c 5f 57 72 6f 6e 67 4e 75 6d def Tcl_WrongNum
20c50 41 72 67 73 0a 23 64 65 66 69 6e 65 20 54 63 6c Args.#define Tcl
20c60 5f 57 72 6f 6e 67 4e 75 6d 41 72 67 73 20 5c 0a _WrongNumArgs \.
20c70 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
20c80 63 6c 5f 57 72 6f 6e 67 4e 75 6d 41 72 67 73 29 cl_WrongNumArgs)
20c90 20 2f 2a 20 32 36 34 20 2a 2f 0a 23 65 6e 64 69 /* 264 */.#endi
20ca0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 75 f.#ifndef Tcl_Du
20cb0 6d 70 41 63 74 69 76 65 4d 65 6d 6f 72 79 0a 23 mpActiveMemory.#
20cc0 64 65 66 69 6e 65 20 54 63 6c 5f 44 75 6d 70 41 define Tcl_DumpA
20cd0 63 74 69 76 65 4d 65 6d 6f 72 79 20 5c 0a 09 28 ctiveMemory \..(
20ce0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
20cf0 5f 44 75 6d 70 41 63 74 69 76 65 4d 65 6d 6f 72 _DumpActiveMemor
20d00 79 29 20 2f 2a 20 32 36 35 20 2a 2f 0a 23 65 6e y) /* 265 */.#en
20d10 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
20d20 56 61 6c 69 64 61 74 65 41 6c 6c 4d 65 6d 6f 72 ValidateAllMemor
20d30 79 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 56 61 y.#define Tcl_Va
20d40 6c 69 64 61 74 65 41 6c 6c 4d 65 6d 6f 72 79 20 lidateAllMemory
20d50 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
20d60 3e 74 63 6c 5f 56 61 6c 69 64 61 74 65 41 6c 6c >tcl_ValidateAll
20d70 4d 65 6d 6f 72 79 29 20 2f 2a 20 32 36 36 20 2a Memory) /* 266 *
20d80 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
20d90 20 54 63 6c 5f 41 70 70 65 6e 64 52 65 73 75 6c Tcl_AppendResul
20da0 74 56 41 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f tVA.#define Tcl_
20db0 41 70 70 65 6e 64 52 65 73 75 6c 74 56 41 20 5c AppendResultVA \
20dc0 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
20dd0 74 63 6c 5f 41 70 70 65 6e 64 52 65 73 75 6c 74 tcl_AppendResult
20de0 56 41 29 20 2f 2a 20 32 36 37 20 2a 2f 0a 23 65 VA) /* 267 */.#e
20df0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
20e00 5f 41 70 70 65 6e 64 53 74 72 69 6e 67 73 54 6f _AppendStringsTo
20e10 4f 62 6a 56 41 0a 23 64 65 66 69 6e 65 20 54 63 ObjVA.#define Tc
20e20 6c 5f 41 70 70 65 6e 64 53 74 72 69 6e 67 73 54 l_AppendStringsT
20e30 6f 4f 62 6a 56 41 20 5c 0a 09 28 74 63 6c 53 74 oObjVA \..(tclSt
20e40 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 70 70 65 ubsPtr->tcl_Appe
20e50 6e 64 53 74 72 69 6e 67 73 54 6f 4f 62 6a 56 41 ndStringsToObjVA
20e60 29 20 2f 2a 20 32 36 38 20 2a 2f 0a 23 65 6e 64 ) /* 268 */.#end
20e70 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 48 if.#ifndef Tcl_H
20e80 61 73 68 53 74 61 74 73 0a 23 64 65 66 69 6e 65 ashStats.#define
20e90 20 54 63 6c 5f 48 61 73 68 53 74 61 74 73 20 5c Tcl_HashStats \
20ea0 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
20eb0 74 63 6c 5f 48 61 73 68 53 74 61 74 73 29 20 2f tcl_HashStats) /
20ec0 2a 20 32 36 39 20 2a 2f 0a 23 65 6e 64 69 66 0a * 269 */.#endif.
20ed0 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 61 72 73 #ifndef Tcl_Pars
20ee0 65 56 61 72 0a 23 64 65 66 69 6e 65 20 54 63 6c eVar.#define Tcl
20ef0 5f 50 61 72 73 65 56 61 72 20 5c 0a 09 28 74 63 _ParseVar \..(tc
20f00 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 50 lStubsPtr->tcl_P
20f10 61 72 73 65 56 61 72 29 20 2f 2a 20 32 37 30 20 arseVar) /* 270
20f20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
20f30 66 20 54 63 6c 5f 50 6b 67 50 72 65 73 65 6e 74 f Tcl_PkgPresent
20f40 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 50 6b 67 .#define Tcl_Pkg
20f50 50 72 65 73 65 6e 74 20 5c 0a 09 28 74 63 6c 53 Present \..(tclS
20f60 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 50 6b 67 tubsPtr->tcl_Pkg
20f70 50 72 65 73 65 6e 74 29 20 2f 2a 20 32 37 31 20 Present) /* 271
20f80 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
20f90 66 20 54 63 6c 5f 50 6b 67 50 72 65 73 65 6e 74 f Tcl_PkgPresent
20fa0 45 78 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 50 Ex.#define Tcl_P
20fb0 6b 67 50 72 65 73 65 6e 74 45 78 20 5c 0a 09 28 kgPresentEx \..(
20fc0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
20fd0 5f 50 6b 67 50 72 65 73 65 6e 74 45 78 29 20 2f _PkgPresentEx) /
20fe0 2a 20 32 37 32 20 2a 2f 0a 23 65 6e 64 69 66 0a * 272 */.#endif.
20ff0 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 6b 67 50 #ifndef Tcl_PkgP
21000 72 6f 76 69 64 65 0a 23 64 65 66 69 6e 65 20 54 rovide.#define T
21010 63 6c 5f 50 6b 67 50 72 6f 76 69 64 65 20 5c 0a cl_PkgProvide \.
21020 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
21030 63 6c 5f 50 6b 67 50 72 6f 76 69 64 65 29 20 2f cl_PkgProvide) /
21040 2a 20 32 37 33 20 2a 2f 0a 23 65 6e 64 69 66 0a * 273 */.#endif.
21050 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 6b 67 52 #ifndef Tcl_PkgR
21060 65 71 75 69 72 65 0a 23 64 65 66 69 6e 65 20 54 equire.#define T
21070 63 6c 5f 50 6b 67 52 65 71 75 69 72 65 20 5c 0a cl_PkgRequire \.
21080 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
21090 63 6c 5f 50 6b 67 52 65 71 75 69 72 65 29 20 2f cl_PkgRequire) /
210a0 2a 20 32 37 34 20 2a 2f 0a 23 65 6e 64 69 66 0a * 274 */.#endif.
210b0 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 45 #ifndef Tcl_SetE
210c0 72 72 6f 72 43 6f 64 65 56 41 0a 23 64 65 66 69 rrorCodeVA.#defi
210d0 6e 65 20 54 63 6c 5f 53 65 74 45 72 72 6f 72 43 ne Tcl_SetErrorC
210e0 6f 64 65 56 41 20 5c 0a 09 28 74 63 6c 53 74 75 odeVA \..(tclStu
210f0 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 45 72 bsPtr->tcl_SetEr
21100 72 6f 72 43 6f 64 65 56 41 29 20 2f 2a 20 32 37 rorCodeVA) /* 27
21110 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 5 */.#endif.#ifn
21120 64 65 66 20 54 63 6c 5f 56 61 72 45 76 61 6c 56 def Tcl_VarEvalV
21130 41 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 56 61 A.#define Tcl_Va
21140 72 45 76 61 6c 56 41 20 5c 0a 09 28 74 63 6c 53 rEvalVA \..(tclS
21150 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 56 61 72 tubsPtr->tcl_Var
21160 45 76 61 6c 56 41 29 20 2f 2a 20 32 37 36 20 2a EvalVA) /* 276 *
21170 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
21180 20 54 63 6c 5f 57 61 69 74 50 69 64 0a 23 64 65 Tcl_WaitPid.#de
21190 66 69 6e 65 20 54 63 6c 5f 57 61 69 74 50 69 64 fine Tcl_WaitPid
211a0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
211b0 2d 3e 74 63 6c 5f 57 61 69 74 50 69 64 29 20 2f ->tcl_WaitPid) /
211c0 2a 20 32 37 37 20 2a 2f 0a 23 65 6e 64 69 66 0a * 277 */.#endif.
211d0 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 61 6e 69 #ifndef Tcl_Pani
211e0 63 56 41 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f cVA.#define Tcl_
211f0 50 61 6e 69 63 56 41 20 5c 0a 09 28 74 63 6c 53 PanicVA \..(tclS
21200 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 50 61 6e tubsPtr->tcl_Pan
21210 69 63 56 41 29 20 2f 2a 20 32 37 38 20 2a 2f 0a icVA) /* 278 */.
21220 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
21230 63 6c 5f 47 65 74 56 65 72 73 69 6f 6e 0a 23 64 cl_GetVersion.#d
21240 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 56 65 72 efine Tcl_GetVer
21250 73 69 6f 6e 20 5c 0a 09 28 74 63 6c 53 74 75 62 sion \..(tclStub
21260 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 56 65 72 sPtr->tcl_GetVer
21270 73 69 6f 6e 29 20 2f 2a 20 32 37 39 20 2a 2f 0a sion) /* 279 */.
21280 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
21290 63 6c 5f 49 6e 69 74 4d 65 6d 6f 72 79 0a 23 64 cl_InitMemory.#d
212a0 65 66 69 6e 65 20 54 63 6c 5f 49 6e 69 74 4d 65 efine Tcl_InitMe
212b0 6d 6f 72 79 20 5c 0a 09 28 74 63 6c 53 74 75 62 mory \..(tclStub
212c0 73 50 74 72 2d 3e 74 63 6c 5f 49 6e 69 74 4d 65 sPtr->tcl_InitMe
212d0 6d 6f 72 79 29 20 2f 2a 20 32 38 30 20 2a 2f 0a mory) /* 280 */.
212e0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
212f0 63 6c 5f 53 74 61 63 6b 43 68 61 6e 6e 65 6c 0a cl_StackChannel.
21300 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 74 61 63 #define Tcl_Stac
21310 6b 43 68 61 6e 6e 65 6c 20 5c 0a 09 28 74 63 6c kChannel \..(tcl
21320 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 74 StubsPtr->tcl_St
21330 61 63 6b 43 68 61 6e 6e 65 6c 29 20 2f 2a 20 32 ackChannel) /* 2
21340 38 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 81 */.#endif.#if
21350 6e 64 65 66 20 54 63 6c 5f 55 6e 73 74 61 63 6b ndef Tcl_Unstack
21360 43 68 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 Channel.#define
21370 54 63 6c 5f 55 6e 73 74 61 63 6b 43 68 61 6e 6e Tcl_UnstackChann
21380 65 6c 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 el \..(tclStubsP
21390 74 72 2d 3e 74 63 6c 5f 55 6e 73 74 61 63 6b 43 tr->tcl_UnstackC
213a0 68 61 6e 6e 65 6c 29 20 2f 2a 20 32 38 32 20 2a hannel) /* 282 *
213b0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
213c0 20 54 63 6c 5f 47 65 74 53 74 61 63 6b 65 64 43 Tcl_GetStackedC
213d0 68 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 hannel.#define T
213e0 63 6c 5f 47 65 74 53 74 61 63 6b 65 64 43 68 61 cl_GetStackedCha
213f0 6e 6e 65 6c 20 5c 0a 09 28 74 63 6c 53 74 75 62 nnel \..(tclStub
21400 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 53 74 61 sPtr->tcl_GetSta
21410 63 6b 65 64 43 68 61 6e 6e 65 6c 29 20 2f 2a 20 ckedChannel) /*
21420 32 38 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 283 */.#endif.#i
21430 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 4d 61 69 fndef Tcl_SetMai
21440 6e 4c 6f 6f 70 0a 23 64 65 66 69 6e 65 20 54 63 nLoop.#define Tc
21450 6c 5f 53 65 74 4d 61 69 6e 4c 6f 6f 70 20 5c 0a l_SetMainLoop \.
21460 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
21470 63 6c 5f 53 65 74 4d 61 69 6e 4c 6f 6f 70 29 20 cl_SetMainLoop)
21480 2f 2a 20 32 38 34 20 2a 2f 0a 23 65 6e 64 69 66 /* 284 */.#endif
21490 0a 2f 2a 20 53 6c 6f 74 20 32 38 35 20 69 73 20 ./* Slot 285 is
214a0 72 65 73 65 72 76 65 64 20 2a 2f 0a 23 69 66 6e reserved */.#ifn
214b0 64 65 66 20 54 63 6c 5f 41 70 70 65 6e 64 4f 62 def Tcl_AppendOb
214c0 6a 54 6f 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 jToObj.#define T
214d0 63 6c 5f 41 70 70 65 6e 64 4f 62 6a 54 6f 4f 62 cl_AppendObjToOb
214e0 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 j \..(tclStubsPt
214f0 72 2d 3e 74 63 6c 5f 41 70 70 65 6e 64 4f 62 6a r->tcl_AppendObj
21500 54 6f 4f 62 6a 29 20 2f 2a 20 32 38 36 20 2a 2f ToObj) /* 286 */
21510 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
21520 54 63 6c 5f 43 72 65 61 74 65 45 6e 63 6f 64 69 Tcl_CreateEncodi
21530 6e 67 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 ng.#define Tcl_C
21540 72 65 61 74 65 45 6e 63 6f 64 69 6e 67 20 5c 0a reateEncoding \.
21550 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
21560 63 6c 5f 43 72 65 61 74 65 45 6e 63 6f 64 69 6e cl_CreateEncodin
21570 67 29 20 2f 2a 20 32 38 37 20 2a 2f 0a 23 65 6e g) /* 287 */.#en
21580 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
21590 43 72 65 61 74 65 54 68 72 65 61 64 45 78 69 74 CreateThreadExit
215a0 48 61 6e 64 6c 65 72 0a 23 64 65 66 69 6e 65 20 Handler.#define
215b0 54 63 6c 5f 43 72 65 61 74 65 54 68 72 65 61 64 Tcl_CreateThread
215c0 45 78 69 74 48 61 6e 64 6c 65 72 20 5c 0a 09 28 ExitHandler \..(
215d0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
215e0 5f 43 72 65 61 74 65 54 68 72 65 61 64 45 78 69 _CreateThreadExi
215f0 74 48 61 6e 64 6c 65 72 29 20 2f 2a 20 32 38 38 tHandler) /* 288
21600 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
21610 65 66 20 54 63 6c 5f 44 65 6c 65 74 65 54 68 72 ef Tcl_DeleteThr
21620 65 61 64 45 78 69 74 48 61 6e 64 6c 65 72 0a 23 eadExitHandler.#
21630 64 65 66 69 6e 65 20 54 63 6c 5f 44 65 6c 65 74 define Tcl_Delet
21640 65 54 68 72 65 61 64 45 78 69 74 48 61 6e 64 6c eThreadExitHandl
21650 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 er \..(tclStubsP
21660 74 72 2d 3e 74 63 6c 5f 44 65 6c 65 74 65 54 68 tr->tcl_DeleteTh
21670 72 65 61 64 45 78 69 74 48 61 6e 64 6c 65 72 29 readExitHandler)
21680 20 2f 2a 20 32 38 39 20 2a 2f 0a 23 65 6e 64 69 /* 289 */.#endi
21690 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 69 f.#ifndef Tcl_Di
216a0 73 63 61 72 64 52 65 73 75 6c 74 0a 23 64 65 66 scardResult.#def
216b0 69 6e 65 20 54 63 6c 5f 44 69 73 63 61 72 64 52 ine Tcl_DiscardR
216c0 65 73 75 6c 74 20 5c 0a 09 28 74 63 6c 53 74 75 esult \..(tclStu
216d0 62 73 50 74 72 2d 3e 74 63 6c 5f 44 69 73 63 61 bsPtr->tcl_Disca
216e0 72 64 52 65 73 75 6c 74 29 20 2f 2a 20 32 39 30 rdResult) /* 290
216f0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
21700 65 66 20 54 63 6c 5f 45 76 61 6c 45 78 0a 23 64 ef Tcl_EvalEx.#d
21710 65 66 69 6e 65 20 54 63 6c 5f 45 76 61 6c 45 78 efine Tcl_EvalEx
21720 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
21730 2d 3e 74 63 6c 5f 45 76 61 6c 45 78 29 20 2f 2a ->tcl_EvalEx) /*
21740 20 32 39 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 291 */.#endif.#
21750 69 66 6e 64 65 66 20 54 63 6c 5f 45 76 61 6c 4f ifndef Tcl_EvalO
21760 62 6a 76 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f bjv.#define Tcl_
21770 45 76 61 6c 4f 62 6a 76 20 5c 0a 09 28 74 63 6c EvalObjv \..(tcl
21780 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 76 StubsPtr->tcl_Ev
21790 61 6c 4f 62 6a 76 29 20 2f 2a 20 32 39 32 20 2a alObjv) /* 292 *
217a0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
217b0 20 54 63 6c 5f 45 76 61 6c 4f 62 6a 45 78 0a 23 Tcl_EvalObjEx.#
217c0 64 65 66 69 6e 65 20 54 63 6c 5f 45 76 61 6c 4f define Tcl_EvalO
217d0 62 6a 45 78 20 5c 0a 09 28 74 63 6c 53 74 75 62 bjEx \..(tclStub
217e0 73 50 74 72 2d 3e 74 63 6c 5f 45 76 61 6c 4f 62 sPtr->tcl_EvalOb
217f0 6a 45 78 29 20 2f 2a 20 32 39 33 20 2a 2f 0a 23 jEx) /* 293 */.#
21800 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
21810 6c 5f 45 78 69 74 54 68 72 65 61 64 0a 23 64 65 l_ExitThread.#de
21820 66 69 6e 65 20 54 63 6c 5f 45 78 69 74 54 68 72 fine Tcl_ExitThr
21830 65 61 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ead \..(tclStubs
21840 50 74 72 2d 3e 74 63 6c 5f 45 78 69 74 54 68 72 Ptr->tcl_ExitThr
21850 65 61 64 29 20 2f 2a 20 32 39 34 20 2a 2f 0a 23 ead) /* 294 */.#
21860 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
21870 6c 5f 45 78 74 65 72 6e 61 6c 54 6f 55 74 66 0a l_ExternalToUtf.
21880 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 78 74 65 #define Tcl_Exte
21890 72 6e 61 6c 54 6f 55 74 66 20 5c 0a 09 28 74 63 rnalToUtf \..(tc
218a0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 45 lStubsPtr->tcl_E
218b0 78 74 65 72 6e 61 6c 54 6f 55 74 66 29 20 2f 2a xternalToUtf) /*
218c0 20 32 39 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 295 */.#endif.#
218d0 69 66 6e 64 65 66 20 54 63 6c 5f 45 78 74 65 72 ifndef Tcl_Exter
218e0 6e 61 6c 54 6f 55 74 66 44 53 74 72 69 6e 67 0a nalToUtfDString.
218f0 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 78 74 65 #define Tcl_Exte
21900 72 6e 61 6c 54 6f 55 74 66 44 53 74 72 69 6e 67 rnalToUtfDString
21910 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
21920 2d 3e 74 63 6c 5f 45 78 74 65 72 6e 61 6c 54 6f ->tcl_ExternalTo
21930 55 74 66 44 53 74 72 69 6e 67 29 20 2f 2a 20 32 UtfDString) /* 2
21940 39 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 96 */.#endif.#if
21950 6e 64 65 66 20 54 63 6c 5f 46 69 6e 61 6c 69 7a ndef Tcl_Finaliz
21960 65 54 68 72 65 61 64 0a 23 64 65 66 69 6e 65 20 eThread.#define
21970 54 63 6c 5f 46 69 6e 61 6c 69 7a 65 54 68 72 65 Tcl_FinalizeThre
21980 61 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 ad \..(tclStubsP
21990 74 72 2d 3e 74 63 6c 5f 46 69 6e 61 6c 69 7a 65 tr->tcl_Finalize
219a0 54 68 72 65 61 64 29 20 2f 2a 20 32 39 37 20 2a Thread) /* 297 *
219b0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
219c0 20 54 63 6c 5f 46 69 6e 61 6c 69 7a 65 4e 6f 74 Tcl_FinalizeNot
219d0 69 66 69 65 72 0a 23 64 65 66 69 6e 65 20 54 63 ifier.#define Tc
219e0 6c 5f 46 69 6e 61 6c 69 7a 65 4e 6f 74 69 66 69 l_FinalizeNotifi
219f0 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 er \..(tclStubsP
21a00 74 72 2d 3e 74 63 6c 5f 46 69 6e 61 6c 69 7a 65 tr->tcl_Finalize
21a10 4e 6f 74 69 66 69 65 72 29 20 2f 2a 20 32 39 38 Notifier) /* 298
21a20 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
21a30 65 66 20 54 63 6c 5f 46 72 65 65 45 6e 63 6f 64 ef Tcl_FreeEncod
21a40 69 6e 67 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ing.#define Tcl_
21a50 46 72 65 65 45 6e 63 6f 64 69 6e 67 20 5c 0a 09 FreeEncoding \..
21a60 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
21a70 6c 5f 46 72 65 65 45 6e 63 6f 64 69 6e 67 29 20 l_FreeEncoding)
21a80 2f 2a 20 32 39 39 20 2a 2f 0a 23 65 6e 64 69 66 /* 299 */.#endif
21a90 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 .#ifndef Tcl_Get
21aa0 43 75 72 72 65 6e 74 54 68 72 65 61 64 0a 23 64 CurrentThread.#d
21ab0 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 43 75 72 efine Tcl_GetCur
21ac0 72 65 6e 74 54 68 72 65 61 64 20 5c 0a 09 28 74 rentThread \..(t
21ad0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
21ae0 47 65 74 43 75 72 72 65 6e 74 54 68 72 65 61 64 GetCurrentThread
21af0 29 20 2f 2a 20 33 30 30 20 2a 2f 0a 23 65 6e 64 ) /* 300 */.#end
21b00 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 if.#ifndef Tcl_G
21b10 65 74 45 6e 63 6f 64 69 6e 67 0a 23 64 65 66 69 etEncoding.#defi
21b20 6e 65 20 54 63 6c 5f 47 65 74 45 6e 63 6f 64 69 ne Tcl_GetEncodi
21b30 6e 67 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 ng \..(tclStubsP
21b40 74 72 2d 3e 74 63 6c 5f 47 65 74 45 6e 63 6f 64 tr->tcl_GetEncod
21b50 69 6e 67 29 20 2f 2a 20 33 30 31 20 2a 2f 0a 23 ing) /* 301 */.#
21b60 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
21b70 6c 5f 47 65 74 45 6e 63 6f 64 69 6e 67 4e 61 6d l_GetEncodingNam
21b80 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 e.#define Tcl_Ge
21b90 74 45 6e 63 6f 64 69 6e 67 4e 61 6d 65 20 5c 0a tEncodingName \.
21ba0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
21bb0 63 6c 5f 47 65 74 45 6e 63 6f 64 69 6e 67 4e 61 cl_GetEncodingNa
21bc0 6d 65 29 20 2f 2a 20 33 30 32 20 2a 2f 0a 23 65 me) /* 302 */.#e
21bd0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
21be0 5f 47 65 74 45 6e 63 6f 64 69 6e 67 4e 61 6d 65 _GetEncodingName
21bf0 73 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 s.#define Tcl_Ge
21c00 74 45 6e 63 6f 64 69 6e 67 4e 61 6d 65 73 20 5c tEncodingNames \
21c10 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
21c20 74 63 6c 5f 47 65 74 45 6e 63 6f 64 69 6e 67 4e tcl_GetEncodingN
21c30 61 6d 65 73 29 20 2f 2a 20 33 30 33 20 2a 2f 0a ames) /* 303 */.
21c40 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
21c50 63 6c 5f 47 65 74 49 6e 64 65 78 46 72 6f 6d 4f cl_GetIndexFromO
21c60 62 6a 53 74 72 75 63 74 0a 23 64 65 66 69 6e 65 bjStruct.#define
21c70 20 54 63 6c 5f 47 65 74 49 6e 64 65 78 46 72 6f Tcl_GetIndexFro
21c80 6d 4f 62 6a 53 74 72 75 63 74 20 5c 0a 09 28 74 mObjStruct \..(t
21c90 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
21ca0 47 65 74 49 6e 64 65 78 46 72 6f 6d 4f 62 6a 53 GetIndexFromObjS
21cb0 74 72 75 63 74 29 20 2f 2a 20 33 30 34 20 2a 2f truct) /* 304 */
21cc0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
21cd0 54 63 6c 5f 47 65 74 54 68 72 65 61 64 44 61 74 Tcl_GetThreadDat
21ce0 61 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 a.#define Tcl_Ge
21cf0 74 54 68 72 65 61 64 44 61 74 61 20 5c 0a 09 28 tThreadData \..(
21d00 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
21d10 5f 47 65 74 54 68 72 65 61 64 44 61 74 61 29 20 _GetThreadData)
21d20 2f 2a 20 33 30 35 20 2a 2f 0a 23 65 6e 64 69 66 /* 305 */.#endif
21d30 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 .#ifndef Tcl_Get
21d40 56 61 72 32 45 78 0a 23 64 65 66 69 6e 65 20 54 Var2Ex.#define T
21d50 63 6c 5f 47 65 74 56 61 72 32 45 78 20 5c 0a 09 cl_GetVar2Ex \..
21d60 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
21d70 6c 5f 47 65 74 56 61 72 32 45 78 29 20 2f 2a 20 l_GetVar2Ex) /*
21d80 33 30 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 306 */.#endif.#i
21d90 66 6e 64 65 66 20 54 63 6c 5f 49 6e 69 74 4e 6f fndef Tcl_InitNo
21da0 74 69 66 69 65 72 0a 23 64 65 66 69 6e 65 20 54 tifier.#define T
21db0 63 6c 5f 49 6e 69 74 4e 6f 74 69 66 69 65 72 20 cl_InitNotifier
21dc0 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
21dd0 3e 74 63 6c 5f 49 6e 69 74 4e 6f 74 69 66 69 65 >tcl_InitNotifie
21de0 72 29 20 2f 2a 20 33 30 37 20 2a 2f 0a 23 65 6e r) /* 307 */.#en
21df0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
21e00 4d 75 74 65 78 4c 6f 63 6b 0a 23 64 65 66 69 6e MutexLock.#defin
21e10 65 20 54 63 6c 5f 4d 75 74 65 78 4c 6f 63 6b 20 e Tcl_MutexLock
21e20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
21e30 3e 74 63 6c 5f 4d 75 74 65 78 4c 6f 63 6b 29 20 >tcl_MutexLock)
21e40 2f 2a 20 33 30 38 20 2a 2f 0a 23 65 6e 64 69 66 /* 308 */.#endif
21e50 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4d 75 74 .#ifndef Tcl_Mut
21e60 65 78 55 6e 6c 6f 63 6b 0a 23 64 65 66 69 6e 65 exUnlock.#define
21e70 20 54 63 6c 5f 4d 75 74 65 78 55 6e 6c 6f 63 6b Tcl_MutexUnlock
21e80 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
21e90 2d 3e 74 63 6c 5f 4d 75 74 65 78 55 6e 6c 6f 63 ->tcl_MutexUnloc
21ea0 6b 29 20 2f 2a 20 33 30 39 20 2a 2f 0a 23 65 6e k) /* 309 */.#en
21eb0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
21ec0 43 6f 6e 64 69 74 69 6f 6e 4e 6f 74 69 66 79 0a ConditionNotify.
21ed0 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 6f 6e 64 #define Tcl_Cond
21ee0 69 74 69 6f 6e 4e 6f 74 69 66 79 20 5c 0a 09 28 itionNotify \..(
21ef0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
21f00 5f 43 6f 6e 64 69 74 69 6f 6e 4e 6f 74 69 66 79 _ConditionNotify
21f10 29 20 2f 2a 20 33 31 30 20 2a 2f 0a 23 65 6e 64 ) /* 310 */.#end
21f20 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 if.#ifndef Tcl_C
21f30 6f 6e 64 69 74 69 6f 6e 57 61 69 74 0a 23 64 65 onditionWait.#de
21f40 66 69 6e 65 20 54 63 6c 5f 43 6f 6e 64 69 74 69 fine Tcl_Conditi
21f50 6f 6e 57 61 69 74 20 5c 0a 09 28 74 63 6c 53 74 onWait \..(tclSt
21f60 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 6f 6e 64 ubsPtr->tcl_Cond
21f70 69 74 69 6f 6e 57 61 69 74 29 20 2f 2a 20 33 31 itionWait) /* 31
21f80 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 1 */.#endif.#ifn
21f90 64 65 66 20 54 63 6c 5f 4e 75 6d 55 74 66 43 68 def Tcl_NumUtfCh
21fa0 61 72 73 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ars.#define Tcl_
21fb0 4e 75 6d 55 74 66 43 68 61 72 73 20 5c 0a 09 28 NumUtfChars \..(
21fc0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
21fd0 5f 4e 75 6d 55 74 66 43 68 61 72 73 29 20 2f 2a _NumUtfChars) /*
21fe0 20 33 31 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 312 */.#endif.#
21ff0 69 66 6e 64 65 66 20 54 63 6c 5f 52 65 61 64 43 ifndef Tcl_ReadC
22000 68 61 72 73 0a 23 64 65 66 69 6e 65 20 54 63 6c hars.#define Tcl
22010 5f 52 65 61 64 43 68 61 72 73 20 5c 0a 09 28 74 _ReadChars \..(t
22020 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
22030 52 65 61 64 43 68 61 72 73 29 20 2f 2a 20 33 31 ReadChars) /* 31
22040 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
22050 64 65 66 20 54 63 6c 5f 52 65 73 74 6f 72 65 52 def Tcl_RestoreR
22060 65 73 75 6c 74 0a 23 64 65 66 69 6e 65 20 54 63 esult.#define Tc
22070 6c 5f 52 65 73 74 6f 72 65 52 65 73 75 6c 74 20 l_RestoreResult
22080 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
22090 3e 74 63 6c 5f 52 65 73 74 6f 72 65 52 65 73 75 >tcl_RestoreResu
220a0 6c 74 29 20 2f 2a 20 33 31 34 20 2a 2f 0a 23 65 lt) /* 314 */.#e
220b0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
220c0 5f 53 61 76 65 52 65 73 75 6c 74 0a 23 64 65 66 _SaveResult.#def
220d0 69 6e 65 20 54 63 6c 5f 53 61 76 65 52 65 73 75 ine Tcl_SaveResu
220e0 6c 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 lt \..(tclStubsP
220f0 74 72 2d 3e 74 63 6c 5f 53 61 76 65 52 65 73 75 tr->tcl_SaveResu
22100 6c 74 29 20 2f 2a 20 33 31 35 20 2a 2f 0a 23 65 lt) /* 315 */.#e
22110 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
22120 5f 53 65 74 53 79 73 74 65 6d 45 6e 63 6f 64 69 _SetSystemEncodi
22130 6e 67 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 ng.#define Tcl_S
22140 65 74 53 79 73 74 65 6d 45 6e 63 6f 64 69 6e 67 etSystemEncoding
22150 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
22160 2d 3e 74 63 6c 5f 53 65 74 53 79 73 74 65 6d 45 ->tcl_SetSystemE
22170 6e 63 6f 64 69 6e 67 29 20 2f 2a 20 33 31 36 20 ncoding) /* 316
22180 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
22190 66 20 54 63 6c 5f 53 65 74 56 61 72 32 45 78 0a f Tcl_SetVar2Ex.
221a0 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 65 74 56 #define Tcl_SetV
221b0 61 72 32 45 78 20 5c 0a 09 28 74 63 6c 53 74 75 ar2Ex \..(tclStu
221c0 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 56 61 bsPtr->tcl_SetVa
221d0 72 32 45 78 29 20 2f 2a 20 33 31 37 20 2a 2f 0a r2Ex) /* 317 */.
221e0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
221f0 63 6c 5f 54 68 72 65 61 64 41 6c 65 72 74 0a 23 cl_ThreadAlert.#
22200 64 65 66 69 6e 65 20 54 63 6c 5f 54 68 72 65 61 define Tcl_Threa
22210 64 41 6c 65 72 74 20 5c 0a 09 28 74 63 6c 53 74 dAlert \..(tclSt
22220 75 62 73 50 74 72 2d 3e 74 63 6c 5f 54 68 72 65 ubsPtr->tcl_Thre
22230 61 64 41 6c 65 72 74 29 20 2f 2a 20 33 31 38 20 adAlert) /* 318
22240 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
22250 66 20 54 63 6c 5f 54 68 72 65 61 64 51 75 65 75 f Tcl_ThreadQueu
22260 65 45 76 65 6e 74 0a 23 64 65 66 69 6e 65 20 54 eEvent.#define T
22270 63 6c 5f 54 68 72 65 61 64 51 75 65 75 65 45 76 cl_ThreadQueueEv
22280 65 6e 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ent \..(tclStubs
22290 50 74 72 2d 3e 74 63 6c 5f 54 68 72 65 61 64 51 Ptr->tcl_ThreadQ
222a0 75 65 75 65 45 76 65 6e 74 29 20 2f 2a 20 33 31 ueueEvent) /* 31
222b0 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 9 */.#endif.#ifn
222c0 64 65 66 20 54 63 6c 5f 55 6e 69 43 68 61 72 41 def Tcl_UniCharA
222d0 74 49 6e 64 65 78 0a 23 64 65 66 69 6e 65 20 54 tIndex.#define T
222e0 63 6c 5f 55 6e 69 43 68 61 72 41 74 49 6e 64 65 cl_UniCharAtInde
222f0 78 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 x \..(tclStubsPt
22300 72 2d 3e 74 63 6c 5f 55 6e 69 43 68 61 72 41 74 r->tcl_UniCharAt
22310 49 6e 64 65 78 29 20 2f 2a 20 33 32 30 20 2a 2f Index) /* 320 */
22320 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
22330 54 63 6c 5f 55 6e 69 43 68 61 72 54 6f 4c 6f 77 Tcl_UniCharToLow
22340 65 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 er.#define Tcl_U
22350 6e 69 43 68 61 72 54 6f 4c 6f 77 65 72 20 5c 0a niCharToLower \.
22360 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
22370 63 6c 5f 55 6e 69 43 68 61 72 54 6f 4c 6f 77 65 cl_UniCharToLowe
22380 72 29 20 2f 2a 20 33 32 31 20 2a 2f 0a 23 65 6e r) /* 321 */.#en
22390 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
223a0 55 6e 69 43 68 61 72 54 6f 54 69 74 6c 65 0a 23 UniCharToTitle.#
223b0 64 65 66 69 6e 65 20 54 63 6c 5f 55 6e 69 43 68 define Tcl_UniCh
223c0 61 72 54 6f 54 69 74 6c 65 20 5c 0a 09 28 74 63 arToTitle \..(tc
223d0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 lStubsPtr->tcl_U
223e0 6e 69 43 68 61 72 54 6f 54 69 74 6c 65 29 20 2f niCharToTitle) /
223f0 2a 20 33 32 32 20 2a 2f 0a 23 65 6e 64 69 66 0a * 322 */.#endif.
22400 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e 69 43 #ifndef Tcl_UniC
22410 68 61 72 54 6f 55 70 70 65 72 0a 23 64 65 66 69 harToUpper.#defi
22420 6e 65 20 54 63 6c 5f 55 6e 69 43 68 61 72 54 6f ne Tcl_UniCharTo
22430 55 70 70 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 Upper \..(tclStu
22440 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e 69 43 68 bsPtr->tcl_UniCh
22450 61 72 54 6f 55 70 70 65 72 29 20 2f 2a 20 33 32 arToUpper) /* 32
22460 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
22470 64 65 66 20 54 63 6c 5f 55 6e 69 43 68 61 72 54 def Tcl_UniCharT
22480 6f 55 74 66 0a 23 64 65 66 69 6e 65 20 54 63 6c oUtf.#define Tcl
22490 5f 55 6e 69 43 68 61 72 54 6f 55 74 66 20 5c 0a _UniCharToUtf \.
224a0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
224b0 63 6c 5f 55 6e 69 43 68 61 72 54 6f 55 74 66 29 cl_UniCharToUtf)
224c0 20 2f 2a 20 33 32 34 20 2a 2f 0a 23 65 6e 64 69 /* 324 */.#endi
224d0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 74 f.#ifndef Tcl_Ut
224e0 66 41 74 49 6e 64 65 78 0a 23 64 65 66 69 6e 65 fAtIndex.#define
224f0 20 54 63 6c 5f 55 74 66 41 74 49 6e 64 65 78 20 Tcl_UtfAtIndex
22500 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
22510 3e 74 63 6c 5f 55 74 66 41 74 49 6e 64 65 78 29 >tcl_UtfAtIndex)
22520 20 2f 2a 20 33 32 35 20 2a 2f 0a 23 65 6e 64 69 /* 325 */.#endi
22530 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 74 f.#ifndef Tcl_Ut
22540 66 43 68 61 72 43 6f 6d 70 6c 65 74 65 0a 23 64 fCharComplete.#d
22550 65 66 69 6e 65 20 54 63 6c 5f 55 74 66 43 68 61 efine Tcl_UtfCha
22560 72 43 6f 6d 70 6c 65 74 65 20 5c 0a 09 28 74 63 rComplete \..(tc
22570 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 lStubsPtr->tcl_U
22580 74 66 43 68 61 72 43 6f 6d 70 6c 65 74 65 29 20 tfCharComplete)
22590 2f 2a 20 33 32 36 20 2a 2f 0a 23 65 6e 64 69 66 /* 326 */.#endif
225a0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 74 66 .#ifndef Tcl_Utf
225b0 42 61 63 6b 73 6c 61 73 68 0a 23 64 65 66 69 6e Backslash.#defin
225c0 65 20 54 63 6c 5f 55 74 66 42 61 63 6b 73 6c 61 e Tcl_UtfBacksla
225d0 73 68 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 sh \..(tclStubsP
225e0 74 72 2d 3e 74 63 6c 5f 55 74 66 42 61 63 6b 73 tr->tcl_UtfBacks
225f0 6c 61 73 68 29 20 2f 2a 20 33 32 37 20 2a 2f 0a lash) /* 327 */.
22600 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
22610 63 6c 5f 55 74 66 46 69 6e 64 46 69 72 73 74 0a cl_UtfFindFirst.
22620 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 74 66 46 #define Tcl_UtfF
22630 69 6e 64 46 69 72 73 74 20 5c 0a 09 28 74 63 6c indFirst \..(tcl
22640 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 74 StubsPtr->tcl_Ut
22650 66 46 69 6e 64 46 69 72 73 74 29 20 2f 2a 20 33 fFindFirst) /* 3
22660 32 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 28 */.#endif.#if
22670 6e 64 65 66 20 54 63 6c 5f 55 74 66 46 69 6e 64 ndef Tcl_UtfFind
22680 4c 61 73 74 0a 23 64 65 66 69 6e 65 20 54 63 6c Last.#define Tcl
22690 5f 55 74 66 46 69 6e 64 4c 61 73 74 20 5c 0a 09 _UtfFindLast \..
226a0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
226b0 6c 5f 55 74 66 46 69 6e 64 4c 61 73 74 29 20 2f l_UtfFindLast) /
226c0 2a 20 33 32 39 20 2a 2f 0a 23 65 6e 64 69 66 0a * 329 */.#endif.
226d0 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 74 66 4e #ifndef Tcl_UtfN
226e0 65 78 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ext.#define Tcl_
226f0 55 74 66 4e 65 78 74 20 5c 0a 09 28 74 63 6c 53 UtfNext \..(tclS
22700 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 74 66 tubsPtr->tcl_Utf
22710 4e 65 78 74 29 20 2f 2a 20 33 33 30 20 2a 2f 0a Next) /* 330 */.
22720 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
22730 63 6c 5f 55 74 66 50 72 65 76 0a 23 64 65 66 69 cl_UtfPrev.#defi
22740 6e 65 20 54 63 6c 5f 55 74 66 50 72 65 76 20 5c ne Tcl_UtfPrev \
22750 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
22760 74 63 6c 5f 55 74 66 50 72 65 76 29 20 2f 2a 20 tcl_UtfPrev) /*
22770 33 33 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 331 */.#endif.#i
22780 66 6e 64 65 66 20 54 63 6c 5f 55 74 66 54 6f 45 fndef Tcl_UtfToE
22790 78 74 65 72 6e 61 6c 0a 23 64 65 66 69 6e 65 20 xternal.#define
227a0 54 63 6c 5f 55 74 66 54 6f 45 78 74 65 72 6e 61 Tcl_UtfToExterna
227b0 6c 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 l \..(tclStubsPt
227c0 72 2d 3e 74 63 6c 5f 55 74 66 54 6f 45 78 74 65 r->tcl_UtfToExte
227d0 72 6e 61 6c 29 20 2f 2a 20 33 33 32 20 2a 2f 0a rnal) /* 332 */.
227e0 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
227f0 63 6c 5f 55 74 66 54 6f 45 78 74 65 72 6e 61 6c cl_UtfToExternal
22800 44 53 74 72 69 6e 67 0a 23 64 65 66 69 6e 65 20 DString.#define
22810 54 63 6c 5f 55 74 66 54 6f 45 78 74 65 72 6e 61 Tcl_UtfToExterna
22820 6c 44 53 74 72 69 6e 67 20 5c 0a 09 28 74 63 6c lDString \..(tcl
22830 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 74 StubsPtr->tcl_Ut
22840 66 54 6f 45 78 74 65 72 6e 61 6c 44 53 74 72 69 fToExternalDStri
22850 6e 67 29 20 2f 2a 20 33 33 33 20 2a 2f 0a 23 65 ng) /* 333 */.#e
22860 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
22870 5f 55 74 66 54 6f 4c 6f 77 65 72 0a 23 64 65 66 _UtfToLower.#def
22880 69 6e 65 20 54 63 6c 5f 55 74 66 54 6f 4c 6f 77 ine Tcl_UtfToLow
22890 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 er \..(tclStubsP
228a0 74 72 2d 3e 74 63 6c 5f 55 74 66 54 6f 4c 6f 77 tr->tcl_UtfToLow
228b0 65 72 29 20 2f 2a 20 33 33 34 20 2a 2f 0a 23 65 er) /* 334 */.#e
228c0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
228d0 5f 55 74 66 54 6f 54 69 74 6c 65 0a 23 64 65 66 _UtfToTitle.#def
228e0 69 6e 65 20 54 63 6c 5f 55 74 66 54 6f 54 69 74 ine Tcl_UtfToTit
228f0 6c 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 le \..(tclStubsP
22900 74 72 2d 3e 74 63 6c 5f 55 74 66 54 6f 54 69 74 tr->tcl_UtfToTit
22910 6c 65 29 20 2f 2a 20 33 33 35 20 2a 2f 0a 23 65 le) /* 335 */.#e
22920 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
22930 5f 55 74 66 54 6f 55 6e 69 43 68 61 72 0a 23 64 _UtfToUniChar.#d
22940 65 66 69 6e 65 20 54 63 6c 5f 55 74 66 54 6f 55 efine Tcl_UtfToU
22950 6e 69 43 68 61 72 20 5c 0a 09 28 74 63 6c 53 74 niChar \..(tclSt
22960 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 74 66 54 ubsPtr->tcl_UtfT
22970 6f 55 6e 69 43 68 61 72 29 20 2f 2a 20 33 33 36 oUniChar) /* 336
22980 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
22990 65 66 20 54 63 6c 5f 55 74 66 54 6f 55 70 70 65 ef Tcl_UtfToUppe
229a0 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 74 r.#define Tcl_Ut
229b0 66 54 6f 55 70 70 65 72 20 5c 0a 09 28 74 63 6c fToUpper \..(tcl
229c0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 74 StubsPtr->tcl_Ut
229d0 66 54 6f 55 70 70 65 72 29 20 2f 2a 20 33 33 37 fToUpper) /* 337
229e0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
229f0 65 66 20 54 63 6c 5f 57 72 69 74 65 43 68 61 72 ef Tcl_WriteChar
22a00 73 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 57 72 s.#define Tcl_Wr
22a10 69 74 65 43 68 61 72 73 20 5c 0a 09 28 74 63 6c iteChars \..(tcl
22a20 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 57 72 StubsPtr->tcl_Wr
22a30 69 74 65 43 68 61 72 73 29 20 2f 2a 20 33 33 38 iteChars) /* 338
22a40 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
22a50 65 66 20 54 63 6c 5f 57 72 69 74 65 4f 62 6a 0a ef Tcl_WriteObj.
22a60 23 64 65 66 69 6e 65 20 54 63 6c 5f 57 72 69 74 #define Tcl_Writ
22a70 65 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 eObj \..(tclStub
22a80 73 50 74 72 2d 3e 74 63 6c 5f 57 72 69 74 65 4f sPtr->tcl_WriteO
22a90 62 6a 29 20 2f 2a 20 33 33 39 20 2a 2f 0a 23 65 bj) /* 339 */.#e
22aa0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
22ab0 5f 47 65 74 53 74 72 69 6e 67 0a 23 64 65 66 69 _GetString.#defi
22ac0 6e 65 20 54 63 6c 5f 47 65 74 53 74 72 69 6e 67 ne Tcl_GetString
22ad0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
22ae0 2d 3e 74 63 6c 5f 47 65 74 53 74 72 69 6e 67 29 ->tcl_GetString)
22af0 20 2f 2a 20 33 34 30 20 2a 2f 0a 23 65 6e 64 69 /* 340 */.#endi
22b00 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 f.#ifndef Tcl_Ge
22b10 74 44 65 66 61 75 6c 74 45 6e 63 6f 64 69 6e 67 tDefaultEncoding
22b20 44 69 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Dir.#define Tcl_
22b30 47 65 74 44 65 66 61 75 6c 74 45 6e 63 6f 64 69 GetDefaultEncodi
22b40 6e 67 44 69 72 20 5c 0a 09 28 74 63 6c 53 74 75 ngDir \..(tclStu
22b50 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 44 65 bsPtr->tcl_GetDe
22b60 66 61 75 6c 74 45 6e 63 6f 64 69 6e 67 44 69 72 faultEncodingDir
22b70 29 20 2f 2a 20 33 34 31 20 2a 2f 0a 23 65 6e 64 ) /* 341 */.#end
22b80 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 if.#ifndef Tcl_S
22b90 65 74 44 65 66 61 75 6c 74 45 6e 63 6f 64 69 6e etDefaultEncodin
22ba0 67 44 69 72 0a 23 64 65 66 69 6e 65 20 54 63 6c gDir.#define Tcl
22bb0 5f 53 65 74 44 65 66 61 75 6c 74 45 6e 63 6f 64 _SetDefaultEncod
22bc0 69 6e 67 44 69 72 20 5c 0a 09 28 74 63 6c 53 74 ingDir \..(tclSt
22bd0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 65 74 44 ubsPtr->tcl_SetD
22be0 65 66 61 75 6c 74 45 6e 63 6f 64 69 6e 67 44 69 efaultEncodingDi
22bf0 72 29 20 2f 2a 20 33 34 32 20 2a 2f 0a 23 65 6e r) /* 342 */.#en
22c00 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
22c10 41 6c 65 72 74 4e 6f 74 69 66 69 65 72 0a 23 64 AlertNotifier.#d
22c20 65 66 69 6e 65 20 54 63 6c 5f 41 6c 65 72 74 4e efine Tcl_AlertN
22c30 6f 74 69 66 69 65 72 20 5c 0a 09 28 74 63 6c 53 otifier \..(tclS
22c40 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 6c 65 tubsPtr->tcl_Ale
22c50 72 74 4e 6f 74 69 66 69 65 72 29 20 2f 2a 20 33 rtNotifier) /* 3
22c60 34 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 43 */.#endif.#if
22c70 6e 64 65 66 20 54 63 6c 5f 53 65 72 76 69 63 65 ndef Tcl_Service
22c80 4d 6f 64 65 48 6f 6f 6b 0a 23 64 65 66 69 6e 65 ModeHook.#define
22c90 20 54 63 6c 5f 53 65 72 76 69 63 65 4d 6f 64 65 Tcl_ServiceMode
22ca0 48 6f 6f 6b 20 5c 0a 09 28 74 63 6c 53 74 75 62 Hook \..(tclStub
22cb0 73 50 74 72 2d 3e 74 63 6c 5f 53 65 72 76 69 63 sPtr->tcl_Servic
22cc0 65 4d 6f 64 65 48 6f 6f 6b 29 20 2f 2a 20 33 34 eModeHook) /* 34
22cd0 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 4 */.#endif.#ifn
22ce0 64 65 66 20 54 63 6c 5f 55 6e 69 43 68 61 72 49 def Tcl_UniCharI
22cf0 73 41 6c 6e 75 6d 0a 23 64 65 66 69 6e 65 20 54 sAlnum.#define T
22d00 63 6c 5f 55 6e 69 43 68 61 72 49 73 41 6c 6e 75 cl_UniCharIsAlnu
22d10 6d 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 m \..(tclStubsPt
22d20 72 2d 3e 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 r->tcl_UniCharIs
22d30 41 6c 6e 75 6d 29 20 2f 2a 20 33 34 35 20 2a 2f Alnum) /* 345 */
22d40 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
22d50 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 41 6c 70 Tcl_UniCharIsAlp
22d60 68 61 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 ha.#define Tcl_U
22d70 6e 69 43 68 61 72 49 73 41 6c 70 68 61 20 5c 0a niCharIsAlpha \.
22d80 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
22d90 63 6c 5f 55 6e 69 43 68 61 72 49 73 41 6c 70 68 cl_UniCharIsAlph
22da0 61 29 20 2f 2a 20 33 34 36 20 2a 2f 0a 23 65 6e a) /* 346 */.#en
22db0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
22dc0 55 6e 69 43 68 61 72 49 73 44 69 67 69 74 0a 23 UniCharIsDigit.#
22dd0 64 65 66 69 6e 65 20 54 63 6c 5f 55 6e 69 43 68 define Tcl_UniCh
22de0 61 72 49 73 44 69 67 69 74 20 5c 0a 09 28 74 63 arIsDigit \..(tc
22df0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 lStubsPtr->tcl_U
22e00 6e 69 43 68 61 72 49 73 44 69 67 69 74 29 20 2f niCharIsDigit) /
22e10 2a 20 33 34 37 20 2a 2f 0a 23 65 6e 64 69 66 0a * 347 */.#endif.
22e20 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e 69 43 #ifndef Tcl_UniC
22e30 68 61 72 49 73 4c 6f 77 65 72 0a 23 64 65 66 69 harIsLower.#defi
22e40 6e 65 20 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 ne Tcl_UniCharIs
22e50 4c 6f 77 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 Lower \..(tclStu
22e60 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e 69 43 68 bsPtr->tcl_UniCh
22e70 61 72 49 73 4c 6f 77 65 72 29 20 2f 2a 20 33 34 arIsLower) /* 34
22e80 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 8 */.#endif.#ifn
22e90 64 65 66 20 54 63 6c 5f 55 6e 69 43 68 61 72 49 def Tcl_UniCharI
22ea0 73 53 70 61 63 65 0a 23 64 65 66 69 6e 65 20 54 sSpace.#define T
22eb0 63 6c 5f 55 6e 69 43 68 61 72 49 73 53 70 61 63 cl_UniCharIsSpac
22ec0 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 e \..(tclStubsPt
22ed0 72 2d 3e 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 r->tcl_UniCharIs
22ee0 53 70 61 63 65 29 20 2f 2a 20 33 34 39 20 2a 2f Space) /* 349 */
22ef0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
22f00 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 55 70 70 Tcl_UniCharIsUpp
22f10 65 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 er.#define Tcl_U
22f20 6e 69 43 68 61 72 49 73 55 70 70 65 72 20 5c 0a niCharIsUpper \.
22f30 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
22f40 63 6c 5f 55 6e 69 43 68 61 72 49 73 55 70 70 65 cl_UniCharIsUppe
22f50 72 29 20 2f 2a 20 33 35 30 20 2a 2f 0a 23 65 6e r) /* 350 */.#en
22f60 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
22f70 55 6e 69 43 68 61 72 49 73 57 6f 72 64 43 68 61 UniCharIsWordCha
22f80 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 6e r.#define Tcl_Un
22f90 69 43 68 61 72 49 73 57 6f 72 64 43 68 61 72 20 iCharIsWordChar
22fa0 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
22fb0 3e 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 57 6f >tcl_UniCharIsWo
22fc0 72 64 43 68 61 72 29 20 2f 2a 20 33 35 31 20 2a rdChar) /* 351 *
22fd0 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
22fe0 20 54 63 6c 5f 55 6e 69 43 68 61 72 4c 65 6e 0a Tcl_UniCharLen.
22ff0 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 6e 69 43 #define Tcl_UniC
23000 68 61 72 4c 65 6e 20 5c 0a 09 28 74 63 6c 53 74 harLen \..(tclSt
23010 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e 69 43 ubsPtr->tcl_UniC
23020 68 61 72 4c 65 6e 29 20 2f 2a 20 33 35 32 20 2a harLen) /* 352 *
23030 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
23040 20 54 63 6c 5f 55 6e 69 43 68 61 72 4e 63 6d 70 Tcl_UniCharNcmp
23050 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 6e 69 .#define Tcl_Uni
23060 43 68 61 72 4e 63 6d 70 20 5c 0a 09 28 74 63 6c CharNcmp \..(tcl
23070 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e StubsPtr->tcl_Un
23080 69 43 68 61 72 4e 63 6d 70 29 20 2f 2a 20 33 35 iCharNcmp) /* 35
23090 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
230a0 64 65 66 20 54 63 6c 5f 55 6e 69 43 68 61 72 54 def Tcl_UniCharT
230b0 6f 55 74 66 44 53 74 72 69 6e 67 0a 23 64 65 66 oUtfDString.#def
230c0 69 6e 65 20 54 63 6c 5f 55 6e 69 43 68 61 72 54 ine Tcl_UniCharT
230d0 6f 55 74 66 44 53 74 72 69 6e 67 20 5c 0a 09 28 oUtfDString \..(
230e0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
230f0 5f 55 6e 69 43 68 61 72 54 6f 55 74 66 44 53 74 _UniCharToUtfDSt
23100 72 69 6e 67 29 20 2f 2a 20 33 35 34 20 2a 2f 0a ring) /* 354 */.
23110 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
23120 63 6c 5f 55 74 66 54 6f 55 6e 69 43 68 61 72 44 cl_UtfToUniCharD
23130 53 74 72 69 6e 67 0a 23 64 65 66 69 6e 65 20 54 String.#define T
23140 63 6c 5f 55 74 66 54 6f 55 6e 69 43 68 61 72 44 cl_UtfToUniCharD
23150 53 74 72 69 6e 67 20 5c 0a 09 28 74 63 6c 53 74 String \..(tclSt
23160 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 74 66 54 ubsPtr->tcl_UtfT
23170 6f 55 6e 69 43 68 61 72 44 53 74 72 69 6e 67 29 oUniCharDString)
23180 20 2f 2a 20 33 35 35 20 2a 2f 0a 23 65 6e 64 69 /* 355 */.#endi
23190 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 f.#ifndef Tcl_Ge
231a0 74 52 65 67 45 78 70 46 72 6f 6d 4f 62 6a 0a 23 tRegExpFromObj.#
231b0 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 52 65 define Tcl_GetRe
231c0 67 45 78 70 46 72 6f 6d 4f 62 6a 20 5c 0a 09 28 gExpFromObj \..(
231d0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
231e0 5f 47 65 74 52 65 67 45 78 70 46 72 6f 6d 4f 62 _GetRegExpFromOb
231f0 6a 29 20 2f 2a 20 33 35 36 20 2a 2f 0a 23 65 6e j) /* 356 */.#en
23200 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
23210 45 76 61 6c 54 6f 6b 65 6e 73 0a 23 64 65 66 69 EvalTokens.#defi
23220 6e 65 20 54 63 6c 5f 45 76 61 6c 54 6f 6b 65 6e ne Tcl_EvalToken
23230 73 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 s \..(tclStubsPt
23240 72 2d 3e 74 63 6c 5f 45 76 61 6c 54 6f 6b 65 6e r->tcl_EvalToken
23250 73 29 20 2f 2a 20 33 35 37 20 2a 2f 0a 23 65 6e s) /* 357 */.#en
23260 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
23270 46 72 65 65 50 61 72 73 65 0a 23 64 65 66 69 6e FreeParse.#defin
23280 65 20 54 63 6c 5f 46 72 65 65 50 61 72 73 65 20 e Tcl_FreeParse
23290 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
232a0 3e 74 63 6c 5f 46 72 65 65 50 61 72 73 65 29 20 >tcl_FreeParse)
232b0 2f 2a 20 33 35 38 20 2a 2f 0a 23 65 6e 64 69 66 /* 358 */.#endif
232c0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 4c 6f 67 .#ifndef Tcl_Log
232d0 43 6f 6d 6d 61 6e 64 49 6e 66 6f 0a 23 64 65 66 CommandInfo.#def
232e0 69 6e 65 20 54 63 6c 5f 4c 6f 67 43 6f 6d 6d 61 ine Tcl_LogComma
232f0 6e 64 49 6e 66 6f 20 5c 0a 09 28 74 63 6c 53 74 ndInfo \..(tclSt
23300 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4c 6f 67 43 ubsPtr->tcl_LogC
23310 6f 6d 6d 61 6e 64 49 6e 66 6f 29 20 2f 2a 20 33 ommandInfo) /* 3
23320 35 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 59 */.#endif.#if
23330 6e 64 65 66 20 54 63 6c 5f 50 61 72 73 65 42 72 ndef Tcl_ParseBr
23340 61 63 65 73 0a 23 64 65 66 69 6e 65 20 54 63 6c aces.#define Tcl
23350 5f 50 61 72 73 65 42 72 61 63 65 73 20 5c 0a 09 _ParseBraces \..
23360 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
23370 6c 5f 50 61 72 73 65 42 72 61 63 65 73 29 20 2f l_ParseBraces) /
23380 2a 20 33 36 30 20 2a 2f 0a 23 65 6e 64 69 66 0a * 360 */.#endif.
23390 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 61 72 73 #ifndef Tcl_Pars
233a0 65 43 6f 6d 6d 61 6e 64 0a 23 64 65 66 69 6e 65 eCommand.#define
233b0 20 54 63 6c 5f 50 61 72 73 65 43 6f 6d 6d 61 6e Tcl_ParseComman
233c0 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 d \..(tclStubsPt
233d0 72 2d 3e 74 63 6c 5f 50 61 72 73 65 43 6f 6d 6d r->tcl_ParseComm
233e0 61 6e 64 29 20 2f 2a 20 33 36 31 20 2a 2f 0a 23 and) /* 361 */.#
233f0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
23400 6c 5f 50 61 72 73 65 45 78 70 72 0a 23 64 65 66 l_ParseExpr.#def
23410 69 6e 65 20 54 63 6c 5f 50 61 72 73 65 45 78 70 ine Tcl_ParseExp
23420 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 r \..(tclStubsPt
23430 72 2d 3e 74 63 6c 5f 50 61 72 73 65 45 78 70 72 r->tcl_ParseExpr
23440 29 20 2f 2a 20 33 36 32 20 2a 2f 0a 23 65 6e 64 ) /* 362 */.#end
23450 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 50 if.#ifndef Tcl_P
23460 61 72 73 65 51 75 6f 74 65 64 53 74 72 69 6e 67 arseQuotedString
23470 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 50 61 72 .#define Tcl_Par
23480 73 65 51 75 6f 74 65 64 53 74 72 69 6e 67 20 5c seQuotedString \
23490 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
234a0 74 63 6c 5f 50 61 72 73 65 51 75 6f 74 65 64 53 tcl_ParseQuotedS
234b0 74 72 69 6e 67 29 20 2f 2a 20 33 36 33 20 2a 2f tring) /* 363 */
234c0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
234d0 54 63 6c 5f 50 61 72 73 65 56 61 72 4e 61 6d 65 Tcl_ParseVarName
234e0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 50 61 72 .#define Tcl_Par
234f0 73 65 56 61 72 4e 61 6d 65 20 5c 0a 09 28 74 63 seVarName \..(tc
23500 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 50 lStubsPtr->tcl_P
23510 61 72 73 65 56 61 72 4e 61 6d 65 29 20 2f 2a 20 arseVarName) /*
23520 33 36 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 364 */.#endif.#i
23530 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 43 77 64 fndef Tcl_GetCwd
23540 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 .#define Tcl_Get
23550 43 77 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Cwd \..(tclStubs
23560 50 74 72 2d 3e 74 63 6c 5f 47 65 74 43 77 64 29 Ptr->tcl_GetCwd)
23570 20 2f 2a 20 33 36 35 20 2a 2f 0a 23 65 6e 64 69 /* 365 */.#endi
23580 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 68 f.#ifndef Tcl_Ch
23590 64 69 72 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f dir.#define Tcl_
235a0 43 68 64 69 72 20 5c 0a 09 28 74 63 6c 53 74 75 Chdir \..(tclStu
235b0 62 73 50 74 72 2d 3e 74 63 6c 5f 43 68 64 69 72 bsPtr->tcl_Chdir
235c0 29 20 2f 2a 20 33 36 36 20 2a 2f 0a 23 65 6e 64 ) /* 366 */.#end
235d0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 if.#ifndef Tcl_A
235e0 63 63 65 73 73 0a 23 64 65 66 69 6e 65 20 54 63 ccess.#define Tc
235f0 6c 5f 41 63 63 65 73 73 20 5c 0a 09 28 74 63 6c l_Access \..(tcl
23600 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 63 StubsPtr->tcl_Ac
23610 63 65 73 73 29 20 2f 2a 20 33 36 37 20 2a 2f 0a cess) /* 367 */.
23620 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
23630 63 6c 5f 53 74 61 74 0a 23 64 65 66 69 6e 65 20 cl_Stat.#define
23640 54 63 6c 5f 53 74 61 74 20 5c 0a 09 28 74 63 6c Tcl_Stat \..(tcl
23650 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 74 StubsPtr->tcl_St
23660 61 74 29 20 2f 2a 20 33 36 38 20 2a 2f 0a 23 65 at) /* 368 */.#e
23670 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
23680 5f 55 74 66 4e 63 6d 70 0a 23 64 65 66 69 6e 65 _UtfNcmp.#define
23690 20 54 63 6c 5f 55 74 66 4e 63 6d 70 20 5c 0a 09 Tcl_UtfNcmp \..
236a0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
236b0 6c 5f 55 74 66 4e 63 6d 70 29 20 2f 2a 20 33 36 l_UtfNcmp) /* 36
236c0 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 9 */.#endif.#ifn
236d0 64 65 66 20 54 63 6c 5f 55 74 66 4e 63 61 73 65 def Tcl_UtfNcase
236e0 63 6d 70 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f cmp.#define Tcl_
236f0 55 74 66 4e 63 61 73 65 63 6d 70 20 5c 0a 09 28 UtfNcasecmp \..(
23700 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
23710 5f 55 74 66 4e 63 61 73 65 63 6d 70 29 20 2f 2a _UtfNcasecmp) /*
23720 20 33 37 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 370 */.#endif.#
23730 69 66 6e 64 65 66 20 54 63 6c 5f 53 74 72 69 6e ifndef Tcl_Strin
23740 67 43 61 73 65 4d 61 74 63 68 0a 23 64 65 66 69 gCaseMatch.#defi
23750 6e 65 20 54 63 6c 5f 53 74 72 69 6e 67 43 61 73 ne Tcl_StringCas
23760 65 4d 61 74 63 68 20 5c 0a 09 28 74 63 6c 53 74 eMatch \..(tclSt
23770 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 74 72 69 ubsPtr->tcl_Stri
23780 6e 67 43 61 73 65 4d 61 74 63 68 29 20 2f 2a 20 ngCaseMatch) /*
23790 33 37 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 371 */.#endif.#i
237a0 66 6e 64 65 66 20 54 63 6c 5f 55 6e 69 43 68 61 fndef Tcl_UniCha
237b0 72 49 73 43 6f 6e 74 72 6f 6c 0a 23 64 65 66 69 rIsControl.#defi
237c0 6e 65 20 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 ne Tcl_UniCharIs
237d0 43 6f 6e 74 72 6f 6c 20 5c 0a 09 28 74 63 6c 53 Control \..(tclS
237e0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e 69 tubsPtr->tcl_Uni
237f0 43 68 61 72 49 73 43 6f 6e 74 72 6f 6c 29 20 2f CharIsControl) /
23800 2a 20 33 37 32 20 2a 2f 0a 23 65 6e 64 69 66 0a * 372 */.#endif.
23810 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e 69 43 #ifndef Tcl_UniC
23820 68 61 72 49 73 47 72 61 70 68 0a 23 64 65 66 69 harIsGraph.#defi
23830 6e 65 20 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 ne Tcl_UniCharIs
23840 47 72 61 70 68 20 5c 0a 09 28 74 63 6c 53 74 75 Graph \..(tclStu
23850 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e 69 43 68 bsPtr->tcl_UniCh
23860 61 72 49 73 47 72 61 70 68 29 20 2f 2a 20 33 37 arIsGraph) /* 37
23870 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 3 */.#endif.#ifn
23880 64 65 66 20 54 63 6c 5f 55 6e 69 43 68 61 72 49 def Tcl_UniCharI
23890 73 50 72 69 6e 74 0a 23 64 65 66 69 6e 65 20 54 sPrint.#define T
238a0 63 6c 5f 55 6e 69 43 68 61 72 49 73 50 72 69 6e cl_UniCharIsPrin
238b0 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 t \..(tclStubsPt
238c0 72 2d 3e 74 63 6c 5f 55 6e 69 43 68 61 72 49 73 r->tcl_UniCharIs
238d0 50 72 69 6e 74 29 20 2f 2a 20 33 37 34 20 2a 2f Print) /* 374 */
238e0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
238f0 54 63 6c 5f 55 6e 69 43 68 61 72 49 73 50 75 6e Tcl_UniCharIsPun
23900 63 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 55 ct.#define Tcl_U
23910 6e 69 43 68 61 72 49 73 50 75 6e 63 74 20 5c 0a niCharIsPunct \.
23920 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
23930 63 6c 5f 55 6e 69 43 68 61 72 49 73 50 75 6e 63 cl_UniCharIsPunc
23940 74 29 20 2f 2a 20 33 37 35 20 2a 2f 0a 23 65 6e t) /* 375 */.#en
23950 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
23960 52 65 67 45 78 70 45 78 65 63 4f 62 6a 0a 23 64 RegExpExecObj.#d
23970 65 66 69 6e 65 20 54 63 6c 5f 52 65 67 45 78 70 efine Tcl_RegExp
23980 45 78 65 63 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 ExecObj \..(tclS
23990 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 52 65 67 tubsPtr->tcl_Reg
239a0 45 78 70 45 78 65 63 4f 62 6a 29 20 2f 2a 20 33 ExpExecObj) /* 3
239b0 37 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 76 */.#endif.#if
239c0 6e 64 65 66 20 54 63 6c 5f 52 65 67 45 78 70 47 ndef Tcl_RegExpG
239d0 65 74 49 6e 66 6f 0a 23 64 65 66 69 6e 65 20 54 etInfo.#define T
239e0 63 6c 5f 52 65 67 45 78 70 47 65 74 49 6e 66 6f cl_RegExpGetInfo
239f0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
23a00 2d 3e 74 63 6c 5f 52 65 67 45 78 70 47 65 74 49 ->tcl_RegExpGetI
23a10 6e 66 6f 29 20 2f 2a 20 33 37 37 20 2a 2f 0a 23 nfo) /* 377 */.#
23a20 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
23a30 6c 5f 4e 65 77 55 6e 69 63 6f 64 65 4f 62 6a 0a l_NewUnicodeObj.
23a40 23 64 65 66 69 6e 65 20 54 63 6c 5f 4e 65 77 55 #define Tcl_NewU
23a50 6e 69 63 6f 64 65 4f 62 6a 20 5c 0a 09 28 74 63 nicodeObj \..(tc
23a60 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4e lStubsPtr->tcl_N
23a70 65 77 55 6e 69 63 6f 64 65 4f 62 6a 29 20 2f 2a ewUnicodeObj) /*
23a80 20 33 37 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 378 */.#endif.#
23a90 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 55 6e ifndef Tcl_SetUn
23aa0 69 63 6f 64 65 4f 62 6a 0a 23 64 65 66 69 6e 65 icodeObj.#define
23ab0 20 54 63 6c 5f 53 65 74 55 6e 69 63 6f 64 65 4f Tcl_SetUnicodeO
23ac0 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 bj \..(tclStubsP
23ad0 74 72 2d 3e 74 63 6c 5f 53 65 74 55 6e 69 63 6f tr->tcl_SetUnico
23ae0 64 65 4f 62 6a 29 20 2f 2a 20 33 37 39 20 2a 2f deObj) /* 379 */
23af0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
23b00 54 63 6c 5f 47 65 74 43 68 61 72 4c 65 6e 67 74 Tcl_GetCharLengt
23b10 68 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 h.#define Tcl_Ge
23b20 74 43 68 61 72 4c 65 6e 67 74 68 20 5c 0a 09 28 tCharLength \..(
23b30 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
23b40 5f 47 65 74 43 68 61 72 4c 65 6e 67 74 68 29 20 _GetCharLength)
23b50 2f 2a 20 33 38 30 20 2a 2f 0a 23 65 6e 64 69 66 /* 380 */.#endif
23b60 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 .#ifndef Tcl_Get
23b70 55 6e 69 43 68 61 72 0a 23 64 65 66 69 6e 65 20 UniChar.#define
23b80 54 63 6c 5f 47 65 74 55 6e 69 43 68 61 72 20 5c Tcl_GetUniChar \
23b90 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
23ba0 74 63 6c 5f 47 65 74 55 6e 69 43 68 61 72 29 20 tcl_GetUniChar)
23bb0 2f 2a 20 33 38 31 20 2a 2f 0a 23 65 6e 64 69 66 /* 381 */.#endif
23bc0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 .#ifndef Tcl_Get
23bd0 55 6e 69 63 6f 64 65 0a 23 64 65 66 69 6e 65 20 Unicode.#define
23be0 54 63 6c 5f 47 65 74 55 6e 69 63 6f 64 65 20 5c Tcl_GetUnicode \
23bf0 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
23c00 74 63 6c 5f 47 65 74 55 6e 69 63 6f 64 65 29 20 tcl_GetUnicode)
23c10 2f 2a 20 33 38 32 20 2a 2f 0a 23 65 6e 64 69 66 /* 382 */.#endif
23c20 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 .#ifndef Tcl_Get
23c30 52 61 6e 67 65 0a 23 64 65 66 69 6e 65 20 54 63 Range.#define Tc
23c40 6c 5f 47 65 74 52 61 6e 67 65 20 5c 0a 09 28 74 l_GetRange \..(t
23c50 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
23c60 47 65 74 52 61 6e 67 65 29 20 2f 2a 20 33 38 33 GetRange) /* 383
23c70 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
23c80 65 66 20 54 63 6c 5f 41 70 70 65 6e 64 55 6e 69 ef Tcl_AppendUni
23c90 63 6f 64 65 54 6f 4f 62 6a 0a 23 64 65 66 69 6e codeToObj.#defin
23ca0 65 20 54 63 6c 5f 41 70 70 65 6e 64 55 6e 69 63 e Tcl_AppendUnic
23cb0 6f 64 65 54 6f 4f 62 6a 20 5c 0a 09 28 74 63 6c odeToObj \..(tcl
23cc0 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 70 StubsPtr->tcl_Ap
23cd0 70 65 6e 64 55 6e 69 63 6f 64 65 54 6f 4f 62 6a pendUnicodeToObj
23ce0 29 20 2f 2a 20 33 38 34 20 2a 2f 0a 23 65 6e 64 ) /* 384 */.#end
23cf0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 52 if.#ifndef Tcl_R
23d00 65 67 45 78 70 4d 61 74 63 68 4f 62 6a 0a 23 64 egExpMatchObj.#d
23d10 65 66 69 6e 65 20 54 63 6c 5f 52 65 67 45 78 70 efine Tcl_RegExp
23d20 4d 61 74 63 68 4f 62 6a 20 5c 0a 09 28 74 63 6c MatchObj \..(tcl
23d30 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 52 65 StubsPtr->tcl_Re
23d40 67 45 78 70 4d 61 74 63 68 4f 62 6a 29 20 2f 2a gExpMatchObj) /*
23d50 20 33 38 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 385 */.#endif.#
23d60 69 66 6e 64 65 66 20 54 63 6c 5f 53 65 74 4e 6f ifndef Tcl_SetNo
23d70 74 69 66 69 65 72 0a 23 64 65 66 69 6e 65 20 54 tifier.#define T
23d80 63 6c 5f 53 65 74 4e 6f 74 69 66 69 65 72 20 5c cl_SetNotifier \
23d90 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
23da0 74 63 6c 5f 53 65 74 4e 6f 74 69 66 69 65 72 29 tcl_SetNotifier)
23db0 20 2f 2a 20 33 38 36 20 2a 2f 0a 23 65 6e 64 69 /* 386 */.#endi
23dc0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 65 f.#ifndef Tcl_Ge
23dd0 74 41 6c 6c 6f 63 4d 75 74 65 78 0a 23 64 65 66 tAllocMutex.#def
23de0 69 6e 65 20 54 63 6c 5f 47 65 74 41 6c 6c 6f 63 ine Tcl_GetAlloc
23df0 4d 75 74 65 78 20 5c 0a 09 28 74 63 6c 53 74 75 Mutex \..(tclStu
23e00 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 41 6c bsPtr->tcl_GetAl
23e10 6c 6f 63 4d 75 74 65 78 29 20 2f 2a 20 33 38 37 locMutex) /* 387
23e20 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
23e30 65 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 ef Tcl_GetChanne
23e40 6c 4e 61 6d 65 73 0a 23 64 65 66 69 6e 65 20 54 lNames.#define T
23e50 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 4e 61 6d cl_GetChannelNam
23e60 65 73 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 es \..(tclStubsP
23e70 74 72 2d 3e 74 63 6c 5f 47 65 74 43 68 61 6e 6e tr->tcl_GetChann
23e80 65 6c 4e 61 6d 65 73 29 20 2f 2a 20 33 38 38 20 elNames) /* 388
23e90 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
23ea0 66 20 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c f Tcl_GetChannel
23eb0 4e 61 6d 65 73 45 78 0a 23 64 65 66 69 6e 65 20 NamesEx.#define
23ec0 54 63 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 4e 61 Tcl_GetChannelNa
23ed0 6d 65 73 45 78 20 5c 0a 09 28 74 63 6c 53 74 75 mesEx \..(tclStu
23ee0 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 43 68 bsPtr->tcl_GetCh
23ef0 61 6e 6e 65 6c 4e 61 6d 65 73 45 78 29 20 2f 2a annelNamesEx) /*
23f00 20 33 38 39 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 389 */.#endif.#
23f10 69 66 6e 64 65 66 20 54 63 6c 5f 50 72 6f 63 4f ifndef Tcl_ProcO
23f20 62 6a 43 6d 64 0a 23 64 65 66 69 6e 65 20 54 63 bjCmd.#define Tc
23f30 6c 5f 50 72 6f 63 4f 62 6a 43 6d 64 20 5c 0a 09 l_ProcObjCmd \..
23f40 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
23f50 6c 5f 50 72 6f 63 4f 62 6a 43 6d 64 29 20 2f 2a l_ProcObjCmd) /*
23f60 20 33 39 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 390 */.#endif.#
23f70 69 66 6e 64 65 66 20 54 63 6c 5f 43 6f 6e 64 69 ifndef Tcl_Condi
23f80 74 69 6f 6e 46 69 6e 61 6c 69 7a 65 0a 23 64 65 tionFinalize.#de
23f90 66 69 6e 65 20 54 63 6c 5f 43 6f 6e 64 69 74 69 fine Tcl_Conditi
23fa0 6f 6e 46 69 6e 61 6c 69 7a 65 20 5c 0a 09 28 74 onFinalize \..(t
23fb0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
23fc0 43 6f 6e 64 69 74 69 6f 6e 46 69 6e 61 6c 69 7a ConditionFinaliz
23fd0 65 29 20 2f 2a 20 33 39 31 20 2a 2f 0a 23 65 6e e) /* 391 */.#en
23fe0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
23ff0 4d 75 74 65 78 46 69 6e 61 6c 69 7a 65 0a 23 64 MutexFinalize.#d
24000 65 66 69 6e 65 20 54 63 6c 5f 4d 75 74 65 78 46 efine Tcl_MutexF
24010 69 6e 61 6c 69 7a 65 20 5c 0a 09 28 74 63 6c 53 inalize \..(tclS
24020 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4d 75 74 tubsPtr->tcl_Mut
24030 65 78 46 69 6e 61 6c 69 7a 65 29 20 2f 2a 20 33 exFinalize) /* 3
24040 39 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 92 */.#endif.#if
24050 6e 64 65 66 20 54 63 6c 5f 43 72 65 61 74 65 54 ndef Tcl_CreateT
24060 68 72 65 61 64 0a 23 64 65 66 69 6e 65 20 54 63 hread.#define Tc
24070 6c 5f 43 72 65 61 74 65 54 68 72 65 61 64 20 5c l_CreateThread \
24080 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
24090 74 63 6c 5f 43 72 65 61 74 65 54 68 72 65 61 64 tcl_CreateThread
240a0 29 20 2f 2a 20 33 39 33 20 2a 2f 0a 23 65 6e 64 ) /* 393 */.#end
240b0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 52 if.#ifndef Tcl_R
240c0 65 61 64 52 61 77 0a 23 64 65 66 69 6e 65 20 54 eadRaw.#define T
240d0 63 6c 5f 52 65 61 64 52 61 77 20 5c 0a 09 28 74 cl_ReadRaw \..(t
240e0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
240f0 52 65 61 64 52 61 77 29 20 2f 2a 20 33 39 34 20 ReadRaw) /* 394
24100 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
24110 66 20 54 63 6c 5f 57 72 69 74 65 52 61 77 0a 23 f Tcl_WriteRaw.#
24120 64 65 66 69 6e 65 20 54 63 6c 5f 57 72 69 74 65 define Tcl_Write
24130 52 61 77 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Raw \..(tclStubs
24140 50 74 72 2d 3e 74 63 6c 5f 57 72 69 74 65 52 61 Ptr->tcl_WriteRa
24150 77 29 20 2f 2a 20 33 39 35 20 2a 2f 0a 23 65 6e w) /* 395 */.#en
24160 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
24170 47 65 74 54 6f 70 43 68 61 6e 6e 65 6c 0a 23 64 GetTopChannel.#d
24180 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 54 6f 70 efine Tcl_GetTop
24190 43 68 61 6e 6e 65 6c 20 5c 0a 09 28 74 63 6c 53 Channel \..(tclS
241a0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 tubsPtr->tcl_Get
241b0 54 6f 70 43 68 61 6e 6e 65 6c 29 20 2f 2a 20 33 TopChannel) /* 3
241c0 39 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 96 */.#endif.#if
241d0 6e 64 65 66 20 54 63 6c 5f 43 68 61 6e 6e 65 6c ndef Tcl_Channel
241e0 42 75 66 66 65 72 65 64 0a 23 64 65 66 69 6e 65 Buffered.#define
241f0 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 42 75 66 66 Tcl_ChannelBuff
24200 65 72 65 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 ered \..(tclStub
24210 73 50 74 72 2d 3e 74 63 6c 5f 43 68 61 6e 6e 65 sPtr->tcl_Channe
24220 6c 42 75 66 66 65 72 65 64 29 20 2f 2a 20 33 39 lBuffered) /* 39
24230 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 7 */.#endif.#ifn
24240 64 65 66 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 4e def Tcl_ChannelN
24250 61 6d 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ame.#define Tcl_
24260 43 68 61 6e 6e 65 6c 4e 61 6d 65 20 5c 0a 09 28 ChannelName \..(
24270 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
24280 5f 43 68 61 6e 6e 65 6c 4e 61 6d 65 29 20 2f 2a _ChannelName) /*
24290 20 33 39 38 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 398 */.#endif.#
242a0 69 66 6e 64 65 66 20 54 63 6c 5f 43 68 61 6e 6e ifndef Tcl_Chann
242b0 65 6c 56 65 72 73 69 6f 6e 0a 23 64 65 66 69 6e elVersion.#defin
242c0 65 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 56 65 72 e Tcl_ChannelVer
242d0 73 69 6f 6e 20 5c 0a 09 28 74 63 6c 53 74 75 62 sion \..(tclStub
242e0 73 50 74 72 2d 3e 74 63 6c 5f 43 68 61 6e 6e 65 sPtr->tcl_Channe
242f0 6c 56 65 72 73 69 6f 6e 29 20 2f 2a 20 33 39 39 lVersion) /* 399
24300 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
24310 65 66 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 42 6c ef Tcl_ChannelBl
24320 6f 63 6b 4d 6f 64 65 50 72 6f 63 0a 23 64 65 66 ockModeProc.#def
24330 69 6e 65 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 42 ine Tcl_ChannelB
24340 6c 6f 63 6b 4d 6f 64 65 50 72 6f 63 20 5c 0a 09 lockModeProc \..
24350 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
24360 6c 5f 43 68 61 6e 6e 65 6c 42 6c 6f 63 6b 4d 6f l_ChannelBlockMo
24370 64 65 50 72 6f 63 29 20 2f 2a 20 34 30 30 20 2a deProc) /* 400 *
24380 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
24390 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 43 6c 6f 73 Tcl_ChannelClos
243a0 65 50 72 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 eProc.#define Tc
243b0 6c 5f 43 68 61 6e 6e 65 6c 43 6c 6f 73 65 50 72 l_ChannelClosePr
243c0 6f 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 oc \..(tclStubsP
243d0 74 72 2d 3e 74 63 6c 5f 43 68 61 6e 6e 65 6c 43 tr->tcl_ChannelC
243e0 6c 6f 73 65 50 72 6f 63 29 20 2f 2a 20 34 30 31 loseProc) /* 401
243f0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
24400 65 66 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 43 6c ef Tcl_ChannelCl
24410 6f 73 65 32 50 72 6f 63 0a 23 64 65 66 69 6e 65 ose2Proc.#define
24420 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 43 6c 6f 73 Tcl_ChannelClos
24430 65 32 50 72 6f 63 20 5c 0a 09 28 74 63 6c 53 74 e2Proc \..(tclSt
24440 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 68 61 6e ubsPtr->tcl_Chan
24450 6e 65 6c 43 6c 6f 73 65 32 50 72 6f 63 29 20 2f nelClose2Proc) /
24460 2a 20 34 30 32 20 2a 2f 0a 23 65 6e 64 69 66 0a * 402 */.#endif.
24470 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 68 61 6e #ifndef Tcl_Chan
24480 6e 65 6c 49 6e 70 75 74 50 72 6f 63 0a 23 64 65 nelInputProc.#de
24490 66 69 6e 65 20 54 63 6c 5f 43 68 61 6e 6e 65 6c fine Tcl_Channel
244a0 49 6e 70 75 74 50 72 6f 63 20 5c 0a 09 28 74 63 InputProc \..(tc
244b0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 lStubsPtr->tcl_C
244c0 68 61 6e 6e 65 6c 49 6e 70 75 74 50 72 6f 63 29 hannelInputProc)
244d0 20 2f 2a 20 34 30 33 20 2a 2f 0a 23 65 6e 64 69 /* 403 */.#endi
244e0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 68 f.#ifndef Tcl_Ch
244f0 61 6e 6e 65 6c 4f 75 74 70 75 74 50 72 6f 63 0a annelOutputProc.
24500 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 68 61 6e #define Tcl_Chan
24510 6e 65 6c 4f 75 74 70 75 74 50 72 6f 63 20 5c 0a nelOutputProc \.
24520 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
24530 63 6c 5f 43 68 61 6e 6e 65 6c 4f 75 74 70 75 74 cl_ChannelOutput
24540 50 72 6f 63 29 20 2f 2a 20 34 30 34 20 2a 2f 0a Proc) /* 404 */.
24550 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 #endif.#ifndef T
24560 63 6c 5f 43 68 61 6e 6e 65 6c 53 65 65 6b 50 72 cl_ChannelSeekPr
24570 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 oc.#define Tcl_C
24580 68 61 6e 6e 65 6c 53 65 65 6b 50 72 6f 63 20 5c hannelSeekProc \
24590 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
245a0 74 63 6c 5f 43 68 61 6e 6e 65 6c 53 65 65 6b 50 tcl_ChannelSeekP
245b0 72 6f 63 29 20 2f 2a 20 34 30 35 20 2a 2f 0a 23 roc) /* 405 */.#
245c0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
245d0 6c 5f 43 68 61 6e 6e 65 6c 53 65 74 4f 70 74 69 l_ChannelSetOpti
245e0 6f 6e 50 72 6f 63 0a 23 64 65 66 69 6e 65 20 54 onProc.#define T
245f0 63 6c 5f 43 68 61 6e 6e 65 6c 53 65 74 4f 70 74 cl_ChannelSetOpt
24600 69 6f 6e 50 72 6f 63 20 5c 0a 09 28 74 63 6c 53 ionProc \..(tclS
24610 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 68 61 tubsPtr->tcl_Cha
24620 6e 6e 65 6c 53 65 74 4f 70 74 69 6f 6e 50 72 6f nnelSetOptionPro
24630 63 29 20 2f 2a 20 34 30 36 20 2a 2f 0a 23 65 6e c) /* 406 */.#en
24640 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
24650 43 68 61 6e 6e 65 6c 47 65 74 4f 70 74 69 6f 6e ChannelGetOption
24660 50 72 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 6c Proc.#define Tcl
24670 5f 43 68 61 6e 6e 65 6c 47 65 74 4f 70 74 69 6f _ChannelGetOptio
24680 6e 50 72 6f 63 20 5c 0a 09 28 74 63 6c 53 74 75 nProc \..(tclStu
24690 62 73 50 74 72 2d 3e 74 63 6c 5f 43 68 61 6e 6e bsPtr->tcl_Chann
246a0 65 6c 47 65 74 4f 70 74 69 6f 6e 50 72 6f 63 29 elGetOptionProc)
246b0 20 2f 2a 20 34 30 37 20 2a 2f 0a 23 65 6e 64 69 /* 407 */.#endi
246c0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 68 f.#ifndef Tcl_Ch
246d0 61 6e 6e 65 6c 57 61 74 63 68 50 72 6f 63 0a 23 annelWatchProc.#
246e0 64 65 66 69 6e 65 20 54 63 6c 5f 43 68 61 6e 6e define Tcl_Chann
246f0 65 6c 57 61 74 63 68 50 72 6f 63 20 5c 0a 09 28 elWatchProc \..(
24700 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
24710 5f 43 68 61 6e 6e 65 6c 57 61 74 63 68 50 72 6f _ChannelWatchPro
24720 63 29 20 2f 2a 20 34 30 38 20 2a 2f 0a 23 65 6e c) /* 408 */.#en
24730 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
24740 43 68 61 6e 6e 65 6c 47 65 74 48 61 6e 64 6c 65 ChannelGetHandle
24750 50 72 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 6c Proc.#define Tcl
24760 5f 43 68 61 6e 6e 65 6c 47 65 74 48 61 6e 64 6c _ChannelGetHandl
24770 65 50 72 6f 63 20 5c 0a 09 28 74 63 6c 53 74 75 eProc \..(tclStu
24780 62 73 50 74 72 2d 3e 74 63 6c 5f 43 68 61 6e 6e bsPtr->tcl_Chann
24790 65 6c 47 65 74 48 61 6e 64 6c 65 50 72 6f 63 29 elGetHandleProc)
247a0 20 2f 2a 20 34 30 39 20 2a 2f 0a 23 65 6e 64 69 /* 409 */.#endi
247b0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 68 f.#ifndef Tcl_Ch
247c0 61 6e 6e 65 6c 46 6c 75 73 68 50 72 6f 63 0a 23 annelFlushProc.#
247d0 64 65 66 69 6e 65 20 54 63 6c 5f 43 68 61 6e 6e define Tcl_Chann
247e0 65 6c 46 6c 75 73 68 50 72 6f 63 20 5c 0a 09 28 elFlushProc \..(
247f0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
24800 5f 43 68 61 6e 6e 65 6c 46 6c 75 73 68 50 72 6f _ChannelFlushPro
24810 63 29 20 2f 2a 20 34 31 30 20 2a 2f 0a 23 65 6e c) /* 410 */.#en
24820 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
24830 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 50 72 ChannelHandlerPr
24840 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 oc.#define Tcl_C
24850 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 50 72 6f hannelHandlerPro
24860 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 c \..(tclStubsPt
24870 72 2d 3e 74 63 6c 5f 43 68 61 6e 6e 65 6c 48 61 r->tcl_ChannelHa
24880 6e 64 6c 65 72 50 72 6f 63 29 20 2f 2a 20 34 31 ndlerProc) /* 41
24890 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 1 */.#endif.#ifn
248a0 64 65 66 20 54 63 6c 5f 4a 6f 69 6e 54 68 72 65 def Tcl_JoinThre
248b0 61 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 4a ad.#define Tcl_J
248c0 6f 69 6e 54 68 72 65 61 64 20 5c 0a 09 28 74 63 oinThread \..(tc
248d0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 4a lStubsPtr->tcl_J
248e0 6f 69 6e 54 68 72 65 61 64 29 20 2f 2a 20 34 31 oinThread) /* 41
248f0 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 2 */.#endif.#ifn
24900 64 65 66 20 54 63 6c 5f 49 73 43 68 61 6e 6e 65 def Tcl_IsChanne
24910 6c 53 68 61 72 65 64 0a 23 64 65 66 69 6e 65 20 lShared.#define
24920 54 63 6c 5f 49 73 43 68 61 6e 6e 65 6c 53 68 61 Tcl_IsChannelSha
24930 72 65 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 red \..(tclStubs
24940 50 74 72 2d 3e 74 63 6c 5f 49 73 43 68 61 6e 6e Ptr->tcl_IsChann
24950 65 6c 53 68 61 72 65 64 29 20 2f 2a 20 34 31 33 elShared) /* 413
24960 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
24970 65 66 20 54 63 6c 5f 49 73 43 68 61 6e 6e 65 6c ef Tcl_IsChannel
24980 52 65 67 69 73 74 65 72 65 64 0a 23 64 65 66 69 Registered.#defi
24990 6e 65 20 54 63 6c 5f 49 73 43 68 61 6e 6e 65 6c ne Tcl_IsChannel
249a0 52 65 67 69 73 74 65 72 65 64 20 5c 0a 09 28 74 Registered \..(t
249b0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
249c0 49 73 43 68 61 6e 6e 65 6c 52 65 67 69 73 74 65 IsChannelRegiste
249d0 72 65 64 29 20 2f 2a 20 34 31 34 20 2a 2f 0a 23 red) /* 414 */.#
249e0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
249f0 6c 5f 43 75 74 43 68 61 6e 6e 65 6c 0a 23 64 65 l_CutChannel.#de
24a00 66 69 6e 65 20 54 63 6c 5f 43 75 74 43 68 61 6e fine Tcl_CutChan
24a10 6e 65 6c 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 nel \..(tclStubs
24a20 50 74 72 2d 3e 74 63 6c 5f 43 75 74 43 68 61 6e Ptr->tcl_CutChan
24a30 6e 65 6c 29 20 2f 2a 20 34 31 35 20 2a 2f 0a 23 nel) /* 415 */.#
24a40 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
24a50 6c 5f 53 70 6c 69 63 65 43 68 61 6e 6e 65 6c 0a l_SpliceChannel.
24a60 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 70 6c 69 #define Tcl_Spli
24a70 63 65 43 68 61 6e 6e 65 6c 20 5c 0a 09 28 74 63 ceChannel \..(tc
24a80 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 lStubsPtr->tcl_S
24a90 70 6c 69 63 65 43 68 61 6e 6e 65 6c 29 20 2f 2a pliceChannel) /*
24aa0 20 34 31 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 416 */.#endif.#
24ab0 69 66 6e 64 65 66 20 54 63 6c 5f 43 6c 65 61 72 ifndef Tcl_Clear
24ac0 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 73 0a ChannelHandlers.
24ad0 23 64 65 66 69 6e 65 20 54 63 6c 5f 43 6c 65 61 #define Tcl_Clea
24ae0 72 43 68 61 6e 6e 65 6c 48 61 6e 64 6c 65 72 73 rChannelHandlers
24af0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
24b00 2d 3e 74 63 6c 5f 43 6c 65 61 72 43 68 61 6e 6e ->tcl_ClearChann
24b10 65 6c 48 61 6e 64 6c 65 72 73 29 20 2f 2a 20 34 elHandlers) /* 4
24b20 31 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 17 */.#endif.#if
24b30 6e 64 65 66 20 54 63 6c 5f 49 73 43 68 61 6e 6e ndef Tcl_IsChann
24b40 65 6c 45 78 69 73 74 69 6e 67 0a 23 64 65 66 69 elExisting.#defi
24b50 6e 65 20 54 63 6c 5f 49 73 43 68 61 6e 6e 65 6c ne Tcl_IsChannel
24b60 45 78 69 73 74 69 6e 67 20 5c 0a 09 28 74 63 6c Existing \..(tcl
24b70 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 49 73 StubsPtr->tcl_Is
24b80 43 68 61 6e 6e 65 6c 45 78 69 73 74 69 6e 67 29 ChannelExisting)
24b90 20 2f 2a 20 34 31 38 20 2a 2f 0a 23 65 6e 64 69 /* 418 */.#endi
24ba0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e f.#ifndef Tcl_Un
24bb0 69 43 68 61 72 4e 63 61 73 65 63 6d 70 0a 23 64 iCharNcasecmp.#d
24bc0 65 66 69 6e 65 20 54 63 6c 5f 55 6e 69 43 68 61 efine Tcl_UniCha
24bd0 72 4e 63 61 73 65 63 6d 70 20 5c 0a 09 28 74 63 rNcasecmp \..(tc
24be0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 55 lStubsPtr->tcl_U
24bf0 6e 69 43 68 61 72 4e 63 61 73 65 63 6d 70 29 20 niCharNcasecmp)
24c00 2f 2a 20 34 31 39 20 2a 2f 0a 23 65 6e 64 69 66 /* 419 */.#endif
24c10 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e 69 .#ifndef Tcl_Uni
24c20 43 68 61 72 43 61 73 65 4d 61 74 63 68 0a 23 64 CharCaseMatch.#d
24c30 65 66 69 6e 65 20 54 63 6c 5f 55 6e 69 43 68 61 efine Tcl_UniCha
24c40 72 43 61 73 65 4d 61 74 63 68 20 5c 0a 09 28 74 rCaseMatch \..(t
24c50 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
24c60 55 6e 69 43 68 61 72 43 61 73 65 4d 61 74 63 68 UniCharCaseMatch
24c70 29 20 2f 2a 20 34 32 30 20 2a 2f 0a 23 65 6e 64 ) /* 420 */.#end
24c80 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 46 if.#ifndef Tcl_F
24c90 69 6e 64 48 61 73 68 45 6e 74 72 79 0a 23 64 65 indHashEntry.#de
24ca0 66 69 6e 65 20 54 63 6c 5f 46 69 6e 64 48 61 73 fine Tcl_FindHas
24cb0 68 45 6e 74 72 79 20 5c 0a 09 28 74 63 6c 53 74 hEntry \..(tclSt
24cc0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 69 6e 64 ubsPtr->tcl_Find
24cd0 48 61 73 68 45 6e 74 72 79 29 20 2f 2a 20 34 32 HashEntry) /* 42
24ce0 31 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 1 */.#endif.#ifn
24cf0 64 65 66 20 54 63 6c 5f 43 72 65 61 74 65 48 61 def Tcl_CreateHa
24d00 73 68 45 6e 74 72 79 0a 23 64 65 66 69 6e 65 20 shEntry.#define
24d10 54 63 6c 5f 43 72 65 61 74 65 48 61 73 68 45 6e Tcl_CreateHashEn
24d20 74 72 79 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 try \..(tclStubs
24d30 50 74 72 2d 3e 74 63 6c 5f 43 72 65 61 74 65 48 Ptr->tcl_CreateH
24d40 61 73 68 45 6e 74 72 79 29 20 2f 2a 20 34 32 32 ashEntry) /* 422
24d50 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
24d60 65 66 20 54 63 6c 5f 49 6e 69 74 43 75 73 74 6f ef Tcl_InitCusto
24d70 6d 48 61 73 68 54 61 62 6c 65 0a 23 64 65 66 69 mHashTable.#defi
24d80 6e 65 20 54 63 6c 5f 49 6e 69 74 43 75 73 74 6f ne Tcl_InitCusto
24d90 6d 48 61 73 68 54 61 62 6c 65 20 5c 0a 09 28 74 mHashTable \..(t
24da0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
24db0 49 6e 69 74 43 75 73 74 6f 6d 48 61 73 68 54 61 InitCustomHashTa
24dc0 62 6c 65 29 20 2f 2a 20 34 32 33 20 2a 2f 0a 23 ble) /* 423 */.#
24dd0 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
24de0 6c 5f 49 6e 69 74 4f 62 6a 48 61 73 68 54 61 62 l_InitObjHashTab
24df0 6c 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 49 le.#define Tcl_I
24e00 6e 69 74 4f 62 6a 48 61 73 68 54 61 62 6c 65 20 nitObjHashTable
24e10 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
24e20 3e 74 63 6c 5f 49 6e 69 74 4f 62 6a 48 61 73 68 >tcl_InitObjHash
24e30 54 61 62 6c 65 29 20 2f 2a 20 34 32 34 20 2a 2f Table) /* 424 */
24e40 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
24e50 54 63 6c 5f 43 6f 6d 6d 61 6e 64 54 72 61 63 65 Tcl_CommandTrace
24e60 49 6e 66 6f 0a 23 64 65 66 69 6e 65 20 54 63 6c Info.#define Tcl
24e70 5f 43 6f 6d 6d 61 6e 64 54 72 61 63 65 49 6e 66 _CommandTraceInf
24e80 6f 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 o \..(tclStubsPt
24e90 72 2d 3e 74 63 6c 5f 43 6f 6d 6d 61 6e 64 54 72 r->tcl_CommandTr
24ea0 61 63 65 49 6e 66 6f 29 20 2f 2a 20 34 32 35 20 aceInfo) /* 425
24eb0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
24ec0 66 20 54 63 6c 5f 54 72 61 63 65 43 6f 6d 6d 61 f Tcl_TraceComma
24ed0 6e 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 54 nd.#define Tcl_T
24ee0 72 61 63 65 43 6f 6d 6d 61 6e 64 20 5c 0a 09 28 raceCommand \..(
24ef0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
24f00 5f 54 72 61 63 65 43 6f 6d 6d 61 6e 64 29 20 2f _TraceCommand) /
24f10 2a 20 34 32 36 20 2a 2f 0a 23 65 6e 64 69 66 0a * 426 */.#endif.
24f20 23 69 66 6e 64 65 66 20 54 63 6c 5f 55 6e 74 72 #ifndef Tcl_Untr
24f30 61 63 65 43 6f 6d 6d 61 6e 64 0a 23 64 65 66 69 aceCommand.#defi
24f40 6e 65 20 54 63 6c 5f 55 6e 74 72 61 63 65 43 6f ne Tcl_UntraceCo
24f50 6d 6d 61 6e 64 20 5c 0a 09 28 74 63 6c 53 74 75 mmand \..(tclStu
24f60 62 73 50 74 72 2d 3e 74 63 6c 5f 55 6e 74 72 61 bsPtr->tcl_Untra
24f70 63 65 43 6f 6d 6d 61 6e 64 29 20 2f 2a 20 34 32 ceCommand) /* 42
24f80 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 7 */.#endif.#ifn
24f90 64 65 66 20 54 63 6c 5f 41 74 74 65 6d 70 74 41 def Tcl_AttemptA
24fa0 6c 6c 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 6c lloc.#define Tcl
24fb0 5f 41 74 74 65 6d 70 74 41 6c 6c 6f 63 20 5c 0a _AttemptAlloc \.
24fc0 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
24fd0 63 6c 5f 41 74 74 65 6d 70 74 41 6c 6c 6f 63 29 cl_AttemptAlloc)
24fe0 20 2f 2a 20 34 32 38 20 2a 2f 0a 23 65 6e 64 69 /* 428 */.#endi
24ff0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 74 f.#ifndef Tcl_At
25000 74 65 6d 70 74 44 62 43 6b 61 6c 6c 6f 63 0a 23 temptDbCkalloc.#
25010 64 65 66 69 6e 65 20 54 63 6c 5f 41 74 74 65 6d define Tcl_Attem
25020 70 74 44 62 43 6b 61 6c 6c 6f 63 20 5c 0a 09 28 ptDbCkalloc \..(
25030 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
25040 5f 41 74 74 65 6d 70 74 44 62 43 6b 61 6c 6c 6f _AttemptDbCkallo
25050 63 29 20 2f 2a 20 34 32 39 20 2a 2f 0a 23 65 6e c) /* 429 */.#en
25060 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
25070 41 74 74 65 6d 70 74 52 65 61 6c 6c 6f 63 0a 23 AttemptRealloc.#
25080 64 65 66 69 6e 65 20 54 63 6c 5f 41 74 74 65 6d define Tcl_Attem
25090 70 74 52 65 61 6c 6c 6f 63 20 5c 0a 09 28 74 63 ptRealloc \..(tc
250a0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 lStubsPtr->tcl_A
250b0 74 74 65 6d 70 74 52 65 61 6c 6c 6f 63 29 20 2f ttemptRealloc) /
250c0 2a 20 34 33 30 20 2a 2f 0a 23 65 6e 64 69 66 0a * 430 */.#endif.
250d0 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 74 74 65 #ifndef Tcl_Atte
250e0 6d 70 74 44 62 43 6b 72 65 61 6c 6c 6f 63 0a 23 mptDbCkrealloc.#
250f0 64 65 66 69 6e 65 20 54 63 6c 5f 41 74 74 65 6d define Tcl_Attem
25100 70 74 44 62 43 6b 72 65 61 6c 6c 6f 63 20 5c 0a ptDbCkrealloc \.
25110 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
25120 63 6c 5f 41 74 74 65 6d 70 74 44 62 43 6b 72 65 cl_AttemptDbCkre
25130 61 6c 6c 6f 63 29 20 2f 2a 20 34 33 31 20 2a 2f alloc) /* 431 */
25140 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
25150 54 63 6c 5f 41 74 74 65 6d 70 74 53 65 74 4f 62 Tcl_AttemptSetOb
25160 6a 4c 65 6e 67 74 68 0a 23 64 65 66 69 6e 65 20 jLength.#define
25170 54 63 6c 5f 41 74 74 65 6d 70 74 53 65 74 4f 62 Tcl_AttemptSetOb
25180 6a 4c 65 6e 67 74 68 20 5c 0a 09 28 74 63 6c 53 jLength \..(tclS
25190 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 41 74 74 tubsPtr->tcl_Att
251a0 65 6d 70 74 53 65 74 4f 62 6a 4c 65 6e 67 74 68 emptSetObjLength
251b0 29 20 2f 2a 20 34 33 32 20 2a 2f 0a 23 65 6e 64 ) /* 432 */.#end
251c0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 47 if.#ifndef Tcl_G
251d0 65 74 43 68 61 6e 6e 65 6c 54 68 72 65 61 64 0a etChannelThread.
251e0 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 43 #define Tcl_GetC
251f0 68 61 6e 6e 65 6c 54 68 72 65 61 64 20 5c 0a 09 hannelThread \..
25200 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
25210 6c 5f 47 65 74 43 68 61 6e 6e 65 6c 54 68 72 65 l_GetChannelThre
25220 61 64 29 20 2f 2a 20 34 33 33 20 2a 2f 0a 23 65 ad) /* 433 */.#e
25230 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
25240 5f 47 65 74 55 6e 69 63 6f 64 65 46 72 6f 6d 4f _GetUnicodeFromO
25250 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 bj.#define Tcl_G
25260 65 74 55 6e 69 63 6f 64 65 46 72 6f 6d 4f 62 6a etUnicodeFromObj
25270 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
25280 2d 3e 74 63 6c 5f 47 65 74 55 6e 69 63 6f 64 65 ->tcl_GetUnicode
25290 46 72 6f 6d 4f 62 6a 29 20 2f 2a 20 34 33 34 20 FromObj) /* 434
252a0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
252b0 66 20 54 63 6c 5f 47 65 74 4d 61 74 68 46 75 6e f Tcl_GetMathFun
252c0 63 49 6e 66 6f 0a 23 64 65 66 69 6e 65 20 54 63 cInfo.#define Tc
252d0 6c 5f 47 65 74 4d 61 74 68 46 75 6e 63 49 6e 66 l_GetMathFuncInf
252e0 6f 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 o \..(tclStubsPt
252f0 72 2d 3e 74 63 6c 5f 47 65 74 4d 61 74 68 46 75 r->tcl_GetMathFu
25300 6e 63 49 6e 66 6f 29 20 2f 2a 20 34 33 35 20 2a ncInfo) /* 435 *
25310 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
25320 20 54 63 6c 5f 4c 69 73 74 4d 61 74 68 46 75 6e Tcl_ListMathFun
25330 63 73 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 4c cs.#define Tcl_L
25340 69 73 74 4d 61 74 68 46 75 6e 63 73 20 5c 0a 09 istMathFuncs \..
25350 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
25360 6c 5f 4c 69 73 74 4d 61 74 68 46 75 6e 63 73 29 l_ListMathFuncs)
25370 20 2f 2a 20 34 33 36 20 2a 2f 0a 23 65 6e 64 69 /* 436 */.#endi
25380 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 53 75 f.#ifndef Tcl_Su
25390 62 73 74 4f 62 6a 0a 23 64 65 66 69 6e 65 20 54 bstObj.#define T
253a0 63 6c 5f 53 75 62 73 74 4f 62 6a 20 5c 0a 09 28 cl_SubstObj \..(
253b0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
253c0 5f 53 75 62 73 74 4f 62 6a 29 20 2f 2a 20 34 33 _SubstObj) /* 43
253d0 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 7 */.#endif.#ifn
253e0 64 65 66 20 54 63 6c 5f 44 65 74 61 63 68 43 68 def Tcl_DetachCh
253f0 61 6e 6e 65 6c 0a 23 64 65 66 69 6e 65 20 54 63 annel.#define Tc
25400 6c 5f 44 65 74 61 63 68 43 68 61 6e 6e 65 6c 20 l_DetachChannel
25410 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
25420 3e 74 63 6c 5f 44 65 74 61 63 68 43 68 61 6e 6e >tcl_DetachChann
25430 65 6c 29 20 2f 2a 20 34 33 38 20 2a 2f 0a 23 65 el) /* 438 */.#e
25440 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
25450 5f 49 73 53 74 61 6e 64 61 72 64 43 68 61 6e 6e _IsStandardChann
25460 65 6c 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 49 el.#define Tcl_I
25470 73 53 74 61 6e 64 61 72 64 43 68 61 6e 6e 65 6c sStandardChannel
25480 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
25490 2d 3e 74 63 6c 5f 49 73 53 74 61 6e 64 61 72 64 ->tcl_IsStandard
254a0 43 68 61 6e 6e 65 6c 29 20 2f 2a 20 34 33 39 20 Channel) /* 439
254b0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
254c0 66 20 54 63 6c 5f 46 53 43 6f 70 79 46 69 6c 65 f Tcl_FSCopyFile
254d0 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 43 .#define Tcl_FSC
254e0 6f 70 79 46 69 6c 65 20 5c 0a 09 28 74 63 6c 53 opyFile \..(tclS
254f0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 53 43 tubsPtr->tcl_FSC
25500 6f 70 79 46 69 6c 65 29 20 2f 2a 20 34 34 30 20 opyFile) /* 440
25510 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
25520 66 20 54 63 6c 5f 46 53 43 6f 70 79 44 69 72 65 f Tcl_FSCopyDire
25530 63 74 6f 72 79 0a 23 64 65 66 69 6e 65 20 54 63 ctory.#define Tc
25540 6c 5f 46 53 43 6f 70 79 44 69 72 65 63 74 6f 72 l_FSCopyDirector
25550 79 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 y \..(tclStubsPt
25560 72 2d 3e 74 63 6c 5f 46 53 43 6f 70 79 44 69 72 r->tcl_FSCopyDir
25570 65 63 74 6f 72 79 29 20 2f 2a 20 34 34 31 20 2a ectory) /* 441 *
25580 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
25590 20 54 63 6c 5f 46 53 43 72 65 61 74 65 44 69 72 Tcl_FSCreateDir
255a0 65 63 74 6f 72 79 0a 23 64 65 66 69 6e 65 20 54 ectory.#define T
255b0 63 6c 5f 46 53 43 72 65 61 74 65 44 69 72 65 63 cl_FSCreateDirec
255c0 74 6f 72 79 20 5c 0a 09 28 74 63 6c 53 74 75 62 tory \..(tclStub
255d0 73 50 74 72 2d 3e 74 63 6c 5f 46 53 43 72 65 61 sPtr->tcl_FSCrea
255e0 74 65 44 69 72 65 63 74 6f 72 79 29 20 2f 2a 20 teDirectory) /*
255f0 34 34 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 442 */.#endif.#i
25600 66 6e 64 65 66 20 54 63 6c 5f 46 53 44 65 6c 65 fndef Tcl_FSDele
25610 74 65 46 69 6c 65 0a 23 64 65 66 69 6e 65 20 54 teFile.#define T
25620 63 6c 5f 46 53 44 65 6c 65 74 65 46 69 6c 65 20 cl_FSDeleteFile
25630 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
25640 3e 74 63 6c 5f 46 53 44 65 6c 65 74 65 46 69 6c >tcl_FSDeleteFil
25650 65 29 20 2f 2a 20 34 34 33 20 2a 2f 0a 23 65 6e e) /* 443 */.#en
25660 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
25670 46 53 4c 6f 61 64 46 69 6c 65 0a 23 64 65 66 69 FSLoadFile.#defi
25680 6e 65 20 54 63 6c 5f 46 53 4c 6f 61 64 46 69 6c ne Tcl_FSLoadFil
25690 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 e \..(tclStubsPt
256a0 72 2d 3e 74 63 6c 5f 46 53 4c 6f 61 64 46 69 6c r->tcl_FSLoadFil
256b0 65 29 20 2f 2a 20 34 34 34 20 2a 2f 0a 23 65 6e e) /* 444 */.#en
256c0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
256d0 46 53 4d 61 74 63 68 49 6e 44 69 72 65 63 74 6f FSMatchInDirecto
256e0 72 79 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 ry.#define Tcl_F
256f0 53 4d 61 74 63 68 49 6e 44 69 72 65 63 74 6f 72 SMatchInDirector
25700 79 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 y \..(tclStubsPt
25710 72 2d 3e 74 63 6c 5f 46 53 4d 61 74 63 68 49 6e r->tcl_FSMatchIn
25720 44 69 72 65 63 74 6f 72 79 29 20 2f 2a 20 34 34 Directory) /* 44
25730 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 5 */.#endif.#ifn
25740 64 65 66 20 54 63 6c 5f 46 53 4c 69 6e 6b 0a 23 def Tcl_FSLink.#
25750 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 4c 69 6e define Tcl_FSLin
25760 6b 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 k \..(tclStubsPt
25770 72 2d 3e 74 63 6c 5f 46 53 4c 69 6e 6b 29 20 2f r->tcl_FSLink) /
25780 2a 20 34 34 36 20 2a 2f 0a 23 65 6e 64 69 66 0a * 446 */.#endif.
25790 23 69 66 6e 64 65 66 20 54 63 6c 5f 46 53 52 65 #ifndef Tcl_FSRe
257a0 6d 6f 76 65 44 69 72 65 63 74 6f 72 79 0a 23 64 moveDirectory.#d
257b0 65 66 69 6e 65 20 54 63 6c 5f 46 53 52 65 6d 6f efine Tcl_FSRemo
257c0 76 65 44 69 72 65 63 74 6f 72 79 20 5c 0a 09 28 veDirectory \..(
257d0 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
257e0 5f 46 53 52 65 6d 6f 76 65 44 69 72 65 63 74 6f _FSRemoveDirecto
257f0 72 79 29 20 2f 2a 20 34 34 37 20 2a 2f 0a 23 65 ry) /* 447 */.#e
25800 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
25810 5f 46 53 52 65 6e 61 6d 65 46 69 6c 65 0a 23 64 _FSRenameFile.#d
25820 65 66 69 6e 65 20 54 63 6c 5f 46 53 52 65 6e 61 efine Tcl_FSRena
25830 6d 65 46 69 6c 65 20 5c 0a 09 28 74 63 6c 53 74 meFile \..(tclSt
25840 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 53 52 65 ubsPtr->tcl_FSRe
25850 6e 61 6d 65 46 69 6c 65 29 20 2f 2a 20 34 34 38 nameFile) /* 448
25860 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
25870 65 66 20 54 63 6c 5f 46 53 4c 73 74 61 74 0a 23 ef Tcl_FSLstat.#
25880 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 4c 73 74 define Tcl_FSLst
25890 61 74 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 at \..(tclStubsP
258a0 74 72 2d 3e 74 63 6c 5f 46 53 4c 73 74 61 74 29 tr->tcl_FSLstat)
258b0 20 2f 2a 20 34 34 39 20 2a 2f 0a 23 65 6e 64 69 /* 449 */.#endi
258c0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 46 53 f.#ifndef Tcl_FS
258d0 55 74 69 6d 65 0a 23 64 65 66 69 6e 65 20 54 63 Utime.#define Tc
258e0 6c 5f 46 53 55 74 69 6d 65 20 5c 0a 09 28 74 63 l_FSUtime \..(tc
258f0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 lStubsPtr->tcl_F
25900 53 55 74 69 6d 65 29 20 2f 2a 20 34 35 30 20 2a SUtime) /* 450 *
25910 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
25920 20 54 63 6c 5f 46 53 46 69 6c 65 41 74 74 72 73 Tcl_FSFileAttrs
25930 47 65 74 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f Get.#define Tcl_
25940 46 53 46 69 6c 65 41 74 74 72 73 47 65 74 20 5c FSFileAttrsGet \
25950 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
25960 74 63 6c 5f 46 53 46 69 6c 65 41 74 74 72 73 47 tcl_FSFileAttrsG
25970 65 74 29 20 2f 2a 20 34 35 31 20 2a 2f 0a 23 65 et) /* 451 */.#e
25980 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
25990 5f 46 53 46 69 6c 65 41 74 74 72 73 53 65 74 0a _FSFileAttrsSet.
259a0 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 46 69 #define Tcl_FSFi
259b0 6c 65 41 74 74 72 73 53 65 74 20 5c 0a 09 28 74 leAttrsSet \..(t
259c0 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
259d0 46 53 46 69 6c 65 41 74 74 72 73 53 65 74 29 20 FSFileAttrsSet)
259e0 2f 2a 20 34 35 32 20 2a 2f 0a 23 65 6e 64 69 66 /* 452 */.#endif
259f0 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 46 53 46 .#ifndef Tcl_FSF
25a00 69 6c 65 41 74 74 72 53 74 72 69 6e 67 73 0a 23 ileAttrStrings.#
25a10 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 46 69 6c define Tcl_FSFil
25a20 65 41 74 74 72 53 74 72 69 6e 67 73 20 5c 0a 09 eAttrStrings \..
25a30 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
25a40 6c 5f 46 53 46 69 6c 65 41 74 74 72 53 74 72 69 l_FSFileAttrStri
25a50 6e 67 73 29 20 2f 2a 20 34 35 33 20 2a 2f 0a 23 ngs) /* 453 */.#
25a60 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
25a70 6c 5f 46 53 53 74 61 74 0a 23 64 65 66 69 6e 65 l_FSStat.#define
25a80 20 54 63 6c 5f 46 53 53 74 61 74 20 5c 0a 09 28 Tcl_FSStat \..(
25a90 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
25aa0 5f 46 53 53 74 61 74 29 20 2f 2a 20 34 35 34 20 _FSStat) /* 454
25ab0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
25ac0 66 20 54 63 6c 5f 46 53 41 63 63 65 73 73 0a 23 f Tcl_FSAccess.#
25ad0 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 41 63 63 define Tcl_FSAcc
25ae0 65 73 73 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ess \..(tclStubs
25af0 50 74 72 2d 3e 74 63 6c 5f 46 53 41 63 63 65 73 Ptr->tcl_FSAcces
25b00 73 29 20 2f 2a 20 34 35 35 20 2a 2f 0a 23 65 6e s) /* 455 */.#en
25b10 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
25b20 46 53 4f 70 65 6e 46 69 6c 65 43 68 61 6e 6e 65 FSOpenFileChanne
25b30 6c 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 l.#define Tcl_FS
25b40 4f 70 65 6e 46 69 6c 65 43 68 61 6e 6e 65 6c 20 OpenFileChannel
25b50 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
25b60 3e 74 63 6c 5f 46 53 4f 70 65 6e 46 69 6c 65 43 >tcl_FSOpenFileC
25b70 68 61 6e 6e 65 6c 29 20 2f 2a 20 34 35 36 20 2a hannel) /* 456 *
25b80 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
25b90 20 54 63 6c 5f 46 53 47 65 74 43 77 64 0a 23 64 Tcl_FSGetCwd.#d
25ba0 65 66 69 6e 65 20 54 63 6c 5f 46 53 47 65 74 43 efine Tcl_FSGetC
25bb0 77 64 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 wd \..(tclStubsP
25bc0 74 72 2d 3e 74 63 6c 5f 46 53 47 65 74 43 77 64 tr->tcl_FSGetCwd
25bd0 29 20 2f 2a 20 34 35 37 20 2a 2f 0a 23 65 6e 64 ) /* 457 */.#end
25be0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 46 if.#ifndef Tcl_F
25bf0 53 43 68 64 69 72 0a 23 64 65 66 69 6e 65 20 54 SChdir.#define T
25c00 63 6c 5f 46 53 43 68 64 69 72 20 5c 0a 09 28 74 cl_FSChdir \..(t
25c10 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
25c20 46 53 43 68 64 69 72 29 20 2f 2a 20 34 35 38 20 FSChdir) /* 458
25c30 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
25c40 66 20 54 63 6c 5f 46 53 43 6f 6e 76 65 72 74 54 f Tcl_FSConvertT
25c50 6f 50 61 74 68 54 79 70 65 0a 23 64 65 66 69 6e oPathType.#defin
25c60 65 20 54 63 6c 5f 46 53 43 6f 6e 76 65 72 74 54 e Tcl_FSConvertT
25c70 6f 50 61 74 68 54 79 70 65 20 5c 0a 09 28 74 63 oPathType \..(tc
25c80 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 lStubsPtr->tcl_F
25c90 53 43 6f 6e 76 65 72 74 54 6f 50 61 74 68 54 79 SConvertToPathTy
25ca0 70 65 29 20 2f 2a 20 34 35 39 20 2a 2f 0a 23 65 pe) /* 459 */.#e
25cb0 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
25cc0 5f 46 53 4a 6f 69 6e 50 61 74 68 0a 23 64 65 66 _FSJoinPath.#def
25cd0 69 6e 65 20 54 63 6c 5f 46 53 4a 6f 69 6e 50 61 ine Tcl_FSJoinPa
25ce0 74 68 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 th \..(tclStubsP
25cf0 74 72 2d 3e 74 63 6c 5f 46 53 4a 6f 69 6e 50 61 tr->tcl_FSJoinPa
25d00 74 68 29 20 2f 2a 20 34 36 30 20 2a 2f 0a 23 65 th) /* 460 */.#e
25d10 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
25d20 5f 46 53 53 70 6c 69 74 50 61 74 68 0a 23 64 65 _FSSplitPath.#de
25d30 66 69 6e 65 20 54 63 6c 5f 46 53 53 70 6c 69 74 fine Tcl_FSSplit
25d40 50 61 74 68 20 5c 0a 09 28 74 63 6c 53 74 75 62 Path \..(tclStub
25d50 73 50 74 72 2d 3e 74 63 6c 5f 46 53 53 70 6c 69 sPtr->tcl_FSSpli
25d60 74 50 61 74 68 29 20 2f 2a 20 34 36 31 20 2a 2f tPath) /* 461 */
25d70 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
25d80 54 63 6c 5f 46 53 45 71 75 61 6c 50 61 74 68 73 Tcl_FSEqualPaths
25d90 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 45 .#define Tcl_FSE
25da0 71 75 61 6c 50 61 74 68 73 20 5c 0a 09 28 74 63 qualPaths \..(tc
25db0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 lStubsPtr->tcl_F
25dc0 53 45 71 75 61 6c 50 61 74 68 73 29 20 2f 2a 20 SEqualPaths) /*
25dd0 34 36 32 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 462 */.#endif.#i
25de0 66 6e 64 65 66 20 54 63 6c 5f 46 53 47 65 74 4e fndef Tcl_FSGetN
25df0 6f 72 6d 61 6c 69 7a 65 64 50 61 74 68 0a 23 64 ormalizedPath.#d
25e00 65 66 69 6e 65 20 54 63 6c 5f 46 53 47 65 74 4e efine Tcl_FSGetN
25e10 6f 72 6d 61 6c 69 7a 65 64 50 61 74 68 20 5c 0a ormalizedPath \.
25e20 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
25e30 63 6c 5f 46 53 47 65 74 4e 6f 72 6d 61 6c 69 7a cl_FSGetNormaliz
25e40 65 64 50 61 74 68 29 20 2f 2a 20 34 36 33 20 2a edPath) /* 463 *
25e50 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
25e60 20 54 63 6c 5f 46 53 4a 6f 69 6e 54 6f 50 61 74 Tcl_FSJoinToPat
25e70 68 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 h.#define Tcl_FS
25e80 4a 6f 69 6e 54 6f 50 61 74 68 20 5c 0a 09 28 74 JoinToPath \..(t
25e90 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f clStubsPtr->tcl_
25ea0 46 53 4a 6f 69 6e 54 6f 50 61 74 68 29 20 2f 2a FSJoinToPath) /*
25eb0 20 34 36 34 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 464 */.#endif.#
25ec0 69 66 6e 64 65 66 20 54 63 6c 5f 46 53 47 65 74 ifndef Tcl_FSGet
25ed0 49 6e 74 65 72 6e 61 6c 52 65 70 0a 23 64 65 66 InternalRep.#def
25ee0 69 6e 65 20 54 63 6c 5f 46 53 47 65 74 49 6e 74 ine Tcl_FSGetInt
25ef0 65 72 6e 61 6c 52 65 70 20 5c 0a 09 28 74 63 6c ernalRep \..(tcl
25f00 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 53 StubsPtr->tcl_FS
25f10 47 65 74 49 6e 74 65 72 6e 61 6c 52 65 70 29 20 GetInternalRep)
25f20 2f 2a 20 34 36 35 20 2a 2f 0a 23 65 6e 64 69 66 /* 465 */.#endif
25f30 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 46 53 47 .#ifndef Tcl_FSG
25f40 65 74 54 72 61 6e 73 6c 61 74 65 64 50 61 74 68 etTranslatedPath
25f50 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 47 .#define Tcl_FSG
25f60 65 74 54 72 61 6e 73 6c 61 74 65 64 50 61 74 68 etTranslatedPath
25f70 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
25f80 2d 3e 74 63 6c 5f 46 53 47 65 74 54 72 61 6e 73 ->tcl_FSGetTrans
25f90 6c 61 74 65 64 50 61 74 68 29 20 2f 2a 20 34 36 latedPath) /* 46
25fa0 36 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 6 */.#endif.#ifn
25fb0 64 65 66 20 54 63 6c 5f 46 53 45 76 61 6c 46 69 def Tcl_FSEvalFi
25fc0 6c 65 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 le.#define Tcl_F
25fd0 53 45 76 61 6c 46 69 6c 65 20 5c 0a 09 28 74 63 SEvalFile \..(tc
25fe0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 lStubsPtr->tcl_F
25ff0 53 45 76 61 6c 46 69 6c 65 29 20 2f 2a 20 34 36 SEvalFile) /* 46
26000 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 7 */.#endif.#ifn
26010 64 65 66 20 54 63 6c 5f 46 53 4e 65 77 4e 61 74 def Tcl_FSNewNat
26020 69 76 65 50 61 74 68 0a 23 64 65 66 69 6e 65 20 ivePath.#define
26030 54 63 6c 5f 46 53 4e 65 77 4e 61 74 69 76 65 50 Tcl_FSNewNativeP
26040 61 74 68 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 ath \..(tclStubs
26050 50 74 72 2d 3e 74 63 6c 5f 46 53 4e 65 77 4e 61 Ptr->tcl_FSNewNa
26060 74 69 76 65 50 61 74 68 29 20 2f 2a 20 34 36 38 tivePath) /* 468
26070 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
26080 65 66 20 54 63 6c 5f 46 53 47 65 74 4e 61 74 69 ef Tcl_FSGetNati
26090 76 65 50 61 74 68 0a 23 64 65 66 69 6e 65 20 54 vePath.#define T
260a0 63 6c 5f 46 53 47 65 74 4e 61 74 69 76 65 50 61 cl_FSGetNativePa
260b0 74 68 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 th \..(tclStubsP
260c0 74 72 2d 3e 74 63 6c 5f 46 53 47 65 74 4e 61 74 tr->tcl_FSGetNat
260d0 69 76 65 50 61 74 68 29 20 2f 2a 20 34 36 39 20 ivePath) /* 469
260e0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
260f0 66 20 54 63 6c 5f 46 53 46 69 6c 65 53 79 73 74 f Tcl_FSFileSyst
26100 65 6d 49 6e 66 6f 0a 23 64 65 66 69 6e 65 20 54 emInfo.#define T
26110 63 6c 5f 46 53 46 69 6c 65 53 79 73 74 65 6d 49 cl_FSFileSystemI
26120 6e 66 6f 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 nfo \..(tclStubs
26130 50 74 72 2d 3e 74 63 6c 5f 46 53 46 69 6c 65 53 Ptr->tcl_FSFileS
26140 79 73 74 65 6d 49 6e 66 6f 29 20 2f 2a 20 34 37 ystemInfo) /* 47
26150 30 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 0 */.#endif.#ifn
26160 64 65 66 20 54 63 6c 5f 46 53 50 61 74 68 53 65 def Tcl_FSPathSe
26170 70 61 72 61 74 6f 72 0a 23 64 65 66 69 6e 65 20 parator.#define
26180 54 63 6c 5f 46 53 50 61 74 68 53 65 70 61 72 61 Tcl_FSPathSepara
26190 74 6f 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 tor \..(tclStubs
261a0 50 74 72 2d 3e 74 63 6c 5f 46 53 50 61 74 68 53 Ptr->tcl_FSPathS
261b0 65 70 61 72 61 74 6f 72 29 20 2f 2a 20 34 37 31 eparator) /* 471
261c0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
261d0 65 66 20 54 63 6c 5f 46 53 4c 69 73 74 56 6f 6c ef Tcl_FSListVol
261e0 75 6d 65 73 0a 23 64 65 66 69 6e 65 20 54 63 6c umes.#define Tcl
261f0 5f 46 53 4c 69 73 74 56 6f 6c 75 6d 65 73 20 5c _FSListVolumes \
26200 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e ..(tclStubsPtr->
26210 74 63 6c 5f 46 53 4c 69 73 74 56 6f 6c 75 6d 65 tcl_FSListVolume
26220 73 29 20 2f 2a 20 34 37 32 20 2a 2f 0a 23 65 6e s) /* 472 */.#en
26230 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
26240 46 53 52 65 67 69 73 74 65 72 0a 23 64 65 66 69 FSRegister.#defi
26250 6e 65 20 54 63 6c 5f 46 53 52 65 67 69 73 74 65 ne Tcl_FSRegiste
26260 72 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 r \..(tclStubsPt
26270 72 2d 3e 74 63 6c 5f 46 53 52 65 67 69 73 74 65 r->tcl_FSRegiste
26280 72 29 20 2f 2a 20 34 37 33 20 2a 2f 0a 23 65 6e r) /* 473 */.#en
26290 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
262a0 46 53 55 6e 72 65 67 69 73 74 65 72 0a 23 64 65 FSUnregister.#de
262b0 66 69 6e 65 20 54 63 6c 5f 46 53 55 6e 72 65 67 fine Tcl_FSUnreg
262c0 69 73 74 65 72 20 5c 0a 09 28 74 63 6c 53 74 75 ister \..(tclStu
262d0 62 73 50 74 72 2d 3e 74 63 6c 5f 46 53 55 6e 72 bsPtr->tcl_FSUnr
262e0 65 67 69 73 74 65 72 29 20 2f 2a 20 34 37 34 20 egister) /* 474
262f0 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 */.#endif.#ifnde
26300 66 20 54 63 6c 5f 46 53 44 61 74 61 0a 23 64 65 f Tcl_FSData.#de
26310 66 69 6e 65 20 54 63 6c 5f 46 53 44 61 74 61 20 fine Tcl_FSData
26320 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d \..(tclStubsPtr-
26330 3e 74 63 6c 5f 46 53 44 61 74 61 29 20 2f 2a 20 >tcl_FSData) /*
26340 34 37 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 475 */.#endif.#i
26350 66 6e 64 65 66 20 54 63 6c 5f 46 53 47 65 74 54 fndef Tcl_FSGetT
26360 72 61 6e 73 6c 61 74 65 64 53 74 72 69 6e 67 50 ranslatedStringP
26370 61 74 68 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f ath.#define Tcl_
26380 46 53 47 65 74 54 72 61 6e 73 6c 61 74 65 64 53 FSGetTranslatedS
26390 74 72 69 6e 67 50 61 74 68 20 5c 0a 09 28 74 63 tringPath \..(tc
263a0 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 46 lStubsPtr->tcl_F
263b0 53 47 65 74 54 72 61 6e 73 6c 61 74 65 64 53 74 SGetTranslatedSt
263c0 72 69 6e 67 50 61 74 68 29 20 2f 2a 20 34 37 36 ringPath) /* 476
263d0 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
263e0 65 66 20 54 63 6c 5f 46 53 47 65 74 46 69 6c 65 ef Tcl_FSGetFile
263f0 53 79 73 74 65 6d 46 6f 72 50 61 74 68 0a 23 64 SystemForPath.#d
26400 65 66 69 6e 65 20 54 63 6c 5f 46 53 47 65 74 46 efine Tcl_FSGetF
26410 69 6c 65 53 79 73 74 65 6d 46 6f 72 50 61 74 68 ileSystemForPath
26420 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
26430 2d 3e 74 63 6c 5f 46 53 47 65 74 46 69 6c 65 53 ->tcl_FSGetFileS
26440 79 73 74 65 6d 46 6f 72 50 61 74 68 29 20 2f 2a ystemForPath) /*
26450 20 34 37 37 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 477 */.#endif.#
26460 69 66 6e 64 65 66 20 54 63 6c 5f 46 53 47 65 74 ifndef Tcl_FSGet
26470 50 61 74 68 54 79 70 65 0a 23 64 65 66 69 6e 65 PathType.#define
26480 20 54 63 6c 5f 46 53 47 65 74 50 61 74 68 54 79 Tcl_FSGetPathTy
26490 70 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 pe \..(tclStubsP
264a0 74 72 2d 3e 74 63 6c 5f 46 53 47 65 74 50 61 74 tr->tcl_FSGetPat
264b0 68 54 79 70 65 29 20 2f 2a 20 34 37 38 20 2a 2f hType) /* 478 */
264c0 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
264d0 54 63 6c 5f 4f 75 74 70 75 74 42 75 66 66 65 72 Tcl_OutputBuffer
264e0 65 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 4f ed.#define Tcl_O
264f0 75 74 70 75 74 42 75 66 66 65 72 65 64 20 5c 0a utputBuffered \.
26500 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
26510 63 6c 5f 4f 75 74 70 75 74 42 75 66 66 65 72 65 cl_OutputBuffere
26520 64 29 20 2f 2a 20 34 37 39 20 2a 2f 0a 23 65 6e d) /* 479 */.#en
26530 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
26540 46 53 4d 6f 75 6e 74 73 43 68 61 6e 67 65 64 0a FSMountsChanged.
26550 23 64 65 66 69 6e 65 20 54 63 6c 5f 46 53 4d 6f #define Tcl_FSMo
26560 75 6e 74 73 43 68 61 6e 67 65 64 20 5c 0a 09 28 untsChanged \..(
26570 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c tclStubsPtr->tcl
26580 5f 46 53 4d 6f 75 6e 74 73 43 68 61 6e 67 65 64 _FSMountsChanged
26590 29 20 2f 2a 20 34 38 30 20 2a 2f 0a 23 65 6e 64 ) /* 480 */.#end
265a0 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 45 if.#ifndef Tcl_E
265b0 76 61 6c 54 6f 6b 65 6e 73 53 74 61 6e 64 61 72 valTokensStandar
265c0 64 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 45 76 d.#define Tcl_Ev
265d0 61 6c 54 6f 6b 65 6e 73 53 74 61 6e 64 61 72 64 alTokensStandard
265e0 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 74 72 \..(tclStubsPtr
265f0 2d 3e 74 63 6c 5f 45 76 61 6c 54 6f 6b 65 6e 73 ->tcl_EvalTokens
26600 53 74 61 6e 64 61 72 64 29 20 2f 2a 20 34 38 31 Standard) /* 481
26610 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
26620 65 66 20 54 63 6c 5f 47 65 74 54 69 6d 65 0a 23 ef Tcl_GetTime.#
26630 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 74 54 69 define Tcl_GetTi
26640 6d 65 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 50 me \..(tclStubsP
26650 74 72 2d 3e 74 63 6c 5f 47 65 74 54 69 6d 65 29 tr->tcl_GetTime)
26660 20 2f 2a 20 34 38 32 20 2a 2f 0a 23 65 6e 64 69 /* 482 */.#endi
26670 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 43 72 f.#ifndef Tcl_Cr
26680 65 61 74 65 4f 62 6a 54 72 61 63 65 0a 23 64 65 eateObjTrace.#de
26690 66 69 6e 65 20 54 63 6c 5f 43 72 65 61 74 65 4f fine Tcl_CreateO
266a0 62 6a 54 72 61 63 65 20 5c 0a 09 28 74 63 6c 53 bjTrace \..(tclS
266b0 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 72 65 tubsPtr->tcl_Cre
266c0 61 74 65 4f 62 6a 54 72 61 63 65 29 20 2f 2a 20 ateObjTrace) /*
266d0 34 38 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 483 */.#endif.#i
266e0 66 6e 64 65 66 20 54 63 6c 5f 47 65 74 43 6f 6d fndef Tcl_GetCom
266f0 6d 61 6e 64 49 6e 66 6f 46 72 6f 6d 54 6f 6b 65 mandInfoFromToke
26700 6e 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 47 65 n.#define Tcl_Ge
26710 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 46 72 6f 6d tCommandInfoFrom
26720 54 6f 6b 65 6e 20 5c 0a 09 28 74 63 6c 53 74 75 Token \..(tclStu
26730 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 43 6f bsPtr->tcl_GetCo
26740 6d 6d 61 6e 64 49 6e 66 6f 46 72 6f 6d 54 6f 6b mmandInfoFromTok
26750 65 6e 29 20 2f 2a 20 34 38 34 20 2a 2f 0a 23 65 en) /* 484 */.#e
26760 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c ndif.#ifndef Tcl
26770 5f 53 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f 46 _SetCommandInfoF
26780 72 6f 6d 54 6f 6b 65 6e 0a 23 64 65 66 69 6e 65 romToken.#define
26790 20 54 63 6c 5f 53 65 74 43 6f 6d 6d 61 6e 64 49 Tcl_SetCommandI
267a0 6e 66 6f 46 72 6f 6d 54 6f 6b 65 6e 20 5c 0a 09 nfoFromToken \..
267b0 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
267c0 6c 5f 53 65 74 43 6f 6d 6d 61 6e 64 49 6e 66 6f l_SetCommandInfo
267d0 46 72 6f 6d 54 6f 6b 65 6e 29 20 2f 2a 20 34 38 FromToken) /* 48
267e0 35 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 5 */.#endif.#ifn
267f0 64 65 66 20 54 63 6c 5f 44 62 4e 65 77 57 69 64 def Tcl_DbNewWid
26800 65 49 6e 74 4f 62 6a 0a 23 64 65 66 69 6e 65 20 eIntObj.#define
26810 54 63 6c 5f 44 62 4e 65 77 57 69 64 65 49 6e 74 Tcl_DbNewWideInt
26820 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Obj \..(tclStubs
26830 50 74 72 2d 3e 74 63 6c 5f 44 62 4e 65 77 57 69 Ptr->tcl_DbNewWi
26840 64 65 49 6e 74 4f 62 6a 29 20 2f 2a 20 34 38 36 deIntObj) /* 486
26850 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 */.#endif.#ifnd
26860 65 66 20 54 63 6c 5f 47 65 74 57 69 64 65 49 6e ef Tcl_GetWideIn
26870 74 46 72 6f 6d 4f 62 6a 0a 23 64 65 66 69 6e 65 tFromObj.#define
26880 20 54 63 6c 5f 47 65 74 57 69 64 65 49 6e 74 46 Tcl_GetWideIntF
26890 72 6f 6d 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 romObj \..(tclSt
268a0 75 62 73 50 74 72 2d 3e 74 63 6c 5f 47 65 74 57 ubsPtr->tcl_GetW
268b0 69 64 65 49 6e 74 46 72 6f 6d 4f 62 6a 29 20 2f ideIntFromObj) /
268c0 2a 20 34 38 37 20 2a 2f 0a 23 65 6e 64 69 66 0a * 487 */.#endif.
268d0 23 69 66 6e 64 65 66 20 54 63 6c 5f 4e 65 77 57 #ifndef Tcl_NewW
268e0 69 64 65 49 6e 74 4f 62 6a 0a 23 64 65 66 69 6e ideIntObj.#defin
268f0 65 20 54 63 6c 5f 4e 65 77 57 69 64 65 49 6e 74 e Tcl_NewWideInt
26900 4f 62 6a 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Obj \..(tclStubs
26910 50 74 72 2d 3e 74 63 6c 5f 4e 65 77 57 69 64 65 Ptr->tcl_NewWide
26920 49 6e 74 4f 62 6a 29 20 2f 2a 20 34 38 38 20 2a IntObj) /* 488 *
26930 2f 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 /.#endif.#ifndef
26940 20 54 63 6c 5f 53 65 74 57 69 64 65 49 6e 74 4f Tcl_SetWideIntO
26950 62 6a 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f 53 bj.#define Tcl_S
26960 65 74 57 69 64 65 49 6e 74 4f 62 6a 20 5c 0a 09 etWideIntObj \..
26970 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
26980 6c 5f 53 65 74 57 69 64 65 49 6e 74 4f 62 6a 29 l_SetWideIntObj)
26990 20 2f 2a 20 34 38 39 20 2a 2f 0a 23 65 6e 64 69 /* 489 */.#endi
269a0 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f 41 6c f.#ifndef Tcl_Al
269b0 6c 6f 63 53 74 61 74 42 75 66 0a 23 64 65 66 69 locStatBuf.#defi
269c0 6e 65 20 54 63 6c 5f 41 6c 6c 6f 63 53 74 61 74 ne Tcl_AllocStat
269d0 42 75 66 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 Buf \..(tclStubs
269e0 50 74 72 2d 3e 74 63 6c 5f 41 6c 6c 6f 63 53 74 Ptr->tcl_AllocSt
269f0 61 74 42 75 66 29 20 2f 2a 20 34 39 30 20 2a 2f atBuf) /* 490 */
26a00 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 .#endif.#ifndef
26a10 54 63 6c 5f 53 65 65 6b 0a 23 64 65 66 69 6e 65 Tcl_Seek.#define
26a20 20 54 63 6c 5f 53 65 65 6b 20 5c 0a 09 28 74 63 Tcl_Seek \..(tc
26a30 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 53 lStubsPtr->tcl_S
26a40 65 65 6b 29 20 2f 2a 20 34 39 31 20 2a 2f 0a 23 eek) /* 491 */.#
26a50 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 endif.#ifndef Tc
26a60 6c 5f 54 65 6c 6c 0a 23 64 65 66 69 6e 65 20 54 l_Tell.#define T
26a70 63 6c 5f 54 65 6c 6c 20 5c 0a 09 28 74 63 6c 53 cl_Tell \..(tclS
26a80 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 54 65 6c tubsPtr->tcl_Tel
26a90 6c 29 20 2f 2a 20 34 39 32 20 2a 2f 0a 23 65 6e l) /* 492 */.#en
26aa0 64 69 66 0a 23 69 66 6e 64 65 66 20 54 63 6c 5f dif.#ifndef Tcl_
26ab0 43 68 61 6e 6e 65 6c 57 69 64 65 53 65 65 6b 50 ChannelWideSeekP
26ac0 72 6f 63 0a 23 64 65 66 69 6e 65 20 54 63 6c 5f roc.#define Tcl_
26ad0 43 68 61 6e 6e 65 6c 57 69 64 65 53 65 65 6b 50 ChannelWideSeekP
26ae0 72 6f 63 20 5c 0a 09 28 74 63 6c 53 74 75 62 73 roc \..(tclStubs
26af0 50 74 72 2d 3e 74 63 6c 5f 43 68 61 6e 6e 65 6c Ptr->tcl_Channel
26b00 57 69 64 65 53 65 65 6b 50 72 6f 63 29 20 2f 2a WideSeekProc) /*
26b10 20 34 39 33 20 2a 2f 0a 23 65 6e 64 69 66 0a 0a 493 */.#endif..
26b20 23 65 6e 64 69 66 20 2f 2a 20 64 65 66 69 6e 65 #endif /* define
26b30 64 28 55 53 45 5f 54 43 4c 5f 53 54 55 42 53 29 d(USE_TCL_STUBS)
26b40 20 26 26 20 21 64 65 66 69 6e 65 64 28 55 53 45 && !defined(USE
26b50 5f 54 43 4c 5f 53 54 55 42 5f 50 52 4f 43 53 29 _TCL_STUB_PROCS)
26b60 20 2a 2f 0a 0a 2f 2a 20 21 45 4e 44 21 3a 20 44 */../* !END!: D
26b70 6f 20 6e 6f 74 20 65 64 69 74 20 61 62 6f 76 65 o not edit above
26b80 20 74 68 69 73 20 6c 69 6e 65 2e 20 2a 2f 0a 0a this line. */..
26b90 23 65 6e 64 69 66 20 2f 2a 20 5f 54 43 4c 44 45 #endif /* _TCLDE
26ba0 43 4c 53 20 2a 2f 0a 0a CLS */..