Rect foreign record

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

diff --git a/irrlicht/gui.scm b/irrlicht/gui.scm
index 09102694c5f6b1621ece4a5c3d3274ac52c17059..495a9c748e05905a643005bfb1ce3fb3d9592c20 100644 (file)
--- a/irrlicht/gui.scm
+++ b/irrlicht/gui.scm
@@ -23,6 +23,7 @@
   #:use-module (system foreign)
   #:use-module ((irrlicht bindings core) #:prefix ffi-core:)
   #:use-module ((irrlicht bindings gui) #:prefix ffi-gui:)
+  #:use-module (irrlicht rect)
   #:use-module (irrlicht util)
   #:export (add-static-text!
             gui-draw-all
@@ -37,7 +38,7 @@
                            (fill-background #f))
   (ffi-gui:add-static-text gui-env
                            (string->pointer text)
-                           (make-c-struct ffi-core:rect rectangle)
+                           (rect->pointer rectangle)
                            (bool->integer border)
                            (bool->integer word-wrap)
                            parent