From f2f93c57600cc6ad0cef181af85fd88c6178f511 Mon Sep 17 00:00:00 2001
From: Humza Shahid <humzasaur@gmail.com>
Date: Mon, 4 Aug 2025 11:11:18 +0100
Subject: [PATCH] address bug in text-window.sml: if we want to call
 getStartLineAfter, then always pass in a positive number

---
 fcore/text-window.sml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fcore/text-window.sml b/fcore/text-window.sml
index 1dc157e..ec5a2bb 100644
--- a/fcore/text-window.sml
+++ b/fcore/text-window.sml
@@ -187,7 +187,7 @@ struct
             else if cursorIdx > absIdx then
               (* possibly move downwards *)
               getStartLineAfter
-                ( startIdx
+                ( Int.max (startIdx, 0)
                 , rStrHd
                 , oldLine
                 , absIdx