anchor.diff:                        (wookie-error-socket ev))
                        ((subtypep event-type 'as:tcp-info)
                         (as:tcp-socket ev)))))
  -    (funcall 'main-event-handler ev sock)))
  +    (main-event-handler ev sock)))
  
positive.code:           (funcall *error-handler* event socket)
  
            ;; no, no error handler, let's do some basic handling of our own
            (handler-case (error event)
              (route-not-found ()
                (when (and response (not response-finished))
                  (send-response response :status 404 :body "Route for that resource not found =[.")))
              (wookie-error ()
                (when (and response (not response-finished))
                  (send-response response
                                 :status 500
                                 :body (format nil "There was an error processing your request: ~a" event))))
              (as:tcp-eof ()
                ;; a simple "do nothing"
                nil)
              (error ()
                ;; unhandled, send it packing to the REPL
                (when (and response (not response-finished))
                  (send-response response
  
negative.code: (defun main-event-handler (event socket)
    "Handle socket events/conditions that crop up during processing."
    (let* ((socket-data (when socket (as:socket-data socket)))
           (response (getf socket-data :response))
           (response-finished (when response (response-finished-p response))))
      ;; don't dispatch/log an EOF on a finished request/response (nobody cares)
      (when (and response
                 (response-finished-p response)
  