diff options
| author | dkf <dkf@noemail.net> | 2004-05-05 23:08:36 (GMT) |
|---|---|---|
| committer | dkf <dkf@noemail.net> | 2004-05-05 23:08:36 (GMT) |
| commit | 499f5cb39492ea0371faf1a95ec53e9bcc248147 (patch) | |
| tree | a99c8f196b3cd77882f36ea93ec86c2f22e410cb /doc/continue.n | |
| parent | 3da85484db66ea3f4a2b014dca6ecf11701e1f56 (diff) | |
| download | tcl-499f5cb39492ea0371faf1a95ec53e9bcc248147.zip tcl-499f5cb39492ea0371faf1a95ec53e9bcc248147.tar.gz tcl-499f5cb39492ea0371faf1a95ec53e9bcc248147.tar.bz2 | |
More examples.
FossilOrigin-Name: 9e584cedfeb378fa1f83cbf9947aa567df60d1c0
Diffstat (limited to 'doc/continue.n')
| -rw-r--r-- | doc/continue.n | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/doc/continue.n b/doc/continue.n index 0771831..86478e2 100644 --- a/doc/continue.n +++ b/doc/continue.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: continue.n,v 1.4 2003/09/02 16:32:12 dgp Exp $ +'\" RCS: @(#) $Id: continue.n,v 1.5 2004/05/05 23:08:39 dkf Exp $ '\" .so man.macros .TH continue n "" Tcl "Tcl Built-In Commands" @@ -29,6 +29,16 @@ continues with the next iteration of the loop. Catch exceptions are also handled in a few other situations, such as the \fBcatch\fR command and the outermost scripts of procedure bodies. +.SH EXAMPLE +Print a line for each of the integers from 0 to 10 \fIexcept\fR 5: +.CS +for {set x 0} {$x<10} {incr x} { + if {$x == 5} { + continue + } + puts "x is $x" +} +.CE .SH "SEE ALSO" break(n), for(n), foreach(n), return(n), while(n) |