summaryrefslogtreecommitdiff
path: root/examples/blank-window.scm
blob: 41c5ead089e3a24b4538fda882a345316e690968 (plain)
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)