将变量分配给Clojure中的多个向量

clojure.contrib.sql

模块有一个

create table

函数，该函数接受表名和规范列表，如下所示：

(sql/create-table :services
                  [:id :serial "PRIMARY KEY"]
                  [:service_name :varchar "NOT NULL"]
                  [:pass_hash :varchar "NOT NULL"]
                  [:token :varchar "NOT NULL"])

如果我一次又一次地重复使用相同的列，有没有办法定义这样的内容

(def same-columns 
                  [:id :serial "PRIMARY KEY"]
                  [:service_name :varchar "NOT NULL"]
                  [:pass_hash :varchar "NOT NULL"]
                  [:token :varchar "NOT NULL"])

当我尝试在REPL中运行该命令时，出现了一个错误，因为它向

def

传递了太多的参数，您可能可以使用它：

(def same-columns [[:id :serial "PRIMARY KEY"]
                   [:service_name :varchar "NOT NULL"]
                   [:pass_hash :varchar "NOT NULL"]
                   [:token :varchar "NOT NULL"]])

(apply sql/create-table 
       :services 
       same-columns)

如果有其他列，也可以添加这些列：

(apply sql/create-table 
       :services
       [:some-column :varchar "NOT NULL"]
       same-columns)