Tidy up and comment [string replace] and its corner cases.

1 files changed, 6 insertions, 0 deletions

diff --git a/tests/string.test b/tests/string.test
index 39abd86..f3bb366 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -1294,6 +1294,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