From fb4ad76021c0fb42e1515cbabaec082a4704d394 Mon Sep 17 00:00:00 2001 From: dkf Date: Wed, 5 May 2004 23:08:37 +0000 Subject: More examples. --- ChangeLog | 2 +- doc/break.n | 12 +++++++++++- doc/continue.n | 12 +++++++++++- 3 files changed, 23 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 2616d0e..8505790 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,6 +1,6 @@ 2004-05-05 Donal K. Fellows - * doc/for.n, doc/while.n: More examples. + * doc/break.n, doc/continue.n, doc/for.n, doc/while.n: More examples. 2004-05-05 Don Porter diff --git a/doc/break.n b/doc/break.n index 3b71c71..af0eac4 100644 --- a/doc/break.n +++ b/doc/break.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: break.n,v 1.4 2003/09/02 16:32:12 dgp Exp $ +'\" RCS: @(#) $Id: break.n,v 1.5 2004/05/05 23:08:39 dkf Exp $ '\" .so man.macros .TH break n "" Tcl "Tcl Built-In Commands" @@ -29,6 +29,16 @@ aborts its execution and returns normally. Break exceptions are also handled in a few other situations, such as the \fBcatch\fR command, Tk event bindings, and the outermost scripts of procedure bodies. +.SH EXAMPLE +Print a line for each of the integers from 0 to 5: +.CS +for {set x 0} {$x<10} {incr x} { + if {$x > 5} { + break + } + puts "x is $x" +} +.CE .SH "SEE ALSO" catch(n), continue(n), for(n), foreach(n), return(n), while(n) 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) -- cgit v0.12