From 7ec1e34bb8509bc267573a5ed118ce05574f33d9 Mon Sep 17 00:00:00 2001 From: Humza Shahid Date: Sun, 13 Jul 2025 14:05:41 +0100 Subject: [PATCH] add 'rgb' colour values when creating export string --- fcore/quad-tree.sml | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/fcore/quad-tree.sml b/fcore/quad-tree.sml index 71f8073..c29a918 100644 --- 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