Bindings refactor

[guile-irrlicht.git] / irrlicht / video.scm

diff --git a/irrlicht/video.scm b/irrlicht/video.scm
index 7fc99fa87b363cc9c363c1a03a9d6e76eede70d3..ed133715dce43faaace676ee02b24760d392691b 100644 (file)
--- a/irrlicht/video.scm
+++ b/irrlicht/video.scm
@@ -39,11 +39,11 @@
   (ffi-video:begin-scene driver
                          (bool->integer back-buffer)
                          (bool->integer z-buffer)
-                         (make-c-struct ffi-video:scolor (reverse color))
+                         (ffi-video:scolor->pointer color)
                          video-data
                          (if (null? source-rect)
                              %null-pointer
-                             (make-c-struct ffi-core:rect source-rect))))
+                             (ffi-core:rect->pointer source-rect))))
 
 (define (end-scene driver)
   (ffi-video:end-scene driver))