]> git.jsancho.org Git - guile-irrlicht.git/blobdiff - src/gui-toolbar.cpp
free strings previously allocated for conversions
[guile-irrlicht.git] / src / gui-toolbar.cpp
index ace658cf6ca423f20bca76d3294b83081da18caf..18a71f78f5d48255594cbf7933ae4f59b9a0e3b9 100644 (file)
@@ -23,7 +23,6 @@
 #include <libguile.h>
 #include "gsubr.h"
 #include "gui-toolbar.h"
-#include "wchar.h"
 #include "wrapped.h"
 
 using namespace irr;
@@ -39,14 +38,20 @@ IGUIToolBar_addButton (SCM gui_toolbar,
                        SCM use_alpha_channel)
 {
   gui::IGUIToolBar* toolbar = (gui::IGUIToolBar*) scm_to_irr_pointer (gui_toolbar);
+  wchar_t* wtext = (wchar_t*) scm_to_utf32_string (text);
+  wchar_t* wtooltiptext = (wchar_t*) scm_to_utf32_string (tooltiptext);
+
   gui::IGUIButton* button =
     toolbar->addButton (scm_to_int32 (id),
-                        scm_to_wide_char_string (text),
-                        scm_to_wide_char_string (tooltiptext),
+                        wtext,
+                        wtooltiptext,
                         (video::ITexture*) scm_to_irr_pointer (img),
                         (video::ITexture*) scm_to_irr_pointer (pressedimg),
                         scm_to_bool (is_push_button),
                         scm_to_bool (use_alpha_channel));
+
+  free (wtext);
+  free (wtooltiptext);
   return scm_from_pointer ((void*) button, NULL);
 }