>>>>> "Raymond" == Raymond Toy <[EMAIL PROTECTED]> writes:
Raymond> Also, I'm not sure if the version of asdf includes the necessary
hooks
Raymond> to work with cmucl. If not, I can give you the code that I use to
Raymond> make this work.
The version of asdf I have doesn't seem to have the necessary code.
Here's what I use so asdf hooks into CMUCL's require appropriately.
Ray
;; Simple support for ASDF and CMUCL
(in-package #:asdf)
(eval-when (:compile-toplevel :load-toplevel :execute)
(when (find-symbol "*MODULE-PROVIDER-FUNCTIONS*" "EXT")
(pushnew :cmu-hooks-require *features*)))
#+cmu-hooks-require
(progn
(defun module-provide-asdf (name)
(handler-bind ((style-warning #'muffle-warning))
(let* ((*verbose-out* (make-broadcast-stream))
(name (string-downcase name))
(system (asdf:find-system name nil)))
(when system
(asdf:operate 'asdf:load-op name)
t))))
(pushnew 'module-provide-asdf ext:*module-provider-functions*)
;; Add whatever else you need, like adding paths to asdf:*central-registry*
)
