language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-08-02 11:22:19 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Add some docs to matchesAtHelp

Browse source
This commit is contained in:
Ayaz Hafiz 2022-09-29 22:32:16 -05:00
parent 1d7dc65800
commit c9c2f61e3e
No known key found for this signature in database
GPG key ID: 0E2A37416A25EF58
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
crates/compiler/builtins/roc/Str.roc
View file

@ -452,11 +452,15 @@ matchesAt = \haystack, haystackIndex, needle ->
matchesAtHelp : Str, Nat, Str, Nat, Nat, Nat -> Bool
matchesAtHelp = \haystack, haystackIndex, needle, needleIndex, needleLength, endIndex ->
if haystackIndex < endIndex then
if Str.getUnsafe haystack haystackIndex == Str.getUnsafe needle needleIndex then
nextNeedleCharMatches =
Str.getUnsafe haystack haystackIndex == Str.getUnsafe needle needleIndex
if nextNeedleCharMatches then
matchesAtHelp haystack (haystackIndex + 1) needle (needleIndex + 1) needleLength endIndex
else
Bool.false
else
# If we're at the end of the haystack, the needle was matched only if
# we've walked the entire needle as well.
needleIndex == needleLength
## Walks over the string's UTF-8 bytes, calling a function which updates a state using each