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

init

Browse Source
This commit is contained in:
Humza Shahid
2024-09-30 13:43:43 +01:00
commit c37c8d60e3
14 changed files with 4966 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
ffi/glfw-input.sml Normal file
View File

@@ -0,0 +1,12 @@
structure Input =
struct
type window = MLton.Pointer.t
(* Constants. *)
val (PRESS, _) =
_symbol "PRESS" public : ( unit -> int ) * ( int -> unit );
val (REPEAT, _) =
_symbol "REPEAT" public : ( unit -> int ) * ( int -> unit );
val (RELEASE, _) =
_symbol "RELEASE" public : ( unit -> int ) * ( int -> unit );
end