summaryrefslogtreecommitdiffstats
path: root/generic/tclFileName.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2016-09-08 12:43:49 (GMT)
committerdgp <dgp@users.sourceforge.net>2016-09-08 12:43:49 (GMT)
commitd2c080833061d96d6d76d4d3873e15796cdd815c (patch)
tree68cbdfa02b9e8e347fddbd0df773613cf75f45d4 /generic/tclFileName.c
parente36a7a2e7fa1f1afb57f5e6b06917180e429cd72 (diff)
parent14f15edc7322b01a23ee0ae2201d96ae38212d09 (diff)
downloadtcl-d2c080833061d96d6d76d4d3873e15796cdd815c.zip
tcl-d2c080833061d96d6d76d4d3873e15796cdd815c.tar.gz
tcl-d2c080833061d96d6d76d4d3873e15796cdd815c.tar.bz2
merge 8.6.4
Diffstat (limited to 'generic/tclFileName.c')
-rw-r--r--generic/tclFileName.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c
index 5d4702b..a7251bb 100644
--- a/generic/tclFileName.c
+++ b/generic/tclFileName.c
@@ -235,9 +235,9 @@ ExtractWinRoot(
if ((path[0] == 'c' || path[0] == 'C')
&& (path[1] == 'o' || path[1] == 'O')) {
if ((path[2] == 'm' || path[2] == 'M')
- && path[3] >= '1' && path[3] <= '4') {
+ && path[3] >= '1' && path[3] <= '9') {
/*
- * May have match for 'com[1-4]:?', which is a serial port.
+ * May have match for 'com[1-9]:?', which is a serial port.
*/
if (path[4] == '\0') {
@@ -257,9 +257,9 @@ ExtractWinRoot(
} else if ((path[0] == 'l' || path[0] == 'L')
&& (path[1] == 'p' || path[1] == 'P')
&& (path[2] == 't' || path[2] == 'T')) {
- if (path[3] >= '1' && path[3] <= '3') {
+ if (path[3] >= '1' && path[3] <= '9') {
/*
- * May have match for 'lpt[1-3]:?'
+ * May have match for 'lpt[1-9]:?'
*/
if (path[4] == '\0') {