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/