anchor.diff:     (when (lambda-list-auxiliary-parameters self)
        (cons '&aux (mapcar (function parameter-specifier)
                            (lambda-list-auxiliary-parameters self))))))
  +
  +
  +(defmethod parameter-specifier ((parameter destructuring-lambda-list))
  +  "
  +NOTE:   DESTRUCTURING-LAMBDA-LIST instances may appear in parameter lists.
  +        Therefore we need to build the parameter-specifier sexp for them.
  +"
  +  (make-lambda-list parameter))
  +
   
   
   
  
positive.code:     '(&optional &rest &allow-other-keys &key &aux &whole)))
  
  
  
  (defmethod lambda-list-mandatory-parameter-count ((self or-ll))
    "RETURN: The number of mandatory parameters."
    (length (lambda-list-mandatory-parameters self)))
  
negative.code: 
  
  (defgeneric parameter-specifier (parameter)
    (:doucmentation "Return a parameter specifier sexp, which can be used to build a lambda list.")
    (:method ((self parameter))
      (parameter-name self))
    (:method ((self specialized-parameter))
  