如何在命名空間的上下文中評估clojure數據結構？

Question

我正在寫一個clojure應用程序供內部使用，我也希望配置文件也在clojure中。我定義了一些宏來使配置文件更容易寫，但是當我嘗試從配置文件中評估數據時，它無法找到我的宏。這從REPL工作正常但是。例如，我使用

(load-string "/path/to/config") 

我得到這個錯誤：

Exception in thread "main" java.lang.RuntimeException: Unable to resolve symbol: defcmd in this context, compiling:(null:1) 
at clojure.lang.Compiler.analyze(Compiler.java:6235) 
at clojure.lang.Compiler.analyze(Compiler.java:6177) 
at clojure.lang.Compiler$InvokeExpr.parse(Compiler.java:3452) 
at clojure.lang.Compiler.analyzeSeq(Compiler.java:6411) 
at clojure.lang.Compiler.analyze(Compiler.java:6216) 
at clojure.lang.Compiler.analyze(Compiler.java:6177) 
at clojure.lang.Compiler.eval(Compiler.java:6469) 
at clojure.lang.Compiler.load(Compiler.java:6902) 
at clojure.lang.Compiler.load(Compiler.java:6872) 
at clojure.core$load_reader.invoke(core.clj:3625) 
at clojure.core$load_string.invoke(core.clj:3635) 
at serverStats.core$load_config.invoke(core.clj:67) 
at serverStats.core$_main.doInvoke(core.clj:78) 
at clojure.lang.RestFn.invoke(RestFn.java:397) 
at clojure.lang.Var.invoke(Var.java:397) 
at user$eval109.invoke(NO_SOURCE_FILE:1) 
at clojure.lang.Compiler.eval(Compiler.java:6465) 
at clojure.lang.Compiler.eval(Compiler.java:6455) 
at clojure.lang.Compiler.eval(Compiler.java:6431) 
at clojure.core$eval.invoke(core.clj:2795) 
at clojure.main$eval_opt.invoke(main.clj:296) 
at clojure.main$initialize.invoke(main.clj:315) 
at clojure.main$null_opt.invoke(main.clj:348) 
at clojure.main$main.doInvoke(main.clj:426) 
at clojure.lang.RestFn.invoke(RestFn.java:421) 
at clojure.lang.Var.invoke(Var.java:405) 
at clojure.lang.AFn.applyToHelper(AFn.java:163) 
at clojure.lang.Var.applyTo(Var.java:518) 
at clojure.main.main(main.java:37) 
Caused by: java.lang.RuntimeException: Unable to resolve symbol: defcmd in this context 
at clojure.lang.Util.runtimeException(Util.java:156) 
at clojure.lang.Compiler.resolveIn(Compiler.java:6720) 
at clojure.lang.Compiler.resolve(Compiler.java:6664) 
at clojure.lang.Compiler.analyzeSymbol(Compiler.java:6625) 
at clojure.lang.Compiler.analyze(Compiler.java:6198) 
... 28 more 

但是，在運行從REPL在我的命名空間相同的命令工作正常。

Answer 1

您可能需要一些更復雜的加載方案。我假設你想把配置放入一個專用的配置命名空間。它只包含配置。 Helper函數保存在配置名稱空間中使用的獨立名稱空間中。

(defn setup-config-space 
    [] 
    (binding [*ns* *ns*] 
    (in-ns 'config.namespace) 
    (refer-clojure) 
    (use 'config.helpers))) 

(defn load-config 
    [path] 
    (binding [*ns* *ns*] 
    (in-ns 'config.namespace) 
    (load-file path))) 

見實例的使用：

..ojure/1.4.0-alpha3% cat config/helpers.clj        
(ns config.helpers) 

(defmacro defcmd 
    [x] 
    `(defn ~x [] "Hello")) 
..ojure/1.4.0-alpha3% cat x.clj 
(defcmd foo) 
..ojure/1.4.0-alpha3% java -cp .:clojure-1.4.0-alpha3.jar clojure.main -r 
Clojure 1.4.0-alpha3 
user=> ; Paste above functions 
#'user/setup-config-space 
#'user/load-config 
user=> (setup-config-space) 
nil 
user=> (load-config "x.clj") 
#'config.namespace/foo 
user=> (config.namespace/foo) 
"Hello"