get drawing of triangles implemented

2024-07-31 22:25:15 +01:00
parent cf38d160d5
commit 16fa1e49af
7 changed files with 121 additions and 16 deletions
--- a/message-types/draw-msg.sml
+++ b/message-types/draw-msg.sml
@@ -1,11 +1,15 @@
 signature DRAW_MESSAGE =
 sig
-  datatype t = DRAW_BUTTON of Real32.real vector
-             | NO_DRAW
+  datatype t =
+    DRAW_BUTTON of Real32.real vector
+  | DRAW_TRIANGLES_AND_RESET_BUTTONS of Real32.real vector
+  | NO_DRAW
 end

 structure DrawMessage :> DRAW_MESSAGE =
-struct 
-  datatype t = DRAW_BUTTON of Real32.real vector 
-             | NO_DRAW
+struct
+  datatype t =
+    DRAW_BUTTON of Real32.real vector
+  | DRAW_TRIANGLES_AND_RESET_BUTTONS of Real32.real vector
+  | NO_DRAW
 end