X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fgui-environment.h;h=663c4190b3ecb6e78fe633d18370d82542fd7d9a;hb=01297d58b47a2e1c3579678c74f53491901b567e;hp=e99e133f7237873774e978531cb9f2617e5bd4f5;hpb=da89e12dbf35ce6452e6a6e2eeb3f83eaeb94c97;p=guile-irrlicht.git

diff --git a/src/gui-environment.h b/src/gui-environment.h
index e99e133..663c419 100644
--- a/src/gui-environment.h
+++ b/src/gui-environment.h
@@ -24,46 +24,84 @@
 
 #include <irrlicht/irrlicht.h>
 #include <libguile.h>
-#include "wrapped.h"
 
-extern "C" {
+template <typename TParent>
+SCM
+gui_IGUIEnvironment_addButton (SCM gui_environment,
+                                   SCM rectangle,
+                                   SCM parent,
+                                   SCM id,
+                                   SCM text,
+                                   SCM tooltiptext);
+
+template <typename TParent>
+SCM
+gui_IGUIEnvironment_addEditBox (SCM gui_environment,
+                                    SCM text,
+                                    SCM rectangle,
+                                    SCM border,
+                                    SCM parent,
+                                    SCM id);
+
+template <typename TParent>
+SCM
+gui_IGUIEnvironment_addImage (SCM gui_environment,
+                                  SCM image,
+                                  SCM position,
+                                  SCM use_alpha_channel,
+                                  SCM parent,
+                                  SCM id,
+                                  SCM text);
+
+template <typename TParent>
+SCM
+gui_IGUIEnvironment_addListBox (SCM gui_environment,
+                                    SCM rectangle,
+                                    SCM parent,
+                                    SCM id,
+                                    SCM draw_background);
+
+template <typename TParent>
+SCM
+gui_IGUIEnvironment_addScrollBar (SCM gui_environment,
+                                      SCM horizontal,
+                                      SCM rectangle,
+                                      SCM parent,
+                                      SCM id);
+
+template <typename TParent>
+SCM
+gui_IGUIEnvironment_addStaticText (SCM gui_environment,
+                                       SCM text,
+                                       SCM rectangle,
+                                       SCM border,
+                                       SCM word_wrap,
+                                       SCM parent,
+                                       SCM id,
+                                       SCM fill_background);
+
+template <typename TParent>
+SCM
+gui_IGUIEnvironment_addWindow (SCM gui_environment,
+                                   SCM rectangle,
+                                   SCM modal,
+                                   SCM text,
+                                   SCM parent,
+                                   SCM id);
+
+SCM
+gui_IGUIEnvironment_getBuiltInFont (SCM gui_environment);
+
+SCM
+gui_IGUIEnvironment_getFont (SCM gui_environment,
+                                 SCM filename);
+
+SCM
+gui_IGUIEnvironment_getSkin (SCM gui_environment);
 
+extern "C" {
   void
   init_gui_environment (void);
-
-  DECLARE_WRAPPED_TYPE (irr::gui::IGUIEnvironment*, init_gui_environment_type,
-                        gui_environment_p, wrap_gui_environment, unwrap_gui_environment);
-
-  SCM
-  irr_getGUIEnvironment (SCM wrapped_obj);
-
-  SCM
-  irr_gui_addImage (SCM wrapped_gui_environment,
-                    SCM image,
-                    SCM position,
-                    SCM rest);
-
-  SCM
-  irr_gui_addStaticText (SCM wrapped_gui_environment,
-                         SCM text,
-                         SCM rectangle,
-                         SCM rest);
-
-  SCM
-  irr_gui_getBuiltInFont (SCM wrapped_gui_environment);
-
-  SCM
-  irr_gui_getFont (SCM wrapped_gui_environment,
-                   SCM filename);
-
-  SCM
-  irr_gui_getSkin (SCM wrapped_gui_environment);
-
-  SCM
-  irr_gui_IGUIEnvironment_addButton (SCM wrapped_gui_environment,
-                                     SCM rectangle,
-                                     SCM rest);
-
-  }
+}
 
 #endif