]> git.jsancho.org Git - guile-irrlicht.git/blob - src/file-system.h
get-file-system add-file-archive!
[guile-irrlicht.git] / src / file-system.h
1 /* guile-irrlicht --- GNU Guile bindings for Irrlicht Engine
2
3    Copyright (C) 2020 Javier Sancho <jsf@jsancho.org>
4
5    This file is part of guile-irrlicht.
6
7    guile-irrlicht is free software; you can redistribute it and/or modify
8    it under the terms of the GNU Lesser General Public License as
9    published by the Free Software Foundation; either version 3 of the
10    License, or (at your option) any later version.
11
12    guile-irrlicht is distributed in the hope that it will be useful, but
13    WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15    General Public License for more details.
16
17    You should have received a copy of the GNU Lesser General Public
18    License along with guile-irrlicht. If not, see
19    <http://www.gnu.org/licenses/>.
20 */
21
22 #ifndef __GUILE_IRRLICHT_FILE_SYSTEM_H_INCLUDED__
23 #define __GUILE_IRRLICHT_FILE_SYSTEM_H_INCLUDED__
24
25 #include <irrlicht/irrlicht.h>
26 #include <libguile.h>
27 #include "wrapped.h"
28
29 extern "C" {
30
31   void
32   init_file_system (void);
33
34   DECLARE_WRAPPED_TYPE (irr::io::IFileSystem*, init_file_system_type,
35                         file_system_p, wrap_file_system, unwrap_file_system);
36
37   SCM
38   irr_io_addFileArchive (SCM wrapped_file_system,
39                          SCM filename,
40                          SCM rest);
41
42   SCM
43   irr_getFileSystem (SCM wrapped_obj);
44
45 }
46
47 #endif