GOOPS and <slot> subclass

GOOPS and <slot> subclass

[Edoardo Putti]

Hello all,

I'm taking a look at CLOS examples and most extend the <slot> class to
add the behavior they need.
Consider this example from json-mop [0] where the author wants to add
two fields to the slot.

After this is done they wire up the new slot class definition to be
used by all classes that have
json-serializable-class as the metaclass [1]. This makes sure that the
new slot class will be used
when required.

I have started reading about GOOPS but it's not very explicit on if
this pattern is possible or if there is
an equivalent one. Is there an example of using the GOOPS to implement
such a library?

Have a nice day!

Edoardo

[0]: https://github.com/gschjetne/json-mop/blob/master/src/json-mop.lisp#L33
[1]: https://github.com/gschjetne/json-mop/blob/master/src/json-mop.lisp#L45