Commit dbfa2601 authored by Antoine Martin's avatar Antoine Martin
Browse files

Move processing of other systems earlier

parent e5446f6c
......@@ -85,11 +85,11 @@ The resulting .texi file is placed inside the release's directory, in
~/quicklisp/dists/quicklisp/software/."
(let ((*remove-cache* remove-cache))
(setup-quickref-dir :declt t)
(dolist (system *other-systems*)
(map-system system))
(map-releases
(merge-pathnames "map-declt.lisp"
(asdf:system-source-directory "quickref")))
(dolist (system *other-systems*)
(map-system system))))
(asdf:system-source-directory "quickref")))))
(defvar *buffer* nil)
......@@ -100,16 +100,16 @@ The resulting .texi file is placed inside the release's directory, in
(lambda ()
(build-texis-thread mutex wq
:makeinfo-path makeinfo-path)))))
(map-releases-thread (merge-pathnames
"map-declt.lisp"
(asdf:system-source-directory "quickref"))
mutex
wq)
(dolist (system *other-systems*)
(map-system system)
(with-mutex (mutex)
(endpush system *buffer*)
(condition-notify wq)))
(map-releases-thread (merge-pathnames
"map-declt.lisp"
(asdf:system-source-directory "quickref"))
mutex
wq)
(with-mutex (mutex)
(endpush :done *buffer*)
(condition-notify wq))
......
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