Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
7 changes: 7 additions & 0 deletions .gitignore
Original file line number Diff line number Diff line change
Expand Up @@ -2,3 +2,10 @@
*~
quicklisp.tar
quicklisp.tar.gz
asdf.lisp.*
cache
client-info.sexp
dists
local-projects
retired
tmp
4 changes: 2 additions & 2 deletions quicklisp/setup.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -132,7 +132,7 @@
(when (and (consp form)
(eq (first form) 'cl:defpackage)
(ignore-errors (string (second form))))
(show-package (second form)))
(show-package (second form)))
(incf seen-so-far)
(when (<= forms-per-char seen-so-far)
(setf seen-so-far 0)
Expand All @@ -158,7 +158,7 @@
(call-with-macroexpand-progress
(lambda ()
(format t "~&; Loading ~S~%" (name strategy))
(asdf:oos 'asdf:load-op (name strategy) :verbose nil))))
(asdf:load-system (name strategy) :verbose nil))))

(defun autoload-system-and-dependencies (name &key prompt)
"Try to load the system named by NAME, automatically loading any
Expand Down