Clojure世界:单元测试

    单元测试也是一个开发中最常见的需求,在Java里我们用JUnit或者TestNG,在clojure里也内置了单元测试的库。标准库的clojure.test,以及第三方框架midje。这里我将主要介绍clojure.test这个标准库,midje是个更加强大的测试框架,广告下,midje的介绍在第二次cn-clojure聚会上将有个Topic,我就不画蛇添足了。通常来说,clojure.test足够让你对付日常的测试。

    首先看一个最简单的例子,定义一个函数square来计算平方,然后我们测试这个函数:

;;引用clojure.test
(ns example
  (:use [clojure.test :only [deftest is run-tests]]))
;;定义函数
(defn square [x]
  (* x x))
;;测试函数
(deftest test-square
  (is (= 4 (square 2)))
  (is (= 9 (square -3))))
;;运行测试
(run-tests 'example)

    执行输出:

Testing example

Ran 1 tests containing 2 assertions.
0 failures, 0 errors.

    这个小例子基本说明了clojure.test的主要功能。首先是断言is,类似JUnit里的assertTrue,用来判断form是否为true,它还可以接受一个额外的msg参数来描述断言:

 (is (= 4 (square 2)) "a test")

    它还有两种变形,专门用来判断测试是否抛出异常:

 (is (thrown? RuntimeException (square "a")))
 (is (thrown-with-msg? RuntimeException #"java.lang.String cannot be cast to java.lang.Number"  (square "a")))

    上面的例子故意求"a"的平方,这会抛出一个java.lang.ClassCastException,一个运行时异常,并且异常信息为java.lang.String cannot be cast to java.lang.Number。我们可以通过上面的方式来测试这种意外情况。clojure.test还提供了另一个断言are,用来判断多个form:

 (testing "test zero or one"
    (are
     (= 0 (square 0))
     (= 1 (square 1))))

    are接受多个form并判断是否正确。这里还用了testing这个宏来添加一段字符串来描述测试的内容。

    其次,我们用deftest宏定义了一个测试用例,deftest定义的测试用例也可以组合起来:

   (deftest addition
     (is (= 4 (+ 2 2)))
     (is (= 7 (+ 3 4))))
   (deftest subtraction
     (is (= 1 (- 4 3)))
     (is (= 3 (- 7 4))))
   (deftest arithmetic
     (addition)
     (subtraction))

    但是组合后的tests运行就不能简单地传入一个ns,而需要定义一个test-ns-hook指定要跑的测试用例,否则组合的用例如上面的addition和subtraction会运行两次。我们马上谈到。

    定义完用例后是运行测试,运行测试使用run-tests,可以指定要跑测试的ns,run-tests接受可变参数个的ns。刚才提到,组合tests的时候会有重复运行的问题,要防止重复运行,可以定义一个test-ns-hook的函数:

(defn test-ns-hook []
  (test-square)
  (arithmetic))

    这样run-tests就会调用test-ns-hook按照给定的顺序执行指定的用例,避免了重复执行。

    在你的测试代码里明确调用run-tests执行测试是一种方式,不过我们在开发中更经常使用的是lein来管理project,lein会将src和test分开,将你的测试代码组织在专门的test目录,类似使用maven的时候我们将main和test分开一样。这时候就可以简单地调用:

        lein test

命令来执行单元测试,而不需要明确地在测试代码里调用run-tests并指定ns。更实用的使用例子可以看一些开源项目的组织。

    单元测试里做mock也是比较常见的需求,在clojure里做mock很容易,原来clojure.contrib有个mock库,基本的原理都是利用binding来动态改变被mock对象的功能,但是在clojure 1.3里,binding只能改变标注为dynamic的变量,并且clojure.contrib被废弃,部分被合并到core里面,Allen Rohner编译了一个可以用于clojure 1.3的clojure.contrib,不过需要你自己install到本地仓库,具体看这里。不过clojure.contrib.mock哪怕使用1.2的编译版本其实也是可以的。

    clojure.contrib最重要的是expect宏,它类似EasyMock里的expect方法,看一个例子:

(use [clojure.contrib.mock :only [times returns has-args expect]])

(deftest test-square2
  (expect [square (has-args [number?] (times 2 (returns 9)))]
          (is (= 9 (square 4)))))

    has-args用来检测square的参数是不是number,times用来指定预期调用的次数,而returns用来返回mock值,是不是很像EasyMock?因为我们这个测试只调用了square一次,所以这个用例将失败:

Testing example
"Unexpected invocation count. Function name: square expected: 2 actual: 1"

   这个例子要在Clojure 1.3里运行,需要将square定义成dynamic:

(defn ^:dynamic square [x]
  (* x x))

   否则会告诉你没办法绑定square:

actual: java.lang.IllegalStateException: Can't dynamically bind non-dynamic var: example/square

    额外提下,还有个轻量级的测试框架expections可以看一下,类似Ruby Facker的facker库提供一些常见的模拟数据,如名称地址等

文章转自庄周梦蝶  ,原文发布时间2012-02-15

时间: 2025-01-23 12:18:24

Clojure世界:单元测试的相关文章

Clojure世界:静态代码分析

    Java世界里有findbugs这样的神器,可以让你避免很多"简单愚蠢"的bug.同样,Clojure世界里也有相应的替代品,这就是今天要介绍的kibit.不过kibit现在还比较年轻,判断的规则较少,但是已经可以使用起来做clojure代码的静态检查. 项目主页:https://github.com/jonase/kibit 使用: 1.安装lein插件: lein plugin install jonase/kibit 0.0.2 2.在项目的根目录运行 lein kibi

Clojure世界:如何做性能测试

  我们经常需要在程序中测量某段代码的性能,或者某个函数的性能,在Java中,我们可能简单地循环调用某个方法多少次,然后利用System.currentTimeMillis()方法测量下时间.在Ruby中,一般都是用Benchmark module做测试,提供了更详细的报告信息.     同样,在Clojure里你可以做这些事情,你仍然可以使用System.currentTimeMillis()来测量运行时间,例如: user=> (defn sum1 [& args] (reduce + 

Clojure世界:API文档生成

    继续Clojure世界之旅,介绍下我今天的探索成果,使用clojure生成clojure项目的API文档.在java里,我们是利用javadoc生成API文档,各种build工具都提供了集成,例如maven和ant都提供了javadoc插件或者task.在Clojure世界里,同样有一系列工具帮助你从源码中自动化生成API文档.今天主要介绍三个工具.不过我不会介绍怎么在clojure里写doc,具体怎么做请看一些开源项目,或者直接看clojure.core的源码.     首先是codo

Clojure世界:使用rlwrap增强REPL

   Clojure的REPL非常方便,可以随时随地试验你的想法,REPL是read-eval-print-loop的简称.默认clojure.contrib有带一个shell脚本来启动REPL,具体看这里.你也可以用JLine来增强REPL: java -cp "%CLOJURE_DIR%\jline-VERSION.jar;%CLOJURE_JAR%" jline.ConsoleRunner clojure.main     不过,其实你还可以用rlwrap这个GNU库来增强clo

Clojure世界:文件IO

   文件读写是日常编程中最经常使用的操作之一.这篇blog将大概介绍下Clojure里对文件操作的常用类库.     首先介绍标准库clojure.java.io,这是最经常用的IO库,定义了常见的IO操作.     首先,直接看一个例子,可以熟悉下大多数常用的函数: (ns io   (:use [clojure.java.io])) ;;file函数,获取一个java.io.File对象 (def f (file "a.txt")) ;;拷贝文件使用copy (copy f (f

Clojure世界:利用HouseMD诊断clojure

  HouseMD是淘宝的聚石写的一个非常优秀的Java进程运行时诊断和调试工具,如果你接触过btrace,那么HouseMD也许你应该尝试下,它比btrace更易用,不需要写脚本,类似strace的方式attach到jvm进程做跟踪调试.     基本的安装和使用请看这篇文档<UserGuide>,恕不重复.以下内容都假设你正确安装了housemd.     本文主要介绍下怎么用housemd诊断跟踪clojure进程.Clojure的java实现也是跑在JVM里,当然也可以用housemd

Clojure世界: STM的统计

   年前一篇blog提过,写了一个stm-profiler用于统计clojure STM的运行状况,放在了github上:https://github.com/killme2008/stm-profiler    STM的事务在遇到写冲突(多个事务写同一个ref的时候)就会回滚事务并重试,通过stm-profiler你可以查看事务的重试次数,重试原因,以及每个reference的使用情况.使用很简单,在lein的project.clj引用stm-profiler: [stm-profiler 

Clojure世界:日志管理——clojure.tools.logging

   处理日志是任何一个产品级的程序都需要仔细处理的模块.在Java中,我们经常使用的是log4j就是一个日志框架.在clojure里,同样有一套日志框架--clojure.tools.logging,它不仅提供了常用的日志输出功能,还屏蔽了Java各种日志框架之间的差异,如slf4j,commons-logging,log4j,java.util.logging等,让你可以透明地使用这些框架来处理日志. 名称:clojure.tools.logging 主页:https://github.co

Clojure世界:Http Client

    使用http client提交表单或者下载网页也是非常常见的任务,比如使用Java的时候可以用标准库的HttpURLConnection,也可以选择Apache Http Client.在clojure里也有这样的类库,这里我将介绍三个各有特色的http client实现.     首先,我最先推荐使用clj-http这个类库,它是Apache HttpClient的clojure wrapper,是一个提供同步API的简单易用的Http Client. 名称: clj-http 主页: