使用fixture从REPL运行一个Clojure测试（不是命名空间中的所有测试）

Question

如何从Clojure REPL运行一个测试（而不是整个命名空间）？

我尝试过直接调用函数，例如（ns/测试），但我需要先运行fixture。所以我想找到一种从clojure开始测试的方法。测试。

这很接近，但不匹配我想做的：https://stackoverflow.com/a/24337705/109618

我看不到clojure有提到怎么做。测试API。

Answer 1

如果您不介意不运行fixture，可以在调用运行测试之前执行以下操作：

(defn test-ns-hook []
  (my-test))

要去掉钩子，你可以做

(ns-unmap *ns* 'test-ns-hook)

如果您仍然需要fixture并希望保留一个测试命名空间，则可以添加一个ns unmap，在运行基于以下内容建模的测试之前，从命名空间中删除所有不希望运行的测试/fixture：

(doseq [v (keys (ns-publics 'my-ns))]
  (let [vs (str v)]
    (if (.startsWith vs "test-") (ns-unmap 'my-ns v))))

使用多个命名空间可能更容易，其中一个包含所有测试和固定装置，在其他命名空间中，引用到您想要从主测试命名空间运行的测试和固定装置。然后，您可以使用ns切换到特定的测试命名空间，或者通过要测试的命名空间：

(ns test-main
  (:require [clojure.test :refer :all]))

(deftest addition
  (is (= 4 (+ 2 2)))
  (is (= 7 (+ 3 4))))

(deftest subtraction
  (is (= 1 (- 4 3)))
  (is (= 3 (- 7 4))))

(run-tests)
;Runs all the tests

(ns test-specific
(:require [clojure.test :refer :all]
          [test-main :refer :all]))

(deftest arithmetic
  (subtraction))

(run-tests)
;Just runs the tests you want

Answer 2

要在命名空间中运行单个测试：

lein test :only namespace_name/testname

在一个命名空间中运行所有测试的步骤

lein test :only namespace_name

Answer 3

Clojure 1.6中增加了一个新函数来支持这一点。clojure.test/test-vars将使用夹具运行一个或多个测试变量。

我认为这样做应该奏效：

(clojure.test/test-vars [#'the-ns/the-test])