如何在命名空间的上下文中评估Clojure数据结构？

Question

如何在命名空间的上下文中评估Clojure数据结构？

3

我正在编写一款内部使用的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运行同样的命令却可以正常工作。

- Chris

我找到了一个相关的线程，但没有解决方案：http://stackoverflow.com/questions/1307567/eval-not-working-on-unexpanded-macro-quote - Chris

2

我猜“defcmd”在路径字符串中的某个位置，因为load-string并不像你想象的那样工作。尝试使用load-file。 - Alex Taggart

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- kotarak · Accepted Answer

你可能需要更加复杂的加载方案。我假设你想把配置放在一个专门的配置命名空间中，它只包含配置信息。帮助函数则存放在另一个命名空间中，被引用到配置命名空间中。

(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"