[Gcl-devel] Re: slots

[Camm Maguire]

Robert Boyer <address@hidden> writes:

> I think that the following may be the way to look at all the slots.  If
> you can see an obvious improvement, please let me know.  Unfortunately,
> it seems to me that one has to use two non-ANSI functions here.
> 
>    (loop for slot in
>     (pcl::class-slots (class-of x)) do
>       (let ((name (pcl::slot-definition-name slot)))
>           (cond ((slot-boundp x name)
>                  (scan (slot-value x name))))))
> 

I know of no better way, and have also found this to be frustrating.
Perhaps someone else on the list knows a better ansi way.

Take care,

> Bob
> 
> 
> 

-- 
Camm Maguire                                            address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah