message-types/draw-msg.sml

signature DRAW_MSG =
sig
  datatype t =
    REDRAW_TEXT of Real32.real vector
  | REDRAW_CURSOR of Real32.real vector
  | REDRAW_BG of Real32.real vector
  | YANK of string
end

structure DrawMsg :> DRAW_MSG =
struct
  datatype t =
    REDRAW_TEXT of Real32.real vector
  | REDRAW_CURSOR of Real32.real vector
  | REDRAW_BG of Real32.real vector
  | YANK of string
end
done scaffolding cml and adding resize functionality 2024-10-06 10:23:07 +01:00			`signature DRAW_MSG =`
			`sig`
			`datatype t =`
			`REDRAW_TEXT of Real32.real vector`
add cursor buffer and cursor program to imperative shell 2024-10-09 11:22:39 +01:00			`\| REDRAW_CURSOR of Real32.real vector`
add bgVertexBuffer and bgProgram to imperative shell, so we can draw bg and cursor without overlap, and without z-index 2024-11-15 10:26:22 +00:00			`\| REDRAW_BG of Real32.real vector`
add yank functionality in imperative shell 2024-11-11 05:27:20 +00:00			`\| YANK of string`
done scaffolding cml and adding resize functionality 2024-10-06 10:23:07 +01:00			`end`

			`structure DrawMsg :> DRAW_MSG =`
scaffolding for concurrent ml 2024-10-06 09:32:56 +01:00			`struct`
			`datatype t =`
			`REDRAW_TEXT of Real32.real vector`
add cursor buffer and cursor program to imperative shell 2024-10-09 11:22:39 +01:00			`\| REDRAW_CURSOR of Real32.real vector`
add bgVertexBuffer and bgProgram to imperative shell, so we can draw bg and cursor without overlap, and without z-index 2024-11-15 10:26:22 +00:00			`\| REDRAW_BG of Real32.real vector`
add yank functionality in imperative shell 2024-11-11 05:27:20 +00:00			`\| YANK of string`
scaffolding for concurrent ml 2024-10-06 09:32:56 +01:00			`end`