(use-modules (sdl3)
             (sdl3 video))

(sdl-init)
(define window (make-window "Hello" 640 480))
(sleep 3)
(destroy-window! window)