]> git.jsancho.org Git - guile-irrlicht.git/blobdiff - src/device.cpp
SCM booleans
[guile-irrlicht.git] / src / device.cpp
index b60ec44e4681b3e4f0572833a402f904dc9fe62b..f9c0d6a11247e2ebc703b2bcfbefb928094e38ee 100644 (file)
@@ -54,10 +54,10 @@ extern "C" {
     SCM window_size = scm_list_2 (scm_from_uint32 (640),
                                   scm_from_uint32 (480));
     SCM bits = scm_from_uint32 (16);
-    SCM fullscreen = scm_from_bool (0);
-    SCM stencilbuffer = scm_from_bool (0);
-    SCM vsync = scm_from_bool (0);
-    SCM receiver = scm_from_bool (0);
+    SCM fullscreen = SCM_BOOL_F;
+    SCM stencilbuffer = SCM_BOOL_F;
+    SCM vsync = SCM_BOOL_F;
+    SCM receiver = SCM_BOOL_F;
 
     scm_c_bind_keyword_arguments ("create-device", rest, (scm_t_keyword_arguments_flags)0,
                                   scm_from_utf8_keyword ("device-type"), &device_type,