[armedbear-devel] Bug in metaclass support

Hello,

this piece of code produces an error:

(defclass foo () () (:METACLASS STANDARD-CLASS) (:DOCUMENTATION "bar"))

condition of type PROGRAM-ERROR: Invalid initarg :DOCUMENTATION

while it works perfectly fine without :metaclass, presumably because make-instance is not called to create the class metaobject. On class redefinition (say, I define foo without :documentation, and redefine it with it), it gives no error.

This breaks Cells which always puts in a :metaclass option even when superfluous.

Bye, Alessio