X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=examples%2Fhello.scm;fp=examples%2Fhello.scm;h=cee3c64ff813554ad14b155fcf9316795f15e3a4;hb=afe624d2b1339c6b76408ecbfd95d072d2a661ad;hp=c8643b569c303ba1ba5cdc5f99dd6eee6e949501;hpb=2bfad8c43ad04ba9e670b7274a2661b27c02d6a2;p=guile-irrlicht.git

diff --git a/examples/hello.scm b/examples/hello.scm
index c8643b5..cee3c64 100644
--- a/examples/hello.scm
+++ b/examples/hello.scm
@@ -25,3 +25,7 @@
 (define scene-manager (get-scene-manager device))
 
 (set-window-caption! device "Hello World!")
+
+(while (run? device))
+
+(drop! device)