Generic function for unwrapping foreign records

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

diff --git a/irrlicht/gui.scm b/irrlicht/gui.scm
index 09102694c5f6b1621ece4a5c3d3274ac52c17059..bd5eedee204e0d8e1030956390b1770165ccdebc 100644 (file)
--- a/irrlicht/gui.scm
+++ b/irrlicht/gui.scm
@@ -37,7 +37,7 @@
                            (fill-background #f))
   (ffi-gui:add-static-text gui-env
                            (string->pointer text)
-                           (make-c-struct ffi-core:rect rectangle)
+                           (foreign-record->pointer rectangle)
                            (bool->integer border)
                            (bool->integer word-wrap)
                            parent