diff --git a/asdf.asd b/asdf.asd index 463aa7c560bf67f6865b2ab243acc1f99530f9d4..fae5b6d3ec607df25908c5d68598f09e1436cd01 100644 --- a/asdf.asd +++ b/asdf.asd @@ -75,7 +75,7 @@ :licence "MIT" :description "Another System Definition Facility" :long-description "ASDF builds Common Lisp software organized into defined systems." - :version "3.1.3.8" ;; to be automatically updated by make bump-version + :version "3.1.3.10" ;; to be automatically updated by make bump-version :depends-on () #+asdf3 :encoding #+asdf3 :utf-8 :class #.(if (find-class 'package-inferred-system nil) 'package-inferred-system 'system) diff --git a/doc/index.html b/doc/index.html index b00580aab69a3396a97409f173f4c578346998a5..398df83d21d911f112463027ffd1a44e664ff3c7 100644 --- a/doc/index.html +++ b/doc/index.html @@ -305,8 +305,10 @@ XCL (Peter Graves) <gnooth@gmail.com> get our "release" branch for the latest stable release. Run <tt>make</tt> to create <tt>build/asdf.lisp</tt>); </li> - <li>browse the latest <em>development</em> tree from our git repository: - <a href="http://common-lisp.net/gitweb?p=projects/asdf/asdf.git">gitweb</a> + <li>browse the latest <em>development</em> tree from our git + repository: + <a href="http://common-lisp.net/gitweb/?p=asdf/asdf.git;a=summary;js=1">gitweb</a> + <!-- <a href="http://common-lisp.net/gitweb?p=projects/asdf/asdf.git">gitweb</a> --> </li> <li>download the tarball of a past release: <a href="http://common-lisp.net/project/asdf/archives/">archives</a> @@ -316,18 +318,20 @@ XCL (Peter Graves) <gnooth@gmail.com> <h3>Extensions</h3> <p>Known extensions to ASDF include:</p> <ul> - <li><a href="http://common-lisp.net/gitweb?p=projects/asdf/asdf-contrib.git" + <li><a href="http://common-lisp.net/gitweb/?p=asdf/asdf-contrib.git" ><tt>asdf-contrib</tt></a>, a collection of most of the below.</li> - <li><a href="http://common-lisp.net/gitweb?p=projects/asdf/asdf-encodings.git" + <li><a href="http://common-lisp.net/gitweb/?p=asdf/asdf-encodings.git" ><tt>asdf-encodings</tt></a>, to compile Lisp source files with character encodings other than UTF-8.</li> - <li><a href="http://common-lisp.net/gitweb?p=projects/asdf/asdf-finalizers.git" + <li><a href="http://common-lisp.net/gitweb/?p=asdf/asdf-finalizers.git" ><tt>asdf-finalizers</tt></a>, to allow macros to include code to be evaluated at the end of a file being compiled.</li> - <li><a href="http://common-lisp.net/gitweb?p=projects/xcvb/asdf-dependency-grovel.git" - ><tt>asdf-dependency-grovel</tt></a>, + <li> + <!-- <a href="http://common-lisp.net/gitweb?p=projects/xcvb/asdf-dependency-grovel.git"> --> + <a href="http://common-lisp.net/gitweb/?p=xcvb/asdf-dependency-grovel.git;a=summary;js=1"> + <tt>asdf-dependency-grovel</tt></a>, to compute the actual dependencies in a big ASDF system.</li> <li><a href="http://common-lisp.net/project/qitab/" ><tt>poiu</tt></a>, @@ -339,7 +343,7 @@ XCL (Peter Graves) <gnooth@gmail.com> <li><a href="http://www.lrde.epita.fr/~didier/software/lisp/misc.php#asdf-flv" ><tt>asdf-flv</tt></a>, to bind file-local variables around the compilation of some files.</li> - <li><a href="http://common-lisp.net/gitweb?p=projects/asdf/asdf-package-system.git" + <li><a href="http://common-lisp.net/gitweb/?p=asdf/asdf-package-system.git" ><tt>asdf-package-system</tt></a>, to compile Lisp source files with one package per file that also determines dependencies, in the style of diff --git a/header.lisp b/header.lisp index 621732360206d7eb7c7fb9f95e8f5ea5b77f4214..2d7cd2bad7c8cc0cbe43c28574de2083c2466484 100644 --- a/header.lisp +++ b/header.lisp @@ -1,5 +1,5 @@ ;;; -*- mode: Common-Lisp; Base: 10 ; Syntax: ANSI-Common-Lisp ; buffer-read-only: t; -*- -;;; This is ASDF 3.1.3.8: Another System Definition Facility. +;;; This is ASDF 3.1.3.10: Another System Definition Facility. ;;; ;;; Feedback, bug reports, and patches are all welcome: ;;; please mail to <asdf-devel@common-lisp.net>. diff --git a/source-registry.lisp b/source-registry.lisp index 7817d8d637dbf178d7c717e570844001614fe062..e6b51deec7a3762fa8577db5c680097e3a84db2b 100644 --- a/source-registry.lisp +++ b/source-registry.lisp @@ -241,7 +241,8 @@ after having found a .asd file? True by default.") ((:also-exclude) (appendf *source-registry-exclusions* rest)) ((:default-registry) - (inherit-source-registry '(default-source-registry) :register register)) + (inherit-source-registry + '(default-user-source-registry default-system-source-registry) :register register)) ((:inherit-configuration) (inherit-source-registry inherit :register register)) ((:ignore-inherited-configuration) diff --git a/uiop/filesystem.lisp b/uiop/filesystem.lisp index 08d3baa6173bb3ffc6c177963d025d1d49608278..ff1beb92497a4023f516715e557f19cdda4de990 100644 --- a/uiop/filesystem.lisp +++ b/uiop/filesystem.lisp @@ -198,8 +198,8 @@ This function is used as a helper to DIRECTORY-FILES to avoid invalid entries wh Subdirectories should NOT be returned. PATTERN defaults to a pattern carefully chosen based on the implementation; override the default at your own risk. - DIRECTORY-FILES tries NOT to resolve symlinks if the implementation -permits this." + DIRECTORY-FILES tries NOT to resolve symlinks if the implementation permits this, +but the behavior in presence of symlinks is not portable. Use IOlib to handle such situations." (let ((dir (pathname directory))) (when (logical-pathname-p dir) ;; Because of the filtering we do below, @@ -225,7 +225,8 @@ permits this." :version (make-pathname-component-logical (pathname-version f))))))))) (defun subdirectories (directory) - "Given a DIRECTORY pathname designator, return a list of the subdirectories under it." + "Given a DIRECTORY pathname designator, return a list of the subdirectories under it. +The behavior in presence of symlinks is not portable. Use IOlib to handle such situations." (let* ((directory (ensure-directory-pathname directory)) #-(or abcl cormanlisp genera xcl) (wild (merge-pathnames* @@ -265,7 +266,10 @@ permits this." (defun collect-sub*directories (directory collectp recursep collector) "Given a DIRECTORY, when COLLECTP returns true when CALL-FUNCTION'ed with the directory, call-function the COLLECTOR function designator on the directory, -and recurse each of its subdirectories on which the RECURSEP returns true when CALL-FUNCTION'ed with them." +and recurse each of its subdirectories on which the RECURSEP returns true when CALL-FUNCTION'ed with them. +This function will thus let you traverse a filesystem hierarchy, +superseding the functionality of CL-FAD:WALK-DIRECTORY. +The behavior in presence of symlinks is not portable. Use IOlib to handle such situations." (when (call-function collectp directory) (call-function collector directory) (dolist (subdir (subdirectories directory)) diff --git a/upgrade.lisp b/upgrade.lisp index dec31b946c5472b09efd58cb978ce693fdb81f5f..fe30d70753c00a408b24f88fbda388959ac49347 100644 --- a/upgrade.lisp +++ b/upgrade.lisp @@ -67,7 +67,7 @@ previously-loaded version of ASDF." ;; "3.4.5.67" would be a development version in the official branch, on top of 3.4.5. ;; "3.4.5.0.8" would be your eighth local modification of official release 3.4.5 ;; "3.4.5.67.8" would be your eighth local modification of development version 3.4.5.67 - (asdf-version "3.1.3.8") + (asdf-version "3.1.3.10") (existing-version (asdf-version))) (setf *asdf-version* asdf-version) (when (and existing-version (not (equal asdf-version existing-version))) diff --git a/version.lisp-expr b/version.lisp-expr index c39099140d345dcb8c54ead86c5690905f06ff0b..2b7e91e151c5c91f0f7ea45784df5fa30a0dfc37 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -1,2 +1,2 @@ -"3.1.3.8" +"3.1.3.10"