anchor.diff:  (defun add-route (new-route)
     "Add a new route to the table."
     (vector-push-extend new-route *routes*)
  -  *routes*)
  +  (length *routes*))
   
   (defun upsert-route (new-route)
     "Add a new route to the table. If a route already exists with the same method
  
positive.code:                                    (string= (getf route :resource-str) resource-str)))
                              *routes*)))
  
  (defmacro defroute ((method resource &key (regex t) (case-sensitive t) chunk suppress-100 replace (vhost '*default-vhost*))
                      (bind-request bind-response &optional bind-args)
                      &body body)
    "Defines a wookie route and pushes it into the route list.
  
negative.code:           (return))))
      (unless route-found
        (vector-push-extend new-route *routes*))
      (length *routes*)))
  
  (defun clear-route (method resource-str)
    "Clear out a route in the routing table."
  