diff options
author | Andy Wingo <wingo@pobox.com> | 2009-06-05 10:06:39 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-06-05 10:06:39 +0200 |
commit | 3c997c4ba9862b9f9bd19aac3d6ac866b2b42a77 (patch) | |
tree | 20fb69a62b7774e0213a7e7aed0af2a7f6ad66f2 /libguile/vm-i-system.c | |
parent | 5ea401bffe2ea60545338a48767f4c75d48642c7 (diff) | |
download | guile-3c997c4ba9862b9f9bd19aac3d6ac866b2b42a77.tar.gz |
simplify autocompilation some more
* libguile/load.c (scm_init_load_path): Set the fallback path even if
GUILE_SYSTEM_COMPILED_PATH is set. Now that we store full paths in the
autocompiled files, and the path contains the effective Guile version,
there's no danger of accidental collisions.
(do_try_autocompile, autocompile_catch_handler, scm_try_autocompile):
Simplify again -- since there's only one place we put autocompiled
files, and compile-file finds it itself, there's no need to pass along
the compiled file path.
(scm_primitive_load_path): Don't call out to compiled-file-name to get
the fallback path, as we might not be autocompiling, and besides that
we need to check if the file exists at all.
* module/system/base/compile.scm (compiled-file-name): Simplify again.
The auto-compiled path is just fallback path + full source path + .go.
Diffstat (limited to 'libguile/vm-i-system.c')
0 files changed, 0 insertions, 0 deletions