]> git.jsancho.org Git - guile-irrlicht.git/blobdiff - src/cursor-control.cpp
Unwrap Irrlicht objects in C++ instead of Guile
[guile-irrlicht.git] / src / cursor-control.cpp
index 55f6622e8997350ebfd0d0ef5f5911acc084bfe8..781fed770b9a6d363b8a41a69b345c08440e2cdb 100644 (file)
@@ -24,6 +24,7 @@
 #include "cursor-control.h"
 #include "gsubr.h"
 #include "position2d.h"
+#include "wrapped.h"
 
 using namespace irr;
 
@@ -31,14 +32,14 @@ SCM
 ICursorControl_getPosition (SCM cursor_control)
 {
   return scm_from_position2d_s32
-    (((gui::ICursorControl*)scm_to_pointer (cursor_control))->getPosition ());
+    (((gui::ICursorControl*)scm_to_irr_pointer (cursor_control))->getPosition ());
 }
 
 SCM
 ICursorControl_setPosition (SCM cursor_control,
                             SCM position)
 {
-  ((gui::ICursorControl*)scm_to_pointer (cursor_control))->
+  ((gui::ICursorControl*)scm_to_irr_pointer (cursor_control))->
     setPosition (scm_to_position2d_s32 (position));
   return SCM_UNSPECIFIED;
 }