gistfile1.clj

(defmacro my-route
  [method path handler]
  `(~method ~path {cookies# :cookies params# :params} (~handler cookies# params#)))

(defmacro def-my-routes
  [name & body]
  (let [stuff (map (fn [route] `(my-route ~@route)) body)]
    `(defroutes ~name
       ~@stuff)))