mirror of
https://gitlab.com/embeddable-common-lisp/ecl.git
synced 2026-01-14 05:12:38 -08:00
The recursive implementation of DIRECTORY with wildcard inferiors forget all inner directories in (DIRECTORY "/foo/**/").
This commit is contained in:
parent
c761fa5a51
commit
82252f6868
2 changed files with 4 additions and 1 deletions
|
|
@ -11,6 +11,9 @@ ECL 10.3.2:
|
|||
- The tool 'ecl-config' contained unsubstituted values, such as @LDRPATH@
|
||||
because these variablesls had been renamed in the autoconf file.
|
||||
|
||||
- The reimplementation of DIRECTORY introduced a bug in pathnames with ending
|
||||
double wildcars, such as "/foo/**/".
|
||||
|
||||
* Visible changes:
|
||||
|
||||
- The source location annotator records the original pathnames, not the
|
||||
|
|
|
|||
|
|
@ -830,7 +830,7 @@ dir_recursive(cl_object base_dir, cl_object directory, cl_object filemask)
|
|||
* we have to find a file which corresponds to the description.
|
||||
*/
|
||||
if (directory == Cnil) {
|
||||
return dir_files(base_dir, filemask);
|
||||
return ecl_nconc(dir_files(base_dir, filemask), output);
|
||||
}
|
||||
/*
|
||||
* 2) We have not yet exhausted the DIRECTORY component of the
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue