summaryrefslogtreecommitdiff
path: root/tests/expand.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/expand.test')
-rw-r--r--tests/expand.test27
1 files changed, 27 insertions, 0 deletions
diff --git a/tests/expand.test b/tests/expand.test
new file mode 100644
index 0000000..2c7023a
--- /dev/null
+++ b/tests/expand.test
@@ -0,0 +1,27 @@
+source [file dirname [info script]]/testing.tcl
+
+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" jim {
+ 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