home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Practical Programming in Tcl & Tk (4th Edition)
/
TCLBOOK4.BIN
/
pc
/
exsource
/
6_10.tcl
< prev
next >
Wrap
Text File
|
2003-04-16
|
105b
|
11 lines
#
# Example 6-10
# Using list with foreach.
#
foreach x [list $a $b [foo]] {
puts stdout "x = $x"
}