asf - Revision 1916604: /tcl/websh/trunk/examples/simpsess