diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2010-01-20 13:42:17 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2010-01-20 13:42:17 (GMT) |
| commit | 1549d82a2029add6f62dde489d26a70b466f4fd0 (patch) | |
| tree | 6b453022eb94d1d13ccd73cb7e033e4859af45fd /doc/proc.n | |
| parent | ee1c40272a0ee43da070323282205173df4a8816 (diff) | |
| download | tcl-1549d82a2029add6f62dde489d26a70b466f4fd0.zip tcl-1549d82a2029add6f62dde489d26a70b466f4fd0.tar.gz tcl-1549d82a2029add6f62dde489d26a70b466f4fd0.tar.bz2 | |
Use a consistent indentation of 4 for code examples.
Diffstat (limited to 'doc/proc.n')
| -rw-r--r-- | doc/proc.n | 15 |
1 files changed, 9 insertions, 6 deletions
@@ -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: proc.n,v 1.11 2008/10/17 10:22:25 dkf Exp $ +'\" RCS: @(#) $Id: proc.n,v 1.12 2010/01/20 13:42:17 dkf Exp $ '\" .so man.macros .TH proc n "" Tcl "Tcl Built-In Commands" @@ -81,9 +81,9 @@ them out, one by one. .PP .CS \fBproc\fR printArguments args { - foreach arg $args { - puts $arg - } + foreach arg $args { + puts $arg + } } .CE .PP @@ -93,11 +93,14 @@ defaults to \fB2\fR: .PP .CS \fBproc\fR mult {varName {multiplier 2}} { - upvar 1 $varName var - set var [expr {$var * $multiplier}] + upvar 1 $varName var + set var [expr {$var * $multiplier}] } .CE .SH "SEE ALSO" info(n), unknown(n) .SH KEYWORDS argument, procedure +'\" Local Variables: +'\" mode: nroff +'\" End: |