X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Ffile-system.cpp;h=204e25dabad0985bcd17662b552f3695eb5894f2;hb=6bcbb2cefb0e69afae9b1de828b85f506b1bef19;hp=76892ef7a74ac78a86113ff06659b36b5b996b2d;hpb=12c23d8b50e25efce7891cc81427c5774340bd18;p=guile-irrlicht.git diff --git a/src/file-system.cpp b/src/file-system.cpp index 76892ef..204e25d 100644 --- a/src/file-system.cpp +++ b/src/file-system.cpp @@ -25,18 +25,16 @@ #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); }