From e0c2201c2fb811b498eba347ea9389621d92226a Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Sat, 12 Dec 2015 02:54:59 -0500
Subject: Add blank window example.

* examples/blank-window.scm: New file.
---
 examples/blank-window.scm | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 examples/blank-window.scm

(limited to 'examples')

diff --git a/examples/blank-window.scm b/examples/blank-window.scm
new file mode 100644
index 0000000..41c5ead
--- /dev/null
+++ b/examples/blank-window.scm
@@ -0,0 +1,10 @@
+(use-modules (sdl2)
+             (sdl2 video))
+
+(sdl-init)
+
+(define window (make-sdl-window))
+
+(sleep 2)
+(close-sdl-window! window)
+(sdl-quit)
-- 
cgit v1.2.3