summaryrefslogtreecommitdiff
path: root/examples/cube.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2024-10-02 21:22:19 -0400
committerDavid Thompson <dthompson2@worcester.edu>2024-10-03 07:12:23 -0400
commit567863b2398b6832f686b258709396572af0e980 (patch)
tree9876b28945a793fc6fedbd7f9804a0d7e159a47c /examples/cube.scm
First commit!main
Diffstat (limited to 'examples/cube.scm')
-rw-r--r--examples/cube.scm10
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)