X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=src%2Fmaterial.cpp;h=72467acc7f39572b50a8c3f53ccc0404b1fd8578;hp=4be4054a550d9e7a7893fc44edadbccbc9e1fdd6;hb=41a6ad96e81a8d8153c54877c4c12f61100677a9;hpb=bf2cb00e2ef19e2eb33557f900405f836ebe65a3

diff --git a/src/material.cpp b/src/material.cpp
index 4be4054..72467ac 100644
--- a/src/material.cpp
+++ b/src/material.cpp
@@ -27,10 +27,8 @@
 #include "material.h"
 #include "material-types.h"
 
-
 using namespace irr;
 
-
 SCM
 video_SMaterial_make (SCM rest)
 {
@@ -121,18 +119,12 @@ video_SMaterial_make (SCM rest)
   return scm_from_pointer ((void*) material, NULL);
 }
 
-
-extern "C" {
-
-  void
-  init_material (void)
-  {
-    DEFINE_GSUBR ("video_SMaterial_make", 0, 0, 1, video_SMaterial_make);
-  }
-
+void
+init_material (void)
+{
+  DEFINE_GSUBR ("video_SMaterial_make", 0, 0, 1, video_SMaterial_make);
 }
 
-
 video::E_ANTI_ALIASING_MODE
 scm_to_anti_aliasing_mode (SCM anti_aliasing_mode)
 {
@@ -172,7 +164,6 @@ scm_to_anti_aliasing_mode (SCM anti_aliasing_mode)
     }
 }
 
-
 video::E_BLEND_OPERATION
 scm_to_blend_operation (SCM blend_operation)
 {
@@ -224,7 +215,6 @@ scm_to_blend_operation (SCM blend_operation)
     }
 }
 
-
 video::E_COLOR_MATERIAL
 scm_to_color_material (SCM color_material)
 {
@@ -260,7 +250,6 @@ scm_to_color_material (SCM color_material)
     }
 }
 
-
 video::E_COLOR_PLANE
 scm_to_color_plane (SCM color_plane)
 {
@@ -300,7 +289,6 @@ scm_to_color_plane (SCM color_plane)
     }
 }
 
-
 video::E_COMPARISON_FUNC
 scm_to_comparison_func (SCM comparison_func)
 {
@@ -344,7 +332,6 @@ scm_to_comparison_func (SCM comparison_func)
     }
 }
 
-
 video::E_POLYGON_OFFSET
 scm_to_polygon_offset (SCM polygon_offset)
 {