aboutsummaryrefslogtreecommitdiff
path: root/tests/lsearch.test
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2023-06-17 10:44:05 +1000
committerSteve Bennett <steveb@workware.net.au>2023-07-04 09:23:43 +1000
commitd6ce55ad7e01a51acb8a2a909383366ecc89d0b2 (patch)
tree6b4428d25bf8ecca748d9d411e7bb472d9eae05c /tests/lsearch.test
parent41f431f30cc6118ef982c6374914810cd07a8106 (diff)
downloadjimtcl-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/lsearch.test')
-rw-r--r--tests/lsearch.test3
1 files changed, 1 insertions, 2 deletions
diff --git a/tests/lsearch.test b/tests/lsearch.test
index f8aa08d..a222373 100644
--- a/tests/lsearch.test
+++ b/tests/lsearch.test
@@ -15,8 +15,7 @@
source [file dirname [info script]]/testing.tcl
-catch {package require regexp}
-testConstraint regexp [expr {[info commands regexp] ne {}}]
+constraint cmd regexp
set x {abcd bbcd 123 234 345}
test lsearch-1.1 {lsearch command} {