On 30/04/06, Ian Eslick <[EMAIL PROTECTED]> wrote:


Ian Eslick wrote:
> If you define indexed objects like this:
>
> (defclass my-persistent-class ()
>   ((slot1 :accessor slot1 :initform nil :index t))
>   (:metaclass persistent-metaclass))
>
> or
>
> (defclass my-p-class ()
>     ((test1) (test2))
>     (:metaclass persistent-metaclass)
>     (:index t))
>
Actually that would be (:metaclass persistent-metaclass :index t)

Ok, I made further tests using those two definitions.

Using the first one, I can successfully restore the index without
enable-class-index (see slime-transcript-slot-index).

Using the second one, however, I can restore the index but I have to
re- enable-class-index (see slime-transcript-global-class-index).

-- Pierre-François

Attachment: slime-transcript-slot-index
Description: Binary data

Attachment: slime-transcript-global-class-index
Description: Binary data

_______________________________________________
elephant-devel site list
elephant-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/elephant-devel

Reply via email to