如果您无法更改那个 AOT 编译的代码,因为确实不在您的控制之下,那您是否有能力评估以下类似的一些代码,并确保它在系统启动时从多个线程调用 `require` 之前被评估?当然, println 是可选的。
(def original-require clojure.core/require)
(defn my-serialized-require [& args]
(locking clojure.lang.RT/REQUIRE_LOCK
(println "my-serialized-require 获取了锁...")
(apply original-require args)
(println "my-serialized-require 释放锁...")))
(alter-var-root #'clojure.core/require (fn [& args] my-serialized-require))
如果这不可能,您能编译 Clojure 源代码的修改版本并在您的项目中使用它吗?如果是这样,您可以修改 `require` 的定义使其变为带锁版本。