anchor.diff:                       string
                        (or package
                            (connection-package connection))
  -                     (or thread
  -                         (connection-thread connection))
  +                     thread
                        (incf (connection-request-count connection)))))
       (when continuation
         (push (cons (connection-request-count connection)
  
positive.code:            :connection-package
             :connection-prompt-string
             :connection-process
             :connection-thread
             :connection-log-p
             :connection-logging-stream
             :connection-features)
  
negative.code:    (process
      :initform nil
      :accessor connection-process)
     (continuations
      :accessor connection-continuations
      :initform nil)
  