- SCM
- irr_getSceneManager (SCM wrapped_obj)
- {
- irr::scene::ISceneManager* scene_manager;
- if (device_p (wrapped_obj))
- {
- scene_manager = unwrap_device (wrapped_obj)->getSceneManager ();
- }
- else
- {
- scm_error (scm_arg_type_key, NULL, "Cannot get scene manager from object: ~S",
- scm_list_1 (wrapped_obj), scm_list_1 (wrapped_obj));
- }
- return wrap_scene_manager (scene_manager);
- }
-