以下代码失败(在 1.6 和最新 1.7-alpha4 中均如此)
`
user=> (ns foo)
nil
foo=> (def inc inc)
WARNING: inc 已经指向: #'clojure.core/inc 在命名空间: foo 中,将被替换为: #'foo/inc
'foo/inc
;; 注意 inc 未绑定,这会导致以下异常
foo=> inc
foo=> (ns bar)
nil
bar=> (require ['foo :refer ['inc]])
WARNING: inc 已经指向: #'clojure.core/inc 在命名空间: bar 中,将被替换为: #'foo/inc
nil
bar=> (inc 8)
IllegalStateException 尝试调用未绑定的函数: #'foo/inc clojure.lang.Var$Unbound.throwArity (Var.java:43)
`
进一步调查显示 foo/inc 未绑定
foo/inc
=> #
进一步调查还显示,将 (def inc inc) 替换为其他几乎任何内容,例如 (def inc dec)、(def inc clojure.core/inc) 或 (def inc (fn (link: n) (+ n 1))) 不会导致异常(但警告仍然存在)。
我本期望
a) foo/inc 应该被绑定,并与 clojure.core/inc 具有相同的值
b) 在调用 foo/inc 时没有错误
c) bar/inc 应该指向 foo/inc