diff options
author | Steve Bennett <steveb@workware.net.au> | 2023-06-17 10:44:05 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2023-07-04 09:23:43 +1000 |
commit | d6ce55ad7e01a51acb8a2a909383366ecc89d0b2 (patch) | |
tree | 6b4428d25bf8ecca748d9d411e7bb472d9eae05c /tests/exec.test | |
parent | 41f431f30cc6118ef982c6374914810cd07a8106 (diff) | |
download | jimtcl-d6ce55ad7e01a51acb8a2a909383366ecc89d0b2.zip jimtcl-d6ce55ad7e01a51acb8a2a909383366ecc89d0b2.tar.gz jimtcl-d6ce55ad7e01a51acb8a2a909383366ecc89d0b2.tar.bz2 |
tcltest: rework constraint system
Now 'constraint cmd|package' is like 'needs' but sets a constraint
The command to 'needs cmd' and 'constraint cmd' can now take
a subcommand to check.
Add 'constraint|needs eval|expr' to make some constraint checks
simpler.
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/exec.test')
-rw-r--r-- | tests/exec.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/exec.test b/tests/exec.test index d20cc83..85014a7 100644 --- a/tests/exec.test +++ b/tests/exec.test @@ -22,10 +22,10 @@ needs cmd flush if {[testConstraint tcl]} { testConstraint pipe 1 } else { - testCmdConstraints pipe + constraint cmd pipe } -testConstraint unix [expr {$tcl_platform(platform) eq {unix}}] +constraint expr unix {$tcl_platform(platform) eq {unix}} # Sleep which supports fractions of a second if {[info commands sleep] eq {}} { @@ -447,6 +447,6 @@ file delete sleepx # Now we probably have a lot of unreaped zombies at this point # so reap them to avoid confusing further tests -wait +catch {wait} testreport |