X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=src%2Fvideo-driver.h;h=d1b4babf824029369d95a192b786c59e6f5871f6;hp=0dc32c7c6d1d0c80d067aeec805c089287fbe4d6;hb=ba89d42068aa7ee7535946ff61d9bbebdb153f28;hpb=d52f560e9d3693c7810cfb351cf124b1c32e6d72

diff --git a/src/video-driver.h b/src/video-driver.h
index 0dc32c7..d1b4bab 100644
--- a/src/video-driver.h
+++ b/src/video-driver.h
@@ -24,48 +24,13 @@
 
 #include <irrlicht/irrlicht.h>
 #include <libguile.h>
-#include "wrapped.h"
 
 extern "C" {
-
   void
   init_video_driver (void);
-
-  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);
-
-  irr::video::E_TRANSFORMATION_STATE
-  scm_to_transformation_state (SCM transformation_state);
-
 }
 
+irr::video::E_TRANSFORMATION_STATE
+scm_to_transformation_state (SCM transformation_state);
+
 #endif