Humza Shahid
6b91d64fc3
git-subtree-dir: shf git-subtree-mainline:401408448fgit-subtree-split:b6c5a95b66
14 lines
203 B
Standard ML
14 lines
203 B
Standard ML
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
|