]> git.jsancho.org Git - guile-irrlicht.git/blobdiff - src/file-system.cpp
clean code
[guile-irrlicht.git] / src / file-system.cpp
index 76892ef7a74ac78a86113ff06659b36b5b996b2d..204e25dabad0985bcd17662b552f3695eb5894f2 100644 (file)
 #include "file-system.h"
 #include "gsubr.h"
 
-
 using namespace irr;
 
-
 SCM
-io_IFileSystem_addFileArchive (SCM file_system,
-                               SCM filename,
-                               SCM ignore_case,
-                               SCM ignore_paths,
-                               SCM archive_type,
-                               SCM password,
-                               SCM ret_archive)
+IFileSystem_addFileArchive (SCM file_system,
+                            SCM filename,
+                            SCM ignore_case,
+                            SCM ignore_paths,
+                            SCM archive_type,
+                            SCM password,
+                            SCM ret_archive)
 {
   io::IFileArchive* retArchive = (io::IFileArchive*)scm_to_pointer (ret_archive);
   io::IFileArchive** retArchiveReference = 0;
@@ -55,13 +53,8 @@ io_IFileSystem_addFileArchive (SCM file_system,
                      retArchiveReference));
 }
 
-
-extern "C" {
-
-  void
-  init_file_system (void)
-  {
-    DEFINE_GSUBR ("io_IFileSystem_addFileArchive", 7, 0, 0, io_IFileSystem_addFileArchive);
-  }
-
+void
+init_file_system (void)
+{
+  DEFINE_GSUBR ("IFileSystem_addFileArchive", 7, 0, 0, IFileSystem_addFileArchive);
 }