aboutsummaryrefslogtreecommitdiff
path: root/tests/event.test
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2011-05-31 21:26:48 +1000
committerSteve Bennett <steveb@workware.net.au>2011-06-10 14:00:35 +1000
commit700e6599fb1a822e257a8dc6be41ffe1e99a30b2 (patch)
treec6100227a0702de60eb065075c45db0967c3cd68 /tests/event.test
parentc46fde880b6d3f9eef24e8dd1ab7bc3f6a8a0f18 (diff)
downloadjimtcl-700e6599fb1a822e257a8dc6be41ffe1e99a30b2.zip
jimtcl-700e6599fb1a822e257a8dc6be41ffe1e99a30b2.tar.gz
jimtcl-700e6599fb1a822e257a8dc6be41ffe1e99a30b2.tar.bz2
Add some missing test dependencies
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/event.test')
-rw-r--r--tests/event.test3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/event.test b/tests/event.test
index 6b6a4d7..2ca7ce8 100644
--- a/tests/event.test
+++ b/tests/event.test
@@ -13,6 +13,7 @@ source [file dirname [info script]]/testing.tcl
needs cmd after eventloop
testConstraint socket [expr {[info commands socket] ne ""}]
+testConstraint exec [expr {[info commands exec] ne ""}]
test event-5.1 {Tcl_BackgroundError, HandleBgErrors procedures} jim {
catch {rename bgerror {}}
@@ -70,7 +71,7 @@ test event-7.3 {bgerror / accumulation / break} {
catch {rename bgerror {}}
-test event-10.1 {Tcl_Exit procedure} {
+test event-10.1 {Tcl_Exit procedure} exec {
set cmd [list exec [info nameofexecutable] "<<exit 3"]
list [catch $cmd msg] [lindex $errorCode 0] \
[lindex $errorCode 2]