This protocol is used by `simple-message' subclasses."))
+(export 'method-keyword-argument-lists)
+(defgeneric method-keyword-argument-lists (method direct-methods)
+ (:documentation
+ "Returns a list of keyword argument lists to be merged.
+
+ This should return a list suitable for passing to `merge-keyword-lists',
+ i.e., each element should be a pair consisting of a list of `argument'
+ objects and a string describing the source of the argument list."))
+
(export 'compute-sod-effective-method)
(defgeneric compute-sod-effective-method (message class)
(:documentation