fix: Fix String.ReplaceAll (#1705)

grain-lang · Mar 5, 2023 · d3af004 · d3af004
1 parent 67bee5c
commit d3af004
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 0 deletions.
diff --git a/compiler/test/stdlib/string.test.gr b/compiler/test/stdlib/string.test.gr
@@ -238,6 +238,7 @@ assert String.replaceAll("/", "\/", "/test/test/test/") ==
   "\/test\/test\/test\/"
 assert String.replaceAll(",", "|", "test,test,test") == "test|test|test"
 
+assert String.replaceAll("MeowMeow", "Meow", "MeowMeowMeowMeow") == "MeowMeow"
 let processBytes = b => {
   let ret = Array.make(Bytes.length(b), 0us)
   for (let mut i = 0; i < Bytes.length(b); i += 1) {

diff --git a/stdlib/string.gr b/stdlib/string.gr
@@ -1052,6 +1052,8 @@ provide let replaceAll =
         found = true
         foundCount += 1n
         foundIndexes = [tagSimpleNumber(foundIndex), ...foundIndexes]
+        foundIndex -= patternLen - 1n
+        i -= patternLen - 1n
       }
     }
     if (found) {