Commit | Line | Data |
---|---|---|
920dae64 AT |
1 | '\" |
2 | '\" Copyright (c) 2001 by Kevin B. Kenny. All rights reserved. | |
3 | '\" | |
4 | '\" See the file "license.terms" for information on usage and redistribution | |
5 | '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. | |
6 | '\" | |
7 | '\" RCS: @(#) $Id: lset.n,v 1.6.2.1 2003/12/01 21:29:34 msofer Exp $ | |
8 | '\" | |
9 | '\" The definitions below are for supplemental macros used in Tcl/Tk | |
10 | '\" manual entries. | |
11 | '\" | |
12 | '\" .AP type name in/out ?indent? | |
13 | '\" Start paragraph describing an argument to a library procedure. | |
14 | '\" type is type of argument (int, etc.), in/out is either "in", "out", | |
15 | '\" or "in/out" to describe whether procedure reads or modifies arg, | |
16 | '\" and indent is equivalent to second arg of .IP (shouldn't ever be | |
17 | '\" needed; use .AS below instead) | |
18 | '\" | |
19 | '\" .AS ?type? ?name? | |
20 | '\" Give maximum sizes of arguments for setting tab stops. Type and | |
21 | '\" name are examples of largest possible arguments that will be passed | |
22 | '\" to .AP later. If args are omitted, default tab stops are used. | |
23 | '\" | |
24 | '\" .BS | |
25 | '\" Start box enclosure. From here until next .BE, everything will be | |
26 | '\" enclosed in one large box. | |
27 | '\" | |
28 | '\" .BE | |
29 | '\" End of box enclosure. | |
30 | '\" | |
31 | '\" .CS | |
32 | '\" Begin code excerpt. | |
33 | '\" | |
34 | '\" .CE | |
35 | '\" End code excerpt. | |
36 | '\" | |
37 | '\" .VS ?version? ?br? | |
38 | '\" Begin vertical sidebar, for use in marking newly-changed parts | |
39 | '\" of man pages. The first argument is ignored and used for recording | |
40 | '\" the version when the .VS was added, so that the sidebars can be | |
41 | '\" found and removed when they reach a certain age. If another argument | |
42 | '\" is present, then a line break is forced before starting the sidebar. | |
43 | '\" | |
44 | '\" .VE | |
45 | '\" End of vertical sidebar. | |
46 | '\" | |
47 | '\" .DS | |
48 | '\" Begin an indented unfilled display. | |
49 | '\" | |
50 | '\" .DE | |
51 | '\" End of indented unfilled display. | |
52 | '\" | |
53 | '\" .SO | |
54 | '\" Start of list of standard options for a Tk widget. The | |
55 | '\" options follow on successive lines, in four columns separated | |
56 | '\" by tabs. | |
57 | '\" | |
58 | '\" .SE | |
59 | '\" End of list of standard options for a Tk widget. | |
60 | '\" | |
61 | '\" .OP cmdName dbName dbClass | |
62 | '\" Start of description of a specific option. cmdName gives the | |
63 | '\" option's name as specified in the class command, dbName gives | |
64 | '\" the option's name in the option database, and dbClass gives | |
65 | '\" the option's class in the option database. | |
66 | '\" | |
67 | '\" .UL arg1 arg2 | |
68 | '\" Print arg1 underlined, then print arg2 normally. | |
69 | '\" | |
70 | '\" RCS: @(#) $Id: man.macros,v 1.4 2000/08/25 06:18:32 ericm Exp $ | |
71 | '\" | |
72 | '\" # Set up traps and other miscellaneous stuff for Tcl/Tk man pages. | |
73 | .if t .wh -1.3i ^B | |
74 | .nr ^l \n(.l | |
75 | .ad b | |
76 | '\" # Start an argument description | |
77 | .de AP | |
78 | .ie !"\\$4"" .TP \\$4 | |
79 | .el \{\ | |
80 | . ie !"\\$2"" .TP \\n()Cu | |
81 | . el .TP 15 | |
82 | .\} | |
83 | .ta \\n()Au \\n()Bu | |
84 | .ie !"\\$3"" \{\ | |
85 | \&\\$1 \\fI\\$2\\fP (\\$3) | |
86 | .\".b | |
87 | .\} | |
88 | .el \{\ | |
89 | .br | |
90 | .ie !"\\$2"" \{\ | |
91 | \&\\$1 \\fI\\$2\\fP | |
92 | .\} | |
93 | .el \{\ | |
94 | \&\\fI\\$1\\fP | |
95 | .\} | |
96 | .\} | |
97 | .. | |
98 | '\" # define tabbing values for .AP | |
99 | .de AS | |
100 | .nr )A 10n | |
101 | .if !"\\$1"" .nr )A \\w'\\$1'u+3n | |
102 | .nr )B \\n()Au+15n | |
103 | .\" | |
104 | .if !"\\$2"" .nr )B \\w'\\$2'u+\\n()Au+3n | |
105 | .nr )C \\n()Bu+\\w'(in/out)'u+2n | |
106 | .. | |
107 | .AS Tcl_Interp Tcl_CreateInterp in/out | |
108 | '\" # BS - start boxed text | |
109 | '\" # ^y = starting y location | |
110 | '\" # ^b = 1 | |
111 | .de BS | |
112 | .br | |
113 | .mk ^y | |
114 | .nr ^b 1u | |
115 | .if n .nf | |
116 | .if n .ti 0 | |
117 | .if n \l'\\n(.lu\(ul' | |
118 | .if n .fi | |
119 | .. | |
120 | '\" # BE - end boxed text (draw box now) | |
121 | .de BE | |
122 | .nf | |
123 | .ti 0 | |
124 | .mk ^t | |
125 | .ie n \l'\\n(^lu\(ul' | |
126 | .el \{\ | |
127 | .\" Draw four-sided box normally, but don't draw top of | |
128 | .\" box if the box started on an earlier page. | |
129 | .ie !\\n(^b-1 \{\ | |
130 | \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul' | |
131 | .\} | |
132 | .el \}\ | |
133 | \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul' | |
134 | .\} | |
135 | .\} | |
136 | .fi | |
137 | .br | |
138 | .nr ^b 0 | |
139 | .. | |
140 | '\" # VS - start vertical sidebar | |
141 | '\" # ^Y = starting y location | |
142 | '\" # ^v = 1 (for troff; for nroff this doesn't matter) | |
143 | .de VS | |
144 | .if !"\\$2"" .br | |
145 | .mk ^Y | |
146 | .ie n 'mc \s12\(br\s0 | |
147 | .el .nr ^v 1u | |
148 | .. | |
149 | '\" # VE - end of vertical sidebar | |
150 | .de VE | |
151 | .ie n 'mc | |
152 | .el \{\ | |
153 | .ev 2 | |
154 | .nf | |
155 | .ti 0 | |
156 | .mk ^t | |
157 | \h'|\\n(^lu+3n'\L'|\\n(^Yu-1v\(bv'\v'\\n(^tu+1v-\\n(^Yu'\h'-|\\n(^lu+3n' | |
158 | .sp -1 | |
159 | .fi | |
160 | .ev | |
161 | .\} | |
162 | .nr ^v 0 | |
163 | .. | |
164 | '\" # Special macro to handle page bottom: finish off current | |
165 | '\" # box/sidebar if in box/sidebar mode, then invoked standard | |
166 | '\" # page bottom macro. | |
167 | .de ^B | |
168 | .ev 2 | |
169 | 'ti 0 | |
170 | 'nf | |
171 | .mk ^t | |
172 | .if \\n(^b \{\ | |
173 | .\" Draw three-sided box if this is the box's first page, | |
174 | .\" draw two sides but no top otherwise. | |
175 | .ie !\\n(^b-1 \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c | |
176 | .el \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c | |
177 | .\} | |
178 | .if \\n(^v \{\ | |
179 | .nr ^x \\n(^tu+1v-\\n(^Yu | |
180 | \kx\h'-\\nxu'\h'|\\n(^lu+3n'\ky\L'-\\n(^xu'\v'\\n(^xu'\h'|0u'\c | |
181 | .\} | |
182 | .bp | |
183 | 'fi | |
184 | .ev | |
185 | .if \\n(^b \{\ | |
186 | .mk ^y | |
187 | .nr ^b 2 | |
188 | .\} | |
189 | .if \\n(^v \{\ | |
190 | .mk ^Y | |
191 | .\} | |
192 | .. | |
193 | '\" # DS - begin display | |
194 | .de DS | |
195 | .RS | |
196 | .nf | |
197 | .sp | |
198 | .. | |
199 | '\" # DE - end display | |
200 | .de DE | |
201 | .fi | |
202 | .RE | |
203 | .sp | |
204 | .. | |
205 | '\" # SO - start of list of standard options | |
206 | .de SO | |
207 | .SH "STANDARD OPTIONS" | |
208 | .LP | |
209 | .nf | |
210 | .ta 5.5c 11c | |
211 | .ft B | |
212 | .. | |
213 | '\" # SE - end of list of standard options | |
214 | .de SE | |
215 | .fi | |
216 | .ft R | |
217 | .LP | |
218 | See the \\fBoptions\\fR manual entry for details on the standard options. | |
219 | .. | |
220 | '\" # OP - start of full description for a single option | |
221 | .de OP | |
222 | .LP | |
223 | .nf | |
224 | .ta 4c | |
225 | Command-Line Name: \\fB\\$1\\fR | |
226 | Database Name: \\fB\\$2\\fR | |
227 | Database Class: \\fB\\$3\\fR | |
228 | .fi | |
229 | .IP | |
230 | .. | |
231 | '\" # CS - begin code excerpt | |
232 | .de CS | |
233 | .RS | |
234 | .nf | |
235 | .ta .25i .5i .75i 1i | |
236 | .. | |
237 | '\" # CE - end code excerpt | |
238 | .de CE | |
239 | .fi | |
240 | .RE | |
241 | .. | |
242 | .de UL | |
243 | \\$1\l'|0\(ul'\\$2 | |
244 | .. | |
245 | .TH lset n 8.4 Tcl "Tcl Built-In Commands" | |
246 | .BS | |
247 | '\" Note: do not modify the .SH NAME line immediately below! | |
248 | .SH NAME | |
249 | lset \- Change an element in a list | |
250 | .SH SYNOPSIS | |
251 | \fBlset \fIvarName ?index...? newValue\fR | |
252 | .BE | |
253 | .SH DESCRIPTION | |
254 | .PP | |
255 | The \fBlset\fR command accepts a parameter, \fIvarName\fR, which | |
256 | it interprets as the name of a variable containing a Tcl list. | |
257 | It also accepts zero or more \fIindices\fR into | |
258 | the list. The indices may be presented either consecutively on the | |
259 | command line, or grouped in a | |
260 | Tcl list and presented as a single argument. | |
261 | Finally, it accepts a new value for an element of \fIvarName\fR. | |
262 | .PP | |
263 | If no indices are presented, the command takes the form: | |
264 | .CS | |
265 | lset varName newValue | |
266 | .CE | |
267 | or | |
268 | .CS | |
269 | lset varName {} newValue | |
270 | .CE | |
271 | In this case, \fInewValue\fR replaces the old value of the variable | |
272 | \fIvarName\fR. | |
273 | .PP | |
274 | When presented with a single index, the \fBlset\fR command | |
275 | treats the content of the \fIvarName\fR variable as a Tcl list. | |
276 | It addresses the \fIindex\fR'th element in it | |
277 | (0 refers to the first element of the list). | |
278 | When interpreting the list, \fBlset\fR observes the same rules | |
279 | concerning braces and quotes and backslashes as the Tcl command | |
280 | interpreter; however, variable | |
281 | substitution and command substitution do not occur. | |
282 | The command constructs a new list in which the designated element is | |
283 | replaced with \fInewValue\fR. This new list is stored in the | |
284 | variable \fIvarName\fR, and is also the return value from the \fBlset\fR | |
285 | command. | |
286 | .PP | |
287 | If \fIindex\fR is negative or greater than or equal to the number | |
288 | of elements in \fI$varName\fR, then an error occurs. | |
289 | .PP | |
290 | If \fIindex\fR has the value \fBend\fR, it refers to the last element | |
291 | in the list, and \fBend\-\fIinteger\fR refers to the last element in | |
292 | the list minus the specified integer offset. | |
293 | .PP | |
294 | If additional \fIindex\fR arguments are supplied, then each argument is | |
295 | used in turn to address an element within a sublist designated | |
296 | by the previous indexing operation, | |
297 | allowing the script to alter elements in sublists. The command, | |
298 | .CS | |
299 | lset a 1 2 newValue | |
300 | .CE | |
301 | or | |
302 | .CS | |
303 | lset a {1 2} newValue | |
304 | .CE | |
305 | replaces element 2 of sublist 1 with \fInewValue\fR. | |
306 | .PP | |
307 | The integer appearing in each \fIindex\fR argument must be greater | |
308 | than or equal to zero. The integer appearing in each \fIindex\fR | |
309 | argument must be strictly less than the length of the corresponding | |
310 | list. In other words, the \fBlset\fR command cannot change the size | |
311 | of a list. If an index is outside the permitted range, an error is reported. | |
312 | .SH EXAMPLES | |
313 | In each of these examples, the initial value of \fIx\fR is: | |
314 | .CS | |
315 | set x [list [list a b c] [list d e f] [list g h i]] | |
316 | => {a b c} {d e f} {g h i} | |
317 | .CE | |
318 | The indicated return value also becomes the new value of \fIx\fR | |
319 | (except in the last case, which is an error which leaves the value of | |
320 | \fIx\fR unchanged.) | |
321 | .CS | |
322 | lset x {j k l} => j k l | |
323 | lset x {} {j k l} => j k l | |
324 | lset x 0 j => j {d e f} {g h i} | |
325 | lset x 2 j => {a b c} {d e f} j | |
326 | lset x end j => {a b c} {d e f} j | |
327 | lset x end-1 j => {a b c} j {g h i} | |
328 | lset x 2 1 j => {a b c} {d e f} {g j i} | |
329 | lset x {2 1} j => {a b c} {d e f} {g j i} | |
330 | lset x {2 3} j => \fIlist index out of range\fR | |
331 | .CE | |
332 | In the following examples, the initial value of \fIx\fR is: | |
333 | .CS | |
334 | set x [list [list [list a b] [list c d]] \e | |
335 | [list [list e f] [list g h]]] | |
336 | => {{a b} {c d}} {{e f} {g h}} | |
337 | .CE | |
338 | The indicated return value also becomes the new value of \fIx\fR. | |
339 | .CS | |
340 | lset x 1 1 0 j => {{a b} {c d}} {{e f} {j h}} | |
341 | lset x {1 1 0} j => {{a b} {c d}} {{e f} {j h}} | |
342 | .CE | |
343 | .SH "SEE ALSO" | |
344 | list(n), lappend(n), lindex(n), linsert(n), llength(n), lsearch(n), | |
345 | lsort(n), lrange(n), lreplace(n) | |
346 | ||
347 | .SH KEYWORDS | |
348 | element, index, list, replace, set |