6

好的,我正在使用 Meck,但我迷路了。我的第一语言(我已经写了大约 7 个月了)是 Ruby,所以我似乎还无法将我的大脑包裹在 Meck 嘲笑上。我确实得到了 Ruby 的嘲笑。希望有人可以帮助我。另外,我只写了一周的 Erlang。

更新的代码(但模拟仍然不起作用)......

我有一个 Erlang console_io提示器模块,如下所示:

    -module(prompter).
    -export([prompt/1, guess/0]).

    prompt(Message) ->
      console_io:gets(Message).

    gets() ->
      {_, [Input]} = io:fread("Enter:  ", "~s"),
      Input.

    guess() ->
      Guess_Input = gets(),
      Guess_List = convert_guess_to_list(Guess_Input).

    convert_guess_to_list(Guess_Input) ->
      re:split(Guess_Input, "", [{return, list}, trim]).

我的测试现在看起来像这样:

    -module(prompter_test).
    -include_lib("eunit/include/eunit.hrl").

    guess_1_test() ->
      meck:new(prompter),
      meck:expect(prompter, gets, fun() -> "aaaa" end),
      ?assertEqual(prompter:guess(), ["a","a","a","a"]),
      ?assert(meck:validate(prompter)),
      meck:unload(prompter).

我得到的错误是:

    Eshell V5.9.3.1  (abort with ^G)
    1> prompter_test: guess_1_test (module 'prompter_test')...*failed*
    in function prompter:guess/0
      called as guess()
    in call from prompter_test:guess_1_test/0 (test/prompter_test.erl, line 10)
    in call from prompter_test:guess_1_test/0
    **error:undef

我想在我的测试中模拟(存根?)gets函数,这样gets将返回“aaaa”,然后当我在get_guess()上断言时它应该等于[“a”,“a”,“a”,“a” ]。

我该怎么做呢?

4

2 回答 2

12

有两个问题:

  • prompter模块有两个导出函数,但您只能gets使用meck:expect. 默认情况下,Meck 创建一个包含您显式模拟的函数的新模块。您可以使用以下passthrough选项更改它:

    meck:new(prompter, [passthrough]),
    
  • 当您模拟该gets函数时,所有以模块为前缀的调用(即prompter:gets())都会被拦截,但 Meck 无法(还没有?)拦截内部调用(例如函数gets()中的调用guess),因此您仍然会得到该函数的未模拟版本. 没有完全令人满意的方法可以避免这种情况。您可以将调用更改guessprompter:gets(),或者您可以移动gets到一个单独的模块并模拟它。

于 2013-05-13T10:28:55.737 回答
5

第一行说要创建一个新的模拟模块,my_library_module

    meck:new(my_library_module),

接下来,我们模拟函数fibinmy_library_module以在传入 8 时返回 21:

    meck:expect(my_library_module, fib, fun(8) -> 21 end),

我们有一些 eunit 断言来测试我们的模拟函数。该code_under_test:run调用是您要使用模拟模块替换为函数的内容,并且21是您期望从函数调用中获得的结果:

    ?assertEqual(21, code_under_test:run(fib, 8)), % Uses my_library_module
    ?assert(meck:validate(my_library_module)),

然后我们卸载模拟模块:

    meck:unload(my_library_module).

如果您想为您的模块编写相同的测试,您可以编写:

my_test() ->
    meck:new(console_io),
    meck:expect(console_io, gets, fun() -> "aaaa" end),
    ?assertEqual(["a", "a", "a", "a"], console_io:get_guess()), % Uses console_io
    ?assert(meck:validate(console_io)),
    meck:unload(console_io).
于 2013-05-12T19:32:15.837 回答