X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=src%2Fgui-skin.cpp;h=f6628f1b4a1eeda6a67de1377910ef8738ee5da0;hp=abe13f554f9e600634959e20ed0a2b1d493affb1;hb=41a6ad96e81a8d8153c54877c4c12f61100677a9;hpb=bf2cb00e2ef19e2eb33557f900405f836ebe65a3

diff --git a/src/gui-skin.cpp b/src/gui-skin.cpp
index abe13f5..f6628f1 100644
--- a/src/gui-skin.cpp
+++ b/src/gui-skin.cpp
@@ -25,10 +25,8 @@
 #include "gsubr.h"
 #include "gui-skin.h"
 
-
 using namespace irr;
 
-
 SCM
 IGUISkin_getColor (SCM gui_skin,
                    SCM color)
@@ -38,7 +36,6 @@ IGUISkin_getColor (SCM gui_skin,
   return scm_from_color (scolor);
 }
 
-
 SCM
 IGUISkin_getFont (SCM gui_skin,
                   SCM which)
@@ -48,7 +45,6 @@ IGUISkin_getFont (SCM gui_skin,
   return scm_from_pointer ((void*) font, NULL);
 }
 
-
 SCM
 IGUISkin_setColor (SCM gui_skin,
                    SCM which,
@@ -60,7 +56,6 @@ IGUISkin_setColor (SCM gui_skin,
   return SCM_UNSPECIFIED;
 }
 
-
 SCM
 IGUISkin_setFont (SCM gui_skin,
                   SCM font,
@@ -72,18 +67,13 @@ IGUISkin_setFont (SCM gui_skin,
   return SCM_UNSPECIFIED;
 }
 
-
-extern "C" {
-
-  void
-  init_gui_skin (void)
-  {
-    DEFINE_GSUBR ("IGUISkin_getColor", 2, 0, 0, IGUISkin_getColor);
-    DEFINE_GSUBR ("IGUISkin_getFont", 2, 0, 0, IGUISkin_getFont);
-    DEFINE_GSUBR ("IGUISkin_setColor", 3, 0, 0, IGUISkin_setColor);
-    DEFINE_GSUBR ("IGUISkin_setFont", 3, 0, 0, IGUISkin_setFont);
-  }
-
+void
+init_gui_skin (void)
+{
+  DEFINE_GSUBR ("IGUISkin_getColor", 2, 0, 0, IGUISkin_getColor);
+  DEFINE_GSUBR ("IGUISkin_getFont", 2, 0, 0, IGUISkin_getFont);
+  DEFINE_GSUBR ("IGUISkin_setColor", 3, 0, 0, IGUISkin_setColor);
+  DEFINE_GSUBR ("IGUISkin_setFont", 3, 0, 0, IGUISkin_setFont);
 }
 
 gui::EGUI_DEFAULT_COLOR
@@ -197,7 +187,6 @@ scm_to_default_color (SCM default_color)
     }
 }
 
-
 gui::EGUI_DEFAULT_FONT
 scm_to_default_font (SCM default_font)
 {