正确使用meck与foreach的方法

时间:2013-08-10 17:01:13

标签: erlang eunit meck

我正在使用meck来测试我的gen_server mymodule。特别是我按照here提供的说明使用meck模拟httpc

以下是我从测试中提取的一些代码:

do_some_tests_() ->
  {foreach,
   fun start/0,
   fun stop/1,
   [fun do_some_stuff/1,
    fun do_some_other_stuff/1
   ]}.

start() ->
  {ok, _} = mymodule:start_link(),
  meck:new(httpc),
  _Pid = self().

stop(_) ->
  meck:unload(httpc), 
  mymodule:stop().

do_some_stuff(Pid) ->
  %% here i use meck
  meck:expect(httpc, request, 
    fun(post, {_URL, _Header, ContentType, Body}, [], []) ->
        Reply = "Data to send back"
        Pid ! {ok, {{"", 200, ""}, [], Reply}}
    end),
  %% here i do the post request
  mymodule:myfunction(Body),
  receive 
    Any -> 
      [
       ?_assertMatch({ok, {{_, 200, _}, [], _}}, Any), 
       ?_assert(meck:validate(httpc))
      ]
  end.

使用此代码,我可以运行测试,但仍有两件事我无法理解:

1)在结果中我得到了类似的东西:

mymodule_test:43: do_some_stuff...ok
mymodule_test:43: do_some_stuff...ok
mymodule_test:53: do_some_other_stuff...ok
mymodule_test:53: do_some_other_stuff...ok

每次测试只能获得一行而不是两行?

2)如何为每个测试添加口语描述?

1 个答案:

答案 0 :(得分:3)

函数do_some_stuff(Pid)生成两个测试,因此检查并显示它们非常正常。

但是,您可以为每个发生器添加名称/描述。测试:

do_some_tests_() -> 
  {foreach,
  fun start/0,
  fun stop/1,
  [{"Doing some stuff" , fun do_some_stuff/1},
   {"Doing some other stuff" , fun do_some_other_stuff/1}
  ]}.




do_some_stuff(Pid) ->
  %% [code]
  [
   {"Check 200" , ?_assertMatch({ok, {{_, 200, _}, [], _}}, Any)}, 
   {"Check httpc" , ?_assert(meck:validate(httpc))}
  ]
  end.

这应该显示以下内容:

module 'MyModule'
  Doing Some Stuff
    module:57: do_some_stuff (Check 200)...ok
    module:58: do_some_stuff (Check httpc)...ok

用EUnit的说法,这些被称为" 标题":

  

<强>标题

     

任何测试或测试集T都可以通过包装来标注标题   在一对{Title,T}中,Title是一个字符串。为方便起见,任何   通常使用元组表示的测试可以简单地给出一个   标题字符串作为第一个元素,即写{{#34;标题&#34;,...}   而不是添加额外的元组包装,如{&#34;标题&#34;,{...}}。

http://www.erlang.org/doc/apps/eunit/chapter.html#id61107