Commit f1115daa authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files fix

parent 6d0fe557
#| -- shell wrapper for Common Lisp -*- Lisp -*-
license_information () {
# Please send your improvements to the author:
......@@ -2288,9 +2288,11 @@ NIL
"~/" '(".local" "share" "common-lisp"))
#+(or unix linux bsd darwin)
(loop :for (name path) :in '("local system" ("local" "share" "common-lisp")) :do
(loop :for sub :in '(() ("source")) :do
(try-file-stage-1 "asdf" name #p"/" "/" (append '("usr") path sub))))
(loop :for (name path) :in '(("local system" ("local")) ("managed system" ()))
:do (loop :for sub :in '(() ("source"))
:do (try-file-stage-1
"asdf" name #p"/" "/"
(append '("usr") path '("share" "common-lisp") sub))))
(try-file-stage-1 "cl-asdf" "managed system" #p"/" "/"
'("usr" "share" "common-lisp" "source")))
(error "Could not load ASDF."))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment