Skip to content
Snippets Groups Projects
Commit 0260a4cf authored by Robert P. Goldman's avatar Robert P. Goldman
Browse files
parents b6cd33bc c2b7fbaf
No related branches found
No related tags found
No related merge requests found
......@@ -68,7 +68,7 @@
;;;; Create packages in a way that is compatible with hot-upgrade.
;;;; See https://bugs.launchpad.net/asdf/+bug/485687
;;;; See more at the end of the file.
;;;; See more near the end of the file.
(eval-when (:load-toplevel :compile-toplevel :execute)
(defvar *asdf-version* nil)
......@@ -76,8 +76,9 @@
(let* (;; For bug reporting sanity, please always bump this version when you modify this file.
;; "2.345" would be an official release
;; "2.345.6" would be a development version in the official upstream
;; "2.345.0.7" or "2.345.6.7" would be your local modification of one of the above.
(asdf-version "2.010.9")
;; "2.345.0.7" would be your local modification of an official release
;; "2.345.6.7" would be your local modification of a development version
(asdf-version "2.011")
(existing-asdf (fboundp 'find-system))
(existing-version *asdf-version*)
(already-there (equal asdf-version existing-version)))
......@@ -294,7 +295,7 @@
;; Utilities
#:absolute-pathname-p
;; #:aif #:it
;; #:aif #:it
;; #:appendf
#:coerce-name
#:directory-pathname-p
......@@ -307,8 +308,8 @@
#:merge-pathnames*
#:pathname-directory-pathname
#:read-file-forms
;; #:remove-keys
;; #:remove-keyword
;; #:remove-keys
;; #:remove-keyword
#:resolve-symlinks
#:split-string
#:component-name-to-pathname-components
......@@ -633,7 +634,7 @@ actually-existing directory."
(defun* get-uid ()
#+allegro (excl.osi:getuid)
#+clisp (loop :for s :in '("posix:uid" "LINUX:getuid")
:for f = (ignore-errors (read-from-string s))
:for f = (ignore-errors (read-from-string s))
:when f :return (funcall f))
#+(or cmu scl) (unix:unix-getuid)
#+ecl #.(cl:if (cl:< ext:+ecl-version-number+ 100601)
......@@ -667,7 +668,7 @@ with given pathname and if it exists return its truename."
(pathname (unless (wild-pathname-p p)
#.(or #+(or allegro clozure cmu ecl sbcl scl) '(probe-file p)
#+clisp (aif (find-symbol (string '#:probe-pathname) :ext) `(ignore-errors (,it p)))
'(ignore-errors (truename p)))))))
'(ignore-errors (truename p)))))))
(defun* truenamize (p)
"Resolve as much of a pathname as possible"
......@@ -1333,7 +1334,7 @@ Going forward, we recommend new users should be using the source-registry.
(let* ((registered (cdr (gethash fallback *defined-systems*)))
(system (or registered
(apply 'make-instance 'system
:name fallback :source-file source-file keys))))
:name fallback :source-file source-file keys))))
(unless registered
(register-system fallback system))
(throw 'find-system system))))
......
cl-asdf (2:2.011-1) unstable; urgency=low
* Mostly same as 2.010.9: several minor tweaks and bug fixes since 2.010.
* Will be happier: users of implementations ACL, GCL; users of libraries
CL-Launch, XCVB; future former users of ASDF-Binary-Locations; people
with missing dependencies (in lieu of error-in-error); people extending
ASDF (notably Stelian Ionescu), who'd like to use keywords to name
component classes.
-- Francois-Rene Rideau <fare@tunes.org> Sun, 28 Nov 2010 13:21:34 -0500
cl-asdf (2:2.010-1) unstable; urgency=low
* same as 2.146
......
......@@ -43,6 +43,12 @@
<p>ASDF stands for <em>A</em>nother <em>S</em>ystem <em>D</em>efinition <em>F</em>acility,
in the continuity of the Lisp DEFSYSTEM of yore.
</p>
<a id="what_it_is_not"></a>
<h3>What it is not</h3>
<p>ASDF will not download missing software components for you.
For that, you want <a href="http://quicklisp.org/">quicklisp</a>.
(quicklisp builds upon ASDF.)
</p>
<a id="documentation"></a>
<h3>Documentation</h3>
<p>You can read our manual:</p>
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment