编译一个引用未加载(或未初始化)类的函数会触发其静态初始化(init static)。当静态初始化加载 Clojure 代码时,某些常量(我认为是源代码)会泄露到正在编译的函数的常量池中。
这阻止了 CCW 在某些环境(如 Rational)中工作,因为结果的函数的静态初始化超过了 64K。
重现步骤
加载 leak.main 名字空间,并运行注释中的代码:第一个函数尽管与第二个函数相同,但有 15 个额外的字段。
`
(ns leak.main)
(defn first-to-load [])
leak.Klass/foo)
(defn second-to-load [])
leak.Klass/foo)
(comment
=> (map (comp count #(.getFields %) class) [first-to-load second-to-load]))
(16 1)
)
`
`
package leak;
import clojure.lang.IFn;
import clojure.lang.RT;
import clojure.lang.Symbol;
public class Klass {
static {
RT.var("clojure.core", "require").invoke(Symbol.intern("leak.leaky"));
}
public static IFn foo = RT.var("leak.leaky", "foo");
}
`
`
(ns leak.leaky)
(defn foo
"Some doc"
[]
"hello")
(def unrelated 42)
`
https://gist.github.com/cgrand/5dcb6fe5b269aecc6a5b#file-main-clj-L10
补丁: clj-1620-v5.patch