fix typo in line_gap.sml which caused a compilation error

2025-09-19 04:40:34 +01:00
parent 7ea31ace35
commit 8c56f9cc95
1 changed files with 1 additions and 1 deletions
--- a/src/line_gap.sml
+++ b/src/line_gap.sml
@@ -3230,7 +3230,7 @@ struct
    case (rightStrings, rightLines) of
      (shd :: stl, lhd :: ltl) =>
        let
-          val nextLine = curLine + Vector.length hd
+          val nextLine = curLine + Vector.length lhd
        in
          if findLine <= nextLine then
            let val relativeLine = findLine - curLine - 1