[Bese-devel] component class redefinition

[Marco Baringer]

ucw has, for way way way too long, had the following issue:

(defcomponent foo ()
  ((a)))

(defcomponent foo ()
  ((a :component (some-random-component))))

after these two forms the A slot will _not_ be properly initialized
when creating foo components, the only work around was to (setf
(find-class 'foo) nil) and then redefine all the methods and
subclasses. this is at best ugly and at worst flat out wrong. i have
just applied a patch which should allow component class redefinition
to do what it should do. It has been tested on openmcl only, since the
various MOP implementations differ i would like to warn everyone that,
if code which previously worked fine magically stops working, this
could be the reason.

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