lein uberjar 永远服用

Question

我想创建一个 leiningen 应用程序的 uberjar。我的配置是：

:uberjar {:omit-source true
             :aot :all
             :uberjar-name "myapp.jar"
             :source-paths ["env/prod/clj" ]
             :resource-paths ["env/prod/resources"]}

但是在执行lein uberjar 时，我发现项目中的文件正在编译，但是编译卡在包含大部分代码的文件上，持续了十分钟并且还在计数。此文件不超过 140 行。

Answer 1

TL;DR：从不def 副作用

---

如 cmets 所述：

...我刚刚发现这条线：(defonce server (http/start-server server-handler {:port 8982})) 导致挂起。

不要把这样的东西放在顶层。

defonce 仅表示它一旦存在就不会被重新定义（所以在这种情况下 它将防止重新加载时出现一些“端口已在使用”错误。

摆脱困境的方法

编写一个函数，启动这个服务器。然后从你的主要调用它。为了 开发，你可以从 REPL 运行该功能，或者你可以洒一些 在你的用户 ns 中重新加载/重启逻辑。

另一个选项可能是使用delay：它只会在获得derefed 后执行代码。

你要处理的“资源绑定”越多，就越有系统性 方法将为您的应用程序提供更好的结构。例如。看看：

• weavejester/integrant
• stuartsierra/component
• tolitius/mount

那么，为什么在 def 中放置阻塞的东西或副作用会有问题呢？

Clojure 编译器的工作方式是实际“运行”代码。所以compile基本上就是：

1. 启用生成字节码并将其写为 .class 文件
2. 加载命名空间并“运行”它

这意味着，在编译时，顶级副作用被执行。 因此，def 中的阻塞操作将阻塞编译（这是相当 明显），否则您的 CI 服务器将无法编译，因为它无法连接到 数据库等

很好地解释了 Clojure 中代码生成的工作原理：

• What Are All These Class Files Even About? And Other Stories - Gary Fredericks