summaryrefslogtreecommitdiffstats
path: root/tests/lsearch.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2018-03-09 17:30:30 (GMT)
committerdgp <dgp@users.sourceforge.net>2018-03-09 17:30:30 (GMT)
commit5fd318bc35bbaa27e006360af375ca2c078b763a (patch)
tree6780ef52c16bc5376cd463185fec72c4ef3b7e74 /tests/lsearch.test
parent88812125b1c2634264238a902c01c4ed85c9900c (diff)
downloadtcl-5fd318bc35bbaa27e006360af375ca2c078b763a.zip
tcl-5fd318bc35bbaa27e006360af375ca2c078b763a.tar.gz
tcl-5fd318bc35bbaa27e006360af375ca2c078b763a.tar.bz2
More demonstration tests of index value encoding flaws.
Diffstat (limited to 'tests/lsearch.test')
-rw-r--r--tests/lsearch.test3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/lsearch.test b/tests/lsearch.test
index 8d03e96..d7f9414 100644
--- a/tests/lsearch.test
+++ b/tests/lsearch.test
@@ -442,6 +442,9 @@ test lsearch-17.14 {lsearch -index option, encoding aliasing} -body {
test lsearch-17.15 {lsearch -index option, encoding aliasing} -body {
lsearch -index end+1 a a
} -returnCodes error -result {index "end+1" cannot select an element from any list}
+test lsearch-17.16 {lsearch -index option, encoding aliasing} -body {
+ lsearch -index end+2 a a
+} -returnCodes error -result {index "end+2" cannot select an element from any list}
test lsearch-18.1 {lsearch -index option, list as index basic functionality} {