summaryrefslogtreecommitdiff
path: root/libguile/init.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@red-bean.com>1996-09-05 16:51:12 +0000
committerJim Blandy <jimb@red-bean.com>1996-09-05 16:51:12 +0000
commit24f93c275cbfc443adfb8f3086d957496e6ceaa6 (patch)
tree12dbe374c9e5ccb7ec47b0f6f4e10b8892c57412 /libguile/init.c
parentab1680d22359bedc2c09b6ee889161dc3fd5d9e4 (diff)
downloadguile-24f93c275cbfc443adfb8f3086d957496e6ceaa6.tar.gz
Move code to initialize and search %load-path from ice-9 to C
code, so we can use the load-path to find the ice-9 boot code; this makes it easier to run Guile without installing it. See corresponding changes in guile/Makefile.in. * feature.c: Move stuff concerned with the load path to load.c. (scm_compiled_library_path): Deleted. Don't #include libpath.h here. * feature.h: Don't mention scm_compiled_library_path. * load.c: #include "libpath.h" here, as well as <sys/types.h>, <sys/stat.h>, and <unistd.h> (if present). (R_OK): #define if the system hasn't deigned to. (scm_loc_load_path): New variable. (scm_init_load_path, scm_sys_search_load_path, scm_sys_try_load_path): New functions. (scm_init_load): Initialize scm_loc_load_path to point to the value cell of the Scheme %load-path variable. * load.h: Add declarations for scm_sys_search_load_path, scm_sys_try_load_path. * init.c: Call scm_init_load_path. * Makefile.in (feature.o, load.o): Dependencies updated.
Diffstat (limited to 'libguile/init.c')
-rw-r--r--libguile/init.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/init.c b/libguile/init.c
index f8c194527..bb49f7eb4 100644
--- a/libguile/init.c
+++ b/libguile/init.c
@@ -352,6 +352,7 @@ scm_boot_guile (result, argc, argv, in, out, err, init_func, boot_cmd)
scm_init_unif ();
scm_init_simpos ();
scm_progargs = scm_makfromstrs (argc, argv);
+ scm_init_load_path ();
initialized = 1;
}