add cursor buffer and cursor program to imperative shell

2024-10-09 11:22:39 +01:00
parent 418adc4502
commit 9d7d00e8d1
4 changed files with 98 additions and 14 deletions
--- a/message-types/draw-msg.sml
+++ b/message-types/draw-msg.sml
@@ -2,10 +2,12 @@ signature DRAW_MSG =
 sig
  datatype t =
    REDRAW_TEXT of Real32.real vector
+  | REDRAW_CURSOR of Real32.real vector
 end

 structure DrawMsg :> DRAW_MSG =
 struct
  datatype t =
    REDRAW_TEXT of Real32.real vector
+  | REDRAW_CURSOR of Real32.real vector
 end