X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fdevice.cpp;h=ed551705389337c09e789d110d54ba0ac2f6ac1b;hb=73e48b7e6472724899af8284491802e950156004;hp=95b6429d8c129f12e7b19357fb606d0b6c5fc9bb;hpb=12c23d8b50e25efce7891cc81427c5774340bd18;p=guile-irrlicht.git diff --git a/src/device.cpp b/src/device.cpp index 95b6429..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,8 +166,7 @@ extern "C" { void init_device (void) { - init_device_type (); - 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);