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

add scaffolding in imperative shell to help update canvas width and height

Browse Source
This commit is contained in:
Humza Shahid
2025-07-11 17:45:16 +01:00
parent 08ed5cc3d5
commit e3729a1ce5
6 changed files with 11 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
ffi/glfw-input.c
View File

@@ -20,6 +20,7 @@ int KEY_I = GLFW_KEY_I;
int KEY_L = GLFW_KEY_L;
int KEY_O = GLFW_KEY_O;
int KEY_A = GLFW_KEY_A;
int KEY_W = GLFW_KEY_W;
int KEY_ENTER = GLFW_KEY_ENTER;
int KEY_SPACE = GLFW_KEY_SPACE;

2
ffi/glfw-input.sml
View File

@@ -57,6 +57,8 @@ struct
_symbol "KEY_O" public : ( unit -> int ) * ( int -> unit );
val (KEY_A, _) =
_symbol "KEY_A" public : ( unit -> int ) * ( int -> unit );
val (KEY_W, _) =
_symbol "KEY_W" public : ( unit -> int ) * ( int -> unit );
val (KEY_ENTER, _) =
_symbol "KEY_ENTER" public : ( unit -> int ) * ( int -> unit );