diff options
author | ashok <ashok> | 2016-07-09 14:18:22 (GMT) |
---|---|---|
committer | ashok <ashok> | 2016-07-09 14:18:22 (GMT) |
commit | cc8c25008d6a30ceb0b4a6946e4a3d45431637c6 (patch) | |
tree | 363d4cf0de55087e7ce2d4a73b1c80c68207922e /tests | |
parent | 11dc688b81fc6d55eb42fd23e063a5310569d71d (diff) | |
download | tcl-cc8c25008d6a30ceb0b4a6946e4a3d45431637c6.zip tcl-cc8c25008d6a30ceb0b4a6946e4a3d45431637c6.tar.gz tcl-cc8c25008d6a30ceb0b4a6946e4a3d45431637c6.tar.bz2 |
Bugfix [9ece99d58b]. Make exec understand .CMD files on Windows.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/exec.test | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/tests/exec.test b/tests/exec.test index 16a8320..38927d3 100644 --- a/tests/exec.test +++ b/tests/exec.test @@ -682,6 +682,22 @@ test exec-19.1 {exec >> uses O_APPEND} -constraints {exec unix} -setup { } -cleanup { removeFile $tmpfile } -result 14 + +# Tests to ensure batch files and .CMD (Bug 9ece99d58b) +# can be executed on Windows +test exec-20.0 {exec .bat file} -constraints {win} -body { + set log [makeFile {} exec20.log] + exec [makeFile "echo %1> $log" exec20.bat] "Testing exec-20.0" + viewFile $log +} -result "\"Testing exec-20.0\"" +test exec-20.1 {exec .CMD file} -constraints {win} -body { + set log [makeFile {} exec201.log] + exec [makeFile "echo %1> $log" exec201.CMD] "Testing exec-20.1" + viewFile $log +} -result "\"Testing exec-20.1\"" + + + # ---------------------------------------------------------------------- # cleanup |