通过 Slime 重新加载多种方法

Question

在使用 Slime repl 在 Emacs 中进行开发时，我在重新加载多方法时遇到了问题。

重新定义 defmethod 表单工作正常，但如果我更改调度函数，我似乎无法重新加载 defmulti 表单。我想我专门添加或删除了调度函数参数。

作为解决方法，我已经能够 ns-unmap multimethod var，重新加载 defmulti 表单，然后重新加载所有 defmethod 表单。

据推测，这是 Clojure 实现多方法的方式的“限制”，即我们为了执行速度而牺牲了一些活力，但是是否有任何习惯用法或开发实践可以帮助解决这个问题？

Answer 1

简而言之，您处理此问题的方式是完全正确的。如果您发现自己更新了多方法以便特别频繁地更改调度函数，（1）我认为这很不寻常:-)，（2）您可以编写一套函数/宏来帮助重新加载。我画了两个未经测试的（！）宏来帮助完成下面的（2）。

为什么？

然而，首先简要讨论“为什么”。当前实现的多方法的调度函数查找不需要同步 - 调度 fn 存储在 MultiFn 对象的 final 字段中。这当然意味着您不能只更改给定多方法的调度函数——您必须重新创建多方法本身。正如您所指出的，这需要重新注册所有先前定义的方法，这很麻烦。

当前的行为允许您重新加载带有 defmethod 表单的命名空间，而不会丢失所有方法，但代价是替换实际的多方法会稍微麻烦一些（当您确实想要这样做时）。

如果您确实愿意，可以通过反射更改调度 fn，但这存在语义问题，特别是在多线程场景中（请参阅 Java 语言规范 17.5.3 有关构造后对 final 字段进行反射更新的信息）。

黑客（非反射）

（2）的一种方法是在使用宏重新定义后自动重新添加方法（未经测试）

(defmacro redefmulti [multifn & defmulti-tail]
  `(let [mt# (methods ~multifn)]
     (ns-unmap (.ns (var ~multifn)) '~multifn)
     (defmulti ~multifn ~@defmulti-tail)
     (doseq [[dispval# meth#] mt#]
       (.addMethod ~multifn dispval# meth#))))

另一种设计将使用名为 with-method 的宏-重新注册，采用 multifn 名称和主体的序列，并承诺在执行主体后重新注册方法；这是一个草图（再次未经测试）：

(defmacro with-method-reregistration [multifns & body]
  `(let [mts# (doall (zipmap ~(map (partial list 'var) multifns)
                              (map methods ~multifns))))]
     ~@body
     (doseq [[v# mt#] mts#
             [dispval# meth#] mt#]
       (.addMethod @v# dispval# meth#))))

您可以用它来表示 (with-method-reregistration [my-multi-1 my-multi-2] (require :reload 'ns1 ns2)) 。不确定这是否值得失去清晰度。