X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=src%2Fcursor-control.cpp;h=781fed770b9a6d363b8a41a69b345c08440e2cdb;hp=55f6622e8997350ebfd0d0ef5f5911acc084bfe8;hb=c4d9e46f268b4f7f738dd77685c632991125cec9;hpb=6bcbb2cefb0e69afae9b1de828b85f506b1bef19 diff --git a/src/cursor-control.cpp b/src/cursor-control.cpp index 55f6622..781fed7 100644 --- a/src/cursor-control.cpp +++ b/src/cursor-control.cpp @@ -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; }