summaryrefslogtreecommitdiffstats
path: root/unix
diff options
context:
space:
mode:
authorstanton <stanton>1998-06-25 16:11:27 (GMT)
committerstanton <stanton>1998-06-25 16:11:27 (GMT)
commit690834e1c77f90f43bc6f2f2d028a75d5b84c023 (patch)
treebf282d40c9ffd3e8b604503c543c519153e03ec8 /unix
parent49c256e178a749d91ee41cfbcb8b200e8206ba4a (diff)
downloadtcl-690834e1c77f90f43bc6f2f2d028a75d5b84c023.zip
tcl-690834e1c77f90f43bc6f2f2d028a75d5b84c023.tar.gz
tcl-690834e1c77f90f43bc6f2f2d028a75d5b84c023.tar.bz2
lint
Diffstat (limited to 'unix')
-rw-r--r--unix/tclUnixInit.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/unix/tclUnixInit.c b/unix/tclUnixInit.c
index 69df49c..56df95d 100644
--- a/unix/tclUnixInit.c
+++ b/unix/tclUnixInit.c
@@ -172,7 +172,8 @@ TclPlatformInit(interp)
* name.version and the minor version number is in name.release.
*/
- if ((strchr(name.release, '.') != NULL) || !isdigit(name.version[0])) {
+ if ((strchr(name.release, '.') != NULL)
+ || !isdigit(UCHAR(name.version[0]))) {
Tcl_SetVar2(interp, "tcl_platform", "osVersion", name.release,
TCL_GLOBAL_ONLY);
} else {