clojure - 如何在多个 Clojure 命名空间中调用同一个方法？

Question

我有一系列命名空间符号:

(def namespace-symbols (namespace-1 namespace-2 namespace-3))

而且我想对每个方法调用完全相同的方法(比如，run)。

(map #{%/run} namespace-symbols)

不会工作。

我也试过

(defmacro namespace-run
  [namespace]
  `(~(identity namespace)/run))

这也行不通。有什么办法吗？

更新:

我终于想到了这样一个宏:

(defmacro namespace-run
  [namespace]
  `(~(symbol (str namespace "/run"))))

(macroexpand-1 '(namespace-run foobar))
;=> (foobar/run)

肯定有更好的方法吗？

Answer 1

查看 clojure.core/ns-resolve

(doseq [ns namespace-symbols]
  ((ns-resolve ns 'run))) ;; resolve and execute fn

你可以把它当作一个fn

(let [p (ns-resolve *ns* 'println)]
  (p "Hello")
  (p "World"))