fix minor type error introduced in line_gap.sml in last commit (was returning an integer instead of a char)

This commit is contained in:
2025-09-29 22:03:36 +01:00
parent f4422cc36c
commit 6de33a65c2

View File

@@ -2294,8 +2294,10 @@ struct
raise Fail "not found"
fun sub (findIdx, buffer: t) =
if findIdx < #idx buffer then 0
else subRight (findIdx, #idx buffer, #rightStrings buffer)
if findIdx < #idx buffer then
subLeft (findIdx, #idx buffer, #leftStrings buffer)
else
subRight (findIdx, #idx buffer, #rightStrings buffer)
local
fun consIfNotEmpty (s, acc) =