aboutsummaryrefslogtreecommitdiff
path: root/tests/exec.test
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2010-08-12 12:37:56 +1000
committerSteve Bennett <steveb@workware.net.au>2010-10-15 11:02:50 +1000
commit3d5db752ffeaf40e616198872083b3a00eadc36b (patch)
tree3f22805afc71701f38f78821693d1f26a30de251 /tests/exec.test
parenteff647111d79428d586446349f2eca2110e97554 (diff)
downloadjimtcl-3d5db752ffeaf40e616198872083b3a00eadc36b.zip
jimtcl-3d5db752ffeaf40e616198872083b3a00eadc36b.tar.gz
jimtcl-3d5db752ffeaf40e616198872083b3a00eadc36b.tar.bz2
Small improvements to tests
Make exec-9.7 test more reliable Quieten jim tests unless running manually Add jim pipe example Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/exec.test')
-rw-r--r--tests/exec.test9
1 files changed, 5 insertions, 4 deletions
diff --git a/tests/exec.test b/tests/exec.test
index 47b246f..e1b6e36 100644
--- a/tests/exec.test
+++ b/tests/exec.test
@@ -313,10 +313,11 @@ test exec-9.6 {commands returning errors} {
list [catch {exec sh -c "echo error msg 1>&2"} msg] $msg
} {0 {error msg}}
test exec-9.7 {commands returning errors} {
- list [catch {exec sh -c "echo error msg 1>&2" \
- | sh -c "echo error msg 1>&2"} msg] $msg
-} {0 {error msg
-error msg}}
+ # Note: Use sleep here to ensure the order
+ list [catch {exec sh -c "echo error msg 1 1>&2" \
+ | sh -c "sleep 1; echo error msg 2 1>&2"} msg] $msg
+} {0 {error msg 1
+error msg 2}}
# Errors in executing the Tcl command, as opposed to errors in the
# processes that are invoked.