diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-09-15 15:51:00 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-09-15 15:51:00 (GMT) |
| commit | 2238887c088e88d799e6cde81ea201c00155ff94 (patch) | |
| tree | f1f578638a4135ad3e0612303b50ebf551258f1a | |
| parent | db325590a751eae6a25ee6ba9f749ba499ff2078 (diff) | |
| download | tcl-2238887c088e88d799e6cde81ea201c00155ff94.zip tcl-2238887c088e88d799e6cde81ea201c00155ff94.tar.gz tcl-2238887c088e88d799e6cde81ea201c00155ff94.tar.bz2 | |
Add test for [string replace] troubles.
| -rw-r--r-- | tests/string.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/string.test b/tests/string.test index ba0780a..eca1d33 100644 --- a/tests/string.test +++ b/tests/string.test @@ -1665,6 +1665,9 @@ test stringComp-14.24.$noComp {Bug 1af8de570511} { test stringComp-14.25.$noComp {} { string length [string replace [string repeat a\xFE 2] 3 end {}] } 3 +test stringComp-14.26.$noComp {} { + run {string replace abcd 0x10000000000000000-0xffffffffffffffff 2 e} +} aed test string-15.1.$noComp {string tolower too few args} { list [catch {run {string tolower}} msg] $msg |