anchor.diff:                                                      end-of-file
                                                       error)
                                                   (lambda (e)
  -                                                  (on-socket-error (socket-driver socket) e socket))))
  +                                                  (on-socket-error (socket-driver socket) socket e))))
                                     (restart-case
                                         (let* ((buffer (socket-read-buffer socket))
                                                (bytes-read
  
positive.code: ;; Events
  (defprotocol socket-event-driver (a)
    ((error (driver socket error)
      :default-form (drop-connection error)
      :documentation "Event called when SOCKET has experienced some error. ERROR is the actual
                      condition. This event is executed immediately before the client is shut down.
                      By default, this event simply drops the client connection.
  
negative.code:                               isys:epipe
                                error)
                            (lambda (e)
                              (on-socket-error driver socket e))))
              (restart-case
                  (let ((bytes-written (iolib:send-to (socket-internal-socket socket)
                                                      (socket-write-buffer socket)
  