Re: [Cclan-commits] CVS: asdf asdf.lisp,1.109,1.110
Christophe Rhodes <[email protected]> Thu, 27 Sep 2007 18:58:57 +0100
| Newsgroups | gmane.lisp.cclan.general |
|---|---|
| Message-ID | <[email protected]> |
Gary Warren King <[email protected]> writes: > Adds documentation to oos and operate. Also fixes the #. evaluation of *package* > (defun class-for-type (parent type) > (let* ((extra-symbols (list (find-symbol (symbol-name type) *package*) > (find-symbol (symbol-name type) > - (package-name #.*package*)))) > + (load-time-value > + (package-name :asdf))))) > (class (dolist (symbol (if (keywordp type) > extra-symbols > (cons type extra-symbols))) What is this fixing? Thanks, Christophe ------------------------------------------------------------------------- This SF.net email is sponsored by: Microsoft Defy all challenges. Microsoft(R) Visual Studio 2005. http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/