humza/sml-projects
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix bug in line_gap.sml: when we convert a line number to an absolute index and travel leftwards, make sure we continue travelling leftwards when the current node is at the correct line number but the line number does not start at this node.

Browse Source
This commit is contained in:
Humza Shahid
2026-02-07 03:04:49 +00:00
parent e7a08e27af
commit fd96032949
1 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/line_gap.sml
View File

@@ -3308,8 +3308,16 @@ struct
val prevIdx = curIdx - String.size shd val prevIdx = curIdx - String.size shd
in in
if findLine >= prevLine then if findLine >= prevLine then
let val relativeLine = findLine - prevLine - 1 let
in Vector.sub (lhd, relativeLine) + prevIdx val relativeLine = findLine - prevLine - 1
in
if relativeLine < 0 then
(* the line start is not at this node,
* so we need to continue going left
* to find what index the line start corresponds to *)
lineNumberToIdxLeft (findLine, prevIdx, prevLine, stl, ltl)
else
Vector.sub (lhd, relativeLine) + prevIdx
end end
else else
lineNumberToIdxLeft (findLine, prevIdx, prevLine, stl, ltl) lineNumberToIdxLeft (findLine, prevIdx, prevLine, stl, ltl)