From 058a5ef8474fb62f711d53e2fc8e2fa68fbb8996 Mon Sep 17 00:00:00 2001 From: Steve Bennett Date: Sun, 20 Dec 2020 08:58:50 +1000 Subject: core: commands that take an index now use integer expressions This means that instead of just [list index 2+1], we can now do [list index end-$n*2+1] This applies to: lindex, linsert, lreplace, lset, lrange, lsort, regexp, regsub string index,first,last,range Also add tests for both direct integer expressions and indexes. Still needs doc update. Signed-off-by: Steve Bennett --- tests/lrange.test | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tests/lrange.test') diff --git a/tests/lrange.test b/tests/lrange.test index e72421c..3b8d094 100644 --- a/tests/lrange.test +++ b/tests/lrange.test @@ -69,10 +69,10 @@ test lrange-2.2 {error conditions} { } {1 {wrong # args: should be "lrange list first last"}} test lrange-2.3 {error conditions} { list [catch {lrange a b 6} msg] $msg -} {1 {bad index "b": must be integer?[+-]integer? or end?[+-]integer?}} +} {1 {bad index "b": must be intexpr or end?[+-]intexpr?}} test lrange-2.4 {error conditions} { list [catch {lrange a 0 enigma} msg] $msg -} {1 {bad index "enigma": must be integer?[+-]integer? or end?[+-]integer?}} +} {1 {bad index "enigma": must be intexpr or end?[+-]intexpr?}} test lrange-2.5 {error conditions} tcl { list [catch {lrange "a \{b c" 3 4} msg] $msg } {1 {unmatched open brace in list}} -- cgit v1.1