summaryrefslogtreecommitdiffstats
path: root/generic/tclPkg.c
diff options
context:
space:
mode:
authornijtmans <nijtmans@noemail.net>2009-12-11 23:10:47 (GMT)
committernijtmans <nijtmans@noemail.net>2009-12-11 23:10:47 (GMT)
commit10ce29ccec0b87bec11091d8b41a657dbe219e3e (patch)
tree5bf05c10694ebb7050e255e2f663f3936776582d /generic/tclPkg.c
parent3f0093ea21c05f7ab184f145927ff1a4bbbdf860 (diff)
downloadtcl-10ce29ccec0b87bec11091d8b41a657dbe219e3e.zip
tcl-10ce29ccec0b87bec11091d8b41a657dbe219e3e.tar.gz
tcl-10ce29ccec0b87bec11091d8b41a657dbe219e3e.tar.bz2
Fix gcc warning, using gcc-4.3.4 on cygwin
warning: array subscript has type 'char' win/makefile.vc Revert to version 1.203 [Bug #2912773] FossilOrigin-Name: 574533920e342b96bb7273401972575c42fc638c
Diffstat (limited to 'generic/tclPkg.c')
-rw-r--r--generic/tclPkg.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclPkg.c b/generic/tclPkg.c
index 3753445..d26c630 100644
--- a/generic/tclPkg.c
+++ b/generic/tclPkg.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclPkg.c,v 1.40 2009/12/11 22:52:09 nijtmans Exp $
+ * RCS: @(#) $Id: tclPkg.c,v 1.41 2009/12/11 23:10:47 nijtmans Exp $
*
* TIP #268.
* Heavily rewritten to handle the extend version numbers, and extended
@@ -1865,7 +1865,7 @@ Tcl_PkgInitStubsCheck(
int count = 0;
while (*p) {
- count += !isdigit(*p++ & 255);
+ count += !isdigit(UCHAR(*p++));
}
if (count == 1) {
if (0 != strncmp(version, actualVersion, strlen(version))) {