X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fgacela_SDL.c;h=e20877f554a37b8896a0cf9e85ff246de7e815ea;hb=042f93e750461b4d7235f702c973f0bd1effcae9;hp=07ab34799965feb91908b8fb1f03305deccc696a;hpb=4fa4326c57c1022891fd0a7678f139119e997116;p=gacela.git

diff --git a/src/gacela_SDL.c b/src/gacela_SDL.c
index 07ab347..e20877f 100644
--- a/src/gacela_SDL.c
+++ b/src/gacela_SDL.c
@@ -133,7 +133,7 @@ gacela_SDL_SetVideoMode (SCM width, SCM height, SCM bpp, SCM flags)
     return make_surface (scm_from_locale_string ("screen"), screen);
   }
   else {
-    return SCM_UNSPECIFIED;
+    return SCM_BOOL_F;
   }
 }
 
@@ -190,7 +190,7 @@ gacela_SDL_LoadBMP (SCM file)
     return make_surface (file, image);
   }
   else {
-    return SCM_UNSPECIFIED;
+    return SCM_BOOL_F;
   }
 }
 
@@ -203,7 +203,7 @@ gacela_IMG_Load (SCM filename)
     return make_surface (filename, image);
   }
   else {
-    return SCM_UNSPECIFIED;
+    return SCM_BOOL_F;
   }
 }