clojure - 有没有办法在 clojure 中测试系统/退出？

Question

我有运行 (System/exit 0) 的代码我想测试那部分代码。我尝试用 with-redefs 测试它但我发现我不允许对 Java 方法这样做。我该如何去测试这个？

Answer 1

抱歉，您不能直接模拟该函数，但就像所有优秀的 CS 问题*一样，您可以通过添加一个额外的间接级别来解决它:

(defn exit-now! [] 
   (System/exit 0))

然后在您的测试中，您可以使用重定义退出对 clojure 函数 exit-now 的调用。

(with-redefs [exit-now! (constantly "we exit here")]
    (is (= "we exit here" (code that calls exit))))

也许你可以插入该功能的开发人员远离从项目内部调用 System/exit 的做法。

*当然，性能问题除外。