call remote procs from guile code

[guile-irrlicht.git] / src / gui-toolbar.cpp

diff --git a/src/gui-toolbar.cpp b/src/gui-toolbar.cpp
index 3eac3772beddb973413e924528d5f8ef888375e9..fb3ca10862ff8ad2b5b4f0d0081e7e513a4d8345 100644 (file)
--- a/src/gui-toolbar.cpp
+++ b/src/gui-toolbar.cpp
@@ -21,6 +21,7 @@
 
 #include <irrlicht/irrlicht.h>
 #include <libguile.h>
+#include "gsubr.h"
 #include "gui-toolbar.h"
 #include "wchar.h"
 
@@ -29,14 +30,14 @@ using namespace irr;
 
 
 SCM
-irr_gui_IGUIToolBar_addButton (SCM gui_toolbar,
-                               SCM id,
-                               SCM text,
-                               SCM tooltiptext,
-                               SCM img,
-                               SCM pressedimg,
-                               SCM is_push_button,
-                               SCM use_alpha_channel)
+IGUIToolBar_addButton (SCM gui_toolbar,
+                       SCM id,
+                       SCM text,
+                       SCM tooltiptext,
+                       SCM img,
+                       SCM pressedimg,
+                       SCM is_push_button,
+                       SCM use_alpha_channel)
 {
   gui::IGUIToolBar* toolbar = (gui::IGUIToolBar*) scm_to_pointer (gui_toolbar);
   gui::IGUIButton* button =
@@ -56,7 +57,7 @@ extern "C" {
   void
   init_gui_toolbar (void)
   {
-    DEFINE_GSUBR ("irr_gui_IGUIToolBar_addButton", 8, 0, 0, irr_gui_IGUIToolBar_addButton);
+    DEFINE_GSUBR ("IGUIToolBar_addButton", 8, 0, 0, IGUIToolBar_addButton);
   }
 
 }