anchor.diff:                                     (string-symbol-value +content-type-symbol+))
                    :required-method (get symbol :method)
                    :arbitrary-requirement (get symbol :requirement)
  -                 :render-method (or (get symbol :render-method)
  -                                    (string-symbol-value +render-method-symbol+)
  -                                    #'identity)
  +                 :render-method (get symbol :render-method)
                    :submodule submodule))
   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
positive.code: 
  (defmethod process-route/impl ((route simple-route) bindings)
    (let ((*bindings* bindings))
      (funcall (route-render-method route)
               (funcall (slot-value route 'symbol)))))
  
  (defmacro define-route (name (template &key
                                         (content-type "text/html") 
  
negative.code:         (t (setf (hunchentoot:content-type*)
                   (or (route-content-type route)
                       "text/html"))
             (funcall (or (route-render-method route)
                          (string-symbol-value +render-method-symbol+)
                          #'identity)
                      res))))))
  
  (defclass simple-route (base-route)
    ((symbol :initarg :symbol)))
  