Question

Newbie Clojure和leiningen问题：

鉴于我的项目中的代码片段，这可以从lein repl：

开始

==> (-main "something")

产生预期的“命令：某事......正在运行......完成” 但是无法从命令行运行：

me pallet1]lein run "something"

生成“命令：某事......错误：未解析为命令”

为什么呢？ /我该如何解决？

重现：

lein new eg

然后编辑生成的项目文件，添加:main eg.core以定义主函数，并编辑生成的src / eg / core.clj文件，并将其粘贴到：

core.clj

(ns eg.core)
(defn something [] (println "Something!"))

(defn run-command-if-any [^String commandname]
    (printf "Command: %s ..." commandname)
    (if-let [cmd (ns-resolve *ns* (symbol commandname))] 
      (
        (println "running ...") (cmd) (println "done.")
      )
      (println "error: not resolved as a command.")
    ))
(defn -main [ commandname ] (run-command-if-any commandname))

然后

lein repl
eg.core=> (-main "something")

工作（即打印“Something！”），但是莱恩跑了一些东西没有（即打印“错误：未解决”消息）

Answer 1

问题是当你从lein运行它时，你的默认命名空间是“user”namespace：

(defn -main [ commandname ] (println *ns*))

打印#<Namespace user>。所以它不包含something函数，因为它来自另一个名称空间。你有几个选择：

传递完全限定的函数名称：your-namespace/something而不是something。
使用your-namespace代替*ns*：(ns-resolve 'your-namespace (symbol commandname))
在your-namespace中将名称空间更改为-main。

方法3的示例：

(defn -main [ commandname ] 
   (in-ns 'your-namespace)
   (run-command-if-any commandname))

如果你想逐个调用几个函数，你应该使用do：

(do (println "Hello")
    (println "World"))

不只是像( (println "hello") (println "World"))

Answer 2

lein exec plugin对于在项目上下文中编写此类内容非常有用。我已经广泛使用它在clojure和其他脚本编写情况下编写Jenkins工作

lein exec -pe '(something ...) (something-else) (save-results)'

lein repl（-main“something”）和lein run“something”之间的区别

2 个答案: