Question

在Clojure中进行集成测试的技术和库是什么？特别是与数据库，环应用程序，core.async通道，产生副作用的任何东西的交互。

Answer 1

您可以将ring-mock用于响铃应用程序。创建模拟处理程序并使用它的一个示例是：

(let [h (-> (POST "/some/url" [] some-resource)
            (wrap-defaults api-defaults))]
  (let [resp (h (-> (request :post "/some/url")
                    (header "content-type" "application/json")
                    (body (generate-string {:foo :bar}))))]
    (is (= 303 (:status resp)))
    (is (= "" (:body resp)))
    (is (= "http://some/place/foo" (get-in resp [:headers "Location"])))))

对于d / b交互测试和副作用，我使用with-redefs来截断实际的副作用函数，捕获并测试它的参数是否符合预期。我不确定这是否是惯用的，但它是我发现最简单的，例如。

(testing "some d/b work"
  (let [insert-data (ref {})]
    (with-redefs
      [d/insert-data<! 
       (fn [db data] (dosync (alter insert-data assoc :db db)
                             (alter insert-data assoc :data data)))]
      (let [d (your-fn your-args)]
        (is (= {:some :expected-result} d))
        (is (= {:db {:some :connection-data} :data {:some :expected-data}} @insert-data))))))

你可以在这里使用原子，历史上我在测试一些做回写工作的代理时必须使用refs，并且原子在那种情况下没有用。

我使用的主库是clojure.test，到目前为止我只是简单地使用test.check进行了属性测试。我使用了Midje一段时间，但发现clojure.test感觉更纯净，但这很难尝。此外，如果你冒险进入cljs，你可以坚持使用一个测试框架。

我没有使用core.async的任何经验，但its own tests看起来是个好地方。

如何在Clojure中进行集成测试？

1 个答案: