假设你有一个在加载过程中导致一些错误的库,如下所示
`
(ns broken-lib)
(} ; 这一行将引发一个读取错误
`
然后,即使发生了读取错误,该库也将会被添加到 {{loaded-libs}} 中,这样 {{require}} 语句在之后就可以静默成功了。
user=> (contains? (loaded-libs) 'broken-lib) false user=> (require 'broken-lib) CompilerException java.lang.RuntimeException: Unmatched delimiter: }, compiling:(broken_lib.clj:3:3) user=> (contains? (loaded-libs) 'broken-lib) true user=> (require 'broken-lib) nil user=>
如果你有另一个需要损坏库的命名空间(比如这里的 {{broken-lib.core}}),问题会更糟
(ns broken-lib.core (:require [broken-lib :as lib]))
虽然你第一次加载依赖于的命名空间时会得到实际的错误,但之后每次尝试重新加载它,都会抛出一个错误的编译器异常。即使你实际修复了导致原始错误的代码,这种情况也会持续。
`
user=> (require 'broken-lib.core)
CompilerException java.lang.RuntimeException: Unmatched delimiter: }, compiling:(broken_lib.clj:3:3)
user=> (require 'broken-lib.core :reload)
CompilerException java.lang.Exception: namespace 'broken-lib' not found, compiling:(broken_lib/core.clj:1:1)
user=> (require 'broken-lib.core :reload) ;; 在修复 broken-lib 中的错误后重新加载
CompilerException java.lang.Exception: namespace 'broken-lib' not found, compiling:(broken_lib/core.clj:1:1)
user=>
`
原因
CLJ-1116 的补丁使得 {{ns}} 宏在加载过程中即使发生错误也会盲目地将正在定义的库添加到 {{loaded-libs}} 中。
方法
修改 {{clojure.core/load-lib}},使其在发生错误时从 {{loaded-libs}} 中移除库。