return tuple from function 'startBuildTextLineGap' as function to move LineGap, used in 'startBuildTextLineGap' optimises nodes for better performance on subsequent operations

This commit is contained in:
2024-10-05 23:27:25 +01:00
parent d2b8f713d3
commit c5efc4640f
3 changed files with 2 additions and 2 deletions

View File

@@ -205,6 +205,6 @@ buildTextString ( startIdx, rStrHd, [], 5, 5, 5
* else we can do. *)
[]
in
Vector.concat acc
(Vector.concat acc, lineGap)
end
end

View File

@@ -23,7 +23,7 @@ struct
val lineGap = ioToLineGap (io, LineGap.empty)
val _ = TextIO.closeIn io
val textVec = Buffer.startBuildTextLineGap (0, lineGap, 1920, 1080)
val (textVec, _) = Buffer.startBuildTextLineGap (0, lineGap, 1920, 1080)
val shellState = GlDraw.create window
val shellState = GlDraw.uploadText (shellState, textVec)

BIN
shf

Binary file not shown.