testing - 具有多个断言和报告的 Clojure 测试
问题描述
我在使用 clojure.test 测试框架报告失败时遇到了一些问题。
现在,我知道我可以为不同的报告覆盖一些函数,以便它打印到控制台或我想要打印到的任何地方。我也知道我可以将此输出保存到文件中。
我的问题如下......当我像这个例子一样声明一个deftest时:
(deftest test1
(is (= 1 1)
(is (= 2 1))
这个测试将运行,如果我做类似的事情,(run-tests)
否则(test-var #'test1)
它将返回nil 但打印失败。
我决定重写 :fail 报告方法,因为我想要的是这样的失败地图:{"expected" (:expected m), "actual" (:actual m)}
如果我只使用报告功能,这有点工作。
问题是,当您通过 Clojure.test 框架运行测试时,会调用许多宏,但它的行为并不完全符合我的要求。
我的最终目标是:运行测试,如果有任何失败,而不是打印它们,将它们保存到地图并将地图返回给我。如果他们都通过了,那么我不在乎它会给我带来什么。
这甚至可能吗?如果某个测试失败,我不想停止测试,我只想将它记录在某个地方,最好是地图。
资料来源:
https://clojure.github.io/clojure/branch-1.1.x/clojure.test-api.html
解决方案
恐怕没有简单的方法可以做到这一点。您可以提供clojure.test/report :fail
defmethod 的自定义实现并将结果存储在原子中,但很难将结果传播到外层。
如果您只是使用test-var
,那么它是可行的,但请注意在这种情况下不会执行测试装置 - 请参阅test-vars
源代码:
(:use clojure.test)
(deftest failing
(testing "fail me"
(is (= 1 0))
(is (= 2 1))
(is (= 3 2))))
(def test-failures (atom []))
(defmethod report :fail [m]
(swap! test-failures
(fn [previous-failures current-failure]
(conj previous-failures current-failure))
{:test-var-str (testing-vars-str m)
:expected (:expected m)
:actual (:actual m)}))
(defmethod report :end-test-var [m]
@test-failures)
(defn run-test-var [v]
(reset! test-failures [])
(test-var v))
;; in REPL:
(run-test-var #'failing)
;; =>
[{:test-var-str "(failing) (form-init4939336553149581727.clj:159)", :expected 1, :actual (0)}
{:test-var-str "(failing) (form-init4939336553149581727.clj:160)", :expected 2, :actual (1)}
{:test-var-str "(failing) (form-init4939336553149581727.clj:161)", :expected 3, :actual (2)}]
还有defmethod report :end-test-ns
,但这个不是很有用,因为test-ns
函数返回@*report-counters*
。
推荐阅读
- flutter - 键入'_CompactLinkedHashSet
' 不是 'Widget' 类型的子类型 - excel - 无法理解 Dir 在循环中使用时如何遍历下一个目录
- android - 如何为回收器适配器提供点击监听接口的实现?
- python - face_encoding 函数返回错误
- javascript - URL localhost 上的 Codeigniter Jquery Ajax 请求错误
- php - if ($_POST['username'] && $_POST['pass'])
- flutter - 从 Firestore Flutter 创建读取详细信息列表
- css - 想要根据用户选择加载浅色或深色主题
- php - 如何让我的自定义门在 Laravel 中工作?
- apollo - 响应后如何在 Apollo GraphQl 中重新定义查询的形状