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