1 files changed, 10 insertions, 0 deletions
diff --git a/examples/cube.scm b/examples/cube.scm
new file mode 100644
index 0000000..bcd4f01
--- /dev/null
+++ b/examples/cube.scm
@@ -0,0 +1,10 @@
+(use-modules (sdl3)
+             (sdl3 gpu)
+             (sdl3 video))
+
+(define window (make-window "Hello" 640 480))
+(define gpu (make-gpu-device '(spirv)))
+(claim-window-for-gpu-device! gpu window)
+(sleep 3)
+(destroy-gpu-device! gpu)
+(destroy-window! window)