X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fanimated-mesh.cpp;h=896cfe95e0fcb6ce8d696276eb0e12450c0ec429;hb=79e12d94cc21232477796a4e76fc2ddb5d88f9dc;hp=80b6229d8adb941b85563029767dc4b6cd63a415;hpb=98052b04792129db97286fdd77ef3b0de8912286;p=guile-irrlicht.git diff --git a/src/animated-mesh.cpp b/src/animated-mesh.cpp index 80b6229..896cfe9 100644 --- a/src/animated-mesh.cpp +++ b/src/animated-mesh.cpp @@ -23,27 +23,21 @@ #include #include "animated-mesh.h" #include "gsubr.h" - +#include "wrapped.h" using namespace irr; - SCM IAnimatedMesh_setAnimationSpeed (SCM animated_mesh, SCM frames_per_second) { - ((scene::IAnimatedMesh*)scm_to_pointer (animated_mesh))-> + ((scene::IAnimatedMesh*)scm_to_irr_pointer (animated_mesh))-> setAnimationSpeed (scm_to_double (frames_per_second)); return SCM_UNSPECIFIED; } - -extern "C" { - - void - init_animated_mesh (void) - { - DEFINE_GSUBR ("IAnimatedMesh_setAnimationSpeed", 2, 0, 0, IAnimatedMesh_setAnimationSpeed); - } - +void +init_animated_mesh (void) +{ + DEFINE_GSUBR ("IAnimatedMesh_setAnimationSpeed", 2, 0, 0, IAnimatedMesh_setAnimationSpeed); }