unit-testing - 如何在 Leiningen 中打印测试名称？

Question

我想在运行时打印每个 leiningen 测试方法。我有一个相对简单的 lein 测试文件:

(defn myfixture [b] 
  (do 
    (println "start") 
    (b)
    (println "end")
  )
)

(deftest test1 [] .....

我希望在运行测试时在 repl 中看到“test1”打印出来。是否有一种简单的方法来打印方法名称(通过在 myfixture 中调用 b 的方法，或者在调用“lein test”时)？

Answer 1

你可以这样得到一个函数的名字:

(defn function-name [f]
  (:name (meta f))) 

(defn my-func []
   (println "Hello, world!"))

(let [f my-func]
  (function-name f))
;=> my-func

我不知道您正在寻找的工具是否存在于常规 clojure.test 中，但是 midje有一些相当广泛的固定设施，this link也许值得一试。