diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2015-09-30 08:25:37 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2015-09-30 08:25:37 (GMT) |
| commit | f7aa4f989380e9cbbd9515737ae3b6b1cebf5af5 (patch) | |
| tree | e336a899a20ae2a89f82cd1a303fbcdff32dbcee | |
| parent | 001ed3a8b230bad2096da19e221d61ae1b5c2c4a (diff) | |
| download | tcl-f7aa4f989380e9cbbd9515737ae3b6b1cebf5af5.zip tcl-f7aa4f989380e9cbbd9515737ae3b6b1cebf5af5.tar.gz tcl-f7aa4f989380e9cbbd9515737ae3b6b1cebf5af5.tar.bz2 | |
Fix [b1f19286f0]: for command documentation.
Minor addendum to previous commit: Make OS version number available in ::platform::generic for Cygwin
| -rw-r--r-- | doc/for.n | 2 | ||||
| -rw-r--r-- | library/platform/platform.tcl | 1 |
2 files changed, 2 insertions, 1 deletions
@@ -48,7 +48,7 @@ expression is evaluated (before each loop iteration), so changes in the variables will be visible. See below for an example: .SH EXAMPLES -Print a line for each of the integers from 0 to 10: +Print a line for each of the integers from 0 to 9: .CS for {set x 0} {$x<10} {incr x} { puts "x is $x" diff --git a/library/platform/platform.tcl b/library/platform/platform.tcl index 6843210..d510541 100644 --- a/library/platform/platform.tcl +++ b/library/platform/platform.tcl @@ -104,6 +104,7 @@ proc ::platform::generic {} { # Do not check wordSize, win32-x64 is an IL32P64 platform. set cpu x86_64 } + append plat -$tcl_platform(osVersion) } sunos { set plat solaris |