原创作者: litaocheng   阅读:4681次   评论:1条   更新时间:2011-06-01    
为了写一个好的产品,必定离不开完善的测试。

最近开始筹划项目,因此单元测试必不可少,一定要在开始的时候把测试做好,从下到上才能让产品更加坚固。

我们选择使用EUnit进行单元测试。使用Eunit的好处:减少代码的修改;提高开发速度;有利于接口与实现分离;有利于系统集成;还有测试本身可以作为一种文档。

1,首次从http://support.process-one.net/doc/display/CONTRIBS/EUnit 获取对应的SVN checkout路径,http://svn.process-one.net/contribs/trunk/eunit,通过svn进行下载。

2,将整个eunit目录放到你的erlang安装目录下的lib目录中。也可以使用通过code:add_path/1或者其他编译选项指明eunit的路径,但是不是很方便。

3,在你的module中添加: -include_lib("eunit/include/eunit.hrl"). 这样就引入了eunit的头文件,此时你的module具有了下面的特性:自动的将以"_test"结尾的函数作为测试函数;为你的module添加并导出了test/0函数;为你提供了丰富的test macro。(自动导出test函数,是通过compile指示符的parse_transform选项进行处理)

此时,我们的module已经具有了eunit赋予的一切权利。注意你从svn下载的代码,没有进行编译,你需要进行编译生成beam文件。由于本人是在windows下工作,编译不是很方便,所以我就直接从这里下载了eunit的beam文件,放到eunit/ebin/目录下。

在我们要测试的module中我们加入一个函数:
basic_test() ->
     ?assert(1 == 1).


好了,编译module,随后运行M:test(),进行单元测试,我们会看到
Test successful.
的提示。测试ok。

这里bsic_test/0会在执行test/0的时候调用,我们也可以把basic_test/0写成另一种形式:
basic_test_() ->
    fun() -> ?assert(1 == 1) end.


以"_test_"结尾的函数,在EUnit中称为“test generation function",测试生成函数,
它返回一个或一个函数list,EUnit会依次执行每个函数。为了让代码更紧凑简洁,
我们又有了另一个macro:_test,这样上面的test可以变成这样:

basic_test_() ->
    ?_test(?assert(1 == 1)).


是不是代码少一些了?好的让我们再进一步,我们使用另一个macro:_assert:
basic_test_() ->
    ?_assert(1 == 1).


怎么样,很简单了吧,好的,比如我有一系列的内容要测试,我就可以简单的写成这样:
basic_test_() ->
    [?_assert(1 == 1),
     ?_assert(2 == 2),
     ?_assertEqual(3, 3),
     ?_assertMatch(4,  4),
     ?_assertException(throw, a, throw(a))].


我们非常容易的就测试了某个表达式是否为true,某两个值是否相等assertEqual
(注:这里使用=:=进行判断,因此assertEqual(3, 3.0)不会测试通过),
某个表达式是否匹配,是否产生指定的异常等。
好了,暂时就这些基本的东西,更多的内容查看EUnit的帮助:
http://svn.process-one.net/contribs/trunk/eunit/doc/overview-summary.html

Update:
R12B-5中,eunit作为一个标准的lib被加入,eunit中提供了一些有用的Macro,如:
LET(Var,Arg,Expr)
等效于 (fun(Var) -> (Expr) end)(Arg)
用法: L = ?LET(L1, [1, 2, 3], lists:reverse(L1))

IF(Cond,TrueCase,FalseCase)
用法: G = ?IF(A >= B, A, B)

形如_test()的函数,作为一个test 单元
形如_test_()的函数作为test generator,其用来产生test单元,其结尾表达式可以为:
单个形如?_xxx的测试,表示一个test单元
也可以为一个List(可以为Deep List),List进行flatten后,长度表示test单元数目如下面代码表示五个测试单元:

basic_test() ->
    ?assert([1, 2] = lists:reverse([2, 1]).

basic_test_() ->
    [?_assert(true),
     ?_assertNot(false),
     [ ?_assert(1 == 1.0),
       ?_assert(true)
     ]
    ].
评论 共 1 条 请登录后发表评论
1 楼 feifei4728 2009-10-27 17:51
刚试了下就报个错,搜了下是eunit的bug

http://www.nabble.com/Eunit-Possibly-Failing-Under-Windows-td23307820.html

我这内置的是eunit2.1,eunit2.1.2以修正该问题
http://www.erlang.org/download/patches/eunit-2.1.1.tar.gz

发表评论

您还没有登录,请您登录后再发表评论

文章信息

Global site tag (gtag.js) - Google Analytics