(require '[clojure.spec :as s])
考虑以下数据:
(def data {:names [["Anna" :lucky]
["Peter"]
["Jon" :lucky]
["Andre" :lucky]]})
它是一个带有一个键的哈希映射:具有向量向量值的名称。内部向量必须包含一个字符串作为第一个元素,并且可以选择包含一个关键字 :lucky 作为第二个元素。
前两句应该用clojure.spec
- 让我们从向量中的项目开始:
(s/def ::item (s/cat :name string? :lucky (s/? #(= :lucky %))))
(s/conform ::item ["Tom"])
;; {:name "Tom"}
(s/conform ::item ["Tom" :lucky])
;; {:name "Tom", :lucky :lucky}
(s/conform ::item ["Tom" :sad])
;; :clojure.spec/invalid
这行得通。但是,如果只有一种选择。解析后的结果看起来会不会更好:
`{:name "Tom", :lucky true}` or `{:name "Tom", :lucky false}`
这可以在 clojure.spec 中完成吗?
有了这个,人们可以继续:
(s/def ::items (s/coll-of ::item '()))
(s/conform ::items [["Tom" :lucky] ["Tim"]])
[["Tom" :lucky] ["Tim"]]
但是,看起来它通过了测试,但为什么不再解析这些项目?
编辑: 这可以通过从 alpha7 切换到 alpha10 版本来解决,其中 coll-of 只接受一个参数
最后,我的规范看起来像前面描述的警告:
(s/def ::my-spec (s/keys req-un [::items]))