refactor Cursor.viH to use DFA

2025-09-17 10:45:37 +01:00
parent 9ddb5f68d7
commit dbf05ec8dc
5 changed files with 63 additions and 79 deletions
--- a/fcore/normal-mode/make-normal-delete.sml
+++ b/fcore/normal-mode/make-normal-delete.sml
@@ -337,7 +337,7 @@ struct
    else
      let
        val buffer = LineGap.goToIdx (low, buffer)
-        val low = Cursor.viH (buffer, low)
+        val low = Cursor.viH (buffer, low, 1)
        val buffer = LineGap.goToIdx (low, buffer)
        val low = Cursor.vi0 (buffer, low)
        val newCount = if low = 0 then 0 else count - 1