生成器覆盖在多规范上没有按预期工作。
以下代码展示了这个问题。
{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]
