anchor.diff:  ;;; only as the common parent class of the classes
   ;;; GLOBAL-MACRO-ENTRY and LOCAL-MACRO-ENTRY.
   
  -(defclass macro-entry (function-space definition-entry)
  +(defclass macro-entry
  +    (base-entry named-entry function-space definition-entry)
     ())
   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
positive.code: 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
  ;;; Entries in the package namespace.
   
  (defclass package ()
  
negative.code: ;;;
  ;;; Class OPTIMIZE-DECLARATION-ENTRY.
  
  (defclass optimize-declaration-entry (base-entry)
    ((%quality :initarg :quality)
     (%value :initarg :value)))
  
  