clojure - 如何将导入添加到 "eval"ed 的 clojure 代码中？

Question

我想以交互方式评估用户输入的一些 clojure 代码，并且我想“使用”某些命名空间并“导入”某些 Java 类。我最终使用以下方式运行代码:

(defn execute-command [string-command]
    let [
        code-with-context  (add-code-context string-command)
        result             (eval(read-string code-with-context))
        ]

        result
)

我的问题是如何对“add-code-context”进行编程以将所需的上下文添加到“string-command”中的代码中？

Answer 1

你不必这样做。任何“使用”或“导入”的命名空间/类都可用于您评估的代码，例如

(require '[clojure.set :as set])
(-> "(set/union #{1} #{2})" read-string eval)
; => #{1 2}