这很容易
(def all-routes (concat api-routes site-routes))
解释从这里开始https://github.com/pedestal/pedestal/blob/master/guides/documentation/service-routing.md#defining-route-tables,据说
路由表只是一种数据结构;在我们的例子中,它是一系列地图。
Pedestal 团队将该地图序列的路由表形式称为详细格式,他们设计了一种简洁格式的路由表,这是我们提供的defroute
。然后defroute
将我们的简洁格式转换为详细格式。
你可以在repl中自己检查
;; here we supply a terse route format to defroutes
> (defroutes routes
[[["/" {:get home-page}
["/hello" {:get hello-world}]]]])
;;=> #'routes
;; then we pretty print the verbose route format
> (pprint routes)
;;=>
({:path-parts [""],
:path-params [],
:interceptors
[{:name :mavbozo-pedestal.core/home-page,
:enter
#object[io.pedestal.interceptor$eval7317$fn__7318$fn__7319 0x95d91f4 "io.pedestal.interceptor$eval7317$fn__7318$fn__7319@95d91f4"],
:leave nil,
:error nil}],
:path "/",
:method :get,
:path-re #"/\Q\E",
:route-name :mavbozo-pedestal.core/home-page}
{:path-parts ["" "hello"],
:path-params [],
:interceptors
[{:name :mavbozo-pedestal.core/hello-world,
:enter
#object[io.pedestal.interceptor$eval7317$fn__7318$fn__7319 0x4a168461 "io.pedestal.interceptor$eval7317$fn__7318$fn__7319@4a168461"],
:leave nil,
:error nil}],
:path "/hello",
:method :get,
:path-re #"/\Qhello\E",
:route-name :mavbozo-pedestal.core/hello-world})
因此,由于基座路线只是一系列地图,我们可以轻松地将多条不重叠的路线与concat
.
这就是我喜欢基座团队遵循的 clojure 原则之一:通用数据操作,在这种情况下,详细格式化的路由表只是一个映射 - 一个普通的 clojure 数据结构,可以使用常规 clojure.core 进行检查和操作数据结构操作函数,例如concat
. 即使是简洁的格式也是一个普通的 clojure 数据结构,并且可以通过相同的方式轻松检查和操作。