diff options
| author | Jim Blandy <jimb@red-bean.com> | 1998-10-03 17:40:08 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@red-bean.com> | 1998-10-03 17:40:08 +0000 |
| commit | 6b8d19d30233a2b4276f3ca896e481f0869f60a5 (patch) | |
| tree | dfb7eefb3e7d8483f883e46e1a3abd52ec428781 /libguile/init.h | |
| parent | 541716d15cbeb7cba986ea47d57dbae60e62e135 (diff) | |
| download | guile-6b8d19d30233a2b4276f3ca896e481f0869f60a5.tar.gz | |
* init.c (invoke_main_func): Load the startup files (boot-9.scm)
from here, not from scm_compile_shell_switches (which is a pretty
dumb place to do it).
(scm_load_startup_files): New function.
(scm_ice_9_already_loaded): Variable moved to here from script.c.
* script.c (scm_compile_shell_switches): Don't load the startup
files here.
(scm_ice_9_already_loaded): Variable moved.
* init.c (scm_load_startup_files): Prototype for new function.
* gh_init.c (gh_enter): Doc fix.
Diffstat (limited to 'libguile/init.h')
| -rw-r--r-- | libguile/init.h | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/libguile/init.h b/libguile/init.h index 8e1fd4716..75d4f8924 100644 --- a/libguile/init.h +++ b/libguile/init.h @@ -47,10 +47,12 @@ #include "libguile/__scm.h" -extern void scm_boot_guile SCM_P ((int argc, char **argv, - void (*main_func) (void *closure, - int argc, - char **argv), - void *closure)); +extern void scm_boot_guile (int argc, char **argv, + void (*main_func) (void *closure, + int argc, + char **argv), + void *closure); + +extern void scm_load_startup_files (void); #endif /* INITH */ |