在没有非引号拼接的情况下将矢量列表拼接成矢量

Question

有没有办法在没有unquote-splice的情况下执行以下操作？ map返回向量列表。

(def base-html
  `[:html
    [:head ~@(map include-css ["css/reset.css"
                               "css/main.css"])]
    [:body]])

=> [:html 
     [:head 
       [:link {:href "css/reset.css", :rel "stylesheet"}] 
       [:link {:href "css/main.css", :rel "stylesheet"}]] 
     [:body]]

Answer 1

这样就够了吗？

(def base-html
  [:html
    (vec (cons :head (map include-css ["css/reset.css"
                                       "css/main.css"])))
    [:body]])