+
+ return SCM_UNSPECIFIED;
+ }
+
+ SCM
+ irr_scene_setRotation (SCM wrapped_scene_node,
+ SCM rotation)
+ {
+#define SET_ROTATION(NODE) NODE->setRotation (scm_to_vector3df (rotation));
+
+ if (animated_mesh_scene_node_p (wrapped_scene_node))
+ {
+ SET_ROTATION (unwrap_animated_mesh_scene_node (wrapped_scene_node));
+ }
+ else if (camera_scene_node_p (wrapped_scene_node))
+ {
+ SET_ROTATION (unwrap_camera_scene_node (wrapped_scene_node));
+ }
+ else if (scene_node_p (wrapped_scene_node))
+ {
+ SET_ROTATION (unwrap_scene_node (wrapped_scene_node));
+ }
+ else
+ {
+ scm_error (scm_arg_type_key, NULL, "Cannot set rotation to object: ~S",
+ scm_list_1 (wrapped_scene_node), scm_list_1 (wrapped_scene_node));
+ }
+
+ return SCM_UNSPECIFIED;
+ }
+
+ SCM
+ irr_scene_setScale (SCM wrapped_scene_node,
+ SCM scale)
+ {
+#define SET_SCALE(NODE) NODE->setScale (scm_to_vector3df (scale));
+
+ if (animated_mesh_scene_node_p (wrapped_scene_node))
+ {
+ SET_SCALE (unwrap_animated_mesh_scene_node (wrapped_scene_node));
+ }
+ else if (scene_node_p (wrapped_scene_node))
+ {
+ SET_SCALE (unwrap_scene_node (wrapped_scene_node));
+ }
+ else
+ {
+ scm_error (scm_arg_type_key, NULL, "Cannot set scale to object: ~S",
+ scm_list_1 (wrapped_scene_node), scm_list_1 (wrapped_scene_node));
+ }
+