(no commit message)

[gacela.git] / src / gacela_GL.c

diff --git a/src/gacela_GL.c b/src/gacela_GL.c
index a031dbae69bd7f6ab1edcfc0a32654b11a555940..7e232bb99e832f548dfe046d80d4ff602ebc2c71 100644 (file)
--- a/src/gacela_GL.c
+++ b/src/gacela_GL.c
@@ -235,7 +235,7 @@ gacela_glGenTextures (SCM n)
   glGenTextures (nint, &text[0]);
 
   for (i = nint - 1; i >= 0; i--) {
-    textures = scm_cons (scm_from_int (text[i]), textures);
+    textures = scm_cons (make_glTexture (text[i]), textures);
   }
 
   return textures;