summaryrefslogtreecommitdiffstats
path: root/tests/exec.test
diff options
context:
space:
mode:
authorjenn <jenn>1999-08-27 21:45:17 (GMT)
committerjenn <jenn>1999-08-27 21:45:17 (GMT)
commitf6d9c470d0aae768623bf1afc328443ba2372287 (patch)
tree97e0910895fc7cf9d0e9e9889ebedae24541189c /tests/exec.test
parent16b4771e72641754fdd0122032875724d6c55e27 (diff)
downloadtcl-f6d9c470d0aae768623bf1afc328443ba2372287.zip
tcl-f6d9c470d0aae768623bf1afc328443ba2372287.tar.gz
tcl-f6d9c470d0aae768623bf1afc328443ba2372287.tar.bz2
* tests/env.test:
* tests/exec.test: * tests/io.test: * tests/event.test: * tests/tcltest.test: Added 'exit' calls to scripts that the tests themselves write, and removed accidental checkin of knownBugThreaded constraints for Solaris and Linux.
Diffstat (limited to 'tests/exec.test')
-rw-r--r--tests/exec.test7
1 files changed, 6 insertions, 1 deletions
diff --git a/tests/exec.test b/tests/exec.test
index 653066d..b142e9b 100644
--- a/tests/exec.test
+++ b/tests/exec.test
@@ -11,7 +11,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: exec.test,v 1.5 1999/07/01 17:36:17 jenn Exp $
+# RCS: @(#) $Id: exec.test,v 1.6 1999/08/27 21:45:17 jenn Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest
@@ -29,6 +29,7 @@ puts $f {
puts -nonewline " $str"
}
puts {}
+ exit
}
close $f
@@ -51,6 +52,7 @@ puts $f {
close $f
}
}
+ exit
}
close $f
@@ -61,6 +63,7 @@ puts $f {
set words [regsub -all "\[^ \t\n]+" $data {} dummy]
set chars [string length $data]
puts [format "%8.d%8.d%8.d" $lines $words $chars]
+ exit
}
close $f
@@ -85,12 +88,14 @@ puts $f {
}
lappend newcmd $arg
}
+ exit
}
close $f
set f [open sleep w]
puts $f {
after [expr $argv*1000]
+ exit
}
close $f