為了寫(xiě)一個(gè)好的產(chǎn)品，必定離不開(kāi)完善的測(cè)試。

最近開(kāi)始籌劃項(xiàng)目，因此單元測(cè)試必不可少，一定要在開(kāi)始的時(shí)候把測(cè)試做好，從下到上才能讓產(chǎn)品更加堅(jiān)固。

我們選擇使用EUnit進(jìn)行單元測(cè)試。使用Eunit的好處：減少代碼的修改；提高開(kāi)發(fā)速度；有利于接口與實(shí)現(xiàn)分離；有利于系統(tǒng)集成；還有測(cè)試本身可以作為一種文檔。

1，首次從http://support.process-one.net/doc/display/CONTRIBS/EUnit 獲取對(duì)應(yīng)的SVN checkout路徑，http://svn.process-one.net/contribs/trunk/eunit，通過(guò)svn進(jìn)行下載。

2，將整個(gè)eunit目錄放到你的erlang安裝目錄下的lib目錄中。也可以使用通過(guò)code:add_path/1或者其他編譯選項(xiàng)指明eunit的路徑，但是不是很方便。

3，在你的module中添加: -include_lib("eunit/include/eunit.hrl"). 這樣就引入了eunit的頭文件，此時(shí)你的module具有了下面的特性：自動(dòng)的將以"_test"結(jié)尾的函數(shù)作為測(cè)試函數(shù)；為你的module添加并導(dǎo)出了test/0函數(shù)；為你提供了豐富的test macro。（自動(dòng)導(dǎo)出test函數(shù)，是通過(guò)compile指示符的parse_transform選項(xiàng)進(jìn)行處理）

此時(shí)，我們的module已經(jīng)具有了eunit賦予的一切權(quán)利。注意你從svn下載的代碼，沒(méi)有進(jìn)行編譯，你需要進(jìn)行編譯生成beam文件。由于本人是在windows下工作，編譯不是很方便，所以我就直接從這里下載了eunit的beam文件，放到eunit/ebin/目錄下。

在我們要測(cè)試的module中我們加入一個(gè)函數(shù)：

basic_test() ->
     ?assert(1 == 1).

好了，編譯module，隨后運(yùn)行M:test()，進(jìn)行單元測(cè)試，我們會(huì)看到
Test successful.
的提示。測(cè)試ok。

這里bsic_test/0會(huì)在執(zhí)行test/0的時(shí)候調(diào)用，我們也可以把basic_test/0寫(xiě)成另一種形式：

basic_test_() ->
    fun() -> ?assert(1 == 1) end.

以"_test_"結(jié)尾的函數(shù)，在EUnit中稱為“test generation function"，測(cè)試生成函數(shù)，
它返回一個(gè)或一個(gè)函數(shù)list，EUnit會(huì)依次執(zhí)行每個(gè)函數(shù)。為了讓代碼更緊湊簡(jiǎn)潔，
我們又有了另一個(gè)macro：_test，這樣上面的test可以變成這樣：

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

是不是代碼少一些了？好的讓我們?cè)龠M(jìn)一步，我們使用另一個(gè)macro：_assert：

basic_test_() ->
    ?_assert(1 == 1).

怎么樣，很簡(jiǎn)單了吧，好的，比如我有一系列的內(nèi)容要測(cè)試，我就可以簡(jiǎn)單的寫(xiě)成這樣：

basic_test_() ->
    [?_assert(1 == 1),
     ?_assert(2 == 2),
     ?_assertEqual(3, 3),
     ?_assertMatch(4,  4),
     ?_assertException(throw, a, throw(a))].

我們非常容易的就測(cè)試了某個(gè)表達(dá)式是否為true，某兩個(gè)值是否相等assertEqual
（注：這里使用=:=進(jìn)行判斷，因此assertEqual(3, 3.0)不會(huì)測(cè)試通過(guò)），
某個(gè)表達(dá)式是否匹配，是否產(chǎn)生指定的異常等。
好了，暫時(shí)就這些基本的東西，更多的內(nèi)容查看EUnit的幫助:
http://svn.process-one.net/contribs/trunk/eunit/doc/overview-summary.html

Update:
R12B-5中，eunit作為一個(gè)標(biāo)準(zhǔn)的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()的函數(shù)，作為一個(gè)test 單元
形如_test_()的函數(shù)作為test generator，其用來(lái)產(chǎn)生test單元，其結(jié)尾表達(dá)式可以為：
單個(gè)形如?_xxx的測(cè)試，表示一個(gè)test單元
也可以為一個(gè)List（可以為Deep List），List進(jìn)行flatten后，長(zhǎng)度表示test單元數(shù)目如下面代碼表示五個(gè)測(cè)試單元:


安徽新華電腦學(xué)校專業(yè)職業(yè)規(guī)劃師為你提供更多幫助【在線咨詢】