X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fvideo-driver.h;h=4512b9689d46182bcff08272258349f6fb40c437;hb=f0d999bd6865a03c42a2d7378fd60c7a469201f2;hp=1525edf717aaab831851c9dc14bf2d8fc6344278;hpb=2806f03eafc48ec9ef02a3dc2d74133eaf11ccc1;p=guile-irrlicht.git diff --git a/src/video-driver.h b/src/video-driver.h index 1525edf..4512b96 100644 --- a/src/video-driver.h +++ b/src/video-driver.h @@ -34,6 +34,41 @@ extern "C" { DECLARE_WRAPPED_TYPE (irr::video::IVideoDriver*, init_video_driver_type, video_driver_p, wrap_video_driver, unwrap_video_driver); + SCM + irr_video_beginScene (SCM wrapped_video_driver, + SCM rest); + + SCM + irr_video_drawVertexPrimitiveList (SCM wrapped_video_driver, + SCM vertices, + SCM indices, + SCM rest); + + SCM + irr_video_endScene (SCM wrapped_video_driver); + + SCM + irr_video_getFPS (SCM wrapped_video_driver); + + SCM + irr_video_getTexture (SCM wrapped_video_driver, + SCM filename); + + SCM + irr_video_setMaterial (SCM wrapped_video_driver, + SCM material); + + SCM + irr_video_setTransform (SCM wrapped_video_driver, + SCM state, + SCM mat); + + SCM + irr_getVideoDriver (SCM wrapped_obj); + + irr::video::E_TRANSFORMATION_STATE + scm_to_transformation_state (SCM transformation_state); + } #endif