X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fdevice.cpp;fp=src%2Fdevice.cpp;h=ed551705389337c09e789d110d54ba0ac2f6ac1b;hb=98052b04792129db97286fdd77ef3b0de8912286;hp=63db119696fe5513bdd2c94238b903ad77db948f;hpb=661f003f90a2ab35026cf17215f28dcb73f54084;p=guile-irrlicht.git diff --git a/src/device.cpp b/src/device.cpp index 63db119..ed55170 100644 --- a/src/device.cpp +++ b/src/device.cpp @@ -31,15 +31,14 @@ using namespace irr; -template SCM -createDevice (SCM device_type, - SCM window_size, - SCM bits, - SCM fullscreen, - SCM stencilbuffer, - SCM vsync, - SCM receiver) +irr_createDevice (SCM device_type, + SCM window_size, + SCM bits, + SCM fullscreen, + SCM stencilbuffer, + SCM vsync, + SCM receiver) { IrrlichtDevice* device = createDevice (scm_to_driver_type (device_type), @@ -48,7 +47,7 @@ createDevice (SCM device_type, scm_to_bool (fullscreen), scm_to_bool (stencilbuffer), scm_to_bool (vsync), - (TEventReceiver)scm_to_pointer (receiver)); + (IEventReceiver*)scm_to_pointer (receiver)); return scm_from_pointer ((void*)device, NULL); } @@ -167,7 +166,7 @@ extern "C" { void init_device (void) { - DEFINE_GSUBR ("createDevice_IEventReceiver", 7, 0, 0, createDevice); + DEFINE_GSUBR ("createDevice", 7, 0, 0, irr_createDevice); DEFINE_GSUBR ("IrrlichtDevice_getCursorControl", 1, 0, 0, IrrlichtDevice_getCursorControl); DEFINE_GSUBR ("IrrlichtDevice_getFileSystem", 1, 0, 0, IrrlichtDevice_getFileSystem); DEFINE_GSUBR ("IrrlichtDevice_getGUIEnvironment", 1, 0, 0, IrrlichtDevice_getGUIEnvironment);