2024 Clojure状态调查!中分享您的想法。

欢迎使用!请查看关于页面以了解更多如何使用本站的信息。

+1
Spec
生成器覆盖无法按预期在多Spec上工作。
下面的代码说明了问题。

{code:none}
(s/def ::obj-type #{:a :b})

(s/def ::base-obj (s/keys :req [::obj-type]))

(defmulti obj-type ::obj-type)
(defmethod obj-type :a [_]
  ::base-obj)
(defmethod obj-type :b [_]
  ::base-obj)

(s/def ::obj (s/multi-spec obj-type ::obj-type))


{code:none}
(gen/sample (s/gen ::obj {::obj-type #(gen/return :a)}))

在上面的例子中,为多方法提供的分发函数*::obj-type*进行了生成器覆盖。
预期只会返回*{::obj-type :a}*的集合。
实际上,它也会返回*{::obj-type :b}*.  
那是因为生成器不能用于约束样本的分发键集合。

h2. 当前方法
在多方法的情况下,为每个可能的分发值构建生成器。
然后随机选择一个,而不考虑对分发函数(键)的覆盖。

h2. 补丁方法
提交可用[这里|https://github.com/bonega/spec.alpha/commit/9cb42478b52eac275d496ec29669e2bf4b3e8e1f]
修补版本的版本构建与原始版本完全相同的分发值生成器。
之后,检查是否存在对分发函数的覆盖。
如果有的话,使用覆盖生成器执行gen/bind。
bind函数从覆盖生成器中生成值。
然后使用该值来查找和返回正确的多方法生成器。

[测试案例|https://pastebin.com/62ZT5Zfc]

6个答案

0

评论由:bonega

为问题提供补丁。

0

评论者:alexmiller

你能将问题的代码移动到描述中,并解释问题和变更吗?

0
_评论者:[email protected]_

我无法想出如何编辑描述...

描述
在多方法的情况下,为每个可能的分发值构建生成器。
然后胡乱选择一个,而不关心为 dispatch-fn(key) 的覆盖。

提交: https://github.com/bonega/spec.alpha/commit/9cb42478b52eac275d496ec29669e2bf4b3e8e1f
我的补丁希望通过检查是否存在对 dispatch-fn 的覆盖来修复它。
如果有的话,就会将 gen/bind 做到覆盖生成器上,并使用结果来查找正确的多方法生成器。

测试案例: https://pastebin.com/62ZT5Zfc
测试应通过。
基本我想用像 `(gen/generate (s/gen ::obj {::obj-type #(gen/return :a)}))` 这样的覆盖生成器来生成 ::obj。
预期的结果始终应该是 `{::obj-type :a}`。
之前,即使指定了覆盖,输出也可能是 :b。
0

评论者:alexmiller

我已经授予您编辑权限以对票据进行更新...

0

评论者:[email protected]

我已经更新了描述。
如果有任何不清楚的地方,请告诉我。

0
...