补丁前
`
user=> (definterface I (f []))
user.I
user=> (def p (proxy [Object I] [] (f [] 1)))
'user/p
user=> (definterface I (f []))
user.I
user=> (def p (proxy [Object I] [] (f [] 1)))
'user/p
user=> (.f ^I p)
ClassCastException: user.proxy$java.lang.Object$I$383c225e cannot be cast to user.I user$eval7491.invokeStatic (:1)
`
补丁后
`
user=> (definterface I (f []))
user.I
user=> (def p (proxy [Object I] [] (f [] 1)))
'user/p
user=> (definterface I (f []))
user.I
user=> (def p (proxy [Object I] [] (f [] 1)))
'user/p
user=> (.f ^I p)
1
`
原因: proxy
使用一组类名来缓存生成的类(见https://github.com/clojure/clojure/blob/master/src/clj/clojure/core_proxy.clj#L280-L286),这在不重新定义接口的情况下是不安全的
建议:更改用于确定代理类缓存命中率的哈希函数,使其考虑每个接口/超类的标识符,而不仅仅是它们的名称
补丁:0001-CLJ-2379-idempotent-proxy-name-just-on-identical-ins-v2.patch