From a17425e476861fde1e1ad824181f97e081740659 Mon Sep 17 00:00:00 2001 From: Steve Bennett Date: Sun, 24 Jan 2010 12:03:40 +1000 Subject: New features, docs Implement lsearch in C with options *: lsearch -exact, -glob, -regexp, -not, -bool, -all, -inline Add tests for lsearch and expand expr operators: in and ni (Tcl 8.6) --- tests/expand.test | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 tests/expand.test (limited to 'tests/expand.test') diff --git a/tests/expand.test b/tests/expand.test new file mode 100644 index 0000000..1527cd9 --- /dev/null +++ b/tests/expand.test @@ -0,0 +1,29 @@ +source testing.tcl + +section "Expand Testing" + +test expand-1.1 "Basic tests" { + set a {1 2 3} + set b {4 5 6} + lappend a {*}$b +} {1 2 3 4 5 6} + +test expand-1.2 "Basic tests" { + set a {1 2 3} + set b {4 5 6} + lappend a {expand}$b +} {1 2 3 4 5 6} + +test expand-1.3 "Basic tests" { + set a {1 2 3} + set b {4 5 6} + lappend a *$b +} {1 2 3 {*4 5 6}} + +test expand-1.4 "Basic tests" { + set a {1 2 3} + set b {4 5 6} + lappend a expand$b +} {1 2 3 {expand4 5 6}} + +testreport -- cgit v1.1