summaryrefslogtreecommitdiff
path: root/libguile/gh_init.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@red-bean.com>1998-10-03 17:40:08 +0000
committerJim Blandy <jimb@red-bean.com>1998-10-03 17:40:08 +0000
commit6b8d19d30233a2b4276f3ca896e481f0869f60a5 (patch)
treedfb7eefb3e7d8483f883e46e1a3abd52ec428781 /libguile/gh_init.c
parent541716d15cbeb7cba986ea47d57dbae60e62e135 (diff)
downloadguile-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/gh_init.c')
-rw-r--r--libguile/gh_init.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/libguile/gh_init.c b/libguile/gh_init.c
index 84629ebf8..8661f3650 100644
--- a/libguile/gh_init.c
+++ b/libguile/gh_init.c
@@ -57,7 +57,6 @@ gh_launch_pad (void *closure, int argc, char **argv)
{
main_prog_t c_main_prog = (main_prog_t) closure;
-/* gh_eval_str ("(primitive-load-path \"ice-9/boot-9.scm\")"); */
c_main_prog (argc, argv);
exit (0);
}