Attachment "dict.patch" to
ticket [654893ffff]
added by
dkf
2003-02-17 21:00:26.
0000: 49 6e 64 65 78 3a 20 67 65 6e 65 72 69 63 2f 74 Index: generic/t
0010: 63 6c 2e 64 65 63 6c 73 0a 3d 3d 3d 3d 3d 3d 3d cl.decls.=======
0020: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0030: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0040: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0050: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 ============.RCS
0060: 20 66 69 6c 65 3a 20 2f 63 76 73 72 6f 6f 74 2f file: /cvsroot/
0070: 74 63 6c 2f 74 63 6c 2f 67 65 6e 65 72 69 63 2f tcl/tcl/generic/
0080: 74 63 6c 2e 64 65 63 6c 73 2c 76 0a 72 65 74 72 tcl.decls,v.retr
0090: 69 65 76 69 6e 67 20 72 65 76 69 73 69 6f 6e 20 ieving revision
00a0: 31 2e 39 34 0a 64 69 66 66 20 2d 75 20 2d 72 31 1.94.diff -u -r1
00b0: 2e 39 34 20 74 63 6c 2e 64 65 63 6c 73 0a 2d 2d .94 tcl.decls.--
00c0: 2d 20 67 65 6e 65 72 69 63 2f 74 63 6c 2e 64 65 - generic/tcl.de
00d0: 63 6c 73 09 33 31 20 41 75 67 20 32 30 30 32 20 cls.31 Aug 2002
00e0: 30 36 3a 30 39 3a 34 35 20 2d 30 30 30 30 09 31 06:09:45 -0000.1
00f0: 2e 39 34 0a 2b 2b 2b 20 67 65 6e 65 72 69 63 2f .94.+++ generic/
0100: 74 63 6c 2e 64 65 63 6c 73 09 31 37 20 46 65 62 tcl.decls.17 Feb
0110: 20 32 30 30 33 20 31 33 3a 34 30 3a 35 35 20 2d 2003 13:40:55 -
0120: 30 30 30 30 0a 40 40 20 2d 31 37 35 34 2c 36 20 0000.@@ -1754,6
0130: 2b 31 37 35 34 2c 34 39 20 40 40 0a 20 09 20 20 +1754,49 @@. .
0140: 20 20 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 79 70 Tcl_ChannelTyp
0150: 65 20 2a 63 68 61 6e 54 79 70 65 50 74 72 29 0a e *chanTypePtr).
0160: 20 7d 0a 20 0a 2b 23 20 44 49 43 54 49 4f 4e 41 }. .+# DICTIONA
0170: 52 49 45 53 0a 2b 64 65 63 6c 61 72 65 20 34 39 RIES.+declare 49
0180: 34 20 67 65 6e 65 72 69 63 20 7b 0a 2b 20 20 20 4 generic {.+
0190: 20 69 6e 74 20 54 63 6c 5f 44 69 63 74 4f 62 6a int Tcl_DictObj
01a0: 50 75 74 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a Put(Tcl_Interp *
01b0: 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 interp, Tcl_Obj
01c0: 2a 64 69 63 74 50 74 72 2c 0a 2b 09 20 20 20 20 *dictPtr,.+.
01d0: 54 63 6c 5f 4f 62 6a 20 2a 6b 65 79 50 74 72 2c Tcl_Obj *keyPtr,
01e0: 20 54 63 6c 5f 4f 62 6a 20 2a 76 61 6c 75 65 50 Tcl_Obj *valueP
01f0: 74 72 29 0a 2b 7d 0a 2b 64 65 63 6c 61 72 65 20 tr).+}.+declare
0200: 34 39 35 20 67 65 6e 65 72 69 63 20 7b 0a 2b 20 495 generic {.+
0210: 20 20 20 69 6e 74 20 54 63 6c 5f 44 69 63 74 4f int Tcl_DictO
0220: 62 6a 47 65 74 28 54 63 6c 5f 49 6e 74 65 72 70 bjGet(Tcl_Interp
0230: 20 2a 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 *interp, Tcl_Ob
0240: 6a 20 2a 64 69 63 74 50 74 72 2c 20 54 63 6c 5f j *dictPtr, Tcl_
0250: 4f 62 6a 20 2a 6b 65 79 50 74 72 2c 0a 2b 09 20 Obj *keyPtr,.+.
0260: 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 2a 76 61 6c Tcl_Obj **val
0270: 75 65 50 74 72 50 74 72 29 0a 2b 7d 0a 2b 64 65 uePtrPtr).+}.+de
0280: 63 6c 61 72 65 20 34 39 36 20 67 65 6e 65 72 69 clare 496 generi
0290: 63 20 7b 0a 2b 20 20 20 20 69 6e 74 20 54 63 6c c {.+ int Tcl
02a0: 5f 44 69 63 74 4f 62 6a 52 65 6d 6f 76 65 28 54 _DictObjRemove(T
02b0: 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 cl_Interp *inter
02c0: 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 64 69 63 74 p, Tcl_Obj *dict
02d0: 50 74 72 2c 0a 2b 09 20 20 20 20 54 63 6c 5f 4f Ptr,.+. Tcl_O
02e0: 62 6a 20 2a 6b 65 79 50 74 72 29 0a 2b 7d 0a 2b bj *keyPtr).+}.+
02f0: 64 65 63 6c 61 72 65 20 34 39 37 20 67 65 6e 65 declare 497 gene
0300: 72 69 63 20 7b 0a 2b 20 20 20 20 69 6e 74 20 54 ric {.+ int T
0310: 63 6c 5f 44 69 63 74 4f 62 6a 53 69 7a 65 28 54 cl_DictObjSize(T
0320: 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 cl_Interp *inter
0330: 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 64 69 63 74 p, Tcl_Obj *dict
0340: 50 74 72 2c 20 69 6e 74 20 2a 73 69 7a 65 50 74 Ptr, int *sizePt
0350: 72 29 0a 2b 7d 0a 2b 64 65 63 6c 61 72 65 20 34 r).+}.+declare 4
0360: 39 38 20 67 65 6e 65 72 69 63 20 7b 0a 2b 20 20 98 generic {.+
0370: 20 20 69 6e 74 20 54 63 6c 5f 44 69 63 74 4f 62 int Tcl_DictOb
0380: 6a 46 69 72 73 74 28 54 63 6c 5f 49 6e 74 65 72 jFirst(Tcl_Inter
0390: 70 20 2a 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f p *interp, Tcl_O
03a0: 62 6a 20 2a 64 69 63 74 50 74 72 2c 0a 2b 09 20 bj *dictPtr,.+.
03b0: 20 20 20 54 63 6c 5f 44 69 63 74 53 65 61 72 63 Tcl_DictSearc
03c0: 68 20 2a 73 65 61 72 63 68 50 74 72 2c 0a 2b 09 h *searchPtr,.+.
03d0: 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 2a 6b 65 Tcl_Obj **ke
03e0: 79 50 74 72 50 74 72 2c 20 54 63 6c 5f 4f 62 6a yPtrPtr, Tcl_Obj
03f0: 20 2a 2a 76 61 6c 75 65 50 74 72 50 74 72 2c 20 **valuePtrPtr,
0400: 69 6e 74 20 2a 64 6f 6e 65 50 74 72 29 0a 2b 7d int *donePtr).+}
0410: 0a 2b 64 65 63 6c 61 72 65 20 34 39 39 20 67 65 .+declare 499 ge
0420: 6e 65 72 69 63 20 7b 0a 2b 20 20 20 20 76 6f 69 neric {.+ voi
0430: 64 20 54 63 6c 5f 44 69 63 74 4f 62 6a 4e 65 78 d Tcl_DictObjNex
0440: 74 28 54 63 6c 5f 44 69 63 74 53 65 61 72 63 68 t(Tcl_DictSearch
0450: 20 2a 73 65 61 72 63 68 50 74 72 2c 0a 2b 09 20 *searchPtr,.+.
0460: 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 2a 6b 65 79 Tcl_Obj **key
0470: 50 74 72 50 74 72 2c 20 54 63 6c 5f 4f 62 6a 20 PtrPtr, Tcl_Obj
0480: 2a 2a 76 61 6c 75 65 50 74 72 50 74 72 2c 20 69 **valuePtrPtr, i
0490: 6e 74 20 2a 64 6f 6e 65 50 74 72 29 0a 2b 7d 0a nt *donePtr).+}.
04a0: 2b 64 65 63 6c 61 72 65 20 35 30 30 20 67 65 6e +declare 500 gen
04b0: 65 72 69 63 20 7b 0a 2b 20 20 20 20 76 6f 69 64 eric {.+ void
04c0: 20 54 63 6c 5f 44 69 63 74 4f 62 6a 44 6f 6e 65 Tcl_DictObjDone
04d0: 28 54 63 6c 5f 44 69 63 74 53 65 61 72 63 68 20 (Tcl_DictSearch
04e0: 2a 73 65 61 72 63 68 50 74 72 29 0a 2b 7d 0a 2b *searchPtr).+}.+
04f0: 64 65 63 6c 61 72 65 20 35 30 31 20 67 65 6e 65 declare 501 gene
0500: 72 69 63 20 7b 0a 2b 20 20 20 20 69 6e 74 20 54 ric {.+ int T
0510: 63 6c 5f 44 69 63 74 4f 62 6a 50 75 74 4b 65 79 cl_DictObjPutKey
0520: 4c 69 73 74 28 54 63 6c 5f 49 6e 74 65 72 70 20 List(Tcl_Interp
0530: 2a 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a *interp, Tcl_Obj
0540: 20 2a 64 69 63 74 50 74 72 2c 0a 2b 09 20 20 20 *dictPtr,.+.
0550: 20 69 6e 74 20 6b 65 79 63 2c 20 54 63 6c 5f 4f int keyc, Tcl_O
0560: 62 6a 20 2a 43 4f 4e 53 54 20 2a 6b 65 79 76 2c bj *CONST *keyv,
0570: 20 54 63 6c 5f 4f 62 6a 20 2a 76 61 6c 75 65 50 Tcl_Obj *valueP
0580: 74 72 29 0a 2b 7d 0a 2b 64 65 63 6c 61 72 65 20 tr).+}.+declare
0590: 35 30 32 20 67 65 6e 65 72 69 63 20 7b 0a 2b 20 502 generic {.+
05a0: 20 20 20 69 6e 74 20 54 63 6c 5f 44 69 63 74 4f int Tcl_DictO
05b0: 62 6a 52 65 6d 6f 76 65 4b 65 79 4c 69 73 74 28 bjRemoveKeyList(
05c0: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 Tcl_Interp *inte
05d0: 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 64 69 63 rp, Tcl_Obj *dic
05e0: 74 50 74 72 2c 0a 2b 09 20 20 20 20 69 6e 74 20 tPtr,.+. int
05f0: 6b 65 79 63 2c 20 54 63 6c 5f 4f 62 6a 20 2a 43 keyc, Tcl_Obj *C
0600: 4f 4e 53 54 20 2a 6b 65 79 76 29 0a 2b 7d 0a 2b ONST *keyv).+}.+
0610: 64 65 63 6c 61 72 65 20 35 30 33 20 67 65 6e 65 declare 503 gene
0620: 72 69 63 20 7b 0a 2b 20 20 20 20 54 63 6c 5f 4f ric {.+ Tcl_O
0630: 62 6a 20 2a 54 63 6c 5f 4e 65 77 44 69 63 74 4f bj *Tcl_NewDictO
0640: 62 6a 28 76 6f 69 64 29 0a 2b 7d 0a 2b 64 65 63 bj(void).+}.+dec
0650: 6c 61 72 65 20 35 30 34 20 67 65 6e 65 72 69 63 lare 504 generic
0660: 20 7b 0a 2b 20 20 20 20 54 63 6c 5f 4f 62 6a 20 {.+ Tcl_Obj
0670: 2a 54 63 6c 5f 44 62 4e 65 77 44 69 63 74 4f 62 *Tcl_DbNewDictOb
0680: 6a 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 66 69 j(CONST char *fi
0690: 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 0a 2b 7d le, int line).+}
06a0: 0a 2b 0a 20 23 23 23 23 23 23 23 23 23 23 23 23 .+. ############
06b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
06c0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
06d0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
06e0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
06f0: 23 23 0a 20 0a 20 23 20 44 65 66 69 6e 65 20 74 ##. . # Define t
0700: 68 65 20 70 6c 61 74 66 6f 72 6d 20 73 70 65 63 he platform spec
0710: 69 66 69 63 20 70 75 62 6c 69 63 20 54 63 6c 20 ific public Tcl
0720: 69 6e 74 65 72 66 61 63 65 2e 20 20 54 68 65 73 interface. Thes
0730: 65 20 66 75 6e 63 74 69 6f 6e 73 20 61 72 65 0a e functions are.
0740: 49 6e 64 65 78 3a 20 67 65 6e 65 72 69 63 2f 74 Index: generic/t
0750: 63 6c 2e 68 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d cl.h.===========
0760: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0770: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0780: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0790: 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 20 66 69 6c ========.RCS fil
07a0: 65 3a 20 2f 63 76 73 72 6f 6f 74 2f 74 63 6c 2f e: /cvsroot/tcl/
07b0: 74 63 6c 2f 67 65 6e 65 72 69 63 2f 74 63 6c 2e tcl/generic/tcl.
07c0: 68 2c 76 0a 72 65 74 72 69 65 76 69 6e 67 20 72 h,v.retrieving r
07d0: 65 76 69 73 69 6f 6e 20 31 2e 31 35 33 0a 64 69 evision 1.153.di
07e0: 66 66 20 2d 75 20 2d 72 31 2e 31 35 33 20 74 63 ff -u -r1.153 tc
07f0: 6c 2e 68 0a 2d 2d 2d 20 67 65 6e 65 72 69 63 2f l.h.--- generic/
0800: 74 63 6c 2e 68 09 31 35 20 46 65 62 20 32 30 30 tcl.h.15 Feb 200
0810: 33 20 30 32 3a 31 36 3a 32 39 20 2d 30 30 30 30 3 02:16:29 -0000
0820: 09 31 2e 31 35 33 0a 2b 2b 2b 20 67 65 6e 65 72 .1.153.+++ gener
0830: 69 63 2f 74 63 6c 2e 68 09 31 37 20 46 65 62 20 ic/tcl.h.17 Feb
0840: 32 30 30 33 20 31 33 3a 34 30 3a 35 36 20 2d 30 2003 13:40:56 -0
0850: 30 30 30 0a 40 40 20 2d 34 39 30 2c 36 20 2b 34 000.@@ -490,6 +4
0860: 39 30 2c 37 20 40 40 0a 20 74 79 70 65 64 65 66 90,7 @@. typedef
0870: 20 73 74 72 75 63 74 20 54 63 6c 5f 56 61 72 5f struct Tcl_Var_
0880: 20 2a 54 63 6c 5f 56 61 72 3b 0a 20 74 79 70 65 *Tcl_Var;. type
0890: 64 65 66 20 73 74 72 75 63 74 20 54 63 6c 5f 43 def struct Tcl_C
08a0: 68 61 6e 6e 65 6c 54 79 70 65 56 65 72 73 69 6f hannelTypeVersio
08b0: 6e 5f 20 2a 54 63 6c 5f 43 68 61 6e 6e 65 6c 54 n_ *Tcl_ChannelT
08c0: 79 70 65 56 65 72 73 69 6f 6e 3b 0a 20 74 79 70 ypeVersion;. typ
08d0: 65 64 65 66 20 73 74 72 75 63 74 20 54 63 6c 5f edef struct Tcl_
08e0: 4c 6f 61 64 48 61 6e 64 6c 65 5f 20 2a 54 63 6c LoadHandle_ *Tcl
08f0: 5f 4c 6f 61 64 48 61 6e 64 6c 65 3b 0a 2b 74 79 _LoadHandle;.+ty
0900: 70 65 64 65 66 20 73 74 72 75 63 74 20 54 63 6c pedef struct Tcl
0910: 5f 44 69 63 74 5f 20 2a 54 63 6c 5f 44 69 63 74 _Dict_ *Tcl_Dict
0920: 3b 0a 20 0a 20 2f 2a 0a 20 20 2a 20 44 65 66 69 ;. . /*. * Defi
0930: 6e 69 74 69 6f 6e 20 6f 66 20 74 68 65 20 69 6e nition of the in
0940: 74 65 72 66 61 63 65 20 74 6f 20 70 72 6f 63 65 terface to proce
0950: 64 75 72 65 73 20 69 6d 70 6c 65 6d 65 6e 74 69 dures implementi
0960: 6e 67 20 74 68 72 65 61 64 73 2e 0a 40 40 20 2d ng threads..@@ -
0970: 31 33 33 35 2c 36 20 2b 31 33 33 36 2c 31 37 20 1335,6 +1336,17
0980: 40 40 0a 20 23 20 20 20 64 65 66 69 6e 65 20 54 @@. # define T
0990: 63 6c 5f 49 6e 69 74 48 61 73 68 54 61 62 6c 65 cl_InitHashTable
09a0: 28 74 61 62 6c 65 50 74 72 2c 20 6b 65 79 54 79 (tablePtr, keyTy
09b0: 70 65 29 20 5c 0a 20 09 54 63 6c 5f 49 6e 69 74 pe) \. .Tcl_Init
09c0: 48 61 73 68 54 61 62 6c 65 45 78 28 74 61 62 6c HashTableEx(tabl
09d0: 65 50 74 72 2c 20 6b 65 79 54 79 70 65 2c 20 4e ePtr, keyType, N
09e0: 55 4c 4c 29 0a 20 23 65 6e 64 69 66 20 2f 2a 20 ULL). #endif /*
09f0: 54 43 4c 5f 50 52 45 53 45 52 56 45 5f 42 49 4e TCL_PRESERVE_BIN
0a00: 41 52 59 5f 43 4f 4d 50 41 54 41 42 49 4c 49 54 ARY_COMPATABILIT
0a10: 59 20 2a 2f 0a 2b 0a 2b 2f 2a 0a 2b 20 2a 20 53 Y */.+.+/*.+ * S
0a20: 74 72 75 63 74 75 72 65 20 64 65 66 69 6e 69 74 tructure definit
0a30: 69 6f 6e 20 66 6f 72 20 69 6e 66 6f 72 6d 61 74 ion for informat
0a40: 69 6f 6e 20 75 73 65 64 20 74 6f 20 6b 65 65 70 ion used to keep
0a50: 20 74 72 61 63 6b 20 6f 66 20 73 65 61 72 63 68 track of search
0a60: 65 73 0a 2b 20 2a 20 74 68 72 6f 75 67 68 20 64 es.+ * through d
0a70: 69 63 74 69 6f 6e 61 72 69 65 73 3a 0a 2b 20 2a ictionaries:.+ *
0a80: 2f 0a 2b 74 79 70 65 64 65 66 20 73 74 72 75 63 /.+typedef struc
0a90: 74 20 7b 0a 2b 20 20 20 20 54 63 6c 5f 48 61 73 t {.+ Tcl_Has
0aa0: 68 53 65 61 72 63 68 20 73 65 61 72 63 68 3b 0a hSearch search;.
0ab0: 2b 20 20 20 20 69 6e 74 20 65 70 6f 63 68 3b 0a + int epoch;.
0ac0: 2b 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 6f 62 + Tcl_Obj *ob
0ad0: 6a 50 74 72 3b 0a 2b 20 20 20 20 54 63 6c 5f 44 jPtr;.+ Tcl_D
0ae0: 69 63 74 20 64 69 63 74 69 6f 6e 61 72 79 50 74 ict dictionaryPt
0af0: 72 3b 0a 2b 7d 20 54 63 6c 5f 44 69 63 74 53 65 r;.+} Tcl_DictSe
0b00: 61 72 63 68 3b 0a 20 0a 20 0a 20 2f 2a 0a 49 6e arch;. . . /*.In
0b10: 64 65 78 3a 20 67 65 6e 65 72 69 63 2f 74 63 6c dex: generic/tcl
0b20: 42 61 73 69 63 2e 63 0a 3d 3d 3d 3d 3d 3d 3d 3d Basic.c.========
0b30: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0b40: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0b50: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0b60: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 20 ===========.RCS
0b70: 66 69 6c 65 3a 20 2f 63 76 73 72 6f 6f 74 2f 74 file: /cvsroot/t
0b80: 63 6c 2f 74 63 6c 2f 67 65 6e 65 72 69 63 2f 74 cl/tcl/generic/t
0b90: 63 6c 42 61 73 69 63 2e 63 2c 76 0a 72 65 74 72 clBasic.c,v.retr
0ba0: 69 65 76 69 6e 67 20 72 65 76 69 73 69 6f 6e 20 ieving revision
0bb0: 31 2e 37 33 0a 64 69 66 66 20 2d 75 20 2d 72 31 1.73.diff -u -r1
0bc0: 2e 37 33 20 74 63 6c 42 61 73 69 63 2e 63 0a 2d .73 tclBasic.c.-
0bd0: 2d 2d 20 67 65 6e 65 72 69 63 2f 74 63 6c 42 61 -- generic/tclBa
0be0: 73 69 63 2e 63 09 31 36 20 46 65 62 20 32 30 30 sic.c.16 Feb 200
0bf0: 33 20 30 31 3a 33 36 3a 33 32 20 2d 30 30 30 30 3 01:36:32 -0000
0c00: 09 31 2e 37 33 0a 2b 2b 2b 20 67 65 6e 65 72 69 .1.73.+++ generi
0c10: 63 2f 74 63 6c 42 61 73 69 63 2e 63 09 31 37 20 c/tclBasic.c.17
0c20: 46 65 62 20 32 30 30 33 20 31 33 3a 34 30 3a 35 Feb 2003 13:40:5
0c30: 39 20 2d 30 30 30 30 0a 40 40 20 2d 38 38 2c 36 9 -0000.@@ -88,6
0c40: 20 2b 38 38 2c 38 20 40 40 0a 20 20 20 20 20 20 +88,8 @@.
0c50: 20 20 20 28 43 6f 6d 70 69 6c 65 50 72 6f 63 20 (CompileProc
0c60: 2a 29 20 4e 55 4c 4c 2c 09 09 31 7d 2c 0a 20 20 *) NULL,..1},.
0c70: 20 20 20 7b 22 63 6f 6e 74 69 6e 75 65 22 2c 09 {"continue",.
0c80: 28 54 63 6c 5f 43 6d 64 50 72 6f 63 20 2a 29 20 (Tcl_CmdProc *)
0c90: 4e 55 4c 4c 2c 09 54 63 6c 5f 43 6f 6e 74 69 6e NULL,.Tcl_Contin
0ca0: 75 65 4f 62 6a 43 6d 64 2c 0a 20 20 20 20 20 20 ueObjCmd,.
0cb0: 20 20 20 54 63 6c 43 6f 6d 70 69 6c 65 43 6f 6e TclCompileCon
0cc0: 74 69 6e 75 65 43 6d 64 2c 09 09 31 7d 2c 0a 2b tinueCmd,..1},.+
0cd0: 20 20 20 20 7b 22 64 69 63 74 22 2c 09 09 28 54 {"dict",..(T
0ce0: 63 6c 5f 43 6d 64 50 72 6f 63 20 2a 29 20 4e 55 cl_CmdProc *) NU
0cf0: 4c 4c 2c 09 54 63 6c 5f 44 69 63 74 4f 62 6a 43 LL,.Tcl_DictObjC
0d00: 6d 64 2c 0a 2b 20 20 20 20 20 20 20 20 28 43 6f md,.+ (Co
0d10: 6d 70 69 6c 65 50 72 6f 63 20 2a 29 20 4e 55 4c mpileProc *) NUL
0d20: 4c 2c 09 09 30 7d 2c 0a 20 20 20 20 20 7b 22 65 L,..0},. {"e
0d30: 6e 63 6f 64 69 6e 67 22 2c 09 28 54 63 6c 5f 43 ncoding",.(Tcl_C
0d40: 6d 64 50 72 6f 63 20 2a 29 20 4e 55 4c 4c 2c 09 mdProc *) NULL,.
0d50: 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 4f 62 6a 43 Tcl_EncodingObjC
0d60: 6d 64 2c 0a 20 20 20 20 20 20 20 20 20 28 43 6f md,. (Co
0d70: 6d 70 69 6c 65 50 72 6f 63 20 2a 29 20 4e 55 4c mpileProc *) NUL
0d80: 4c 2c 09 09 30 7d 2c 0a 20 20 20 20 20 7b 22 65 L,..0},. {"e
0d90: 72 72 6f 72 22 2c 09 09 28 54 63 6c 5f 43 6d 64 rror",..(Tcl_Cmd
0da0: 50 72 6f 63 20 2a 29 20 4e 55 4c 4c 2c 09 54 63 Proc *) NULL,.Tc
0db0: 6c 5f 45 72 72 6f 72 4f 62 6a 43 6d 64 2c 0a 49 l_ErrorObjCmd,.I
0dc0: 6e 64 65 78 3a 20 67 65 6e 65 72 69 63 2f 74 63 ndex: generic/tc
0dd0: 6c 44 65 63 6c 73 2e 68 0a 3d 3d 3d 3d 3d 3d 3d lDecls.h.=======
0de0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0df0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0e00: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0e10: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 ============.RCS
0e20: 20 66 69 6c 65 3a 20 2f 63 76 73 72 6f 6f 74 2f file: /cvsroot/
0e30: 74 63 6c 2f 74 63 6c 2f 67 65 6e 65 72 69 63 2f tcl/tcl/generic/
0e40: 74 63 6c 44 65 63 6c 73 2e 68 2c 76 0a 72 65 74 tclDecls.h,v.ret
0e50: 72 69 65 76 69 6e 67 20 72 65 76 69 73 69 6f 6e rieving revision
0e60: 20 31 2e 39 33 0a 64 69 66 66 20 2d 75 20 2d 72 1.93.diff -u -r
0e70: 31 2e 39 33 20 74 63 6c 44 65 63 6c 73 2e 68 0a 1.93 tclDecls.h.
0e80: 2d 2d 2d 20 67 65 6e 65 72 69 63 2f 74 63 6c 44 --- generic/tclD
0e90: 65 63 6c 73 2e 68 09 35 20 41 75 67 20 32 30 30 ecls.h.5 Aug 200
0ea0: 32 20 31 35 3a 30 31 3a 30 34 20 2d 30 30 30 30 2 15:01:04 -0000
0eb0: 09 31 2e 39 33 0a 2b 2b 2b 20 67 65 6e 65 72 69 .1.93.+++ generi
0ec0: 63 2f 74 63 6c 44 65 63 6c 73 2e 68 09 31 37 20 c/tclDecls.h.17
0ed0: 46 65 62 20 32 30 30 33 20 31 33 3a 34 31 3a 30 Feb 2003 13:41:0
0ee0: 33 20 2d 30 30 30 30 0a 40 40 20 2d 31 35 36 34 3 -0000.@@ -1564
0ef0: 2c 36 20 2b 31 35 36 34 2c 34 38 20 40 40 0a 20 ,6 +1564,48 @@.
0f00: 2f 2a 20 34 39 33 20 2a 2f 0a 20 45 58 54 45 52 /* 493 */. EXTER
0f10: 4e 20 54 63 6c 5f 44 72 69 76 65 72 57 69 64 65 N Tcl_DriverWide
0f20: 53 65 65 6b 50 72 6f 63 20 2a 20 54 63 6c 5f 43 SeekProc * Tcl_C
0f30: 68 61 6e 6e 65 6c 57 69 64 65 53 65 65 6b 50 72 hannelWideSeekPr
0f40: 6f 63 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 oc _ANSI_ARGS_((
0f50: 0a 20 09 09 09 09 54 63 6c 5f 43 68 61 6e 6e 65 . ....Tcl_Channe
0f60: 6c 54 79 70 65 20 2a 20 63 68 61 6e 54 79 70 65 lType * chanType
0f70: 50 74 72 29 29 3b 0a 2b 2f 2a 20 34 39 34 20 2a Ptr));.+/* 494 *
0f80: 2f 0a 2b 45 58 54 45 52 4e 20 69 6e 74 09 09 54 /.+EXTERN int..T
0f90: 63 6c 5f 44 69 63 74 4f 62 6a 50 75 74 20 5f 41 cl_DictObjPut _A
0fa0: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
0fb0: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
0fc0: 0a 2b 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 .+....Tcl_Obj *
0fd0: 64 69 63 74 50 74 72 2c 20 54 63 6c 5f 4f 62 6a dictPtr, Tcl_Obj
0fe0: 20 2a 20 6b 65 79 50 74 72 2c 20 0a 2b 09 09 09 * keyPtr, .+...
0ff0: 09 54 63 6c 5f 4f 62 6a 20 2a 20 76 61 6c 75 65 .Tcl_Obj * value
1000: 50 74 72 29 29 3b 0a 2b 2f 2a 20 34 39 35 20 2a Ptr));.+/* 495 *
1010: 2f 0a 2b 45 58 54 45 52 4e 20 69 6e 74 09 09 54 /.+EXTERN int..T
1020: 63 6c 5f 44 69 63 74 4f 62 6a 47 65 74 20 5f 41 cl_DictObjGet _A
1030: 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 NSI_ARGS_((Tcl_I
1040: 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 nterp * interp,
1050: 0a 2b 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 .+....Tcl_Obj *
1060: 64 69 63 74 50 74 72 2c 20 54 63 6c 5f 4f 62 6a dictPtr, Tcl_Obj
1070: 20 2a 20 6b 65 79 50 74 72 2c 20 0a 2b 09 09 09 * keyPtr, .+...
1080: 09 54 63 6c 5f 4f 62 6a 20 2a 2a 20 76 61 6c 75 .Tcl_Obj ** valu
1090: 65 50 74 72 50 74 72 29 29 3b 0a 2b 2f 2a 20 34 ePtrPtr));.+/* 4
10a0: 39 36 20 2a 2f 0a 2b 45 58 54 45 52 4e 20 69 6e 96 */.+EXTERN in
10b0: 74 09 09 54 63 6c 5f 44 69 63 74 4f 62 6a 52 65 t..Tcl_DictObjRe
10c0: 6d 6f 76 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f move _ANSI_ARGS_
10d0: 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 ((Tcl_Interp * i
10e0: 6e 74 65 72 70 2c 20 0a 2b 09 09 09 09 54 63 6c nterp, .+....Tcl
10f0: 5f 4f 62 6a 20 2a 20 64 69 63 74 50 74 72 2c 20 _Obj * dictPtr,
1100: 54 63 6c 5f 4f 62 6a 20 2a 20 6b 65 79 50 74 72 Tcl_Obj * keyPtr
1110: 29 29 3b 0a 2b 2f 2a 20 34 39 37 20 2a 2f 0a 2b ));.+/* 497 */.+
1120: 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f EXTERN int..Tcl_
1130: 44 69 63 74 4f 62 6a 53 69 7a 65 20 5f 41 4e 53 DictObjSize _ANS
1140: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
1150: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 0a 2b erp * interp, .+
1160: 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 20 64 69 ....Tcl_Obj * di
1170: 63 74 50 74 72 2c 20 69 6e 74 20 2a 20 73 69 7a ctPtr, int * siz
1180: 65 50 74 72 29 29 3b 0a 2b 2f 2a 20 34 39 38 20 ePtr));.+/* 498
1190: 2a 2f 0a 2b 45 58 54 45 52 4e 20 69 6e 74 09 09 */.+EXTERN int..
11a0: 54 63 6c 5f 44 69 63 74 4f 62 6a 46 69 72 73 74 Tcl_DictObjFirst
11b0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
11c0: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
11d0: 70 2c 20 0a 2b 09 09 09 09 54 63 6c 5f 4f 62 6a p, .+....Tcl_Obj
11e0: 20 2a 20 64 69 63 74 50 74 72 2c 20 0a 2b 09 09 * dictPtr, .+..
11f0: 09 09 54 63 6c 5f 44 69 63 74 53 65 61 72 63 68 ..Tcl_DictSearch
1200: 20 2a 20 73 65 61 72 63 68 50 74 72 2c 20 0a 2b * searchPtr, .+
1210: 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a 2a 20 6b ....Tcl_Obj ** k
1220: 65 79 50 74 72 50 74 72 2c 20 54 63 6c 5f 4f 62 eyPtrPtr, Tcl_Ob
1230: 6a 20 2a 2a 20 76 61 6c 75 65 50 74 72 50 74 72 j ** valuePtrPtr
1240: 2c 20 0a 2b 09 09 09 09 69 6e 74 20 2a 20 64 6f , .+....int * do
1250: 6e 65 50 74 72 29 29 3b 0a 2b 2f 2a 20 34 39 39 nePtr));.+/* 499
1260: 20 2a 2f 0a 2b 45 58 54 45 52 4e 20 76 6f 69 64 */.+EXTERN void
1270: 09 09 54 63 6c 5f 44 69 63 74 4f 62 6a 4e 65 78 ..Tcl_DictObjNex
1280: 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 0a t _ANSI_ARGS_((.
1290: 2b 09 09 09 09 54 63 6c 5f 44 69 63 74 53 65 61 +....Tcl_DictSea
12a0: 72 63 68 20 2a 20 73 65 61 72 63 68 50 74 72 2c rch * searchPtr,
12b0: 20 0a 2b 09 09 09 09 54 63 6c 5f 4f 62 6a 20 2a .+....Tcl_Obj *
12c0: 2a 20 6b 65 79 50 74 72 50 74 72 2c 20 54 63 6c * keyPtrPtr, Tcl
12d0: 5f 4f 62 6a 20 2a 2a 20 76 61 6c 75 65 50 74 72 _Obj ** valuePtr
12e0: 50 74 72 2c 20 0a 2b 09 09 09 09 69 6e 74 20 2a Ptr, .+....int *
12f0: 20 64 6f 6e 65 50 74 72 29 29 3b 0a 2b 2f 2a 20 donePtr));.+/*
1300: 35 30 30 20 2a 2f 0a 2b 45 58 54 45 52 4e 20 76 500 */.+EXTERN v
1310: 6f 69 64 09 09 54 63 6c 5f 44 69 63 74 4f 62 6a oid..Tcl_DictObj
1320: 44 6f 6e 65 20 5f 41 4e 53 49 5f 41 52 47 53 5f Done _ANSI_ARGS_
1330: 28 28 0a 2b 09 09 09 09 54 63 6c 5f 44 69 63 74 ((.+....Tcl_Dict
1340: 53 65 61 72 63 68 20 2a 20 73 65 61 72 63 68 50 Search * searchP
1350: 74 72 29 29 3b 0a 2b 2f 2a 20 35 30 31 20 2a 2f tr));.+/* 501 */
1360: 0a 2b 45 58 54 45 52 4e 20 69 6e 74 09 09 54 63 .+EXTERN int..Tc
1370: 6c 5f 44 69 63 74 4f 62 6a 50 75 74 4b 65 79 4c l_DictObjPutKeyL
1380: 69 73 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 ist _ANSI_ARGS_(
1390: 28 0a 2b 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 (.+....Tcl_Inter
13a0: 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f p * interp, Tcl_
13b0: 4f 62 6a 20 2a 20 64 69 63 74 50 74 72 2c 20 0a Obj * dictPtr, .
13c0: 2b 09 09 09 09 69 6e 74 20 6b 65 79 63 2c 20 54 +....int keyc, T
13d0: 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 2a 20 cl_Obj *CONST *
13e0: 6b 65 79 76 2c 20 0a 2b 09 09 09 09 54 63 6c 5f keyv, .+....Tcl_
13f0: 4f 62 6a 20 2a 20 76 61 6c 75 65 50 74 72 29 29 Obj * valuePtr))
1400: 3b 0a 2b 2f 2a 20 35 30 32 20 2a 2f 0a 2b 45 58 ;.+/* 502 */.+EX
1410: 54 45 52 4e 20 69 6e 74 09 09 54 63 6c 5f 44 69 TERN int..Tcl_Di
1420: 63 74 4f 62 6a 52 65 6d 6f 76 65 4b 65 79 4c 69 ctObjRemoveKeyLi
1430: 73 74 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 st _ANSI_ARGS_((
1440: 0a 2b 09 09 09 09 54 63 6c 5f 49 6e 74 65 72 70 .+....Tcl_Interp
1450: 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
1460: 62 6a 20 2a 20 64 69 63 74 50 74 72 2c 20 0a 2b bj * dictPtr, .+
1470: 09 09 09 09 69 6e 74 20 6b 65 79 63 2c 20 54 63 ....int keyc, Tc
1480: 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 2a 20 6b l_Obj *CONST * k
1490: 65 79 76 29 29 3b 0a 2b 2f 2a 20 35 30 33 20 2a eyv));.+/* 503 *
14a0: 2f 0a 2b 45 58 54 45 52 4e 20 54 63 6c 5f 4f 62 /.+EXTERN Tcl_Ob
14b0: 6a 20 2a 09 54 63 6c 5f 4e 65 77 44 69 63 74 4f j *.Tcl_NewDictO
14c0: 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 bj _ANSI_ARGS_((
14d0: 76 6f 69 64 29 29 3b 0a 2b 2f 2a 20 35 30 34 20 void));.+/* 504
14e0: 2a 2f 0a 2b 45 58 54 45 52 4e 20 54 63 6c 5f 4f */.+EXTERN Tcl_O
14f0: 62 6a 20 2a 09 54 63 6c 5f 44 62 4e 65 77 44 69 bj *.Tcl_DbNewDi
1500: 63 74 4f 62 6a 20 5f 41 4e 53 49 5f 41 52 47 53 ctObj _ANSI_ARGS
1510: 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 _((CONST char *
1520: 66 69 6c 65 2c 20 0a 2b 09 09 09 09 69 6e 74 20 file, .+....int
1530: 6c 69 6e 65 29 29 3b 0a 20 0a 20 74 79 70 65 64 line));. . typed
1540: 65 66 20 73 74 72 75 63 74 20 54 63 6c 53 74 75 ef struct TclStu
1550: 62 48 6f 6f 6b 73 20 7b 0a 20 20 20 20 20 73 74 bHooks {. st
1560: 72 75 63 74 20 54 63 6c 50 6c 61 74 53 74 75 62 ruct TclPlatStub
1570: 73 20 2a 74 63 6c 50 6c 61 74 53 74 75 62 73 3b s *tclPlatStubs;
1580: 0a 40 40 20 2d 32 31 31 37 2c 36 20 2b 32 31 35 .@@ -2117,6 +215
1590: 39 2c 31 37 20 40 40 0a 20 20 20 20 20 54 63 6c 9,17 @@. Tcl
15a0: 5f 57 69 64 65 49 6e 74 20 28 2a 74 63 6c 5f 53 _WideInt (*tcl_S
15b0: 65 65 6b 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f eek) _ANSI_ARGS_
15c0: 28 28 54 63 6c 5f 43 68 61 6e 6e 65 6c 20 63 68 ((Tcl_Channel ch
15d0: 61 6e 2c 20 54 63 6c 5f 57 69 64 65 49 6e 74 20 an, Tcl_WideInt
15e0: 6f 66 66 73 65 74 2c 20 69 6e 74 20 6d 6f 64 65 offset, int mode
15f0: 29 29 3b 20 2f 2a 20 34 39 31 20 2a 2f 0a 20 20 )); /* 491 */.
1600: 20 20 20 54 63 6c 5f 57 69 64 65 49 6e 74 20 28 Tcl_WideInt (
1610: 2a 74 63 6c 5f 54 65 6c 6c 29 20 5f 41 4e 53 49 *tcl_Tell) _ANSI
1620: 5f 41 52 47 53 5f 28 28 54 63 6c 5f 43 68 61 6e _ARGS_((Tcl_Chan
1630: 6e 65 6c 20 63 68 61 6e 29 29 3b 20 2f 2a 20 34 nel chan)); /* 4
1640: 39 32 20 2a 2f 0a 20 20 20 20 20 54 63 6c 5f 44 92 */. Tcl_D
1650: 72 69 76 65 72 57 69 64 65 53 65 65 6b 50 72 6f riverWideSeekPro
1660: 63 20 2a 20 28 2a 74 63 6c 5f 43 68 61 6e 6e 65 c * (*tcl_Channe
1670: 6c 57 69 64 65 53 65 65 6b 50 72 6f 63 29 20 5f lWideSeekProc) _
1680: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
1690: 43 68 61 6e 6e 65 6c 54 79 70 65 20 2a 20 63 68 ChannelType * ch
16a0: 61 6e 54 79 70 65 50 74 72 29 29 3b 20 2f 2a 20 anTypePtr)); /*
16b0: 34 39 33 20 2a 2f 0a 2b 20 20 20 20 69 6e 74 20 493 */.+ int
16c0: 28 2a 74 63 6c 5f 44 69 63 74 4f 62 6a 50 75 74 (*tcl_DictObjPut
16d0: 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 ) _ANSI_ARGS_((T
16e0: 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 cl_Interp * inte
16f0: 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 64 69 rp, Tcl_Obj * di
1700: 63 74 50 74 72 2c 20 54 63 6c 5f 4f 62 6a 20 2a ctPtr, Tcl_Obj *
1710: 20 6b 65 79 50 74 72 2c 20 54 63 6c 5f 4f 62 6a keyPtr, Tcl_Obj
1720: 20 2a 20 76 61 6c 75 65 50 74 72 29 29 3b 20 2f * valuePtr)); /
1730: 2a 20 34 39 34 20 2a 2f 0a 2b 20 20 20 20 69 6e * 494 */.+ in
1740: 74 20 28 2a 74 63 6c 5f 44 69 63 74 4f 62 6a 47 t (*tcl_DictObjG
1750: 65 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 et) _ANSI_ARGS_(
1760: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e (Tcl_Interp * in
1770: 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 terp, Tcl_Obj *
1780: 64 69 63 74 50 74 72 2c 20 54 63 6c 5f 4f 62 6a dictPtr, Tcl_Obj
1790: 20 2a 20 6b 65 79 50 74 72 2c 20 54 63 6c 5f 4f * keyPtr, Tcl_O
17a0: 62 6a 20 2a 2a 20 76 61 6c 75 65 50 74 72 50 74 bj ** valuePtrPt
17b0: 72 29 29 3b 20 2f 2a 20 34 39 35 20 2a 2f 0a 2b r)); /* 495 */.+
17c0: 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 44 69 int (*tcl_Di
17d0: 63 74 4f 62 6a 52 65 6d 6f 76 65 29 20 5f 41 4e ctObjRemove) _AN
17e0: 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e SI_ARGS_((Tcl_In
17f0: 74 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 terp * interp, T
1800: 63 6c 5f 4f 62 6a 20 2a 20 64 69 63 74 50 74 72 cl_Obj * dictPtr
1810: 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 6b 65 79 50 , Tcl_Obj * keyP
1820: 74 72 29 29 3b 20 2f 2a 20 34 39 36 20 2a 2f 0a tr)); /* 496 */.
1830: 2b 20 20 20 20 69 6e 74 20 28 2a 74 63 6c 5f 44 + int (*tcl_D
1840: 69 63 74 4f 62 6a 53 69 7a 65 29 20 5f 41 4e 53 ictObjSize) _ANS
1850: 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 I_ARGS_((Tcl_Int
1860: 65 72 70 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 erp * interp, Tc
1870: 6c 5f 4f 62 6a 20 2a 20 64 69 63 74 50 74 72 2c l_Obj * dictPtr,
1880: 20 69 6e 74 20 2a 20 73 69 7a 65 50 74 72 29 29 int * sizePtr))
1890: 3b 20 2f 2a 20 34 39 37 20 2a 2f 0a 2b 20 20 20 ; /* 497 */.+
18a0: 20 69 6e 74 20 28 2a 74 63 6c 5f 44 69 63 74 4f int (*tcl_DictO
18b0: 62 6a 46 69 72 73 74 29 20 5f 41 4e 53 49 5f 41 bjFirst) _ANSI_A
18c0: 52 47 53 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 RGS_((Tcl_Interp
18d0: 20 2a 20 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f * interp, Tcl_O
18e0: 62 6a 20 2a 20 64 69 63 74 50 74 72 2c 20 54 63 bj * dictPtr, Tc
18f0: 6c 5f 44 69 63 74 53 65 61 72 63 68 20 2a 20 73 l_DictSearch * s
1900: 65 61 72 63 68 50 74 72 2c 20 54 63 6c 5f 4f 62 earchPtr, Tcl_Ob
1910: 6a 20 2a 2a 20 6b 65 79 50 74 72 50 74 72 2c 20 j ** keyPtrPtr,
1920: 54 63 6c 5f 4f 62 6a 20 2a 2a 20 76 61 6c 75 65 Tcl_Obj ** value
1930: 50 74 72 50 74 72 2c 20 69 6e 74 20 2a 20 64 6f PtrPtr, int * do
1940: 6e 65 50 74 72 29 29 3b 20 2f 2a 20 34 39 38 20 nePtr)); /* 498
1950: 2a 2f 0a 2b 20 20 20 20 76 6f 69 64 20 28 2a 74 */.+ void (*t
1960: 63 6c 5f 44 69 63 74 4f 62 6a 4e 65 78 74 29 20 cl_DictObjNext)
1970: 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c _ANSI_ARGS_((Tcl
1980: 5f 44 69 63 74 53 65 61 72 63 68 20 2a 20 73 65 _DictSearch * se
1990: 61 72 63 68 50 74 72 2c 20 54 63 6c 5f 4f 62 6a archPtr, Tcl_Obj
19a0: 20 2a 2a 20 6b 65 79 50 74 72 50 74 72 2c 20 54 ** keyPtrPtr, T
19b0: 63 6c 5f 4f 62 6a 20 2a 2a 20 76 61 6c 75 65 50 cl_Obj ** valueP
19c0: 74 72 50 74 72 2c 20 69 6e 74 20 2a 20 64 6f 6e trPtr, int * don
19d0: 65 50 74 72 29 29 3b 20 2f 2a 20 34 39 39 20 2a ePtr)); /* 499 *
19e0: 2f 0a 2b 20 20 20 20 76 6f 69 64 20 28 2a 74 63 /.+ void (*tc
19f0: 6c 5f 44 69 63 74 4f 62 6a 44 6f 6e 65 29 20 5f l_DictObjDone) _
1a00: 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 6c 5f ANSI_ARGS_((Tcl_
1a10: 44 69 63 74 53 65 61 72 63 68 20 2a 20 73 65 61 DictSearch * sea
1a20: 72 63 68 50 74 72 29 29 3b 20 2f 2a 20 35 30 30 rchPtr)); /* 500
1a30: 20 2a 2f 0a 2b 20 20 20 20 69 6e 74 20 28 2a 74 */.+ int (*t
1a40: 63 6c 5f 44 69 63 74 4f 62 6a 50 75 74 4b 65 79 cl_DictObjPutKey
1a50: 4c 69 73 74 29 20 5f 41 4e 53 49 5f 41 52 47 53 List) _ANSI_ARGS
1a60: 5f 28 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 20 _((Tcl_Interp *
1a70: 69 6e 74 65 72 70 2c 20 54 63 6c 5f 4f 62 6a 20 interp, Tcl_Obj
1a80: 2a 20 64 69 63 74 50 74 72 2c 20 69 6e 74 20 6b * dictPtr, int k
1a90: 65 79 63 2c 20 54 63 6c 5f 4f 62 6a 20 2a 43 4f eyc, Tcl_Obj *CO
1aa0: 4e 53 54 20 2a 20 6b 65 79 76 2c 20 54 63 6c 5f NST * keyv, Tcl_
1ab0: 4f 62 6a 20 2a 20 76 61 6c 75 65 50 74 72 29 29 Obj * valuePtr))
1ac0: 3b 20 2f 2a 20 35 30 31 20 2a 2f 0a 2b 20 20 20 ; /* 501 */.+
1ad0: 20 69 6e 74 20 28 2a 74 63 6c 5f 44 69 63 74 4f int (*tcl_DictO
1ae0: 62 6a 52 65 6d 6f 76 65 4b 65 79 4c 69 73 74 29 bjRemoveKeyList)
1af0: 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 54 63 _ANSI_ARGS_((Tc
1b00: 6c 5f 49 6e 74 65 72 70 20 2a 20 69 6e 74 65 72 l_Interp * inter
1b10: 70 2c 20 54 63 6c 5f 4f 62 6a 20 2a 20 64 69 63 p, Tcl_Obj * dic
1b20: 74 50 74 72 2c 20 69 6e 74 20 6b 65 79 63 2c 20 tPtr, int keyc,
1b30: 54 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 2a Tcl_Obj *CONST *
1b40: 20 6b 65 79 76 29 29 3b 20 2f 2a 20 35 30 32 20 keyv)); /* 502
1b50: 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 4f 62 6a 20 */.+ Tcl_Obj
1b60: 2a 20 28 2a 74 63 6c 5f 4e 65 77 44 69 63 74 4f * (*tcl_NewDictO
1b70: 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 bj) _ANSI_ARGS_(
1b80: 28 76 6f 69 64 29 29 3b 20 2f 2a 20 35 30 33 20 (void)); /* 503
1b90: 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 4f 62 6a 20 */.+ Tcl_Obj
1ba0: 2a 20 28 2a 74 63 6c 5f 44 62 4e 65 77 44 69 63 * (*tcl_DbNewDic
1bb0: 74 4f 62 6a 29 20 5f 41 4e 53 49 5f 41 52 47 53 tObj) _ANSI_ARGS
1bc0: 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 2a 20 _((CONST char *
1bd0: 66 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 29 file, int line))
1be0: 3b 20 2f 2a 20 35 30 34 20 2a 2f 0a 20 7d 20 54 ; /* 504 */. } T
1bf0: 63 6c 53 74 75 62 73 3b 0a 20 0a 20 23 69 66 64 clStubs;. . #ifd
1c00: 65 66 20 5f 5f 63 70 6c 75 73 70 6c 75 73 0a 40 ef __cplusplus.@
1c10: 40 20 2d 34 31 33 32 2c 36 20 2b 34 31 38 35 2c @ -4132,6 +4185,
1c20: 35 30 20 40 40 0a 20 23 69 66 6e 64 65 66 20 54 50 @@. #ifndef T
1c30: 63 6c 5f 43 68 61 6e 6e 65 6c 57 69 64 65 53 65 cl_ChannelWideSe
1c40: 65 6b 50 72 6f 63 0a 20 23 64 65 66 69 6e 65 20 ekProc. #define
1c50: 54 63 6c 5f 43 68 61 6e 6e 65 6c 57 69 64 65 53 Tcl_ChannelWideS
1c60: 65 65 6b 50 72 6f 63 20 5c 0a 20 09 28 74 63 6c eekProc \. .(tcl
1c70: 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 43 68 StubsPtr->tcl_Ch
1c80: 61 6e 6e 65 6c 57 69 64 65 53 65 65 6b 50 72 6f annelWideSeekPro
1c90: 63 29 20 2f 2a 20 34 39 33 20 2a 2f 0a 2b 23 65 c) /* 493 */.+#e
1ca0: 6e 64 69 66 0a 2b 23 69 66 6e 64 65 66 20 54 63 ndif.+#ifndef Tc
1cb0: 6c 5f 44 69 63 74 4f 62 6a 50 75 74 0a 2b 23 64 l_DictObjPut.+#d
1cc0: 65 66 69 6e 65 20 54 63 6c 5f 44 69 63 74 4f 62 efine Tcl_DictOb
1cd0: 6a 50 75 74 20 5c 0a 2b 09 28 74 63 6c 53 74 75 jPut \.+.(tclStu
1ce0: 62 73 50 74 72 2d 3e 74 63 6c 5f 44 69 63 74 4f bsPtr->tcl_DictO
1cf0: 62 6a 50 75 74 29 20 2f 2a 20 34 39 34 20 2a 2f bjPut) /* 494 */
1d00: 0a 2b 23 65 6e 64 69 66 0a 2b 23 69 66 6e 64 65 .+#endif.+#ifnde
1d10: 66 20 54 63 6c 5f 44 69 63 74 4f 62 6a 47 65 74 f Tcl_DictObjGet
1d20: 0a 2b 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 69 .+#define Tcl_Di
1d30: 63 74 4f 62 6a 47 65 74 20 5c 0a 2b 09 28 74 63 ctObjGet \.+.(tc
1d40: 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 lStubsPtr->tcl_D
1d50: 69 63 74 4f 62 6a 47 65 74 29 20 2f 2a 20 34 39 ictObjGet) /* 49
1d60: 35 20 2a 2f 0a 2b 23 65 6e 64 69 66 0a 2b 23 69 5 */.+#endif.+#i
1d70: 66 6e 64 65 66 20 54 63 6c 5f 44 69 63 74 4f 62 fndef Tcl_DictOb
1d80: 6a 52 65 6d 6f 76 65 0a 2b 23 64 65 66 69 6e 65 jRemove.+#define
1d90: 20 54 63 6c 5f 44 69 63 74 4f 62 6a 52 65 6d 6f Tcl_DictObjRemo
1da0: 76 65 20 5c 0a 2b 09 28 74 63 6c 53 74 75 62 73 ve \.+.(tclStubs
1db0: 50 74 72 2d 3e 74 63 6c 5f 44 69 63 74 4f 62 6a Ptr->tcl_DictObj
1dc0: 52 65 6d 6f 76 65 29 20 2f 2a 20 34 39 36 20 2a Remove) /* 496 *
1dd0: 2f 0a 2b 23 65 6e 64 69 66 0a 2b 23 69 66 6e 64 /.+#endif.+#ifnd
1de0: 65 66 20 54 63 6c 5f 44 69 63 74 4f 62 6a 53 69 ef Tcl_DictObjSi
1df0: 7a 65 0a 2b 23 64 65 66 69 6e 65 20 54 63 6c 5f ze.+#define Tcl_
1e00: 44 69 63 74 4f 62 6a 53 69 7a 65 20 5c 0a 2b 09 DictObjSize \.+.
1e10: 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
1e20: 6c 5f 44 69 63 74 4f 62 6a 53 69 7a 65 29 20 2f l_DictObjSize) /
1e30: 2a 20 34 39 37 20 2a 2f 0a 2b 23 65 6e 64 69 66 * 497 */.+#endif
1e40: 0a 2b 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 69 .+#ifndef Tcl_Di
1e50: 63 74 4f 62 6a 46 69 72 73 74 0a 2b 23 64 65 66 ctObjFirst.+#def
1e60: 69 6e 65 20 54 63 6c 5f 44 69 63 74 4f 62 6a 46 ine Tcl_DictObjF
1e70: 69 72 73 74 20 5c 0a 2b 09 28 74 63 6c 53 74 75 irst \.+.(tclStu
1e80: 62 73 50 74 72 2d 3e 74 63 6c 5f 44 69 63 74 4f bsPtr->tcl_DictO
1e90: 62 6a 46 69 72 73 74 29 20 2f 2a 20 34 39 38 20 bjFirst) /* 498
1ea0: 2a 2f 0a 2b 23 65 6e 64 69 66 0a 2b 23 69 66 6e */.+#endif.+#ifn
1eb0: 64 65 66 20 54 63 6c 5f 44 69 63 74 4f 62 6a 4e def Tcl_DictObjN
1ec0: 65 78 74 0a 2b 23 64 65 66 69 6e 65 20 54 63 6c ext.+#define Tcl
1ed0: 5f 44 69 63 74 4f 62 6a 4e 65 78 74 20 5c 0a 2b _DictObjNext \.+
1ee0: 09 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 .(tclStubsPtr->t
1ef0: 63 6c 5f 44 69 63 74 4f 62 6a 4e 65 78 74 29 20 cl_DictObjNext)
1f00: 2f 2a 20 34 39 39 20 2a 2f 0a 2b 23 65 6e 64 69 /* 499 */.+#endi
1f10: 66 0a 2b 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 f.+#ifndef Tcl_D
1f20: 69 63 74 4f 62 6a 44 6f 6e 65 0a 2b 23 64 65 66 ictObjDone.+#def
1f30: 69 6e 65 20 54 63 6c 5f 44 69 63 74 4f 62 6a 44 ine Tcl_DictObjD
1f40: 6f 6e 65 20 5c 0a 2b 09 28 74 63 6c 53 74 75 62 one \.+.(tclStub
1f50: 73 50 74 72 2d 3e 74 63 6c 5f 44 69 63 74 4f 62 sPtr->tcl_DictOb
1f60: 6a 44 6f 6e 65 29 20 2f 2a 20 35 30 30 20 2a 2f jDone) /* 500 */
1f70: 0a 2b 23 65 6e 64 69 66 0a 2b 23 69 66 6e 64 65 .+#endif.+#ifnde
1f80: 66 20 54 63 6c 5f 44 69 63 74 4f 62 6a 50 75 74 f Tcl_DictObjPut
1f90: 4b 65 79 4c 69 73 74 0a 2b 23 64 65 66 69 6e 65 KeyList.+#define
1fa0: 20 54 63 6c 5f 44 69 63 74 4f 62 6a 50 75 74 4b Tcl_DictObjPutK
1fb0: 65 79 4c 69 73 74 20 5c 0a 2b 09 28 74 63 6c 53 eyList \.+.(tclS
1fc0: 74 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 69 63 tubsPtr->tcl_Dic
1fd0: 74 4f 62 6a 50 75 74 4b 65 79 4c 69 73 74 29 20 tObjPutKeyList)
1fe0: 2f 2a 20 35 30 31 20 2a 2f 0a 2b 23 65 6e 64 69 /* 501 */.+#endi
1ff0: 66 0a 2b 23 69 66 6e 64 65 66 20 54 63 6c 5f 44 f.+#ifndef Tcl_D
2000: 69 63 74 4f 62 6a 52 65 6d 6f 76 65 4b 65 79 4c ictObjRemoveKeyL
2010: 69 73 74 0a 2b 23 64 65 66 69 6e 65 20 54 63 6c ist.+#define Tcl
2020: 5f 44 69 63 74 4f 62 6a 52 65 6d 6f 76 65 4b 65 _DictObjRemoveKe
2030: 79 4c 69 73 74 20 5c 0a 2b 09 28 74 63 6c 53 74 yList \.+.(tclSt
2040: 75 62 73 50 74 72 2d 3e 74 63 6c 5f 44 69 63 74 ubsPtr->tcl_Dict
2050: 4f 62 6a 52 65 6d 6f 76 65 4b 65 79 4c 69 73 74 ObjRemoveKeyList
2060: 29 20 2f 2a 20 35 30 32 20 2a 2f 0a 2b 23 65 6e ) /* 502 */.+#en
2070: 64 69 66 0a 2b 23 69 66 6e 64 65 66 20 54 63 6c dif.+#ifndef Tcl
2080: 5f 4e 65 77 44 69 63 74 4f 62 6a 0a 2b 23 64 65 _NewDictObj.+#de
2090: 66 69 6e 65 20 54 63 6c 5f 4e 65 77 44 69 63 74 fine Tcl_NewDict
20a0: 4f 62 6a 20 5c 0a 2b 09 28 74 63 6c 53 74 75 62 Obj \.+.(tclStub
20b0: 73 50 74 72 2d 3e 74 63 6c 5f 4e 65 77 44 69 63 sPtr->tcl_NewDic
20c0: 74 4f 62 6a 29 20 2f 2a 20 35 30 33 20 2a 2f 0a tObj) /* 503 */.
20d0: 2b 23 65 6e 64 69 66 0a 2b 23 69 66 6e 64 65 66 +#endif.+#ifndef
20e0: 20 54 63 6c 5f 44 62 4e 65 77 44 69 63 74 4f 62 Tcl_DbNewDictOb
20f0: 6a 0a 2b 23 64 65 66 69 6e 65 20 54 63 6c 5f 44 j.+#define Tcl_D
2100: 62 4e 65 77 44 69 63 74 4f 62 6a 20 5c 0a 2b 09 bNewDictObj \.+.
2110: 28 74 63 6c 53 74 75 62 73 50 74 72 2d 3e 74 63 (tclStubsPtr->tc
2120: 6c 5f 44 62 4e 65 77 44 69 63 74 4f 62 6a 29 20 l_DbNewDictObj)
2130: 2f 2a 20 35 30 34 20 2a 2f 0a 20 23 65 6e 64 69 /* 504 */. #endi
2140: 66 0a 20 0a 20 23 65 6e 64 69 66 20 2f 2a 20 64 f. . #endif /* d
2150: 65 66 69 6e 65 64 28 55 53 45 5f 54 43 4c 5f 53 efined(USE_TCL_S
2160: 54 55 42 53 29 20 26 26 20 21 64 65 66 69 6e 65 TUBS) && !define
2170: 64 28 55 53 45 5f 54 43 4c 5f 53 54 55 42 5f 50 d(USE_TCL_STUB_P
2180: 52 4f 43 53 29 20 2a 2f 0a 49 6e 64 65 78 3a 20 ROCS) */.Index:
2190: 67 65 6e 65 72 69 63 2f 74 63 6c 49 6e 74 2e 68 generic/tclInt.h
21a0: 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d .===============
21b0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
21c0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
21d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
21e0: 3d 3d 3d 3d 0a 52 43 53 20 66 69 6c 65 3a 20 2f ====.RCS file: /
21f0: 63 76 73 72 6f 6f 74 2f 74 63 6c 2f 74 63 6c 2f cvsroot/tcl/tcl/
2200: 67 65 6e 65 72 69 63 2f 74 63 6c 49 6e 74 2e 68 generic/tclInt.h
2210: 2c 76 0a 72 65 74 72 69 65 76 69 6e 67 20 72 65 ,v.retrieving re
2220: 76 69 73 69 6f 6e 20 31 2e 31 31 38 0a 64 69 66 vision 1.118.dif
2230: 66 20 2d 75 20 2d 72 31 2e 31 31 38 20 74 63 6c f -u -r1.118 tcl
2240: 49 6e 74 2e 68 0a 2d 2d 2d 20 67 65 6e 65 72 69 Int.h.--- generi
2250: 63 2f 74 63 6c 49 6e 74 2e 68 09 31 30 20 46 65 c/tclInt.h.10 Fe
2260: 62 20 32 30 30 33 20 31 30 3a 32 36 3a 32 35 20 b 2003 10:26:25
2270: 2d 30 30 30 30 09 31 2e 31 31 38 0a 2b 2b 2b 20 -0000.1.118.+++
2280: 67 65 6e 65 72 69 63 2f 74 63 6c 49 6e 74 2e 68 generic/tclInt.h
2290: 09 31 37 20 46 65 62 20 32 30 30 33 20 31 33 3a .17 Feb 2003 13:
22a0: 34 31 3a 30 34 20 2d 30 30 30 30 0a 40 40 20 2d 41:04 -0000.@@ -
22b0: 31 35 39 37 2c 36 20 2b 31 35 39 37 2c 37 20 40 1597,6 +1597,7 @
22c0: 40 0a 20 23 69 66 6e 64 65 66 20 54 43 4c 5f 57 @. #ifndef TCL_W
22d0: 49 44 45 5f 49 4e 54 5f 49 53 5f 4c 4f 4e 47 0a IDE_INT_IS_LONG.
22e0: 20 65 78 74 65 72 6e 20 54 63 6c 5f 4f 62 6a 54 extern Tcl_ObjT
22f0: 79 70 65 09 74 63 6c 57 69 64 65 49 6e 74 54 79 ype.tclWideIntTy
2300: 70 65 3b 0a 20 23 65 6e 64 69 66 0a 2b 65 78 74 pe;. #endif.+ext
2310: 65 72 6e 20 54 63 6c 5f 4f 62 6a 54 79 70 65 09 ern Tcl_ObjType.
2320: 74 63 6c 44 69 63 74 54 79 70 65 3b 0a 20 0a 20 tclDictType;. .
2330: 2f 2a 0a 20 20 2a 20 56 61 72 69 61 62 6c 65 73 /*. * Variables
2340: 20 64 65 6e 6f 74 69 6e 67 20 74 68 65 20 68 61 denoting the ha
2350: 73 68 20 6b 65 79 20 74 79 70 65 73 20 64 65 66 sh key types def
2360: 69 6e 65 64 20 69 6e 20 74 68 65 20 63 6f 72 65 ined in the core
2370: 2e 0a 40 40 20 2d 31 38 34 38 2c 36 20 2b 31 38 ..@@ -1848,6 +18
2380: 34 39 2c 38 20 40 40 0a 20 09 09 20 20 20 20 54 49,8 @@. .. T
2390: 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 cl_Interp *inter
23a0: 70 2c 20 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c p, int objc, Tcl
23b0: 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 _Obj *CONST objv
23c0: 5b 5d 29 29 3b 0a 20 45 58 54 45 52 4e 20 69 6e []));. EXTERN in
23d0: 74 09 54 63 6c 5f 43 6f 6e 74 69 6e 75 65 4f 62 t.Tcl_ContinueOb
23e0: 6a 43 6d 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f jCmd _ANSI_ARGS_
23f0: 28 28 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 ((ClientData cli
2400: 65 6e 74 44 61 74 61 2c 0a 20 09 09 20 20 20 20 entData,. ..
2410: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 Tcl_Interp *inte
2420: 72 70 2c 20 69 6e 74 20 6f 62 6a 63 2c 20 54 63 rp, int objc, Tc
2430: 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a l_Obj *CONST obj
2440: 76 5b 5d 29 29 3b 0a 2b 45 58 54 45 52 4e 20 69 v[]));.+EXTERN i
2450: 6e 74 09 54 63 6c 5f 44 69 63 74 4f 62 6a 43 6d nt.Tcl_DictObjCm
2460: 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 d _ANSI_ARGS_((C
2470: 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 lientData client
2480: 44 61 74 61 2c 0a 2b 09 09 20 20 20 20 54 63 6c Data,.+.. Tcl
2490: 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 70 2c _Interp *interp,
24a0: 20 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c 5f 4f int objc, Tcl_O
24b0: 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d bj *CONST objv[]
24c0: 29 29 3b 0a 20 45 58 54 45 52 4e 20 69 6e 74 09 ));. EXTERN int.
24d0: 54 63 6c 5f 45 6e 63 6f 64 69 6e 67 4f 62 6a 43 Tcl_EncodingObjC
24e0: 6d 64 20 5f 41 4e 53 49 5f 41 52 47 53 5f 28 28 md _ANSI_ARGS_((
24f0: 43 6c 69 65 6e 74 44 61 74 61 20 63 6c 69 65 6e ClientData clien
2500: 74 44 61 74 61 2c 0a 20 09 09 20 20 20 20 54 63 tData,. .. Tc
2510: 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 70 l_Interp *interp
2520: 2c 20 69 6e 74 20 6f 62 6a 63 2c 20 54 63 6c 5f , int objc, Tcl_
2530: 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b Obj *CONST objv[
2540: 5d 29 29 3b 0a 20 45 58 54 45 52 4e 20 69 6e 74 ]));. EXTERN int
2550: 09 54 63 6c 5f 45 6f 66 4f 62 6a 43 6d 64 20 5f .Tcl_EofObjCmd _
2560: 41 4e 53 49 5f 41 52 47 53 5f 28 28 43 6c 69 65 ANSI_ARGS_((Clie
2570: 6e 74 44 61 74 61 20 63 6c 69 65 6e 74 44 61 74 ntData clientDat
2580: 61 2c 0a 49 6e 64 65 78 3a 20 67 65 6e 65 72 69 a,.Index: generi
2590: 63 2f 74 63 6c 4f 62 6a 2e 63 0a 3d 3d 3d 3d 3d c/tclObj.c.=====
25a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
25b0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
25c0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
25d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 ==============.R
25e0: 43 53 20 66 69 6c 65 3a 20 2f 63 76 73 72 6f 6f CS file: /cvsroo
25f0: 74 2f 74 63 6c 2f 74 63 6c 2f 67 65 6e 65 72 69 t/tcl/tcl/generi
2600: 63 2f 74 63 6c 4f 62 6a 2e 63 2c 76 0a 72 65 74 c/tclObj.c,v.ret
2610: 72 69 65 76 69 6e 67 20 72 65 76 69 73 69 6f 6e rieving revision
2620: 20 31 2e 34 32 0a 64 69 66 66 20 2d 75 20 2d 72 1.42.diff -u -r
2630: 31 2e 34 32 20 74 63 6c 4f 62 6a 2e 63 0a 2d 2d 1.42 tclObj.c.--
2640: 2d 20 67 65 6e 65 72 69 63 2f 74 63 6c 4f 62 6a - generic/tclObj
2650: 2e 63 09 31 37 20 4a 61 6e 20 32 30 30 33 20 32 .c.17 Jan 2003 2
2660: 32 3a 31 31 3a 30 32 20 2d 30 30 30 30 09 31 2e 2:11:02 -0000.1.
2670: 34 32 0a 2b 2b 2b 20 67 65 6e 65 72 69 63 2f 74 42.+++ generic/t
2680: 63 6c 4f 62 6a 2e 63 09 31 37 20 46 65 62 20 32 clObj.c.17 Feb 2
2690: 30 30 33 20 31 33 3a 34 31 3a 30 35 20 2d 30 30 003 13:41:05 -00
26a0: 30 30 0a 40 40 20 2d 32 33 38 2c 31 31 20 2b 32 00.@@ -238,11 +2
26b0: 33 38 2c 31 32 20 40 40 0a 20 23 65 6e 64 69 66 38,12 @@. #endif
26c0: 0a 20 20 20 20 20 54 63 6c 5f 52 65 67 69 73 74 . Tcl_Regist
26d0: 65 72 4f 62 6a 54 79 70 65 28 26 74 63 6c 53 74 erObjType(&tclSt
26e0: 72 69 6e 67 54 79 70 65 29 3b 0a 20 20 20 20 20 ringType);.
26f0: 54 63 6c 5f 52 65 67 69 73 74 65 72 4f 62 6a 54 Tcl_RegisterObjT
2700: 79 70 65 28 26 74 63 6c 4c 69 73 74 54 79 70 65 ype(&tclListType
2710: 29 3b 0a 2b 20 20 20 20 54 63 6c 5f 52 65 67 69 );.+ Tcl_Regi
2720: 73 74 65 72 4f 62 6a 54 79 70 65 28 26 74 63 6c sterObjType(&tcl
2730: 44 69 63 74 54 79 70 65 29 3b 0a 20 20 20 20 20 DictType);.
2740: 54 63 6c 5f 52 65 67 69 73 74 65 72 4f 62 6a 54 Tcl_RegisterObjT
2750: 79 70 65 28 26 74 63 6c 42 79 74 65 43 6f 64 65 ype(&tclByteCode
2760: 54 79 70 65 29 3b 0a 20 20 20 20 20 54 63 6c 5f Type);. Tcl_
2770: 52 65 67 69 73 74 65 72 4f 62 6a 54 79 70 65 28 RegisterObjType(
2780: 26 74 63 6c 50 72 6f 63 42 6f 64 79 54 79 70 65 &tclProcBodyType
2790: 29 3b 0a 20 20 20 20 20 54 63 6c 5f 52 65 67 69 );. Tcl_Regi
27a0: 73 74 65 72 4f 62 6a 54 79 70 65 28 26 74 63 6c sterObjType(&tcl
27b0: 41 72 72 61 79 53 65 61 72 63 68 54 79 70 65 29 ArraySearchType)
27c0: 3b 0a 20 20 20 20 20 54 63 6c 5f 52 65 67 69 73 ;. Tcl_Regis
27d0: 74 65 72 4f 62 6a 54 79 70 65 28 26 74 63 6c 49 terObjType(&tclI
27e0: 6e 64 65 78 54 79 70 65 29 3b 0a 20 20 20 20 20 ndexType);.
27f0: 54 63 6c 5f 52 65 67 69 73 74 65 72 4f 62 6a 54 Tcl_RegisterObjT
2800: 79 70 65 28 26 74 63 6c 4e 73 4e 61 6d 65 54 79 ype(&tclNsNameTy
2810: 70 65 29 3b 0a 20 20 20 20 20 54 63 6c 5f 52 65 pe);. Tcl_Re
2820: 67 69 73 74 65 72 4f 62 6a 54 79 70 65 28 26 74 gisterObjType(&t
2830: 63 6c 43 6d 64 4e 61 6d 65 54 79 70 65 29 3b 0a clCmdNameType);.
2840: 20 0a 20 23 69 66 64 65 66 20 54 43 4c 5f 43 4f . #ifdef TCL_CO
2850: 4d 50 49 4c 45 5f 53 54 41 54 53 0a 49 6e 64 65 MPILE_STATS.Inde
2860: 78 3a 20 67 65 6e 65 72 69 63 2f 74 63 6c 53 74 x: generic/tclSt
2870: 75 62 49 6e 69 74 2e 63 0a 3d 3d 3d 3d 3d 3d 3d ubInit.c.=======
2880: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2890: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
28a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
28b0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 ============.RCS
28c0: 20 66 69 6c 65 3a 20 2f 63 76 73 72 6f 6f 74 2f file: /cvsroot/
28d0: 74 63 6c 2f 74 63 6c 2f 67 65 6e 65 72 69 63 2f tcl/tcl/generic/
28e0: 74 63 6c 53 74 75 62 49 6e 69 74 2e 63 2c 76 0a tclStubInit.c,v.
28f0: 72 65 74 72 69 65 76 69 6e 67 20 72 65 76 69 73 retrieving revis
2900: 69 6f 6e 20 31 2e 37 38 0a 64 69 66 66 20 2d 75 ion 1.78.diff -u
2910: 20 2d 72 31 2e 37 38 20 74 63 6c 53 74 75 62 49 -r1.78 tclStubI
2920: 6e 69 74 2e 63 0a 2d 2d 2d 20 67 65 6e 65 72 69 nit.c.--- generi
2930: 63 2f 74 63 6c 53 74 75 62 49 6e 69 74 2e 63 09 c/tclStubInit.c.
2940: 36 20 44 65 63 20 32 30 30 32 20 32 33 3a 32 32 6 Dec 2002 23:22
2950: 3a 35 39 20 2d 30 30 30 30 09 31 2e 37 38 0a 2b :59 -0000.1.78.+
2960: 2b 2b 20 67 65 6e 65 72 69 63 2f 74 63 6c 53 74 ++ generic/tclSt
2970: 75 62 49 6e 69 74 2e 63 09 31 37 20 46 65 62 20 ubInit.c.17 Feb
2980: 32 30 30 33 20 31 33 3a 34 31 3a 30 35 20 2d 30 2003 13:41:05 -0
2990: 30 30 30 0a 40 40 20 2d 39 30 31 2c 36 20 2b 39 000.@@ -901,6 +9
29a0: 30 31 2c 31 37 20 40 40 0a 20 20 20 20 20 54 63 01,17 @@. Tc
29b0: 6c 5f 53 65 65 6b 2c 20 2f 2a 20 34 39 31 20 2a l_Seek, /* 491 *
29c0: 2f 0a 20 20 20 20 20 54 63 6c 5f 54 65 6c 6c 2c /. Tcl_Tell,
29d0: 20 2f 2a 20 34 39 32 20 2a 2f 0a 20 20 20 20 20 /* 492 */.
29e0: 54 63 6c 5f 43 68 61 6e 6e 65 6c 57 69 64 65 53 Tcl_ChannelWideS
29f0: 65 65 6b 50 72 6f 63 2c 20 2f 2a 20 34 39 33 20 eekProc, /* 493
2a00: 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 74 */.+ Tcl_Dict
2a10: 4f 62 6a 50 75 74 2c 20 2f 2a 20 34 39 34 20 2a ObjPut, /* 494 *
2a20: 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 74 4f /.+ Tcl_DictO
2a30: 62 6a 47 65 74 2c 20 2f 2a 20 34 39 35 20 2a 2f bjGet, /* 495 */
2a40: 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 74 4f 62 .+ Tcl_DictOb
2a50: 6a 52 65 6d 6f 76 65 2c 20 2f 2a 20 34 39 36 20 jRemove, /* 496
2a60: 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 74 */.+ Tcl_Dict
2a70: 4f 62 6a 53 69 7a 65 2c 20 2f 2a 20 34 39 37 20 ObjSize, /* 497
2a80: 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 74 */.+ Tcl_Dict
2a90: 4f 62 6a 46 69 72 73 74 2c 20 2f 2a 20 34 39 38 ObjFirst, /* 498
2aa0: 20 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 */.+ Tcl_Dic
2ab0: 74 4f 62 6a 4e 65 78 74 2c 20 2f 2a 20 34 39 39 tObjNext, /* 499
2ac0: 20 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 */.+ Tcl_Dic
2ad0: 74 4f 62 6a 44 6f 6e 65 2c 20 2f 2a 20 35 30 30 tObjDone, /* 500
2ae0: 20 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 69 63 */.+ Tcl_Dic
2af0: 74 4f 62 6a 50 75 74 4b 65 79 4c 69 73 74 2c 20 tObjPutKeyList,
2b00: 2f 2a 20 35 30 31 20 2a 2f 0a 2b 20 20 20 20 54 /* 501 */.+ T
2b10: 63 6c 5f 44 69 63 74 4f 62 6a 52 65 6d 6f 76 65 cl_DictObjRemove
2b20: 4b 65 79 4c 69 73 74 2c 20 2f 2a 20 35 30 32 20 KeyList, /* 502
2b30: 2a 2f 0a 2b 20 20 20 20 54 63 6c 5f 4e 65 77 44 */.+ Tcl_NewD
2b40: 69 63 74 4f 62 6a 2c 20 2f 2a 20 35 30 33 20 2a ictObj, /* 503 *
2b50: 2f 0a 2b 20 20 20 20 54 63 6c 5f 44 62 4e 65 77 /.+ Tcl_DbNew
2b60: 44 69 63 74 4f 62 6a 2c 20 2f 2a 20 35 30 34 20 DictObj, /* 504
2b70: 2a 2f 0a 20 7d 3b 0a 20 0a 20 2f 2a 20 21 45 4e */. };. . /* !EN
2b80: 44 21 3a 20 44 6f 20 6e 6f 74 20 65 64 69 74 20 D!: Do not edit
2b90: 61 62 6f 76 65 20 74 68 69 73 20 6c 69 6e 65 2e above this line.
2ba0: 20 2a 2f 0a 49 6e 64 65 78 3a 20 75 6e 69 78 2f */.Index: unix/
2bb0: 4d 61 6b 65 66 69 6c 65 2e 69 6e 0a 3d 3d 3d 3d Makefile.in.====
2bc0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2bd0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2be0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
2bf0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a ===============.
2c00: 52 43 53 20 66 69 6c 65 3a 20 2f 63 76 73 72 6f RCS file: /cvsro
2c10: 6f 74 2f 74 63 6c 2f 74 63 6c 2f 75 6e 69 78 2f ot/tcl/tcl/unix/
2c20: 4d 61 6b 65 66 69 6c 65 2e 69 6e 2c 76 0a 72 65 Makefile.in,v.re
2c30: 74 72 69 65 76 69 6e 67 20 72 65 76 69 73 69 6f trieving revisio
2c40: 6e 20 31 2e 31 32 31 0a 64 69 66 66 20 2d 75 20 n 1.121.diff -u
2c50: 2d 72 31 2e 31 32 31 20 4d 61 6b 65 66 69 6c 65 -r1.121 Makefile
2c60: 2e 69 6e 0a 2d 2d 2d 20 75 6e 69 78 2f 4d 61 6b .in.--- unix/Mak
2c70: 65 66 69 6c 65 2e 69 6e 09 32 38 20 4a 61 6e 20 efile.in.28 Jan
2c80: 32 30 30 33 20 31 31 3a 30 33 3a 35 32 20 2d 30 2003 11:03:52 -0
2c90: 30 30 30 09 31 2e 31 32 31 0a 2b 2b 2b 20 75 6e 000.1.121.+++ un
2ca0: 69 78 2f 4d 61 6b 65 66 69 6c 65 2e 69 6e 09 31 ix/Makefile.in.1
2cb0: 37 20 46 65 62 20 32 30 30 33 20 31 33 3a 34 31 7 Feb 2003 13:41
2cc0: 3a 30 36 20 2d 30 30 30 30 0a 40 40 20 2d 33 30 :06 -0000.@@ -30
2cd0: 36 2c 37 20 2b 33 30 36 2c 37 20 40 40 0a 20 47 6,7 +306,7 @@. G
2ce0: 45 4e 45 52 49 43 5f 4f 42 4a 53 20 3d 20 72 65 ENERIC_OBJS = re
2cf0: 67 63 6f 6d 70 2e 6f 20 72 65 67 65 78 65 63 2e gcomp.o regexec.
2d00: 6f 20 72 65 67 66 72 65 65 2e 6f 20 72 65 67 65 o regfree.o rege
2d10: 72 72 6f 72 2e 6f 20 74 63 6c 41 6c 6c 6f 63 2e rror.o tclAlloc.
2d20: 6f 20 5c 0a 20 09 74 63 6c 41 73 79 6e 63 2e 6f o \. .tclAsync.o
2d30: 20 74 63 6c 42 61 73 69 63 2e 6f 20 74 63 6c 42 tclBasic.o tclB
2d40: 69 6e 61 72 79 2e 6f 20 5c 0a 20 09 74 63 6c 43 inary.o \. .tclC
2d50: 6b 61 6c 6c 6f 63 2e 6f 20 74 63 6c 43 6c 6f 63 kalloc.o tclCloc
2d60: 6b 2e 6f 20 74 63 6c 43 6d 64 41 48 2e 6f 20 74 k.o tclCmdAH.o t
2d70: 63 6c 43 6d 64 49 4c 2e 6f 20 74 63 6c 43 6d 64 clCmdIL.o tclCmd
2d80: 4d 5a 2e 6f 20 5c 0a 2d 09 74 63 6c 43 6f 6d 70 MZ.o \.-.tclComp
2d90: 43 6d 64 73 2e 6f 20 74 63 6c 43 6f 6d 70 45 78 Cmds.o tclCompEx
2da0: 70 72 2e 6f 20 74 63 6c 43 6f 6d 70 69 6c 65 2e pr.o tclCompile.
2db0: 6f 20 74 63 6c 44 61 74 65 2e 6f 20 74 63 6c 45 o tclDate.o tclE
2dc0: 6e 63 6f 64 69 6e 67 2e 6f 20 5c 0a 2b 09 74 63 ncoding.o \.+.tc
2dd0: 6c 43 6f 6d 70 43 6d 64 73 2e 6f 20 74 63 6c 43 lCompCmds.o tclC
2de0: 6f 6d 70 45 78 70 72 2e 6f 20 74 63 6c 43 6f 6d ompExpr.o tclCom
2df0: 70 69 6c 65 2e 6f 20 74 63 6c 44 61 74 65 2e 6f pile.o tclDate.o
2e00: 20 74 63 6c 44 69 63 74 4f 62 6a 2e 6f 20 74 63 tclDictObj.o tc
2e10: 6c 45 6e 63 6f 64 69 6e 67 2e 6f 20 5c 0a 20 09 lEncoding.o \. .
2e20: 74 63 6c 45 6e 76 2e 6f 20 74 63 6c 45 76 65 6e tclEnv.o tclEven
2e30: 74 2e 6f 20 74 63 6c 45 78 65 63 75 74 65 2e 6f t.o tclExecute.o
2e40: 20 74 63 6c 46 43 6d 64 2e 6f 20 74 63 6c 46 69 tclFCmd.o tclFi
2e50: 6c 65 4e 61 6d 65 2e 6f 20 74 63 6c 47 65 74 2e leName.o tclGet.
2e60: 6f 20 5c 0a 20 09 74 63 6c 48 61 73 68 2e 6f 20 o \. .tclHash.o
2e70: 74 63 6c 48 69 73 74 6f 72 79 2e 6f 20 74 63 6c tclHistory.o tcl
2e80: 49 6e 64 65 78 4f 62 6a 2e 6f 20 74 63 6c 49 6e IndexObj.o tclIn
2e90: 74 65 72 70 2e 6f 20 74 63 6c 49 4f 2e 6f 20 74 terp.o tclIO.o t
2ea0: 63 6c 49 4f 43 6d 64 2e 6f 20 5c 0a 20 09 74 63 clIOCmd.o \. .tc
2eb0: 6c 49 4f 47 54 2e 6f 20 74 63 6c 49 4f 53 6f 63 lIOGT.o tclIOSoc
2ec0: 6b 2e 6f 20 74 63 6c 49 4f 55 74 69 6c 2e 6f 20 k.o tclIOUtil.o
2ed0: 74 63 6c 4c 69 6e 6b 2e 6f 20 74 63 6c 4c 69 73 tclLink.o tclLis
2ee0: 74 4f 62 6a 2e 6f 20 5c 0a 40 40 20 2d 33 35 35 tObj.o \.@@ -355
2ef0: 2c 36 20 2b 33 35 35 2c 37 20 40 40 0a 20 09 24 ,6 +355,7 @@. .$
2f00: 28 47 45 4e 45 52 49 43 5f 44 49 52 29 2f 74 63 (GENERIC_DIR)/tc
2f10: 6c 43 6f 6d 70 45 78 70 72 2e 63 20 5c 0a 20 09 lCompExpr.c \. .
2f20: 24 28 47 45 4e 45 52 49 43 5f 44 49 52 29 2f 74 $(GENERIC_DIR)/t
2f30: 63 6c 43 6f 6d 70 69 6c 65 2e 63 20 5c 0a 20 09 clCompile.c \. .
2f40: 24 28 47 45 4e 45 52 49 43 5f 44 49 52 29 2f 74 $(GENERIC_DIR)/t
2f50: 63 6c 44 61 74 65 2e 63 20 5c 0a 2b 09 24 28 47 clDate.c \.+.$(G
2f60: 45 4e 45 52 49 43 5f 44 49 52 29 2f 74 63 6c 44 ENERIC_DIR)/tclD
2f70: 69 63 74 4f 62 6a 2e 63 20 5c 0a 20 09 24 28 47 ictObj.c \. .$(G
2f80: 45 4e 45 52 49 43 5f 44 49 52 29 2f 74 63 6c 45 ENERIC_DIR)/tclE
2f90: 6e 63 6f 64 69 6e 67 2e 63 20 5c 0a 20 09 24 28 ncoding.c \. .$(
2fa0: 47 45 4e 45 52 49 43 5f 44 49 52 29 2f 74 63 6c GENERIC_DIR)/tcl
2fb0: 45 6e 76 2e 63 20 5c 0a 20 09 24 28 47 45 4e 45 Env.c \. .$(GENE
2fc0: 52 49 43 5f 44 49 52 29 2f 74 63 6c 45 76 65 6e RIC_DIR)/tclEven
2fd0: 74 2e 63 20 5c 0a 40 40 20 2d 38 33 34 2c 36 20 t.c \.@@ -834,6
2fe0: 2b 38 33 35 2c 39 20 40 40 0a 20 0a 20 74 63 6c +835,9 @@. . tcl
2ff0: 43 6f 6d 70 69 6c 65 2e 6f 3a 20 24 28 47 45 4e Compile.o: $(GEN
3000: 45 52 49 43 5f 44 49 52 29 2f 74 63 6c 43 6f 6d ERIC_DIR)/tclCom
3010: 70 69 6c 65 2e 63 0a 20 09 24 28 43 43 29 20 2d pile.c. .$(CC) -
3020: 63 20 24 28 43 43 5f 53 57 49 54 43 48 45 53 29 c $(CC_SWITCHES)
3030: 20 24 28 47 45 4e 45 52 49 43 5f 44 49 52 29 2f $(GENERIC_DIR)/
3040: 74 63 6c 43 6f 6d 70 69 6c 65 2e 63 0a 2b 0a 2b tclCompile.c.+.+
3050: 74 63 6c 44 69 63 74 4f 62 6a 2e 6f 3a 20 24 28 tclDictObj.o: $(
3060: 47 45 4e 45 52 49 43 5f 44 49 52 29 2f 74 63 6c GENERIC_DIR)/tcl
3070: 44 69 63 74 4f 62 6a 2e 63 0a 2b 09 24 28 43 43 DictObj.c.+.$(CC
3080: 29 20 2d 63 20 24 28 43 43 5f 53 57 49 54 43 48 ) -c $(CC_SWITCH
3090: 45 53 29 20 24 28 47 45 4e 45 52 49 43 5f 44 49 ES) $(GENERIC_DI
30a0: 52 29 2f 74 63 6c 44 69 63 74 4f 62 6a 2e 63 0a R)/tclDictObj.c.
30b0: 20 0a 20 74 63 6c 45 6e 63 6f 64 69 6e 67 2e 6f . tclEncoding.o
30c0: 3a 20 24 28 47 45 4e 45 52 49 43 5f 44 49 52 29 : $(GENERIC_DIR)
30d0: 2f 74 63 6c 45 6e 63 6f 64 69 6e 67 2e 63 0a 20 /tclEncoding.c.
30e0: 09 24 28 43 43 29 20 2d 63 20 24 28 43 43 5f 53 .$(CC) -c $(CC_S
30f0: 57 49 54 43 48 45 53 29 20 24 28 47 45 4e 45 52 WITCHES) $(GENER
3100: 49 43 5f 44 49 52 29 2f 74 63 6c 45 6e 63 6f 64 IC_DIR)/tclEncod
3110: 69 6e 67 2e 63 0a ing.c.
