多方法在堆栈跟踪中没有正确的方法名称。

Question

描述用户面临的问题

当抛出异常且堆栈跟踪中存在多方法时，不会显示多方法的名称。

当执行以下代码时


(defmulti dispatcher (fn [item] (:type item)))

(defmethod dispatcher "cat"
  [{:keys [lives]}]
  (/ lives 0))

(dispatcher {:type "cat" :lives 9})
*e


我得到以下堆栈跟踪


[clojure.lang.Numbers divide "Numbers.java" 163]
[clojure.lang.Numbers divide "Numbers.java" 3813]
[config_compilation.core$eval20467$fn__20469 invoke "/Users/marc/dev/circleci/orb-registry/server/src/config_compilation/core.clj" 198]
[clojure.lang.MultiFn invoke "MultiFn.java" 229]
... 省略 ...


函数名称是 {{config_compilation.core$eval20467$fn__20469}}。

如果我用 {{defn}} 直接声明 {{dispatcher}}，我将得到以下堆栈跟踪


(defn dispatcher
  [{:keys [lives]}]
  (/ lives 0))

(dispatcher {:type "cat" :lives 9})
*e



[clojure.lang.Numbers divide "Numbers.java" 163]
[clojure.lang.Numbers divide "Numbers.java" 3813]
[config_compilation.core$dispatcher invokeStatic "/Users/marc/dev/circleci/orb-registry/server/src/config_compilation/core.clj" 202]
[config_compilation.core$dispatcher invoke "/Users/marc/dev/circleci/orb-registry/server/src/config_compilation/core.clj" 200]
... 省略 ...


函数名称正确给出为 {{config_compilation.core$dispatcher}}。

我猜问题可能是由于 {{defmulti}} 宏未设置 {{:name}} 元数据，或者可能是没有正确将 {{:name}} 元数据传递给编译器。

Answer 1

评论者：alexmiller

所以，如果您深入研究一下这个细节，它会很有趣。技术上讲，在异常发生的时候，defmulti 不在堆栈上（这是调度函数，它已经完成了），但 defmethod 是。

defmethods 实际上是定义为 fn 的，通常被当作匿名 fn 来处理，尽管实际上可能独立地命名它们


user=> (defmulti dispatcher (fn [item] (:type item)))
#'user/dispatcher
user=> (defmethod dispatcher "cat" cat-method
         [{:keys [lives]}]
         (/ lives 0))
#object[clojure.lang.MultiFn 0x6e1d4137 "clojure.lang.MultiFn@6e1d4137"]
用户=> (dispatcher {:type "cat" :lives 9})
算术异常：除以零  clojure.lang.Numbers.divide (Numbers.java:163)
用户=> (pst *e 5)
算术异常：除以零
    clojure.lang.Numbers.divide (Numbers.java:163)
    clojure.lang.Numbers.divide (Numbers.java:3813)
    user/eval155/cat-method--157 (NO_SOURCE_FILE:11)         ;; <== cat-method
    clojure.lang.MultiFn.invoke (MultiFn.java:229)
    user/eval161 (NO_SOURCE_FILE:12)


我认为最好的办法是如果 defmethod 函数默认使用 defmulti 函数名称（如果没有指定名称）来作为唯一名称。

Answer 2

由 alexmiller 发布的评论

CLJ-2212 相关

Answer 3

由 marc 发布的评论

哦，很有趣。

在此情况下，识别多方法（dispatcher）的符号（在此案例中附加了调度值的某种字符串表示）将是一个非常漂亮的默认值。

所以你可能会有如下命名的函数
dispatcher-default, dispatcher-cat 等。

我假设你可能还需要在结尾处添加一些附加的独特后缀。

Answer 4

参考： https://clojure.atlassian.net/browse/CLJ-2419 (报告人 marc)