add 'rgb' colour values when creating export string

2025-07-13 14:05:41 +01:00
parent 69494c368e
commit 7ec1e34bb8
1 changed files with 7 additions and 1 deletions
--- a/fcore/quad-tree.sml
+++ b/fcore/quad-tree.sml
@@ -548,7 +548,13 @@ struct

      (* based on triangle order formed by `Ndc.ltrbToVertexRgb` function *)
      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
      item :: acc
    end