Changeset 13208

Timestamp:

02/08/11 18:01:19 (13 years ago)

Author:

ehuelsmann

Message:

Add documentation.

File:

• trunk/abcl/src/org/armedbear/lisp/clos.lisp (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/clos.lisp

@@ -2561 +2561 @@
 
 (defun check-initargs (gf-list args instance shared-initialize-param initargs)
+  "Checks the validity of `initargs' for the generic functions in `gf-list' when
+called with `args' by calculating the applicable methods for each gf.
+The applicable methods for SHARED-INITIALIZE based on `instance',
+`shared-initialize-param' and `initargs' are added to the list of
+applicable methods."
   (when (oddp (length initargs))
     (error 'program-error