Added example

2 files changed, 31 insertions, 2 deletions

diff --git a/doc/flush.n b/doc/flush.n
index 172555c..0bb308c 100644
--- a/doc/flush.n
+++ b/doc/flush.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: flush.n,v 1.4 2001/09/14 19:20:40 andreas_kupries Exp $
+'\" RCS: @(#) $Id: flush.n,v 1.5 2004/05/27 15:40:07 dkf Exp $
 '\" 
 .so man.macros
 .TH flush n 7.5 Tcl "Tcl Built-In Commands"
@@ -34,6 +34,14 @@ buffered output has been flushed to the channel. If the channel is in
 nonblocking mode, the command may return before all buffered output has been
 flushed; the remainder will be flushed in the background as fast as the
 underlying file or device is able to absorb it.
+.SH EXAMPLE
+Prompt for the user to type some information in on the console:
+.CS
+puts -nonewline "Please type your name: "
+flush stdout
+gets stdin name
+puts "Hello there, $name!"
+.CE
 
 .SH "SEE ALSO"
 file(n), open(n), socket(n), Tcl_StandardChannels(3)
diff --git a/doc/unset.n b/doc/unset.n
index f1fcc31..142b3ae 100644
--- a/doc/unset.n
+++ b/doc/unset.n
@@ -6,7 +6,7 @@
 '\" See the file "license.terms" for information on usage and redistribution
 '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 '\" 
-'\" RCS: @(#) $Id: unset.n,v 1.6 2004/05/07 22:26:03 msofer Exp $
+'\" RCS: @(#) $Id: unset.n,v 1.7 2004/05/27 15:45:43 dkf Exp $
 '\" 
 .so man.macros
 .TH unset n 8.4 Tcl "Tcl Built-In Commands"
@@ -39,6 +39,27 @@ If an error occurs, any variables after the named one causing the error not
 deleted.  An error can occur when the named variable doesn't exist, or the
 name refers to an array element but the variable is a scalar, or the name
 refers to a variable in a non-existent namespace.
+.SH EXAMPLE
+Create an array containing a mapping from some numbers to their
+squares and remove the array elements for non-prime numbers:
+.CS
+array set squares {
+    1 1    6 36
+    2 4    7 49
+    3 9    8 64
+    4 16   9 81
+    5 25  10 100
+}
+
+puts "The squares are:"
+parray squares
+
+unset squares(1) squares(4) squares(6)
+unset squares(8) squares(9) squares(10)
+
+puts "The prime squares are:"
+parray squares
+.CE
 
 .SH "SEE ALSO"
 set(n), trace(n), upvar(n)