ffi progress

2026-01-23 09:47:27 +00:00
parent dee5e72f39
commit e7ab53310e
10 changed files with 199 additions and 103 deletions
--- a/ffi/rgfw-import.sml
+++ b/ffi/rgfw-import.sml
@@ -0,0 +1,14 @@
+structure Rgfw =
+struct
+  type window = MLton.Pointer.t
+
+  (* RGFW functions. *)
+  val createWindow = 
+    _import "createWindow" public : string * int * int * int * int -> window;
+  val closeWindow =
+    _import "closeWindow" public : window -> unit;
+  val shouldCloseWindow =
+    _import "shouldCloseWindow" public : window -> bool;
+  val swapBuffers =
+    _import "swapBuffers" public : window -> unit;
+end