4

不确定如何编写规范来检查函数的解构参数。

如果我有这个简单的功能：

(defn make-name [[first last]]
  (str first " " last))

我为这个论点写了这个规范：

(s/def ::vstring2 (s/coll-of string? :kind vector? :count 2 :distinct false))

它工作正常：

(s/conform ::vstring2 ["Rich" "Hickey"])
=> ["Rich" "Hickey"]

但是当我尝试将它应用于这样的函数时：

(s/fdef make-name
        :args ::vstring2
        :ret string?)

它爆炸了：

(stest/check `make-name)
=>
({:spec #object[clojure.spec.alpha$fspec_impl$reify__2451
                0x7dd4c5ac
                "clojure.spec.alpha$fspec_impl$reify__2451@7dd4c5ac"],
  :clojure.spec.test.check/ret {:result #error{:cause "Wrong number of args (2) passed to: roster/make-name",

(...)

如何使用 Spec 编写函数::vstring2？还是我？

谢谢你。

4

1 回答 1

4

您只需要为函数的参数指定另一个规范，例如使用s/cat：

(s/fdef make-name
  :args (s/cat :arg1 ::vstring2)
  :ret string?)

在您的示例中，:args规范需要两个参数，因为您的::vstring2规范是一个需要两个字符串的集合。通过这种更改，函数:args规范知道它只需要一个应该符合的参数::vstring2。

这里和这里有更多功能规范示例。

于 2018-06-07T17:55:31.393 回答