[Openmcl-devel] mop issue

[marco]

Cyrus Harmon <ch-openmcl at bobobeach.com> writes:

> I did something similar sticking the superclass onto the 
> :direct-superclasses in an around method in initialize-instance and 
> reinitialize-instance. I used the clsql MOP stuff as a guiding example 
> and that seemed to work pretty well.

this should have super as a direct super class:

(defclass foo ()
  ()
  (:metaclass klass))

but this:

(defclass bar (foo)
  ()
  (:metaclass klass))

should _not_ since super is already a super class of foo which is a
super class of bar. adding super to bar's direct-superclasses would
probably work most of the time, but really isn't what i want.

-- 
-Marco
Ring the bells that still can ring.
Forget your perfect offering.
There is a crack in everything.
That's how the light gets in.
     -Leonard Cohen