mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

* init.c (invoke_main_func): Load the startup files (boot-9.scm)

Browse source 
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.
This commit is contained in:
Jim Blandy 1998-10-03 17:40:08 +00:00
parent 541716d15c
commit 6b8d19d302
3 changed files with 8 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

12
libguile/init.h
View file

@ -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 */