Files
fail/debuggers/openocd/jimtcl/tests/expand.test
Lars Rademacher 83d72a091e debuggers: import openocd-0.7.0
Initial check-in of openocd-0.7.0 as it can be downloaded from
http://sourceforge.net/projects/openocd/files/openocd/0.7.0/

Any modifications will follow.

Change-Id: I6949beaefd589e046395ea0cb80f4e1ab1654d55
2013-12-02 14:53:22 +01:00

28 lines
465 B
Plaintext

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