summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2018-03-14 21:51:13 (GMT)
committerdgp <dgp@users.sourceforge.net>2018-03-14 21:51:13 (GMT)
commit72c721f3e71c327c2e70def50fb04f48c4527442 (patch)
tree5be4eacb21d2c81585f74ef9cc9864e6a13bf086 /tests
parent6d4320b5fbe2afd973751c4b5de70a89e0d62214 (diff)
parent1bf60bab3cd706cba08c15df5a6a5267d918aeae (diff)
downloadtcl-72c721f3e71c327c2e70def50fb04f48c4527442.zip
tcl-72c721f3e71c327c2e70def50fb04f48c4527442.tar.gz
tcl-72c721f3e71c327c2e70def50fb04f48c4527442.tar.bz2
merge 8.6
Diffstat (limited to 'tests')
-rw-r--r--tests/string.test6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/string.test b/tests/string.test
index fc8dabb..d69fda4 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -1378,6 +1378,12 @@ test string-14.16 {string replace} {
test string-14.17 {string replace} {
string replace abcdefghijklmnop end end-1
} {abcdefghijklmnop}
+test string-14.18 {string replace} {
+ string replace abcdefghijklmnop 10 9 XXX
+} {abcdefghijklmnop}
+test string-14.19 {string replace} {
+ string replace {} -1 0 A
+} A
test string-15.1 {string tolower too few args} {
list [catch {string tolower} msg] $msg