[armedbear-cvs] r12582 - trunk/abcl/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Thu Apr  8 15:38:15 2010
New Revision: 12582

Log:
Re #38: Make Cells compile with our metaclass support by
  making a documentation initarg.

Modified:
   trunk/abcl/src/org/armedbear/lisp/StandardClass.java

Modified: trunk/abcl/src/org/armedbear/lisp/StandardClass.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/StandardClass.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/StandardClass.java	Thu Apr  8 15:38:15 2010
@@ -69,12 +69,12 @@
                       symDirectSubclasses,
                       symPrecedenceList,
                       symDirectMethods,
-                      symDocumentation,
                       symDirectSlots,
                       symSlots,
                       symDirectDefaultInitargs,
                       symDefaultInitargs,
-                      symFinalizedP),
+                      symFinalizedP,
+                      symDocumentation),
                  NIL)
       {
         @Override
@@ -342,7 +342,8 @@
              helperMakeSlotDefinition("SLOTS", initFunction),
              helperMakeSlotDefinition("DIRECT-DEFAULT-INITARGS", initFunction),
              helperMakeSlotDefinition("DEFAULT-INITARGS", initFunction),
-             helperMakeSlotDefinition("FINALIZED-P", initFunction));
+             helperMakeSlotDefinition("FINALIZED-P", initFunction),
+             helperMakeSlotDefinition("DOCUMENTATION", initFunction));
   }