Erlang被稱作是“工業級的語言”，在測試領域，理應是有相當成熟度的。而，Joe老先生本人，也是崇尚“拿測試結果說話”的人（在《Programming Erlang》書中，上來就搞測試，然后再開講的例子比比皆是）。就連 Erlang/OTP 本身的代碼質量也是有嚴密的測試作為保障的。所以，如果在Erlang領域，你見到遠比其他語言為多的測試相關工具、框架、包，絲毫也不應該感到驚奇。下面，我們就來看看“Erlang的測試兵器譜”中，都有什么好家伙。
首先是大名鼎鼎的 Test_Server ，需要說明的是 Erlang/OTP 自身代碼的幾千個 Test Case 就是構建在它的基礎之上。Test_Server 的功能可謂面面俱到，讓人眼花繚亂，從簡單的測試任務，到對多環境下的測試，乃至對嵌入式系統進行測試，沒有它不在行的。但也正因為此，使用稍嫌復雜，比如必須從 Erlang/OTP 的源碼來構建和編譯 Test_Server ，又比如較為復雜的 case 定義。
然后是 Yet Another 系列，隆重推出：yatsy——Yet Another Test Server (咦？最后一個 y 是哪里來的呢？)， yatsy 和 test_server 的語法完全一致，功能大致相當，所不同的是： yatsy 是 host 在 google 上的 opensource 的項目，而 test_server 是 ericsson 的產品（雖說也給了 sourcecode 但不是 public repository ，這算哪門子區別？），另一個區別是 yatsy 和 yaws 有很好的結合（都是 Yet Another 一家的嘛），主要用來生成 report 。
另外，還有 Erlang QuickCheck 是一個 commercial 的測試工具，咱們支持 opensource 這里就不表了。
我個人最喜歡的小巧工具是 EUnit ，簡單，易用。對于“非火箭科技”的普通程序員來說，簡簡單單的就好。60秒入門如下：
- -module(fib).
- -export([fib/1]).
- %% 加了這句，會自動多出來一個 test() 方法，測試直接跑 fib:test() 就好了。
- -include_lib("eunit/include/eunit.hrl").
-
- fib(0) -> 1;
- fib(1) -> 1;
- fib(N) when N > 1 -> fib(N-1) + fib(N-2).
-
- %% xxx_test() 是測試 case ，test() 會調用每一個 case 就像 junit 一樣
- fib_test() -> fib(0) == 1.
-
- %% xxxx_test_() case 生成器，每個 ?_assert(...) 都會生成一個 case 函數
- %% 一般用這個就可以了
- fib_test_() ->
- [?_assert(fib(0) == 1),
- ?_assert(fib(1) == 1),
- ?_assert(fib(2) == 2),
- ?_assert(fib(3) == 3),
- ?_assert(fib(4) == 5),
- ?_assert(fib(5) == 8),
- ?_assertException(error, function_clause, fib(-1)),
- ?_assert(fib(31) == 2178309)
- ].
-
- setup() ->
- io:format("Setup called", []).
-
- %% 如果需要 setup 就這么干
- do_test_() ->
- {setup, fun setup/0, [?_assert(1=:=0)]}.
就這么多了，簡潔明快吧。
上面是功能測試或者說單元測試，那么，在性能測試上，我們有鼎鼎大名和鼎鼎大名的 Tsung （嗯，誰知道這個詞的正確發音是怎樣的？）。這個東西，留待日后俺學習到了再和大家分享。 