diff options
Diffstat (limited to 'doc/foreach.n')
| -rw-r--r-- | doc/foreach.n | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/doc/foreach.n b/doc/foreach.n index 5d3a631..824cd1c 100644 --- a/doc/foreach.n +++ b/doc/foreach.n @@ -5,7 +5,7 @@ '\" See the file "license.terms" for information on usage and redistribution '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. '\" -'\" RCS: @(#) $Id: foreach.n,v 1.8 2006/11/15 09:23:01 dkf Exp $ +'\" RCS: @(#) $Id: foreach.n,v 1.9 2007/10/28 14:17:40 dkf Exp $ '\" .so man.macros .TH foreach n "" Tcl "Tcl Built-In Commands" @@ -57,9 +57,9 @@ cube of the value: '\" Maintainers: notice the tab hacking below! .ta 3i set values {1 3 5 7 2 4 6 8} ;# Odd numbers first, for fun! -puts "Value\\tSquare\\tCube" ;# Neat-looking header +puts "Value\etSquare\etCube" ;# Neat-looking header \fBforeach\fR x $values { ;# Now loop and print... - puts " $x\\t [expr {$x**2}]\\t [expr {$x**3}]" + puts " $x\et [expr {$x**2}]\et [expr {$x**3}]" } .CE .PP |