anchor.diff:  ;;;;LEGAL
   ;;;;    AGPL3
   ;;;;    
  -;;;;    Copyright Pascal J. Bourguignon 2006 - 2015
  +;;;;    Copyright Pascal J. Bourguignon 2006 - 2016
   ;;;;    
   ;;;;    This program is free software: you can redistribute it and/or modify
   ;;;;    it under the terms of the GNU Affero General Public License as published by
  
positive.code: (defmethod parameter-name-p ((self parameter))
    (slot-boundp self 'name))
  
  
  (define-default-generic parameter-indicator     parameter nil)
  (define-default-generic parameter-indicator-p   parameter nil)
  
negative.code:      (list (if rest
               (parameter-name (lambda-list-rest-parameter self))
               '())))))
  
  (defgeneric parameters-by-category (ll)
    (:method ((self lambda-list))
  