anchor.diff:  (cl:in-package #:sicl-clos)
   
   (defparameter *installable-generic-functions*
  -  '(;; These are used by the :AFTER method on initialize-instance
  +  '(;; These are used by the :AFTER method on INITIALIZE-INSTANCE
       ;; specialized for STANDARD-CLASS.
       class-direct-subclasses
       (setf c-direct-subclasses)
  
positive.code:     (setf gf-argument-precedence-order)
      (setf discriminating-function)
      (setf gf-name)
      ;; These are used by the :AFTER method on initialize-instance,
      ;; specialized for STANDARD-METHOD
      (setf method-documentation)
      ;; Generic functions for initialization
  
negative.code:     (setf c-direct-slots)
      class-direct-default-initargs
      (setf c-direct-default-initargs)
      ;; These are used by the :AFTER method on INITIALIZE-INSTANCE,
      ;; specialized for STANDARD-GENERIC-FUNCTION.
      (setf gf-documentation)
      (setf gf-declarations)
  