anchor.diff:  ;;;;    along with this program.  If not, see <http://www.gnu.org/licenses/>
   ;;;;**************************************************************************
   
  +
   (eval-when (:compile-toplevel :load-toplevel :execute)
     (setf *readtable* (copy-readtable nil)))
  +
   (defpackage "COM.INFORMATIMAGO.COMMON-LISP.LISP-SEXP.SOURCE-FORM"
     (:use "COMMON-LISP")
     (:export
  
positive.code: ;;;;AUTHORS
  ;;;;    <PJB> Pascal J. Bourguignon <pjb@informatimago.com>
  ;;;;MODIFICATIONS
  ;;;;    2016-01-16 <PJB> Added parameter-parameter-list and make-parameter-list.
  ;;;;    2014-11-05 <PJB> make-parameter-list now returns also
  ;;;;                     parameters from
  
negative.code:                      :initarg :body-parameter
                       :type     body-parameter)))
  
  
  (defclass orakawbe-ll (orakawb-ll)
    ((environment      :accessor lambda-list-environment-parameter
                       :initarg :environment-parameter
  