guile_load.h

00001 /*
00002 Copyright Remco Bras 2008
00003 This file is part of RPGE.
00004 
00005 RPGE is free software; you can redistribute it and/or modify
00006 it under the terms of the GNU General Public License as published by
00007 the Free Software Foundation; either version 3 of the License, or
00008 (at your option) any later version.
00009 
00010 RPGE is distributed in the hope that it will be useful,
00011 but WITHOUT ANY WARRANTY; without even the implied warranty of
00012 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00013 GNU General Public License for more details.
00014 
00015 You should have received a copy of the GNU General Public License
00016 along with this program.  If not, see <http://www.gnu.org/licenses/>
00017 */
00018 
00019 #ifndef GUILE_LOAD_H
00020 #define GUILE_LOAD_H
00021 
00022 #include <libguile.h>
00023 #include "path.h"
00024 #include "sequence.h"
00025 
00026 typedef struct
00027 {
00028   Uint32 threadid;
00029   SCM argv;
00030 }  thread_argv;
00031 
00032 extern sequence argvs;
00033 
00034 void guile_exec_script_with_argv(char* filename, SCM argv);
00035 SCM guile_API_exec_script_with_argv(SCM filename, SCM argv);
00036 SCM guile_get_argv();
00037 SCM scm_c_safe_load(char* filename);
00038 SCM guile_safe_load(SCM filename);
00039 
00040 #endif /*GUILE_LOAD_H*/