Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Modify the new shell test case to work on non-Windows platforms as well. |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | expShell |
Files: | files | file ages | folders |
SHA1: |
f362c5d9d17a04404a0407a556202d10 |
User & Date: | mistachkin 2015-01-18 09:02:57.181 |
Context
2015-01-19
| ||
07:42 | Merge updates from trunk. (check-in: c7167f88ec user: mistachkin tags: expShell) | |
2015-01-18
| ||
09:02 | Modify the new shell test case to work on non-Windows platforms as well. (check-in: f362c5d9d1 user: mistachkin tags: expShell) | |
05:35 | Some experimental command line shell input/output enhancements. (check-in: 25e99f3fe5 user: mistachkin tags: expShell) | |
Changes
Changes to test/shell1.test.
︙ | ︙ | |||
820 821 822 823 824 825 826 | do_test shell1-5.0 { # # NOTE: Skip NUL byte because it appears to be incompatible with command # shell argument parsing. # for {set i 1} {$i < 256} {incr i} { # | | | > | | | 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 | do_test shell1-5.0 { # # 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 (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 {$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 \ \a \\a \b \\b \t \\t \n \\n \v \\v \f \\f \r \\r \ " " "\" \"" \" \\\" ' \"'\" \\ \\\\] $char] |
︙ | ︙ |