1 2 3 4 5 6 7 8 9 10
(use-modules (sdl2) (sdl2 video)) (sdl-init) (define window (make-sdl-window)) (sleep 2) (close-sdl-window! window) (sdl-quit)