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