Tcl Source Code

Hex Artifact Content
Login

Artifact f6e98ecd7408ab2a4c3af8618f2ab502d18399d4:

Attachment "809825.patch" to ticket [809825ffff] added by kennykb 2003-10-21 04:34:18.
0000: 49 6e 64 65 78 3a 20 64 6f 63 2f 6d 73 67 63 61  Index: doc/msgca
0010: 74 2e 6e 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  t.n.============
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 0a 52 43 53 20 66 69 6c 65  =======.RCS file
0060: 3a 20 2f 63 76 73 72 6f 6f 74 2f 74 63 6c 2f 74  : /cvsroot/tcl/t
0070: 63 6c 2f 64 6f 63 2f 6d 73 67 63 61 74 2e 6e 2c  cl/doc/msgcat.n,
0080: 76 0a 72 65 74 72 69 65 76 69 6e 67 20 72 65 76  v.retrieving rev
0090: 69 73 69 6f 6e 20 31 2e 31 36 0a 64 69 66 66 20  ision 1.16.diff 
00a0: 2d 62 20 2d 75 20 2d 72 31 2e 31 36 20 6d 73 67  -b -u -r1.16 msg
00b0: 63 61 74 2e 6e 0a 2d 2d 2d 20 64 6f 63 2f 6d 73  cat.n.--- doc/ms
00c0: 67 63 61 74 2e 6e 09 31 20 4a 75 6c 20 32 30 30  gcat.n.1 Jul 200
00d0: 32 20 31 38 3a 32 34 3a 33 39 20 2d 30 30 30 30  2 18:24:39 -0000
00e0: 09 31 2e 31 36 0a 2b 2b 2b 20 64 6f 63 2f 6d 73  .1.16.+++ doc/ms
00f0: 67 63 61 74 2e 6e 09 32 30 20 4f 63 74 20 32 30  gcat.n.20 Oct 20
0100: 30 33 20 32 31 3a 32 36 3a 32 30 20 2d 30 30 30  03 21:26:20 -000
0110: 30 0a 40 40 20 2d 37 2c 37 20 2b 37 2c 37 20 40  0.@@ -7,7 +7,7 @
0120: 40 0a 20 27 5c 22 20 53 43 43 53 3a 20 40 28 23  @. '\" SCCS: @(#
0130: 29 20 6d 73 67 63 61 74 2e 6e 0a 20 27 5c 22 20  ) msgcat.n. '\" 
0140: 0a 20 2e 73 6f 20 6d 61 6e 2e 6d 61 63 72 6f 73  . .so man.macros
0150: 0a 2d 2e 54 48 20 22 6d 73 67 63 61 74 22 20 6e  .-.TH "msgcat" n
0160: 20 31 2e 33 20 6d 73 67 63 61 74 20 22 54 63 6c   1.3 msgcat "Tcl
0170: 20 42 75 6e 64 6c 65 64 20 50 61 63 6b 61 67 65   Bundled Package
0180: 73 22 0a 2b 2e 54 48 20 22 6d 73 67 63 61 74 22  s".+.TH "msgcat"
0190: 20 6e 20 31 2e 34 20 6d 73 67 63 61 74 20 22 54   n 1.4 msgcat "T
01a0: 63 6c 20 42 75 6e 64 6c 65 64 20 50 61 63 6b 61  cl Bundled Packa
01b0: 67 65 73 22 0a 20 2e 42 53 0a 20 27 5c 22 20 4e  ges". .BS. '\" N
01c0: 6f 74 65 3a 20 20 64 6f 20 6e 6f 74 20 6d 6f 64  ote:  do not mod
01d0: 69 66 79 20 74 68 65 20 2e 53 48 20 4e 41 4d 45  ify the .SH NAME
01e0: 20 6c 69 6e 65 20 69 6d 6d 65 64 69 61 74 65 6c   line immediatel
01f0: 79 20 62 65 6c 6f 77 21 0a 20 2e 53 48 20 4e 41  y below!. .SH NA
0200: 4d 45 0a 40 40 20 2d 31 35 2c 37 20 2b 31 35 2c  ME.@@ -15,7 +15,
0210: 37 20 40 40 0a 20 2e 53 48 20 53 59 4e 4f 50 53  7 @@. .SH SYNOPS
0220: 49 53 0a 20 5c 66 42 70 61 63 6b 61 67 65 20 72  IS. \fBpackage r
0230: 65 71 75 69 72 65 20 54 63 6c 20 38 2e 32 5c 66  equire Tcl 8.2\f
0240: 52 0a 20 2e 73 70 0a 2d 5c 66 42 70 61 63 6b 61  R. .sp.-\fBpacka
0250: 67 65 20 72 65 71 75 69 72 65 20 6d 73 67 63 61  ge require msgca
0260: 74 20 31 2e 33 5c 66 52 0a 2b 5c 66 42 70 61 63  t 1.3\fR.+\fBpac
0270: 6b 61 67 65 20 72 65 71 75 69 72 65 20 6d 73 67  kage require msg
0280: 63 61 74 20 31 2e 34 5c 66 52 0a 20 2e 73 70 0a  cat 1.4\fR. .sp.
0290: 20 5c 66 42 3a 3a 6d 73 67 63 61 74 3a 3a 6d 63   \fB::msgcat::mc
02a0: 20 5c 66 49 73 72 63 2d 73 74 72 69 6e 67 5c 66   \fIsrc-string\f
02b0: 52 20 3f 5c 66 49 61 72 67 20 61 72 67 20 2e 2e  R ?\fIarg arg ..
02c0: 2e 5c 66 52 3f 0a 20 2e 73 70 0a 40 40 20 2d 39  .\fR?. .sp.@@ -9
02d0: 34 2c 37 20 2b 39 34 2c 39 20 40 40 0a 20 6c 6f  4,7 +94,9 @@. lo
02e0: 63 61 6c 65 20 73 65 74 20 69 6e 20 6d 73 67 63  cale set in msgc
02f0: 61 74 20 62 79 20 5c 66 42 6d 73 67 63 61 74 3a  at by \fBmsgcat:
0300: 3a 6d 63 6c 6f 63 61 6c 65 5c 66 52 2c 20 61 6e  :mclocale\fR, an
0310: 64 0a 20 63 61 6e 6e 6f 74 20 62 65 20 73 65 74  d. cannot be set
0320: 20 69 6e 64 65 70 65 6e 64 65 6e 74 6c 79 2e 20   independently. 
0330: 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 69 66   For example, if
0340: 20 74 68 65 0a 20 63 75 72 72 65 6e 74 20 6c 6f   the. current lo
0350: 63 61 6c 65 20 69 73 20 65 6e 5f 55 53 5f 66 75  cale is en_US_fu
0360: 6e 6b 79 2c 20 74 68 65 6e 20 5c 66 42 6d 73 67  nky, then \fBmsg
0370: 63 61 74 3a 3a 6d 63 70 72 65 66 65 72 65 6e 63  cat::mcpreferenc
0380: 65 73 5c 66 52 0a 2d 72 65 74 75 72 6e 73 20 7b  es\fR.-returns {
0390: 65 6e 5f 55 53 5f 66 75 6e 6b 79 20 65 6e 5f 55  en_US_funky en_U
03a0: 53 20 65 6e 7d 2e 0a 2b 2e 56 53 20 31 2e 34 0a  S en}..+.VS 1.4.
03b0: 2b 72 65 74 75 72 6e 73 20 5c 66 42 7b 65 6e 5f  +returns \fB{en_
03c0: 55 53 5f 66 75 6e 6b 79 20 65 6e 5f 55 53 20 65  US_funky en_US e
03d0: 6e 20 7b 7d 7d 5c 66 52 2e 0a 2b 2e 56 45 0a 20  n {}}\fR..+.VE. 
03e0: 2e 54 50 0a 20 5c 66 42 3a 3a 6d 73 67 63 61 74  .TP. \fB::msgcat
03f0: 3a 3a 6d 63 6c 6f 61 64 20 5c 66 49 64 69 72 6e  ::mcload \fIdirn
0400: 61 6d 65 5c 66 52 0a 20 53 65 61 72 63 68 65 73  ame\fR. Searches
0410: 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 64   the specified d
0420: 69 72 65 63 74 6f 72 79 20 66 6f 72 20 66 69 6c  irectory for fil
0430: 65 73 20 74 68 61 74 20 6d 61 74 63 68 0a 40 40  es that match.@@
0440: 20 2d 31 36 37 2c 31 30 20 2b 31 36 39 2c 31 33   -167,10 +169,13
0450: 20 40 40 0a 20 2e 50 50 0a 20 57 68 65 6e 20 61   @@. .PP. When a
0460: 20 6c 6f 63 61 6c 65 20 69 73 20 73 70 65 63 69   locale is speci
0470: 66 69 65 64 20 62 79 20 74 68 65 20 75 73 65 72  fied by the user
0480: 2c 20 61 20 60 60 62 65 73 74 20 6d 61 74 63 68  , a ``best match
0490: 27 27 20 73 65 61 72 63 68 20 69 73 0a 20 70 65  '' search is. pe
04a0: 72 66 6f 72 6d 65 64 20 64 75 72 69 6e 67 20 73  rformed during s
04b0: 74 72 69 6e 67 20 74 72 61 6e 73 6c 61 74 69 6f  tring translatio
04c0: 6e 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c  n.  For example,
04d0: 20 69 66 20 61 20 75 73 65 72 20 73 70 65 63 69   if a user speci
04e0: 66 69 65 73 0a 2d 65 6e 5f 47 42 5f 46 75 6e 6b  fies.-en_GB_Funk
04f0: 79 2c 20 74 68 65 20 6c 6f 63 61 6c 65 73 20 60  y, the locales `
0500: 60 65 6e 5f 47 42 5f 46 75 6e 6b 79 27 27 2c 20  `en_GB_Funky'', 
0510: 60 60 65 6e 5f 47 42 27 27 2c 20 61 6e 64 20 60  ``en_GB'', and `
0520: 60 65 6e 27 27 20 61 72 65 0a 2d 73 65 61 72 63  `en'' are.-searc
0530: 68 65 64 20 69 6e 20 6f 72 64 65 72 20 75 6e 74  hed in order unt
0540: 69 6c 20 61 20 6d 61 74 63 68 69 6e 67 20 74 72  il a matching tr
0550: 61 6e 73 6c 61 74 69 6f 6e 20 73 74 72 69 6e 67  anslation string
0560: 20 69 73 20 66 6f 75 6e 64 2e 20 20 49 66 20 6e   is found.  If n
0570: 6f 0a 2d 74 72 61 6e 73 6c 61 74 69 6f 6e 20 73  o.-translation s
0580: 74 72 69 6e 67 20 69 73 20 61 76 61 69 6c 61 62  tring is availab
0590: 6c 65 2c 20 74 68 65 6e 20 5c 66 42 3a 3a 6d 73  le, then \fB::ms
05a0: 67 63 61 74 3a 3a 75 6e 6b 6e 6f 77 6e 5c 66 52  gcat::unknown\fR
05b0: 20 69 73 0a 2d 63 61 6c 6c 65 64 2e 0a 2b 2e 56   is.-called..+.V
05c0: 53 20 31 2e 34 0a 2b 65 6e 5f 47 42 5f 46 75 6e  S 1.4.+en_GB_Fun
05d0: 6b 79 2c 20 74 68 65 20 6c 6f 63 61 6c 65 73 20  ky, the locales 
05e0: 60 60 65 6e 5f 47 42 5f 46 75 6e 6b 79 27 27 2c  ``en_GB_Funky'',
05f0: 20 60 60 65 6e 5f 47 42 27 27 2c 20 60 60 65 6e   ``en_GB'', ``en
0600: 27 27 20 61 6e 64 20 60 60 27 27 0a 2b 28 74 68  '' and ``''.+(th
0610: 65 20 65 6d 70 74 79 20 73 74 72 69 6e 67 29 0a  e empty string).
0620: 2b 2e 56 45 0a 2b 61 72 65 20 73 65 61 72 63 68  +.VE.+are search
0630: 65 64 20 69 6e 20 6f 72 64 65 72 20 75 6e 74 69  ed in order unti
0640: 6c 20 61 20 6d 61 74 63 68 69 6e 67 20 74 72 61  l a matching tra
0650: 6e 73 6c 61 74 69 6f 6e 0a 2b 73 74 72 69 6e 67  nslation.+string
0660: 20 69 73 20 66 6f 75 6e 64 2e 20 20 49 66 20 6e   is found.  If n
0670: 6f 20 74 72 61 6e 73 6c 61 74 69 6f 6e 20 73 74  o translation st
0680: 72 69 6e 67 20 69 73 20 61 76 61 69 6c 61 62 6c  ring is availabl
0690: 65 2c 20 74 68 65 6e 0a 2b 5c 66 42 3a 3a 6d 73  e, then.+\fB::ms
06a0: 67 63 61 74 3a 3a 75 6e 6b 6e 6f 77 6e 5c 66 52  gcat::unknown\fR
06b0: 20 69 73 20 63 61 6c 6c 65 64 2e 0a 20 0a 20 2e   is called.. . .
06c0: 53 48 20 22 4e 41 4d 45 53 50 41 43 45 53 20 41  SH "NAMESPACES A
06d0: 4e 44 20 4d 45 53 53 41 47 45 20 43 41 54 41 4c  ND MESSAGE CATAL
06e0: 4f 47 53 22 0a 20 2e 50 50 0a 40 40 20 2d 32 33  OGS". .PP.@@ -23
06f0: 36 2c 36 20 2b 32 34 31 2c 31 32 20 40 40 0a 20  6,6 +241,12 @@. 
0700: 65 73 2e 6d 73 67 20 20 20 20 2d 2d 20 73 70 61  es.msg    -- spa
0710: 6e 69 73 68 0a 20 65 6e 5f 67 62 2e 6d 73 67 20  nish. en_gb.msg 
0720: 2d 2d 20 55 6e 69 74 65 64 20 4b 69 6e 67 64 6f  -- United Kingdo
0730: 6d 20 45 6e 67 6c 69 73 68 0a 20 2e 43 45 0a 2b  m English. .CE.+
0740: 2e 56 53 0a 2b 5c 66 49 45 78 63 65 70 74 69 6f  .VS.+\fIExceptio
0750: 6e 3a 5c 66 52 20 54 68 65 20 6d 65 73 73 61 67  n:\fR The messag
0760: 65 20 66 69 6c 65 20 66 6f 72 20 74 68 65 20 72  e file for the r
0770: 6f 6f 74 20 6c 6f 63 61 6c 65 20 60 60 27 27 20  oot locale ``'' 
0780: 69 73 0a 2b 63 61 6c 6c 65 64 20 5c 66 42 52 4f  is.+called \fBRO
0790: 4f 54 2e 6d 73 67 5c 66 52 2e 20 20 54 68 69 73  OT.msg\fR.  This
07a0: 20 65 78 63 65 70 74 69 6f 6e 20 69 73 20 6d 61   exception is ma
07b0: 64 65 20 73 6f 20 61 73 20 6e 6f 74 20 74 6f 0a  de so as not to.
07c0: 2b 63 61 75 73 65 20 70 65 63 75 6c 69 61 72 20  +cause peculiar 
07d0: 62 65 68 61 76 69 6f 72 2c 20 73 75 63 68 20 61  behavior, such a
07e0: 73 20 6d 61 72 6b 69 6e 67 20 74 68 65 20 6d 65  s marking the me
07f0: 73 73 61 67 65 20 66 69 6c 65 20 61 73 0a 2b 60  ssage file as.+`
0800: 60 68 69 64 64 65 6e 27 27 20 6f 6e 20 55 6e 69  `hidden'' on Uni
0810: 78 20 66 69 6c 65 20 73 79 73 74 65 6d 73 2e 0a  x file systems..
0820: 2b 2e 56 45 0a 20 2e 49 50 20 5b 33 5d 0a 20 54  +.VE. .IP [3]. T
0830: 68 65 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73  he file contains
0840: 20 61 20 73 65 72 69 65 73 20 6f 66 20 63 61 6c   a series of cal
0850: 6c 73 20 74 6f 20 5c 66 42 6d 63 73 65 74 5c 66  ls to \fBmcset\f
0860: 52 20 61 6e 64 0a 20 5c 66 42 6d 63 6d 73 65 74  R and. \fBmcmset
0870: 5c 66 52 2c 20 73 65 74 74 69 6e 67 20 74 68 65  \fR, setting the
0880: 20 6e 65 63 65 73 73 61 72 79 20 74 72 61 6e 73   necessary trans
0890: 6c 61 74 69 6f 6e 20 73 74 72 69 6e 67 73 0a 49  lation strings.I
08a0: 6e 64 65 78 3a 20 6c 69 62 72 61 72 79 2f 6d 73  ndex: library/ms
08b0: 67 63 61 74 2f 6d 73 67 63 61 74 2e 74 63 6c 0a  gcat/msgcat.tcl.
08c0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
08d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
08e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
08f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0900: 3d 3d 3d 0a 52 43 53 20 66 69 6c 65 3a 20 2f 63  ===.RCS file: /c
0910: 76 73 72 6f 6f 74 2f 74 63 6c 2f 74 63 6c 2f 6c  vsroot/tcl/tcl/l
0920: 69 62 72 61 72 79 2f 6d 73 67 63 61 74 2f 6d 73  ibrary/msgcat/ms
0930: 67 63 61 74 2e 74 63 6c 2c 76 0a 72 65 74 72 69  gcat.tcl,v.retri
0940: 65 76 69 6e 67 20 72 65 76 69 73 69 6f 6e 20 31  eving revision 1
0950: 2e 31 38 0a 64 69 66 66 20 2d 62 20 2d 75 20 2d  .18.diff -b -u -
0960: 72 31 2e 31 38 20 6d 73 67 63 61 74 2e 74 63 6c  r1.18 msgcat.tcl
0970: 0a 2d 2d 2d 20 6c 69 62 72 61 72 79 2f 6d 73 67  .--- library/msg
0980: 63 61 74 2f 6d 73 67 63 61 74 2e 74 63 6c 09 36  cat/msgcat.tcl.6
0990: 20 41 75 67 20 32 30 30 33 20 32 33 3a 30 32 3a   Aug 2003 23:02:
09a0: 30 35 20 2d 30 30 30 30 09 31 2e 31 38 0a 2b 2b  05 -0000.1.18.++
09b0: 2b 20 6c 69 62 72 61 72 79 2f 6d 73 67 63 61 74  + library/msgcat
09c0: 2f 6d 73 67 63 61 74 2e 74 63 6c 09 32 30 20 4f  /msgcat.tcl.20 O
09d0: 63 74 20 32 30 30 33 20 32 31 3a 32 36 3a 32 30  ct 2003 21:26:20
09e0: 20 2d 30 30 30 30 0a 40 40 20 2d 31 35 2c 37 20   -0000.@@ -15,7 
09f0: 2b 31 35 2c 37 20 40 40 0a 20 70 61 63 6b 61 67  +15,7 @@. packag
0a00: 65 20 72 65 71 75 69 72 65 20 54 63 6c 20 38 2e  e require Tcl 8.
0a10: 32 0a 20 23 20 57 68 65 6e 20 74 68 65 20 76 65  2. # When the ve
0a20: 72 73 69 6f 6e 20 6e 75 6d 62 65 72 20 63 68 61  rsion number cha
0a30: 6e 67 65 73 2c 20 62 65 20 73 75 72 65 20 74 6f  nges, be sure to
0a40: 20 75 70 64 61 74 65 20 74 68 65 20 70 6b 67 49   update the pkgI
0a50: 6e 64 65 78 2e 74 63 6c 20 66 69 6c 65 2c 0a 20  ndex.tcl file,. 
0a60: 23 20 61 6e 64 20 74 68 65 20 69 6e 73 74 61 6c  # and the instal
0a70: 6c 61 74 69 6f 6e 20 64 69 72 65 63 74 6f 72 79  lation directory
0a80: 20 69 6e 20 74 68 65 20 4d 61 6b 65 66 69 6c 65   in the Makefile
0a90: 73 2e 0a 2d 70 61 63 6b 61 67 65 20 70 72 6f 76  s..-package prov
0aa0: 69 64 65 20 6d 73 67 63 61 74 20 31 2e 33 2e 31  ide msgcat 1.3.1
0ab0: 0a 2b 70 61 63 6b 61 67 65 20 70 72 6f 76 69 64  .+package provid
0ac0: 65 20 6d 73 67 63 61 74 20 31 2e 34 0a 20 0a 20  e msgcat 1.4. . 
0ad0: 6e 61 6d 65 73 70 61 63 65 20 65 76 61 6c 20 6d  namespace eval m
0ae0: 73 67 63 61 74 20 7b 0a 20 20 20 20 20 6e 61 6d  sgcat {.     nam
0af0: 65 73 70 61 63 65 20 65 78 70 6f 72 74 20 6d 63  espace export mc
0b00: 20 6d 63 6c 6f 61 64 20 6d 63 6c 6f 63 61 6c 65   mcload mclocale
0b10: 20 6d 63 6d 61 78 20 6d 63 6d 73 65 74 20 6d 63   mcmax mcmset mc
0b20: 70 72 65 66 65 72 65 6e 63 65 73 20 6d 63 73 65  preferences mcse
0b30: 74 20 5c 0a 40 40 20 2d 32 33 34 2c 36 20 2b 32  t \.@@ -234,6 +2
0b40: 33 34 2c 37 20 40 40 0a 20 09 20 20 20 20 73 65  34,7 @@. .    se
0b50: 74 20 77 6f 72 64 20 5b 73 74 72 69 6e 67 20 74  t word [string t
0b60: 72 69 6d 6c 65 66 74 20 22 24 7b 77 6f 72 64 7d  rimleft "${word}
0b70: 5f 24 7b 70 61 72 74 7d 22 20 5f 5d 0a 20 09 20  _${part}" _]. . 
0b80: 20 20 20 73 65 74 20 4c 6f 63 6c 69 73 74 20 5b     set Loclist [
0b90: 6c 69 6e 73 65 72 74 20 24 4c 6f 63 6c 69 73 74  linsert $Loclist
0ba0: 20 30 20 24 77 6f 72 64 5d 0a 20 09 7d 0a 2b 09   0 $word]. .}.+.
0bb0: 6c 61 70 70 65 6e 64 20 4c 6f 63 6c 69 73 74 20  lappend Loclist 
0bc0: 7b 7d 0a 20 20 20 20 20 7d 0a 20 20 20 20 20 72  {}.     }.     r
0bd0: 65 74 75 72 6e 20 24 4c 6f 63 61 6c 65 0a 20 7d  eturn $Locale. }
0be0: 0a 40 40 20 2d 32 36 38 2c 36 20 2b 32 36 39 2c  .@@ -268,6 +269,
0bf0: 39 20 40 40 0a 20 70 72 6f 63 20 6d 73 67 63 61  9 @@. proc msgca
0c00: 74 3a 3a 6d 63 6c 6f 61 64 20 7b 6c 61 6e 67 64  t::mcload {langd
0c10: 69 72 7d 20 7b 0a 20 20 20 20 20 73 65 74 20 78  ir} {.     set x
0c20: 20 30 0a 20 20 20 20 20 66 6f 72 65 61 63 68 20   0.     foreach 
0c30: 70 20 5b 6d 63 70 72 65 66 65 72 65 6e 63 65 73  p [mcpreferences
0c40: 5d 20 7b 0a 2b 09 69 66 20 7b 20 24 70 20 65 71  ] {.+.if { $p eq
0c50: 20 7b 7d 20 7d 20 7b 0a 2b 09 20 20 20 20 73 65   {} } {.+.    se
0c60: 74 20 70 20 52 4f 4f 54 0a 2b 20 20 20 20 20 20  t p ROOT.+      
0c70: 20 20 7d 0a 20 09 73 65 74 20 6c 61 6e 67 66 69    }. .set langfi
0c80: 6c 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 6c  le [file join $l
0c90: 61 6e 67 64 69 72 20 24 70 2e 6d 73 67 5d 0a 20  angdir $p.msg]. 
0ca0: 09 69 66 20 7b 5b 66 69 6c 65 20 65 78 69 73 74  .if {[file exist
0cb0: 73 20 24 6c 61 6e 67 66 69 6c 65 5d 7d 20 7b 0a  s $langfile]} {.
0cc0: 20 09 20 20 20 20 69 6e 63 72 20 78 0a 49 6e 64   .    incr x.Ind
0cd0: 65 78 3a 20 74 65 73 74 73 2f 6d 73 67 63 61 74  ex: tests/msgcat
0ce0: 2e 74 65 73 74 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  .test.==========
0cf0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0d00: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0d10: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0d20: 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 20 66 69  =========.RCS fi
0d30: 6c 65 3a 20 2f 63 76 73 72 6f 6f 74 2f 74 63 6c  le: /cvsroot/tcl
0d40: 2f 74 63 6c 2f 74 65 73 74 73 2f 6d 73 67 63 61  /tcl/tests/msgca
0d50: 74 2e 74 65 73 74 2c 76 0a 72 65 74 72 69 65 76  t.test,v.retriev
0d60: 69 6e 67 20 72 65 76 69 73 69 6f 6e 20 31 2e 31  ing revision 1.1
0d70: 32 0a 64 69 66 66 20 2d 62 20 2d 75 20 2d 72 31  2.diff -b -u -r1
0d80: 2e 31 32 20 6d 73 67 63 61 74 2e 74 65 73 74 0a  .12 msgcat.test.
0d90: 2d 2d 2d 20 74 65 73 74 73 2f 6d 73 67 63 61 74  --- tests/msgcat
0da0: 2e 74 65 73 74 09 32 36 20 4d 61 72 20 32 30 30  .test.26 Mar 200
0db0: 33 20 32 32 3a 35 35 3a 34 34 20 2d 30 30 30 30  3 22:55:44 -0000
0dc0: 09 31 2e 31 32 0a 2b 2b 2b 20 74 65 73 74 73 2f  .1.12.+++ tests/
0dd0: 6d 73 67 63 61 74 2e 74 65 73 74 09 32 30 20 4f  msgcat.test.20 O
0de0: 63 74 20 32 30 30 33 20 32 31 3a 32 36 3a 32 30  ct 2003 21:26:20
0df0: 20 2d 30 30 30 30 0a 40 40 20 2d 31 39 2c 38 20   -0000.@@ -19,8 
0e00: 2b 31 39 2c 38 20 40 40 0a 20 20 20 20 20 70 75  +19,8 @@.     pu
0e10: 74 73 20 73 74 64 65 72 72 20 22 53 6b 69 70 70  ts stderr "Skipp
0e20: 69 6e 67 20 74 65 73 74 73 20 69 6e 20 5b 69 6e  ing tests in [in
0e30: 66 6f 20 73 63 72 69 70 74 5d 2e 20 20 74 63 6c  fo script].  tcl
0e40: 74 65 73 74 20 32 20 72 65 71 75 69 72 65 64 2e  test 2 required.
0e50: 22 0a 20 20 20 20 20 72 65 74 75 72 6e 0a 20 7d  ".     return. }
0e60: 0a 2d 69 66 20 7b 5b 63 61 74 63 68 20 7b 70 61  .-if {[catch {pa
0e70: 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 6d 73  ckage require ms
0e80: 67 63 61 74 20 31 2e 33 7d 5d 7d 20 7b 0a 2d 20  gcat 1.3}]} {.- 
0e90: 20 20 20 70 75 74 73 20 73 74 64 65 72 72 20 22     puts stderr "
0ea0: 53 6b 69 70 70 69 6e 67 20 74 65 73 74 73 20 69  Skipping tests i
0eb0: 6e 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d 2e  n [info script].
0ec0: 20 20 4e 6f 20 6d 73 67 63 61 74 20 31 2e 33 20    No msgcat 1.3 
0ed0: 66 6f 75 6e 64 20 74 6f 20 74 65 73 74 2e 22 0a  found to test.".
0ee0: 2b 69 66 20 7b 5b 63 61 74 63 68 20 7b 70 61 63  +if {[catch {pac
0ef0: 6b 61 67 65 20 72 65 71 75 69 72 65 20 6d 73 67  kage require msg
0f00: 63 61 74 20 31 2e 34 7d 5d 7d 20 7b 0a 2b 20 20  cat 1.4}]} {.+  
0f10: 20 20 70 75 74 73 20 73 74 64 65 72 72 20 22 53    puts stderr "S
0f20: 6b 69 70 70 69 6e 67 20 74 65 73 74 73 20 69 6e  kipping tests in
0f30: 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d 2e 20   [info script]. 
0f40: 20 4e 6f 20 6d 73 67 63 61 74 20 31 2e 34 20 66   No msgcat 1.4 f
0f50: 6f 75 6e 64 20 74 6f 20 74 65 73 74 2e 22 0a 20  ound to test.". 
0f60: 20 20 20 20 72 65 74 75 72 6e 0a 20 7d 0a 20 0a      return. }. .
0f70: 40 40 20 2d 31 31 31 2c 37 20 2b 31 31 31 2c 37  @@ -111,7 +111,7
0f80: 20 40 40 0a 20 09 6d 63 6c 6f 63 61 6c 65 20 24   @@. .mclocale $
0f90: 6c 6f 63 61 6c 65 0a 20 20 20 20 20 7d 20 2d 62  locale.     } -b
0fa0: 6f 64 79 20 7b 0a 20 09 6d 63 70 72 65 66 65 72  ody {. .mcprefer
0fb0: 65 6e 63 65 73 0a 2d 20 20 20 20 7d 20 2d 72 65  ences.-    } -re
0fc0: 73 75 6c 74 20 65 6e 0a 2b 20 20 20 20 7d 20 2d  sult en.+    } -
0fd0: 72 65 73 75 6c 74 20 7b 65 6e 20 7b 7d 7d 0a 20  result {en {}}. 
0fe0: 0a 20 20 20 20 20 74 65 73 74 20 6d 73 67 63 61  .     test msgca
0ff0: 74 2d 31 2e 36 20 7b 6d 63 6c 6f 63 61 6c 65 20  t-1.6 {mclocale 
1000: 73 65 74 2c 20 74 77 6f 20 65 6c 65 6d 65 6e 74  set, two element
1010: 73 7d 20 2d 73 65 74 75 70 20 7b 0a 20 09 76 61  s} -setup {. .va
1020: 72 69 61 62 6c 65 20 6c 6f 63 61 6c 65 20 5b 6d  riable locale [m
1030: 63 6c 6f 63 61 6c 65 5d 0a 40 40 20 2d 31 33 37  clocale].@@ -137
1040: 2c 37 20 2b 31 33 37 2c 37 20 40 40 0a 20 09 6d  ,7 +137,7 @@. .m
1050: 63 6c 6f 63 61 6c 65 20 24 6c 6f 63 61 6c 65 0a  clocale $locale.
1060: 20 20 20 20 20 7d 20 2d 62 6f 64 79 20 7b 0a 20       } -body {. 
1070: 09 6d 63 70 72 65 66 65 72 65 6e 63 65 73 0a 2d  .mcpreferences.-
1080: 20 20 20 20 7d 20 2d 72 65 73 75 6c 74 20 7b 65      } -result {e
1090: 6e 5f 75 73 20 65 6e 7d 0a 2b 20 20 20 20 7d 20  n_us en}.+    } 
10a0: 2d 72 65 73 75 6c 74 20 7b 65 6e 5f 75 73 20 65  -result {en_us e
10b0: 6e 20 7b 7d 7d 0a 20 0a 20 20 20 20 20 74 65 73  n {}}. .     tes
10c0: 74 20 6d 73 67 63 61 74 2d 31 2e 39 20 7b 6d 63  t msgcat-1.9 {mc
10d0: 6c 6f 63 61 6c 65 20 73 65 74 2c 20 74 68 72 65  locale set, thre
10e0: 65 20 65 6c 65 6d 65 6e 74 73 7d 20 2d 73 65 74  e elements} -set
10f0: 75 70 20 7b 0a 20 09 76 61 72 69 61 62 6c 65 20  up {. .variable 
1100: 6c 6f 63 61 6c 65 20 5b 6d 63 6c 6f 63 61 6c 65  locale [mclocale
1110: 5d 0a 40 40 20 2d 31 36 33 2c 37 20 2b 31 36 33  ].@@ -163,7 +163
1120: 2c 37 20 40 40 0a 20 09 6d 63 6c 6f 63 61 6c 65  ,7 @@. .mclocale
1130: 20 24 6c 6f 63 61 6c 65 0a 20 20 20 20 20 7d 20   $locale.     } 
1140: 2d 62 6f 64 79 20 7b 0a 20 09 6d 63 70 72 65 66  -body {. .mcpref
1150: 65 72 65 6e 63 65 73 0a 2d 20 20 20 20 7d 20 2d  erences.-    } -
1160: 72 65 73 75 6c 74 20 7b 65 6e 5f 75 73 5f 66 75  result {en_us_fu
1170: 6e 6b 79 20 65 6e 5f 75 73 20 65 6e 7d 0a 2b 20  nky en_us en}.+ 
1180: 20 20 20 7d 20 2d 72 65 73 75 6c 74 20 7b 65 6e     } -result {en
1190: 5f 75 73 5f 66 75 6e 6b 79 20 65 6e 5f 75 73 20  _us_funky en_us 
11a0: 65 6e 20 7b 7d 7d 0a 20 0a 20 20 20 20 20 23 20  en {}}. .     # 
11b0: 54 65 73 74 73 20 6d 73 67 63 61 74 2d 32 2e 2a  Tests msgcat-2.*
11c0: 3a 20 5b 6d 63 73 65 74 5d 2c 20 5b 6d 63 6d 73  : [mcset], [mcms
11d0: 65 74 5d 2c 20 6e 61 6d 65 73 70 61 63 65 20 70  et], namespace p
11e0: 61 72 74 69 74 69 6f 6e 69 6e 67 0a 20 0a 40 40  artitioning. .@@
11f0: 20 2d 32 34 36 2c 39 20 2b 32 34 36 2c 31 30 20   -246,9 +246,10 
1200: 40 40 0a 20 20 20 20 20 23 20 28 65 2e 67 2e 20  @@.     # (e.g. 
1210: 65 6e 5f 55 4b 29 20 77 69 6c 6c 20 73 65 61 72  en_UK) will sear
1220: 63 68 20 6c 65 73 73 20 73 70 65 63 69 66 69 63  ch less specific
1230: 20 6c 6f 63 61 6c 65 73 0a 20 20 20 20 20 23 20   locales.     # 
1240: 28 65 2e 67 2e 20 65 6e 29 20 66 6f 72 20 74 72  (e.g. en) for tr
1250: 61 6e 73 6c 61 74 69 6f 6e 20 73 74 72 69 6e 67  anslation string
1260: 73 2e 0a 20 20 20 20 20 23 0a 2d 20 20 20 20 23  s..     #.-    #
1270: 20 44 6f 20 74 68 69 73 20 66 6f 72 20 74 68 65   Do this for the
1280: 20 31 32 20 70 65 72 6d 75 74 61 74 69 6f 6e 73   12 permutations
1290: 20 6f 66 0a 2b 20 20 20 20 23 20 44 6f 20 74 68   of.+    # Do th
12a0: 69 73 20 66 6f 72 20 74 68 65 20 31 35 20 70 65  is for the 15 pe
12b0: 72 6d 75 74 61 74 69 6f 6e 73 20 6f 66 0a 20 20  rmutations of.  
12c0: 20 20 20 23 20 20 20 20 20 6c 6f 63 61 6c 65 73     #     locales
12d0: 3a 20 7b 66 6f 6f 20 66 6f 6f 5f 42 41 52 20 66  : {foo foo_BAR f
12e0: 6f 6f 5f 42 41 52 5f 62 61 7a 7d 0a 2d 20 20 20  oo_BAR_baz}.-   
12f0: 20 23 20 20 20 20 20 73 74 72 69 6e 67 73 3a 20   #     strings: 
1300: 7b 6f 76 31 20 6f 76 32 20 6f 76 33 20 6f 76 34  {ov1 ov2 ov3 ov4
1310: 7d 0a 2b 20 20 20 20 23 20 20 20 20 20 73 74 72  }.+    #     str
1320: 69 6e 67 73 3a 20 7b 6f 76 30 20 6f 76 31 20 6f  ings: {ov0 ov1 o
1330: 76 32 20 6f 76 33 20 6f 76 34 7d 0a 2b 20 20 20  v2 ov3 ov4}.+   
1340: 20 23 09 20 20 6c 6f 63 61 6c 65 20 52 4f 4f 54   #.  locale ROOT
1350: 20 20 20 20 20 20 20 20 64 65 66 69 6e 65 73 20          defines 
1360: 6f 76 30 2c 20 6f 76 31 2c 20 6f 76 32 2c 20 6f  ov0, ov1, ov2, o
1370: 76 33 0a 20 20 20 20 20 23 20 20 20 20 20 6c 6f  v3.     #     lo
1380: 63 61 6c 65 20 66 6f 6f 20 20 20 20 20 20 20 20  cale foo        
1390: 20 64 65 66 69 6e 65 73 20 6f 76 31 2c 20 6f 76   defines ov1, ov
13a0: 32 2c 20 6f 76 33 0a 20 20 20 20 20 23 20 20 20  2, ov3.     #   
13b0: 20 20 6c 6f 63 61 6c 65 20 66 6f 6f 5f 42 41 52    locale foo_BAR
13c0: 20 20 20 20 20 64 65 66 69 6e 65 73 20 20 20 20       defines    
13d0: 20 20 6f 76 32 2c 20 6f 76 33 0a 20 20 20 20 20    ov2, ov3.     
13e0: 23 20 20 20 20 20 6c 6f 63 61 6c 65 20 66 6f 6f  #     locale foo
13f0: 5f 42 41 52 5f 42 41 5a 20 64 65 66 69 6e 65 73  _BAR_BAZ defines
1400: 20 20 20 20 20 20 20 20 20 20 20 6f 76 33 0a 40             ov3.@
1410: 40 20 2d 32 36 34 2c 31 36 20 2b 32 36 35 2c 32  @ -264,16 +265,2
1420: 33 20 40 40 0a 20 20 20 20 20 76 61 72 69 61 62  3 @@.     variab
1430: 6c 65 20 63 6f 75 6e 74 20 32 0a 20 20 20 20 20  le count 2.     
1440: 76 61 72 69 61 62 6c 65 20 72 65 73 75 6c 74 0a  variable result.
1450: 20 20 20 20 20 61 72 72 61 79 20 73 65 74 20 72       array set r
1460: 65 73 75 6c 74 20 7b 0a 2d 09 66 6f 6f 2c 6f 76  esult {.-.foo,ov
1470: 31 20 6f 76 31 5f 66 6f 6f 20 66 6f 6f 2c 6f 76  1 ov1_foo foo,ov
1480: 32 20 6f 76 32 5f 66 6f 6f 20 66 6f 6f 2c 6f 76  2 ov2_foo foo,ov
1490: 33 20 6f 76 33 5f 66 6f 6f 20 66 6f 6f 2c 6f 76  3 ov3_foo foo,ov
14a0: 34 20 6f 76 34 0a 2d 09 66 6f 6f 5f 42 41 52 2c  4 ov4.-.foo_BAR,
14b0: 6f 76 31 20 6f 76 31 5f 66 6f 6f 20 66 6f 6f 5f  ov1 ov1_foo foo_
14c0: 42 41 52 2c 6f 76 32 20 6f 76 32 5f 66 6f 6f 5f  BAR,ov2 ov2_foo_
14d0: 42 41 52 20 66 6f 6f 5f 42 41 52 2c 6f 76 33 20  BAR foo_BAR,ov3 
14e0: 6f 76 33 5f 66 6f 6f 5f 42 41 52 0a 2d 09 66 6f  ov3_foo_BAR.-.fo
14f0: 6f 5f 42 41 52 2c 6f 76 34 20 6f 76 34 20 66 6f  o_BAR,ov4 ov4 fo
1500: 6f 5f 42 41 52 5f 62 61 7a 2c 6f 76 31 20 6f 76  o_BAR_baz,ov1 ov
1510: 31 5f 66 6f 6f 20 66 6f 6f 5f 42 41 52 5f 62 61  1_foo foo_BAR_ba
1520: 7a 2c 6f 76 32 20 6f 76 32 5f 66 6f 6f 5f 42 41  z,ov2 ov2_foo_BA
1530: 52 0a 2b 09 66 6f 6f 2c 6f 76 30 20 6f 76 30 5f  R.+.foo,ov0 ov0_
1540: 52 4f 4f 54 20 66 6f 6f 2c 6f 76 31 20 6f 76 31  ROOT foo,ov1 ov1
1550: 5f 66 6f 6f 20 66 6f 6f 2c 6f 76 32 20 6f 76 32  _foo foo,ov2 ov2
1560: 5f 66 6f 6f 20 0a 2b 20 20 20 20 20 20 20 20 66  _foo .+        f
1570: 6f 6f 2c 6f 76 33 20 6f 76 33 5f 66 6f 6f 20 66  oo,ov3 ov3_foo f
1580: 6f 6f 2c 6f 76 34 20 6f 76 34 0a 2b 09 66 6f 6f  oo,ov4 ov4.+.foo
1590: 5f 42 41 52 2c 6f 76 30 20 6f 76 30 5f 52 4f 4f  _BAR,ov0 ov0_ROO
15a0: 54 20 66 6f 6f 5f 42 41 52 2c 6f 76 31 20 6f 76  T foo_BAR,ov1 ov
15b0: 31 5f 66 6f 6f 20 66 6f 6f 5f 42 41 52 2c 6f 76  1_foo foo_BAR,ov
15c0: 32 20 6f 76 32 5f 66 6f 6f 5f 42 41 52 20 0a 2b  2 ov2_foo_BAR .+
15d0: 20 20 20 20 20 20 20 20 66 6f 6f 5f 42 41 52 2c          foo_BAR,
15e0: 6f 76 33 20 6f 76 33 5f 66 6f 6f 5f 42 41 52 09  ov3 ov3_foo_BAR.
15f0: 66 6f 6f 5f 42 41 52 2c 6f 76 34 20 6f 76 34 20  foo_BAR,ov4 ov4 
1600: 0a 2b 20 20 20 20 20 20 20 20 66 6f 6f 5f 42 41  .+        foo_BA
1610: 52 5f 62 61 7a 2c 6f 76 30 20 6f 76 30 5f 52 4f  R_baz,ov0 ov0_RO
1620: 4f 54 20 66 6f 6f 5f 42 41 52 5f 62 61 7a 2c 6f  OT foo_BAR_baz,o
1630: 76 31 20 6f 76 31 5f 66 6f 6f 20 0a 2b 20 20 20  v1 ov1_foo .+   
1640: 20 20 20 20 20 66 6f 6f 5f 42 41 52 5f 62 61 7a       foo_BAR_baz
1650: 2c 6f 76 32 20 6f 76 32 5f 66 6f 6f 5f 42 41 52  ,ov2 ov2_foo_BAR
1660: 0a 20 09 66 6f 6f 5f 42 41 52 5f 62 61 7a 2c 6f  . .foo_BAR_baz,o
1670: 76 33 20 6f 76 33 5f 66 6f 6f 5f 42 41 52 5f 62  v3 ov3_foo_BAR_b
1680: 61 7a 20 66 6f 6f 5f 42 41 52 5f 62 61 7a 2c 6f  az foo_BAR_baz,o
1690: 76 34 20 6f 76 34 0a 20 20 20 20 20 7d 0a 20 20  v4 ov4.     }.  
16a0: 20 20 20 76 61 72 69 61 62 6c 65 20 6c 6f 63 0a     variable loc.
16b0: 20 20 20 20 20 76 61 72 69 61 62 6c 65 20 73 74       variable st
16c0: 72 69 6e 67 0a 20 20 20 20 20 66 6f 72 65 61 63  ring.     foreac
16d0: 68 20 6c 6f 63 20 7b 66 6f 6f 20 66 6f 6f 5f 42  h loc {foo foo_B
16e0: 41 52 20 66 6f 6f 5f 42 41 52 5f 62 61 7a 7d 20  AR foo_BAR_baz} 
16f0: 7b 0a 2d 09 66 6f 72 65 61 63 68 20 73 74 72 69  {.-.foreach stri
1700: 6e 67 20 7b 6f 76 31 20 6f 76 32 20 6f 76 33 20  ng {ov1 ov2 ov3 
1710: 6f 76 34 7d 20 7b 0a 2b 09 66 6f 72 65 61 63 68  ov4} {.+.foreach
1720: 20 73 74 72 69 6e 67 20 7b 6f 76 30 20 6f 76 31   string {ov0 ov1
1730: 20 6f 76 32 20 6f 76 33 20 6f 76 34 7d 20 7b 0a   ov2 ov3 ov4} {.
1740: 20 09 20 20 20 20 74 65 73 74 20 6d 73 67 63 61   .    test msgca
1750: 74 2d 33 2e 24 63 6f 75 6e 74 20 7b 6d 63 73 65  t-3.$count {mcse
1760: 74 2c 20 6f 76 65 72 6c 61 70 7d 20 2d 73 65 74  t, overlap} -set
1770: 75 70 20 7b 0a 2b 09 09 6d 63 73 65 74 20 7b 7d  up {.+..mcset {}
1780: 20 6f 76 30 20 6f 76 30 5f 52 4f 4f 54 0a 2b 09   ov0 ov0_ROOT.+.
1790: 09 6d 63 73 65 74 20 7b 7d 20 6f 76 31 20 6f 76  .mcset {} ov1 ov
17a0: 31 5f 52 4f 4f 54 0a 2b 09 09 6d 63 73 65 74 20  1_ROOT.+..mcset 
17b0: 7b 7d 20 6f 76 32 20 6f 76 32 5f 52 4f 4f 54 0a  {} ov2 ov2_ROOT.
17c0: 2b 09 09 6d 63 73 65 74 20 7b 7d 20 6f 76 33 20  +..mcset {} ov3 
17d0: 6f 76 33 5f 52 4f 4f 54 0a 20 09 09 6d 63 73 65  ov3_ROOT. ..mcse
17e0: 74 20 66 6f 6f 20 6f 76 31 20 6f 76 31 5f 66 6f  t foo ov1 ov1_fo
17f0: 6f 0a 20 09 09 6d 63 73 65 74 20 66 6f 6f 20 6f  o. ..mcset foo o
1800: 76 32 20 6f 76 32 5f 66 6f 6f 0a 20 09 09 6d 63  v2 ov2_foo. ..mc
1810: 73 65 74 20 66 6f 6f 20 6f 76 33 20 6f 76 33 5f  set foo ov3 ov3_
1820: 66 6f 6f 0a 40 40 20 2d 33 36 34 2c 39 20 2b 33  foo.@@ -364,9 +3
1830: 37 32 2c 31 32 20 40 40 0a 20 0a 20 20 20 20 20  72,12 @@. .     
1840: 23 20 54 65 73 74 73 20 6d 73 67 63 61 74 2d 35  # Tests msgcat-5
1850: 2e 2a 3a 20 5b 6d 63 6c 6f 61 64 5d 0a 20 0a 2d  .*: [mcload]. .-
1860: 20 20 20 20 76 61 72 69 61 62 6c 65 20 6c 6f 63      variable loc
1870: 61 6c 65 73 20 7b 66 6f 6f 20 66 6f 6f 5f 42 41  ales {foo foo_BA
1880: 52 20 66 6f 6f 5f 42 41 52 5f 62 61 7a 7d 0a 2b  R foo_BAR_baz}.+
1890: 20 20 20 20 76 61 72 69 61 62 6c 65 20 6c 6f 63      variable loc
18a0: 61 6c 65 73 20 7b 7b 7d 20 66 6f 6f 20 66 6f 6f  ales {{} foo foo
18b0: 5f 42 41 52 20 66 6f 6f 5f 42 41 52 5f 62 61 7a  _BAR foo_BAR_baz
18c0: 7d 0a 20 20 20 20 20 6d 61 6b 65 44 69 72 65 63  }.     makeDirec
18d0: 74 6f 72 79 20 6d 73 67 64 69 72 0a 20 20 20 20  tory msgdir.    
18e0: 20 66 6f 72 65 61 63 68 20 6c 6f 63 20 24 6c 6f   foreach loc $lo
18f0: 63 61 6c 65 73 20 7b 0a 2b 09 69 66 20 7b 20 24  cales {.+.if { $
1900: 6c 6f 63 20 65 71 20 7b 7d 20 7d 20 7b 0a 2b 09  loc eq {} } {.+.
1910: 20 20 20 20 73 65 74 20 6c 6f 63 20 52 4f 4f 54      set loc ROOT
1920: 0a 2b 20 20 20 20 20 20 20 20 7d 0a 20 09 6d 61  .+        }. .ma
1930: 6b 65 46 69 6c 65 20 22 3a 3a 6d 73 67 63 61 74  keFile "::msgcat
1940: 3a 3a 6d 63 73 65 74 20 24 6c 6f 63 20 61 62 63  ::mcset $loc abc
1950: 20 61 62 63 2d 24 6c 6f 63 22 20 5c 0a 20 09 09   abc-$loc" \. ..
1960: 5b 73 74 72 69 6e 67 20 74 6f 6c 6f 77 65 72 20  [string tolower 
1970: 5b 66 69 6c 65 20 6a 6f 69 6e 20 6d 73 67 64 69  [file join msgdi
1980: 72 20 24 6c 6f 63 2e 6d 73 67 5d 5d 0a 20 20 20  r $loc.msg]].   
1990: 20 20 7d 0a 40 40 20 2d 33 37 39 2c 31 32 20 2b    }.@@ -379,12 +
19a0: 33 39 30 2c 31 32 20 40 40 0a 20 09 20 20 20 20  390,12 @@. .    
19b0: 6d 63 6c 6f 63 61 6c 65 20 24 6c 6f 63 61 6c 65  mclocale $locale
19c0: 0a 20 09 7d 20 2d 62 6f 64 79 20 7b 0a 20 09 20  . .} -body {. . 
19d0: 20 20 20 6d 63 6c 6f 61 64 20 5b 66 69 6c 65 20     mcload [file 
19e0: 6a 6f 69 6e 20 5b 74 65 6d 70 6f 72 61 72 79 44  join [temporaryD
19f0: 69 72 65 63 74 6f 72 79 5d 20 6d 73 67 64 69 72  irectory] msgdir
1a00: 5d 0a 2d 09 7d 20 2d 72 65 73 75 6c 74 20 24 63  ].-.} -result $c
1a10: 6f 75 6e 74 0a 2b 09 7d 20 2d 72 65 73 75 6c 74  ount.+.} -result
1a20: 20 5b 65 78 70 72 20 7b 20 24 63 6f 75 6e 74 2b   [expr { $count+
1a30: 31 20 7d 5d 0a 20 09 69 6e 63 72 20 63 6f 75 6e  1 }]. .incr coun
1a40: 74 0a 20 20 20 20 20 7d 0a 20 0a 20 20 20 20 20  t.     }. .     
1a50: 23 20 45 76 65 6e 20 74 68 6f 75 67 68 20 66 6f  # Even though fo
1a60: 6f 5f 42 41 52 5f 6e 6f 74 65 78 69 73 74 20 64  o_BAR_notexist d
1a70: 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 2c 0a 2d  oes not exist,.-
1a80: 20 20 20 20 23 20 66 6f 6f 5f 42 41 52 20 61 6e      # foo_BAR an
1a90: 64 20 66 6f 6f 20 73 68 6f 75 6c 64 20 62 65 20  d foo should be 
1aa0: 6c 6f 61 64 65 64 2e 0a 2b 20 20 20 20 23 20 66  loaded..+    # f
1ab0: 6f 6f 5f 42 41 52 2c 20 66 6f 6f 20 61 6e 64 20  oo_BAR, foo and 
1ac0: 74 68 65 20 72 6f 6f 74 20 73 68 6f 75 6c 64 20  the root should 
1ad0: 62 65 20 6c 6f 61 64 65 64 2e 0a 20 09 74 65 73  be loaded.. .tes
1ae0: 74 20 6d 73 67 63 61 74 2d 35 2e 34 20 7b 6d 63  t msgcat-5.4 {mc
1af0: 6c 6f 61 64 7d 20 2d 73 65 74 75 70 20 7b 0a 20  load} -setup {. 
1b00: 09 20 20 20 20 76 61 72 69 61 62 6c 65 20 6c 6f  .    variable lo
1b10: 63 61 6c 65 20 5b 6d 63 6c 6f 63 61 6c 65 5d 0a  cale [mclocale].
1b20: 20 09 20 20 20 20 6d 63 6c 6f 63 61 6c 65 20 66   .    mclocale f
1b30: 6f 6f 5f 42 41 52 5f 6e 6f 74 65 78 69 73 74 0a  oo_BAR_notexist.
1b40: 40 40 20 2d 33 39 32 2c 37 20 2b 34 30 33 2c 37  @@ -392,7 +403,7
1b50: 20 40 40 0a 20 09 20 20 20 20 6d 63 6c 6f 63 61   @@. .    mcloca
1b60: 6c 65 20 24 6c 6f 63 61 6c 65 0a 20 09 7d 20 2d  le $locale. .} -
1b70: 62 6f 64 79 20 7b 0a 20 09 20 20 20 20 6d 63 6c  body {. .    mcl
1b80: 6f 61 64 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b  oad [file join [
1b90: 74 65 6d 70 6f 72 61 72 79 44 69 72 65 63 74 6f  temporaryDirecto
1ba0: 72 79 5d 20 6d 73 67 64 69 72 5d 0a 2d 09 7d 20  ry] msgdir].-.} 
1bb0: 2d 72 65 73 75 6c 74 20 32 0a 2b 09 7d 20 2d 72  -result 2.+.} -r
1bc0: 65 73 75 6c 74 20 33 0a 20 0a 20 09 74 65 73 74  esult 3. . .test
1bd0: 20 6d 73 67 63 61 74 2d 35 2e 35 20 7b 6d 63 6c   msgcat-5.5 {mcl
1be0: 6f 61 64 7d 20 2d 73 65 74 75 70 20 7b 0a 20 09  oad} -setup {. .
1bf0: 20 20 20 20 76 61 72 69 61 62 6c 65 20 6c 6f 63      variable loc
1c00: 61 6c 65 20 5b 6d 63 6c 6f 63 61 6c 65 5d 0a 40  ale [mclocale].@
1c10: 40 20 2d 34 30 31 2c 37 20 2b 34 31 32 2c 37 20  @ -401,7 +412,7 
1c20: 40 40 0a 20 09 20 20 20 20 6d 63 6c 6f 63 61 6c  @@. .    mclocal
1c30: 65 20 24 6c 6f 63 61 6c 65 0a 20 09 7d 20 2d 62  e $locale. .} -b
1c40: 6f 64 79 20 7b 0a 20 09 20 20 20 20 6d 63 6c 6f  ody {. .    mclo
1c50: 61 64 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 74  ad [file join [t
1c60: 65 6d 70 6f 72 61 72 79 44 69 72 65 63 74 6f 72  emporaryDirector
1c70: 79 5d 20 6d 73 67 64 69 72 5d 0a 2d 09 7d 20 2d  y] msgdir].-.} -
1c80: 72 65 73 75 6c 74 20 30 0a 2b 09 7d 20 2d 72 65  result 0.+.} -re
1c90: 73 75 6c 74 20 31 0a 20 0a 20 09 74 65 73 74 20  sult 1. . .test 
1ca0: 6d 73 67 63 61 74 2d 35 2e 36 20 7b 6d 63 6c 6f  msgcat-5.6 {mclo
1cb0: 61 64 7d 20 2d 73 65 74 75 70 20 7b 0a 20 09 20  ad} -setup {. . 
1cc0: 20 20 20 76 61 72 69 61 62 6c 65 20 6c 6f 63 61     variable loca
1cd0: 6c 65 20 5b 6d 63 6c 6f 63 61 6c 65 5d 0a 49 6e  le [mclocale].In
1ce0: 64 65 78 3a 20 74 6f 6f 6c 73 2f 74 63 6c 2e 77  dex: tools/tcl.w
1cf0: 73 65 2e 69 6e 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  se.in.==========
1d00: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
1d10: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
1d20: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
1d30: 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 20 66 69  =========.RCS fi
1d40: 6c 65 3a 20 2f 63 76 73 72 6f 6f 74 2f 74 63 6c  le: /cvsroot/tcl
1d50: 2f 74 63 6c 2f 74 6f 6f 6c 73 2f 74 63 6c 2e 77  /tcl/tools/tcl.w
1d60: 73 65 2e 69 6e 2c 76 0a 72 65 74 72 69 65 76 69  se.in,v.retrievi
1d70: 6e 67 20 72 65 76 69 73 69 6f 6e 20 31 2e 34 37  ng revision 1.47
1d80: 0a 64 69 66 66 20 2d 62 20 2d 75 20 2d 72 31 2e  .diff -b -u -r1.
1d90: 34 37 20 74 63 6c 2e 77 73 65 2e 69 6e 0a 2d 2d  47 tcl.wse.in.--
1da0: 2d 20 74 6f 6f 6c 73 2f 74 63 6c 2e 77 73 65 2e  - tools/tcl.wse.
1db0: 69 6e 09 34 20 4d 61 72 20 32 30 30 33 20 32 33  in.4 Mar 2003 23
1dc0: 3a 34 36 3a 31 34 20 2d 30 30 30 30 09 31 2e 34  :46:14 -0000.1.4
1dd0: 37 0a 2b 2b 2b 20 74 6f 6f 6c 73 2f 74 63 6c 2e  7.+++ tools/tcl.
1de0: 77 73 65 2e 69 6e 09 32 30 20 4f 63 74 20 32 30  wse.in.20 Oct 20
1df0: 30 33 20 32 31 3a 32 36 3a 32 31 20 2d 30 30 30  03 21:26:21 -000
1e00: 30 0a 40 40 20 2d 31 30 36 33 2c 31 32 20 2b 31  0.@@ -1063,12 +1
1e10: 30 36 33 2c 31 32 20 40 40 0a 20 65 6e 64 0a 20  063,12 @@. end. 
1e20: 69 74 65 6d 3a 20 49 6e 73 74 61 6c 6c 20 46 69  item: Install Fi
1e30: 6c 65 0a 20 20 20 53 6f 75 72 63 65 3d 24 7b 5f  le.   Source=${_
1e40: 5f 54 43 4c 42 41 53 45 44 49 52 5f 5f 7d 5c 6c  _TCLBASEDIR__}\l
1e50: 69 62 72 61 72 79 5c 6d 73 67 63 61 74 5c 70 6b  ibrary\msgcat\pk
1e60: 67 49 6e 64 65 78 2e 74 63 6c 0a 2d 20 20 44 65  gIndex.tcl.-  De
1e70: 73 74 69 6e 61 74 69 6f 6e 3d 25 4d 41 49 4e 44  stination=%MAIND
1e80: 49 52 25 5c 6c 69 62 5c 74 63 6c 25 56 45 52 25  IR%\lib\tcl%VER%
1e90: 5c 6d 73 67 63 61 74 31 2e 32 5c 70 6b 67 49 6e  \msgcat1.2\pkgIn
1ea0: 64 65 78 2e 74 63 6c 0a 2b 20 20 44 65 73 74 69  dex.tcl.+  Desti
1eb0: 6e 61 74 69 6f 6e 3d 25 4d 41 49 4e 44 49 52 25  nation=%MAINDIR%
1ec0: 5c 6c 69 62 5c 74 63 6c 25 56 45 52 25 5c 6d 73  \lib\tcl%VER%\ms
1ed0: 67 63 61 74 31 2e 34 5c 70 6b 67 49 6e 64 65 78  gcat1.4\pkgIndex
1ee0: 2e 74 63 6c 0a 20 20 20 46 6c 61 67 73 3d 30 30  .tcl.   Flags=00
1ef0: 30 30 30 30 30 30 31 30 30 30 30 30 31 30 0a 20  00000010000010. 
1f00: 65 6e 64 0a 20 69 74 65 6d 3a 20 49 6e 73 74 61  end. item: Insta
1f10: 6c 6c 20 46 69 6c 65 0a 20 20 20 53 6f 75 72 63  ll File.   Sourc
1f20: 65 3d 24 7b 5f 5f 54 43 4c 42 41 53 45 44 49 52  e=${__TCLBASEDIR
1f30: 5f 5f 7d 5c 6c 69 62 72 61 72 79 5c 6d 73 67 63  __}\library\msgc
1f40: 61 74 5c 6d 73 67 63 61 74 2e 74 63 6c 0a 2d 20  at\msgcat.tcl.- 
1f50: 20 44 65 73 74 69 6e 61 74 69 6f 6e 3d 25 4d 41   Destination=%MA
1f60: 49 4e 44 49 52 25 5c 6c 69 62 5c 74 63 6c 25 56  INDIR%\lib\tcl%V
1f70: 45 52 25 5c 6d 73 67 63 61 74 31 2e 32 5c 6d 73  ER%\msgcat1.2\ms
1f80: 67 63 61 74 2e 74 63 6c 0a 2b 20 20 44 65 73 74  gcat.tcl.+  Dest
1f90: 69 6e 61 74 69 6f 6e 3d 25 4d 41 49 4e 44 49 52  ination=%MAINDIR
1fa0: 25 5c 6c 69 62 5c 74 63 6c 25 56 45 52 25 5c 6d  %\lib\tcl%VER%\m
1fb0: 73 67 63 61 74 31 2e 34 5c 6d 73 67 63 61 74 2e  sgcat1.4\msgcat.
1fc0: 74 63 6c 0a 20 20 20 46 6c 61 67 73 3d 30 30 30  tcl.   Flags=000
1fd0: 30 30 30 30 30 31 30 30 30 30 30 31 30 0a 20 65  0000010000010. e
1fe0: 6e 64 0a 20 69 74 65 6d 3a 20 49 6e 73 74 61 6c  nd. item: Instal
1ff0: 6c 20 46 69 6c 65 0a 49 6e 64 65 78 3a 20 75 6e  l File.Index: un
2000: 69 78 2f 4d 61 6b 65 66 69 6c 65 2e 69 6e 0a 3d  ix/Makefile.in.=
2010: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2020: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2030: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2040: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2050: 3d 3d 0a 52 43 53 20 66 69 6c 65 3a 20 2f 63 76  ==.RCS file: /cv
2060: 73 72 6f 6f 74 2f 74 63 6c 2f 74 63 6c 2f 75 6e  sroot/tcl/tcl/un
2070: 69 78 2f 4d 61 6b 65 66 69 6c 65 2e 69 6e 2c 76  ix/Makefile.in,v
2080: 0a 72 65 74 72 69 65 76 69 6e 67 20 72 65 76 69  .retrieving revi
2090: 73 69 6f 6e 20 31 2e 31 33 32 0a 64 69 66 66 20  sion 1.132.diff 
20a0: 2d 62 20 2d 75 20 2d 72 31 2e 31 33 32 20 4d 61  -b -u -r1.132 Ma
20b0: 6b 65 66 69 6c 65 2e 69 6e 0a 2d 2d 2d 20 75 6e  kefile.in.--- un
20c0: 69 78 2f 4d 61 6b 65 66 69 6c 65 2e 69 6e 09 32  ix/Makefile.in.2
20d0: 33 20 4a 75 6c 20 32 30 30 33 20 31 35 3a 34 30  3 Jul 2003 15:40
20e0: 3a 32 36 20 2d 30 30 30 30 09 31 2e 31 33 32 0a  :26 -0000.1.132.
20f0: 2b 2b 2b 20 75 6e 69 78 2f 4d 61 6b 65 66 69 6c  +++ unix/Makefil
2100: 65 2e 69 6e 09 32 30 20 4f 63 74 20 32 30 30 33  e.in.20 Oct 2003
2110: 20 32 31 3a 32 36 3a 32 31 20 2d 30 30 30 30 0a   21:26:21 -0000.
2120: 40 40 20 2d 36 33 32 2c 37 20 2b 36 33 32 2c 37  @@ -632,7 +632,7
2130: 20 40 40 0a 20 09 09 65 6c 73 65 20 74 72 75 65   @@. ..else true
2140: 3b 20 5c 0a 20 09 09 66 69 3b 20 5c 0a 20 09 20  ; \. ..fi; \. . 
2150: 20 20 20 64 6f 6e 65 3b 0a 2d 09 40 66 6f 72 20     done;.-.@for 
2160: 69 20 69 6e 20 68 74 74 70 32 2e 34 20 68 74 74  i in http2.4 htt
2170: 70 31 2e 30 20 6f 70 74 30 2e 34 20 65 6e 63 6f  p1.0 opt0.4 enco
2180: 64 69 6e 67 20 6d 73 67 63 61 74 31 2e 33 20 74  ding msgcat1.3 t
2190: 63 6c 74 65 73 74 32 2e 32 3b 20 5c 0a 2b 09 40  cltest2.2; \.+.@
21a0: 66 6f 72 20 69 20 69 6e 20 68 74 74 70 32 2e 34  for i in http2.4
21b0: 20 68 74 74 70 31 2e 30 20 6f 70 74 30 2e 34 20   http1.0 opt0.4 
21c0: 65 6e 63 6f 64 69 6e 67 20 6d 73 67 63 61 74 31  encoding msgcat1
21d0: 2e 34 20 74 63 6c 74 65 73 74 32 2e 32 3b 20 5c  .4 tcltest2.2; \
21e0: 0a 20 09 20 20 20 20 64 6f 20 5c 0a 20 09 20 20  . .    do \. .  
21f0: 20 20 69 66 20 5b 20 21 20 2d 64 20 24 28 53 43    if [ ! -d $(SC
2200: 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52  RIPT_INSTALL_DIR
2210: 29 2f 24 24 69 20 5d 20 3b 20 74 68 65 6e 20 5c  )/$$i ] ; then \
2220: 0a 20 09 09 65 63 68 6f 20 22 4d 61 6b 69 6e 67  . ..echo "Making
2230: 20 64 69 72 65 63 74 6f 72 79 20 24 28 53 43 52   directory $(SCR
2240: 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29  IPT_INSTALL_DIR)
2250: 2f 24 24 69 22 3b 20 5c 0a 40 40 20 2d 36 37 30  /$$i"; \.@@ -670
2260: 2c 31 30 20 2b 36 37 30 2c 31 30 20 40 40 0a 20  ,10 +670,10 @@. 
2270: 09 20 20 20 20 64 6f 20 5c 0a 20 09 20 20 20 20  .    do \. .    
2280: 24 28 49 4e 53 54 41 4c 4c 5f 44 41 54 41 29 20  $(INSTALL_DATA) 
2290: 24 24 6a 20 24 28 53 43 52 49 50 54 5f 49 4e 53  $$j $(SCRIPT_INS
22a0: 54 41 4c 4c 5f 44 49 52 29 2f 6f 70 74 30 2e 34  TALL_DIR)/opt0.4
22b0: 3b 20 5c 0a 20 09 20 20 20 20 64 6f 6e 65 3b 0a  ; \. .    done;.
22c0: 2d 09 40 65 63 68 6f 20 22 49 6e 73 74 61 6c 6c  -.@echo "Install
22d0: 69 6e 67 20 6c 69 62 72 61 72 79 20 6d 73 67 63  ing library msgc
22e0: 61 74 31 2e 33 20 64 69 72 65 63 74 6f 72 79 22  at1.3 directory"
22f0: 3b 0a 2b 09 40 65 63 68 6f 20 22 49 6e 73 74 61  ;.+.@echo "Insta
2300: 6c 6c 69 6e 67 20 6c 69 62 72 61 72 79 20 6d 73  lling library ms
2310: 67 63 61 74 31 2e 34 20 64 69 72 65 63 74 6f 72  gcat1.4 director
2320: 79 22 3b 0a 20 09 40 66 6f 72 20 6a 20 69 6e 20  y";. .@for j in 
2330: 24 28 54 4f 50 5f 44 49 52 29 2f 6c 69 62 72 61  $(TOP_DIR)/libra
2340: 72 79 2f 6d 73 67 63 61 74 2f 2a 2e 74 63 6c 20  ry/msgcat/*.tcl 
2350: 3b 20 5c 0a 20 09 20 20 20 20 64 6f 20 5c 0a 2d  ; \. .    do \.-
2360: 09 20 20 20 20 24 28 49 4e 53 54 41 4c 4c 5f 44  .    $(INSTALL_D
2370: 41 54 41 29 20 24 24 6a 20 24 28 53 43 52 49 50  ATA) $$j $(SCRIP
2380: 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29 2f 6d  T_INSTALL_DIR)/m
2390: 73 67 63 61 74 31 2e 33 3b 20 5c 0a 2b 09 20 20  sgcat1.3; \.+.  
23a0: 20 20 24 28 49 4e 53 54 41 4c 4c 5f 44 41 54 41    $(INSTALL_DATA
23b0: 29 20 24 24 6a 20 24 28 53 43 52 49 50 54 5f 49  ) $$j $(SCRIPT_I
23c0: 4e 53 54 41 4c 4c 5f 44 49 52 29 2f 6d 73 67 63  NSTALL_DIR)/msgc
23d0: 61 74 31 2e 34 3b 20 5c 0a 20 09 20 20 20 20 64  at1.4; \. .    d
23e0: 6f 6e 65 3b 0a 20 09 40 65 63 68 6f 20 22 49 6e  one;. .@echo "In
23f0: 73 74 61 6c 6c 69 6e 67 20 6c 69 62 72 61 72 79  stalling library
2400: 20 74 63 6c 74 65 73 74 32 2e 32 20 64 69 72 65   tcltest2.2 dire
2410: 63 74 6f 72 79 22 3b 0a 20 09 40 66 6f 72 20 6a  ctory";. .@for j
2420: 20 69 6e 20 24 28 54 4f 50 5f 44 49 52 29 2f 6c   in $(TOP_DIR)/l
2430: 69 62 72 61 72 79 2f 74 63 6c 74 65 73 74 2f 2a  ibrary/tcltest/*
2440: 2e 74 63 6c 20 3b 20 5c 0a 49 6e 64 65 78 3a 20  .tcl ; \.Index: 
2450: 77 69 6e 2f 4d 61 6b 65 66 69 6c 65 2e 69 6e 0a  win/Makefile.in.
2460: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2470: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2480: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2490: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
24a0: 3d 3d 3d 0a 52 43 53 20 66 69 6c 65 3a 20 2f 63  ===.RCS file: /c
24b0: 76 73 72 6f 6f 74 2f 74 63 6c 2f 74 63 6c 2f 77  vsroot/tcl/tcl/w
24c0: 69 6e 2f 4d 61 6b 65 66 69 6c 65 2e 69 6e 2c 76  in/Makefile.in,v
24d0: 0a 72 65 74 72 69 65 76 69 6e 67 20 72 65 76 69  .retrieving revi
24e0: 73 69 6f 6e 20 31 2e 37 33 0a 64 69 66 66 20 2d  sion 1.73.diff -
24f0: 62 20 2d 75 20 2d 72 31 2e 37 33 20 4d 61 6b 65  b -u -r1.73 Make
2500: 66 69 6c 65 2e 69 6e 0a 2d 2d 2d 20 77 69 6e 2f  file.in.--- win/
2510: 4d 61 6b 65 66 69 6c 65 2e 69 6e 09 32 35 20 4a  Makefile.in.25 J
2520: 75 6e 20 32 30 30 33 20 32 33 3a 30 32 3a 31 31  un 2003 23:02:11
2530: 20 2d 30 30 30 30 09 31 2e 37 33 0a 2b 2b 2b 20   -0000.1.73.+++ 
2540: 77 69 6e 2f 4d 61 6b 65 66 69 6c 65 2e 69 6e 09  win/Makefile.in.
2550: 32 30 20 4f 63 74 20 32 30 30 33 20 32 31 3a 32  20 Oct 2003 21:2
2560: 36 3a 32 31 20 2d 30 30 30 30 0a 40 40 20 2d 35  6:21 -0000.@@ -5
2570: 32 31 2c 37 20 2b 35 32 31 2c 37 20 40 40 0a 20  21,7 +521,7 @@. 
2580: 09 09 65 6c 73 65 20 74 72 75 65 3b 20 5c 0a 20  ..else true; \. 
2590: 09 09 66 69 3b 20 5c 0a 20 09 20 20 20 20 64 6f  ..fi; \. .    do
25a0: 6e 65 3b 0a 2d 09 40 66 6f 72 20 69 20 69 6e 20  ne;.-.@for i in 
25b0: 68 74 74 70 31 2e 30 20 68 74 74 70 32 2e 34 20  http1.0 http2.4 
25c0: 6f 70 74 30 2e 34 20 65 6e 63 6f 64 69 6e 67 20  opt0.4 encoding 
25d0: 6d 73 67 63 61 74 31 2e 33 20 74 63 6c 74 65 73  msgcat1.3 tcltes
25e0: 74 32 2e 32 3b 20 5c 0a 2b 09 40 66 6f 72 20 69  t2.2; \.+.@for i
25f0: 20 69 6e 20 68 74 74 70 31 2e 30 20 68 74 74 70   in http1.0 http
2600: 32 2e 34 20 6f 70 74 30 2e 34 20 65 6e 63 6f 64  2.4 opt0.4 encod
2610: 69 6e 67 20 6d 73 67 63 61 74 31 2e 34 20 74 63  ing msgcat1.4 tc
2620: 6c 74 65 73 74 32 2e 32 3b 20 5c 0a 20 09 20 20  ltest2.2; \. .  
2630: 20 20 64 6f 20 5c 0a 20 09 20 20 20 20 69 66 20    do \. .    if 
2640: 5b 20 21 20 2d 64 20 24 28 53 43 52 49 50 54 5f  [ ! -d $(SCRIPT_
2650: 49 4e 53 54 41 4c 4c 5f 44 49 52 29 2f 24 24 69  INSTALL_DIR)/$$i
2660: 20 5d 20 3b 20 74 68 65 6e 20 5c 0a 20 09 09 65   ] ; then \. ..e
2670: 63 68 6f 20 22 4d 61 6b 69 6e 67 20 64 69 72 65  cho "Making dire
2680: 63 74 6f 72 79 20 24 28 53 43 52 49 50 54 5f 49  ctory $(SCRIPT_I
2690: 4e 53 54 41 4c 4c 5f 44 49 52 29 2f 24 24 69 22  NSTALL_DIR)/$$i"
26a0: 3b 20 5c 0a 40 40 20 2d 35 35 35 2c 31 30 20 2b  ; \.@@ -555,10 +
26b0: 35 35 35 2c 31 30 20 40 40 0a 20 09 20 20 20 20  555,10 @@. .    
26c0: 64 6f 20 5c 0a 20 09 20 20 20 20 24 28 43 4f 50  do \. .    $(COP
26d0: 59 29 20 22 24 24 6a 22 20 22 24 28 53 43 52 49  Y) "$$j" "$(SCRI
26e0: 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29 2f  PT_INSTALL_DIR)/
26f0: 6f 70 74 30 2e 34 22 3b 20 5c 0a 20 09 20 20 20  opt0.4"; \. .   
2700: 20 64 6f 6e 65 3b 0a 2d 09 40 65 63 68 6f 20 22   done;.-.@echo "
2710: 49 6e 73 74 61 6c 6c 69 6e 67 20 6c 69 62 72 61  Installing libra
2720: 72 79 20 6d 73 67 63 61 74 31 2e 33 20 64 69 72  ry msgcat1.3 dir
2730: 65 63 74 6f 72 79 22 3b 0a 2b 09 40 65 63 68 6f  ectory";.+.@echo
2740: 20 22 49 6e 73 74 61 6c 6c 69 6e 67 20 6c 69 62   "Installing lib
2750: 72 61 72 79 20 6d 73 67 63 61 74 31 2e 34 20 64  rary msgcat1.4 d
2760: 69 72 65 63 74 6f 72 79 22 3b 0a 20 09 40 66 6f  irectory";. .@fo
2770: 72 20 6a 20 69 6e 20 24 28 52 4f 4f 54 5f 44 49  r j in $(ROOT_DI
2780: 52 29 2f 6c 69 62 72 61 72 79 2f 6d 73 67 63 61  R)/library/msgca
2790: 74 2f 2a 2e 74 63 6c 3b 20 5c 0a 20 09 20 20 20  t/*.tcl; \. .   
27a0: 20 64 6f 20 5c 0a 2d 09 20 20 20 20 24 28 43 4f   do \.-.    $(CO
27b0: 50 59 29 20 22 24 24 6a 22 20 22 24 28 53 43 52  PY) "$$j" "$(SCR
27c0: 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29  IPT_INSTALL_DIR)
27d0: 2f 6d 73 67 63 61 74 31 2e 33 22 3b 20 5c 0a 2b  /msgcat1.3"; \.+
27e0: 09 20 20 20 20 24 28 43 4f 50 59 29 20 22 24 24  .    $(COPY) "$$
27f0: 6a 22 20 22 24 28 53 43 52 49 50 54 5f 49 4e 53  j" "$(SCRIPT_INS
2800: 54 41 4c 4c 5f 44 49 52 29 2f 6d 73 67 63 61 74  TALL_DIR)/msgcat
2810: 31 2e 34 22 3b 20 5c 0a 20 09 20 20 20 20 64 6f  1.4"; \. .    do
2820: 6e 65 3b 0a 20 09 40 65 63 68 6f 20 22 49 6e 73  ne;. .@echo "Ins
2830: 74 61 6c 6c 69 6e 67 20 6c 69 62 72 61 72 79 20  talling library 
2840: 74 63 6c 74 65 73 74 32 2e 32 20 64 69 72 65 63  tcltest2.2 direc
2850: 74 6f 72 79 22 3b 0a 20 09 40 66 6f 72 20 6a 20  tory";. .@for j 
2860: 69 6e 20 24 28 52 4f 4f 54 5f 44 49 52 29 2f 6c  in $(ROOT_DIR)/l
2870: 69 62 72 61 72 79 2f 74 63 6c 74 65 73 74 2f 2a  ibrary/tcltest/*
2880: 2e 74 63 6c 3b 20 5c 0a 49 6e 64 65 78 3a 20 77  .tcl; \.Index: w
2890: 69 6e 2f 6d 61 6b 65 66 69 6c 65 2e 62 63 0a 3d  in/makefile.bc.=
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 3d 3d 3d 3d  ================
28c0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
28d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
28e0: 3d 3d 0a 52 43 53 20 66 69 6c 65 3a 20 2f 63 76  ==.RCS file: /cv
28f0: 73 72 6f 6f 74 2f 74 63 6c 2f 74 63 6c 2f 77 69  sroot/tcl/tcl/wi
2900: 6e 2f 6d 61 6b 65 66 69 6c 65 2e 62 63 2c 76 0a  n/makefile.bc,v.
2910: 72 65 74 72 69 65 76 69 6e 67 20 72 65 76 69 73  retrieving revis
2920: 69 6f 6e 20 31 2e 31 36 0a 64 69 66 66 20 2d 62  ion 1.16.diff -b
2930: 20 2d 75 20 2d 72 31 2e 31 36 20 6d 61 6b 65 66   -u -r1.16 makef
2940: 69 6c 65 2e 62 63 0a 2d 2d 2d 20 77 69 6e 2f 6d  ile.bc.--- win/m
2950: 61 6b 65 66 69 6c 65 2e 62 63 09 32 35 20 4a 75  akefile.bc.25 Ju
2960: 6e 20 32 30 30 33 20 32 33 3a 30 32 3a 31 31 20  n 2003 23:02:11 
2970: 2d 30 30 30 30 09 31 2e 31 36 0a 2b 2b 2b 20 77  -0000.1.16.+++ w
2980: 69 6e 2f 6d 61 6b 65 66 69 6c 65 2e 62 63 09 32  in/makefile.bc.2
2990: 30 20 4f 63 74 20 32 30 30 33 20 32 31 3a 32 36  0 Oct 2003 21:26
29a0: 3a 32 31 20 2d 30 30 30 30 0a 40 40 20 2d 34 33  :21 -0000.@@ -43
29b0: 33 2c 31 30 20 2b 34 33 33 2c 31 30 20 40 40 0a  3,10 +433,10 @@.
29c0: 20 09 2d 40 24 28 4d 4b 44 49 52 29 20 22 24 28   .-@$(MKDIR) "$(
29d0: 53 43 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44  SCRIPT_INSTALL_D
29e0: 49 52 29 5c 6f 70 74 30 2e 34 22 0a 20 09 2d 40  IR)\opt0.4". .-@
29f0: 63 6f 70 79 20 22 24 28 52 4f 4f 54 29 5c 6c 69  copy "$(ROOT)\li
2a00: 62 72 61 72 79 5c 6f 70 74 5c 6f 70 74 70 61 72  brary\opt\optpar
2a10: 73 65 2e 74 63 6c 22 20 22 24 28 53 43 52 49 50  se.tcl" "$(SCRIP
2a20: 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29 5c 6f  T_INSTALL_DIR)\o
2a30: 70 74 30 2e 34 22 0a 20 09 2d 40 63 6f 70 79 20  pt0.4". .-@copy 
2a40: 22 24 28 52 4f 4f 54 29 5c 6c 69 62 72 61 72 79  "$(ROOT)\library
2a50: 5c 6f 70 74 5c 70 6b 67 49 6e 64 65 78 2e 74 63  \opt\pkgIndex.tc
2a60: 6c 22 20 22 24 28 53 43 52 49 50 54 5f 49 4e 53  l" "$(SCRIPT_INS
2a70: 54 41 4c 4c 5f 44 49 52 29 5c 6f 70 74 30 2e 34  TALL_DIR)\opt0.4
2a80: 22 0a 2d 09 40 65 63 68 6f 20 69 6e 73 74 61 6c  ".-.@echo instal
2a90: 6c 69 6e 67 20 6d 73 67 63 61 74 31 2e 33 0a 2d  ling msgcat1.3.-
2aa0: 09 2d 40 24 28 4d 4b 44 49 52 29 20 22 24 28 53  .-@$(MKDIR) "$(S
2ab0: 43 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49  CRIPT_INSTALL_DI
2ac0: 52 29 5c 6d 73 67 63 61 74 31 2e 33 22 0a 2d 09  R)\msgcat1.3".-.
2ad0: 2d 40 63 6f 70 79 20 22 24 28 52 4f 4f 54 29 5c  -@copy "$(ROOT)\
2ae0: 6c 69 62 72 61 72 79 5c 6d 73 67 63 61 74 5c 6d  library\msgcat\m
2af0: 73 67 63 61 74 2e 74 63 6c 22 20 20 20 22 24 28  sgcat.tcl"   "$(
2b00: 53 43 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44  SCRIPT_INSTALL_D
2b10: 49 52 29 5c 6d 73 67 63 61 74 31 2e 33 22 0a 2d  IR)\msgcat1.3".-
2b20: 09 2d 40 63 6f 70 79 20 22 24 28 52 4f 4f 54 29  .-@copy "$(ROOT)
2b30: 5c 6c 69 62 72 61 72 79 5c 6d 73 67 63 61 74 5c  \library\msgcat\
2b40: 70 6b 67 49 6e 64 65 78 2e 74 63 6c 22 20 22 24  pkgIndex.tcl" "$
2b50: 28 53 43 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f  (SCRIPT_INSTALL_
2b60: 44 49 52 29 5c 6d 73 67 63 61 74 31 2e 33 22 0a  DIR)\msgcat1.3".
2b70: 2b 09 40 65 63 68 6f 20 69 6e 73 74 61 6c 6c 69  +.@echo installi
2b80: 6e 67 20 6d 73 67 63 61 74 31 2e 34 0a 2b 09 2d  ng msgcat1.4.+.-
2b90: 40 24 28 4d 4b 44 49 52 29 20 22 24 28 53 43 52  @$(MKDIR) "$(SCR
2ba0: 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29  IPT_INSTALL_DIR)
2bb0: 5c 6d 73 67 63 61 74 31 2e 34 22 0a 2b 09 2d 40  \msgcat1.4".+.-@
2bc0: 63 6f 70 79 20 22 24 28 52 4f 4f 54 29 5c 6c 69  copy "$(ROOT)\li
2bd0: 62 72 61 72 79 5c 6d 73 67 63 61 74 5c 6d 73 67  brary\msgcat\msg
2be0: 63 61 74 2e 74 63 6c 22 20 20 20 22 24 28 53 43  cat.tcl"   "$(SC
2bf0: 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52  RIPT_INSTALL_DIR
2c00: 29 5c 6d 73 67 63 61 74 31 2e 34 22 0a 2b 09 2d  )\msgcat1.4".+.-
2c10: 40 63 6f 70 79 20 22 24 28 52 4f 4f 54 29 5c 6c  @copy "$(ROOT)\l
2c20: 69 62 72 61 72 79 5c 6d 73 67 63 61 74 5c 70 6b  ibrary\msgcat\pk
2c30: 67 49 6e 64 65 78 2e 74 63 6c 22 20 22 24 28 53  gIndex.tcl" "$(S
2c40: 43 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49  CRIPT_INSTALL_DI
2c50: 52 29 5c 6d 73 67 63 61 74 31 2e 34 22 0a 20 09  R)\msgcat1.4". .
2c60: 40 65 63 68 6f 20 69 6e 73 74 61 6c 6c 69 6e 67  @echo installing
2c70: 20 74 63 6c 74 65 73 74 32 2e 32 0a 20 09 2d 40   tcltest2.2. .-@
2c80: 24 28 4d 4b 44 49 52 29 20 22 24 28 53 43 52 49  $(MKDIR) "$(SCRI
2c90: 50 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29 5c  PT_INSTALL_DIR)\
2ca0: 74 63 6c 74 65 73 74 32 2e 32 22 0a 20 09 2d 40  tcltest2.2". .-@
2cb0: 63 6f 70 79 20 22 24 28 52 4f 4f 54 29 5c 6c 69  copy "$(ROOT)\li
2cc0: 62 72 61 72 79 5c 74 63 6c 74 65 73 74 5c 74 63  brary\tcltest\tc
2cd0: 6c 74 65 73 74 2e 74 63 6c 22 20 20 20 22 24 28  ltest.tcl"   "$(
2ce0: 53 43 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44  SCRIPT_INSTALL_D
2cf0: 49 52 29 5c 74 63 6c 74 65 73 74 32 2e 32 22 0a  IR)\tcltest2.2".
2d00: 49 6e 64 65 78 3a 20 77 69 6e 2f 6d 61 6b 65 66  Index: win/makef
2d10: 69 6c 65 2e 76 63 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d  ile.vc.=========
2d20: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2d30: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2d40: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
2d50: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 52 43 53 20 66  ==========.RCS f
2d60: 69 6c 65 3a 20 2f 63 76 73 72 6f 6f 74 2f 74 63  ile: /cvsroot/tc
2d70: 6c 2f 74 63 6c 2f 77 69 6e 2f 6d 61 6b 65 66 69  l/tcl/win/makefi
2d80: 6c 65 2e 76 63 2c 76 0a 72 65 74 72 69 65 76 69  le.vc,v.retrievi
2d90: 6e 67 20 72 65 76 69 73 69 6f 6e 20 31 2e 31 31  ng revision 1.11
2da0: 31 0a 64 69 66 66 20 2d 62 20 2d 75 20 2d 72 31  1.diff -b -u -r1
2db0: 2e 31 31 31 20 6d 61 6b 65 66 69 6c 65 2e 76 63  .111 makefile.vc
2dc0: 0a 2d 2d 2d 20 77 69 6e 2f 6d 61 6b 65 66 69 6c  .--- win/makefil
2dd0: 65 2e 76 63 09 39 20 4f 63 74 20 32 30 30 33 20  e.vc.9 Oct 2003 
2de0: 30 30 3a 32 39 3a 32 37 20 2d 30 30 30 30 09 31  00:29:27 -0000.1
2df0: 2e 31 31 31 0a 2b 2b 2b 20 77 69 6e 2f 6d 61 6b  .111.+++ win/mak
2e00: 65 66 69 6c 65 2e 76 63 09 32 30 20 4f 63 74 20  efile.vc.20 Oct 
2e10: 32 30 30 33 20 32 31 3a 32 36 3a 32 31 20 2d 30  2003 21:26:21 -0
2e20: 30 30 30 0a 40 40 20 2d 37 37 33 2c 39 20 2b 37  000.@@ -773,9 +7
2e30: 37 33 2c 39 20 40 40 0a 20 09 40 65 63 68 6f 20  73,9 @@. .@echo 
2e40: 69 6e 73 74 61 6c 6c 69 6e 67 20 6f 70 74 30 2e  installing opt0.
2e50: 34 0a 20 09 40 24 28 43 50 59 29 20 22 24 28 52  4. .@$(CPY) "$(R
2e60: 4f 4f 54 29 5c 6c 69 62 72 61 72 79 5c 6f 70 74  OOT)\library\opt
2e70: 5c 2a 2e 74 63 6c 22 20 5c 0a 20 09 09 22 24 28  \*.tcl" \. .."$(
2e80: 53 43 52 49 50 54 5f 49 4e 53 54 41 4c 4c 5f 44  SCRIPT_INSTALL_D
2e90: 49 52 29 5c 6f 70 74 30 2e 34 5c 22 0a 2d 09 40  IR)\opt0.4\".-.@
2ea0: 65 63 68 6f 20 69 6e 73 74 61 6c 6c 69 6e 67 20  echo installing 
2eb0: 6d 73 67 63 61 74 31 2e 33 0a 2b 09 40 65 63 68  msgcat1.3.+.@ech
2ec0: 6f 20 69 6e 73 74 61 6c 6c 69 6e 67 20 6d 73 67  o installing msg
2ed0: 63 61 74 31 2e 34 0a 20 09 40 24 28 43 50 59 29  cat1.4. .@$(CPY)
2ee0: 20 22 24 28 52 4f 4f 54 29 5c 6c 69 62 72 61 72   "$(ROOT)\librar
2ef0: 79 5c 6d 73 67 63 61 74 5c 2a 2e 74 63 6c 22 20  y\msgcat\*.tcl" 
2f00: 5c 0a 2d 09 20 20 20 20 22 24 28 53 43 52 49 50  \.-.    "$(SCRIP
2f10: 54 5f 49 4e 53 54 41 4c 4c 5f 44 49 52 29 5c 6d  T_INSTALL_DIR)\m
2f20: 73 67 63 61 74 31 2e 33 5c 22 0a 2b 09 20 20 20  sgcat1.3\".+.   
2f30: 20 22 24 28 53 43 52 49 50 54 5f 49 4e 53 54 41   "$(SCRIPT_INSTA
2f40: 4c 4c 5f 44 49 52 29 5c 6d 73 67 63 61 74 31 2e  LL_DIR)\msgcat1.
2f50: 34 5c 22 0a 20 09 40 65 63 68 6f 20 69 6e 73 74  4\". .@echo inst
2f60: 61 6c 6c 69 6e 67 20 74 63 6c 74 65 73 74 32 2e  alling tcltest2.
2f70: 32 20 0a 20 09 40 24 28 43 50 59 29 20 22 24 28  2 . .@$(CPY) "$(
2f80: 52 4f 4f 54 29 5c 6c 69 62 72 61 72 79 5c 74 63  ROOT)\library\tc
2f90: 6c 74 65 73 74 5c 2a 2e 74 63 6c 22 20 5c 0a 20  ltest\*.tcl" \. 
2fa0: 09 20 20 20 20 22 24 28 53 43 52 49 50 54 5f 49  .    "$(SCRIPT_I
2fb0: 4e 53 54 41 4c 4c 5f 44 49 52 29 5c 74 63 6c 74  NSTALL_DIR)\tclt
2fc0: 65 73 74 32 2e 32 5c 22 0a                       est2.2\".