X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=src%2Fvideo-driver.cpp;h=e2cb9cf332809d62f82a4adb01966ae40a8e0bda;hp=643ad89e809b488f34cc3581b1705b46896e282a;hb=98052b04792129db97286fdd77ef3b0de8912286;hpb=661f003f90a2ab35026cf17215f28dcb73f54084

diff --git a/src/video-driver.cpp b/src/video-driver.cpp
index 643ad89..e2cb9cf 100644
--- a/src/video-driver.cpp
+++ b/src/video-driver.cpp
@@ -34,12 +34,12 @@ using namespace irr;
 
 
 SCM
-video_IVideoDriver_beginScene (SCM video_driver,
-                               SCM back_buffer,
-                               SCM z_buffer,
-                               SCM color,
-                               SCM video_data,
-                               SCM source_rect)
+IVideoDriver_beginScene (SCM video_driver,
+                         SCM back_buffer,
+                         SCM z_buffer,
+                         SCM color,
+                         SCM video_data,
+                         SCM source_rect)
 {
   video::IVideoDriver* driver = (video::IVideoDriver*) scm_to_pointer (video_driver);
 
@@ -60,11 +60,11 @@ video_IVideoDriver_beginScene (SCM video_driver,
 
 
 SCM
-video_IVideoDriver_drawVertexPrimitiveList (SCM video_driver,
-                                            SCM vertices,
-                                            SCM indices,
-                                            SCM v_type,
-                                            SCM p_type)
+IVideoDriver_drawVertexPrimitiveList (SCM video_driver,
+                                      SCM vertices,
+                                      SCM indices,
+                                      SCM v_type,
+                                      SCM p_type)
 {
   // Build vertex array
   u32 vertex_count = scm_to_uint32 (scm_length (vertices));
@@ -104,7 +104,7 @@ video_IVideoDriver_drawVertexPrimitiveList (SCM video_driver,
 
 
 SCM
-video_IVideoDriver_endScene (SCM video_driver)
+IVideoDriver_endScene (SCM video_driver)
 {
   video::IVideoDriver* driver = (video::IVideoDriver*) scm_to_pointer (video_driver);
   return scm_from_bool (driver->endScene ());
@@ -112,7 +112,7 @@ video_IVideoDriver_endScene (SCM video_driver)
 
 
 SCM
-video_IVideoDriver_getFPS (SCM video_driver)
+IVideoDriver_getFPS (SCM video_driver)
 {
   video::IVideoDriver* driver = (video::IVideoDriver*) scm_to_pointer (video_driver);
   return scm_from_int32 (driver->getFPS ());
@@ -120,8 +120,8 @@ video_IVideoDriver_getFPS (SCM video_driver)
 
 
 SCM
-video_IVideoDriver_getTexture (SCM video_driver,
-                               SCM filename)
+IVideoDriver_getTexture (SCM video_driver,
+                         SCM filename)
 {
   video::IVideoDriver* driver = (video::IVideoDriver*) scm_to_pointer (video_driver);
   video::ITexture* texture = driver->getTexture (scm_to_utf8_stringn (filename, NULL));
@@ -130,8 +130,8 @@ video_IVideoDriver_getTexture (SCM video_driver,
 
 
 SCM
-video_IVideoDriver_setMaterial (SCM video_driver,
-                                SCM material)
+IVideoDriver_setMaterial (SCM video_driver,
+                          SCM material)
 {
   video::IVideoDriver* driver = (video::IVideoDriver*) scm_to_pointer (video_driver);
   driver->setMaterial (*((video::SMaterial*) scm_to_pointer (material)));
@@ -140,9 +140,9 @@ video_IVideoDriver_setMaterial (SCM video_driver,
 
 
 SCM
-video_IVideoDriver_setTransform (SCM video_driver,
-                                 SCM state,
-                                 SCM mat)
+IVideoDriver_setTransform (SCM video_driver,
+                           SCM state,
+                           SCM mat)
 {
   video::IVideoDriver* driver = (video::IVideoDriver*) scm_to_pointer (video_driver);
   driver->setTransform (scm_to_transformation_state (state),
@@ -156,14 +156,14 @@ extern "C" {
   void
   init_video_driver (void)
   {
-    DEFINE_GSUBR ("video_IVideoDriver_beginScene", 6, 0, 0, video_IVideoDriver_beginScene);
-    DEFINE_GSUBR ("video_IVideoDriver_drawVertexPrimitiveList", 5, 0, 1,
-                  video_IVideoDriver_drawVertexPrimitiveList);
-    DEFINE_GSUBR ("video_IVideoDriver_endScene", 1, 0, 0, video_IVideoDriver_endScene);
-    DEFINE_GSUBR ("video_IVideoDriver_getFPS", 1, 0, 0, video_IVideoDriver_getFPS);
-    DEFINE_GSUBR ("video_IVideoDriver_getTexture", 2, 0, 0, video_IVideoDriver_getTexture);
-    DEFINE_GSUBR ("video_IVideoDriver_setMaterial", 2, 0, 0, video_IVideoDriver_setMaterial);
-    DEFINE_GSUBR ("video_IVideoDriver_setTransform", 3, 0, 0, video_IVideoDriver_setTransform);
+    DEFINE_GSUBR ("IVideoDriver_beginScene", 6, 0, 0, IVideoDriver_beginScene);
+    DEFINE_GSUBR ("IVideoDriver_drawVertexPrimitiveList", 5, 0, 1,
+                  IVideoDriver_drawVertexPrimitiveList);
+    DEFINE_GSUBR ("IVideoDriver_endScene", 1, 0, 0, IVideoDriver_endScene);
+    DEFINE_GSUBR ("IVideoDriver_getFPS", 1, 0, 0, IVideoDriver_getFPS);
+    DEFINE_GSUBR ("IVideoDriver_getTexture", 2, 0, 0, IVideoDriver_getTexture);
+    DEFINE_GSUBR ("IVideoDriver_setMaterial", 2, 0, 0, IVideoDriver_setMaterial);
+    DEFINE_GSUBR ("IVideoDriver_setTransform", 3, 0, 0, IVideoDriver_setTransform);
   }
 
 }