humza/sml-projects
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add 'shf/' from commit 'b6c5a95b664aeb861d7b33ffc9eefe447ba99dd7'

Browse Source 
git-subtree-dir: shf
git-subtree-mainline: 401408448f
git-subtree-split: b6c5a95b66
This commit is contained in:
Humza Shahid
2026-04-24 00:27:49 +01:00
parent 401408448f b6c5a95b66
commit 6b91d64fc3
83 changed files with 43952 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
shf/message-types/draw-msg.sml Normal file
View File

@@ -0,0 +1,2 @@
structure DrawMsg =
struct datatype t = DRAW_TEXT of Real32.real vector | YANK of string end

13
shf/message-types/input-msg.sml Normal file
View File

@@ -0,0 +1,13 @@
structure InputMsg =
struct
datatype t =
CHAR_EVENT of char
| KEY_ESC
| KEY_ENTER
| KEY_BACKSPACE
| RESIZE_EVENT of int * int
| ARROW_LEFT
| ARROW_UP
| ARROW_RIGHT
| ARROW_DOWN
end

1
shf/message-types/mailbox-type.sml Normal file
View File

@@ -0,0 +1 @@
structure MailboxType = struct datatype t = DRAW of DrawMsg.t end