diff --git a/asdf.lisp b/asdf.lisp index 37d61181e86abbdbec46813a3196ba926fbdff4b..d4ce253d83b0b0651cd20f9660e0cb4c3581fbd7 100644 --- a/asdf.lisp +++ b/asdf.lisp @@ -1258,10 +1258,10 @@ recursive calls to traverse.") (unwind-protect (progn ;; first we check and do all the dependencies for the - ;; module. Note that there is no information flow out of - ;; here, so there's no way for module dependencies to - ;; affect whether either the module itself, or its - ;; components are affected... + ;; module. Operations planned in this loop will show up + ;; in the contents of the FORCED variable, and are consumed + ;; downstream (watch out for the shadowing FORCED variable + ;; around the DOLIST below!) (loop :for (required-op . deps) :in (component-depends-on operation c) :do (do-dep required-op deps))