(handler-input-file-list (component-pathname c) c))))
(defsystem :asdf-dependency-grovel
- :depends-on (:asdf)
+ ;; :depends-on (:asdf) ; not safe. ASDF must be explicitly upgraded in advance.
:components ((:file "package")
(:file "variables" :depends-on ("package"))
(:file "classes" :depends-on ("package" "variables"))
(let ((*macroexpand-hook* (if (boundp '*old-macroexpand-hook*)
*old-macroexpand-hook*
*macroexpand-hook*)))
- (asdf:oos 'asdf:load-op :asdf-dependency-grovel)))
+ (asdf:load-system :asdf-dependency-grovel)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Signaling Functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;