add 'rgb' colour values when creating export string

This commit is contained in:
2025-07-13 14:05:41 +01:00
parent 69494c368e
commit 7ec1e34bb8

View File

@@ -548,7 +548,13 @@ struct
(* based on triangle order formed by `Ndc.ltrbToVertexRgb` function *) (* based on triangle order formed by `Ndc.ltrbToVertexRgb` function *)
val item = String.concatWith ",\n" val item = String.concatWith ",\n"
[x, ey, ex, ey, x, y, x, y, ex, ey, ex, y] [ x, ey, r, g, b
, ex, ey, r, g, b
, x, y, r, g, b
, x, y, r, g, b
, ex, ey, r, g, b
, ex, y, r, g, b
]
in in
item :: acc item :: acc
end end