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

Canonicalize source file names in `primitive-load-path' (fix bug #30170).

Browse source 
* libguile/load.c (scm_primitive_load_path): Canonicalize
  FULL_FILENAME.  Fixes bug #30170 ("Auto-compilation erroneously
  recompiles dependencies").
This commit is contained in:
Ludovic Courtès 2010-06-20 16:57:06 +02:00
parent 35d70eccac
commit eba5ea7a4f
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/load.c
View file

@ -761,6 +761,9 @@ SCM_DEFINE (scm_primitive_load_path, "primitive-load-path", 0, 0, 1,
exception_on_not_found = SCM_BOOL_T;
full_filename = scm_sys_search_load_path (filename);
if (scm_is_string (full_filename))
full_filename = scm_canonicalize_path (full_filename);
compiled_filename =
scm_search_path (*scm_loc_load_compiled_path,
filename,