diff options
Diffstat (limited to 'test/shell1.test')
| -rw-r--r-- | test/shell1.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/shell1.test b/test/shell1.test index 206fb0a4f..f355989c3 100644 --- a/test/shell1.test +++ b/test/shell1.test @@ -1059,7 +1059,7 @@ do_test shell1-5.0 { continue } # Tcl 8.7 maps 0x80 through 0x9f into valid UTF8. So skip those tests. - if {$i>=0x80 && $i<=0x9f} continue + if {$i>=0x80 && ($i<=0x9F || $tcl_version>=9.0)} continue if {$i>=0xE0 && $tcl_platform(os)=="OpenBSD"} continue if {$i>=0xE0 && $i<=0xEF && $tcl_platform(os)=="Linux"} continue set hex [format %02X $i] |