address remainning todo-notes, which had to do with updating the searchList when we insert into a buffer.

2026-02-08 03:17:19 +00:00
parent c28ae4d8cd
commit 33866533a3
5 changed files with 22 additions and 30 deletions
--- a/fcore/persistent-vector.sml
+++ b/fcore/persistent-vector.sml
@@ -552,7 +552,7 @@ struct
        let
          val items = Vector.map 
            (fn {start, finish} =>
-              {start = start - incBy, finish = finish - incBy}
+              {start = start + incBy, finish = finish + incBy}
            ) items
          val sizes = Vector.map #finish items
        in