Index: test/shell1.test
==================================================================
--- test/shell1.test
+++ test/shell1.test
@@ -822,15 +822,16 @@
   # NOTE: Skip NUL byte because it appears to be incompatible with command
   #       shell argument parsing.
   #
   for {set i 1} {$i < 256} {incr i} {
     #
-    # NOTE: Due to how the Tcl [exec] command works on Windows (i.e. where
-    #       it treats command channels opened for it as textual ones), the
-    #       carriage-return and end-of-file characters cannot be used here.
+    # NOTE: Due to how the Tcl [exec] command works (i.e. where it treats
+    #       command channels opened for it as textual ones), the carriage
+    #       return character (and on Windows, the end-of-file character)
+    #       cannot be used here.
     #
-    if {$tcl_platform(platform)=="windows" && ($i == 0x0D || $i == 0x1A)} {
+    if {$i==0x0D || ($tcl_platform(platform)=="windows" && $i==0x1A)} {
       continue
     }
     set hex [format %02X $i]
     set char [subst \\x$hex]; set oldChar $char
     set char [string map [list \