X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fanimated-mesh-scene-node.cpp;h=474ef8f0f20445a630904fe65d5727fd03a1ca0f;hb=d78951bd91783c61b312451198beb31f70b0f8b2;hp=be46b3ab60bfb4aa047f1dbebbdf27cb8fed8046;hpb=2806f03eafc48ec9ef02a3dc2d74133eaf11ccc1;p=guile-irrlicht.git diff --git a/src/animated-mesh-scene-node.cpp b/src/animated-mesh-scene-node.cpp index be46b3a..474ef8f 100644 --- a/src/animated-mesh-scene-node.cpp +++ b/src/animated-mesh-scene-node.cpp @@ -21,19 +21,45 @@ #include #include +#include "animated-mesh-md2.h" #include "animated-mesh-scene-node.h" -#include "wrapped.h" +#include "gsubr.h" + + +using namespace irr; + + +SCM +scene_IAnimatedMeshSceneNode_setFrameLoop (SCM animated_mesh_scene_node, + SCM begin, + SCM end) +{ + return scm_from_bool + (((scene::IAnimatedMeshSceneNode*)scm_to_pointer (animated_mesh_scene_node))-> + setFrameLoop (scm_to_int32 (begin), + scm_to_int32 (end))); +} + + +SCM +scene_IAnimatedMeshSceneNode_setMD2Animation (SCM animated_mesh_scene_node, + SCM anim) +{ + return scm_from_bool + (((scene::IAnimatedMeshSceneNode*)scm_to_pointer (animated_mesh_scene_node))-> + setMD2Animation (scm_to_md2_animation_type (anim))); +} + extern "C" { void init_animated_mesh_scene_node (void) { - init_animated_mesh_scene_node_type (); + DEFINE_GSUBR ("scene_IAnimatedMeshSceneNode_setFrameLoop", 3, 0, 0, + scene_IAnimatedMeshSceneNode_setFrameLoop); + DEFINE_GSUBR ("scene_IAnimatedMeshSceneNode_setMD2Animation", 2, 0, 0, + scene_IAnimatedMeshSceneNode_setMD2Animation); } - DEFINE_WRAPPED_TYPE (irr::scene::IAnimatedMeshSceneNode*, "animated-mesh-scene-node", - init_animated_mesh_scene_node_type, animated_mesh_scene_node_p, - wrap_animated_mesh_scene_node, unwrap_animated_mesh_scene_node); - }