Question

我开始编写一些函数来帮助测试地图上的断言。

我们说我有以下地图：

#{a => 0, b => 2}

在我的业务逻辑中调用函数后，我希望映射看起来像这样：

#{a => 1, b => 2}

换句话说，我希望

地图在更新后具有相同数量的键
a的值从0更改为1
b未更改

我可以把这个测试留给模式匹配，但是，如果我有一个包含很多键的大型地图（甚至可能是很多子图），问题可能在哪里并不明显 - 至少需要一些是时候找到问题（可能是我希望更新的一些值不是 - 或者可能还有一些额外的键等等 - 我希望你明白这一点。）

首先，我在我的模块中提出了以下帮助函数：

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

maps_assert_map_has_updated_values(BaseMap, Updates, ResultingMap) ->
    BaseMapKeys = lists:sort(maps:keys(BaseMap)),
    ResultingMapKeys = lists:sort(maps:keys(ResultingMap)),
    UpdatesKeys = lists:sort(maps:keys(Updates)),
    BaseMapWithoutUpdates = maps:without(UpdatesKeys, BaseMap),
    BaseMapKeysWithoutUpdates = lists:sort(maps:keys(BaseMapWithoutUpdates)),
    ResultingMapWithoutUpdates = maps:without(UpdatesKeys, ResultingMap),

    [
     ?_assertEqual(BaseMapKeys, ResultingMapKeys),
     lists:foldl(
       fun(Key, Acc) -> [?_assertEqual({Key, maps:get(Key, Updates)}, 
                       {Key, maps:get(Key, ResultingMap)}) | Acc] end,
       [],
       UpdatesKeys
      ),
     lists:foldl(
       fun(Key, Acc) -> [?_assertEqual({Key, true}, 
                       {Key, maps:is_key(Key, ResultingMap)}) | Acc] end,
       [],
       UpdatesKeys
      ),
     lists:foldl(
       fun(Key, Acc) -> [?_assertEqual({Key, maps:get(Key, BaseMapWithoutUpdates)}, 
                       {Key, maps:get(Key, ResultingMapWithoutUpdates)}) | Acc] end,
       [],
       BaseMapKeysWithoutUpdates
      )
    ].

我从另一个模块调用它，该模块由eunit执行：

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

simple_map_test_() ->
    asserts:maps_assert_map_has_updated_values(
        #{a => 0, b => 2}, 
        #{a => 1}, 
        #{a => 1, b => 3}).

我收到以下错误消息：

asserts:30: maps_assert_map_has_updated_values...*failed*    in function asserts:'-maps_assert_map_has_updated_values/3-fun-8-'/3 (test/asserts.erl, line 31)
**error:{assertEqual_failed,[{module,asserts},
                     {line,31},
                     {expression,"{ Key , maps : get ( Key , ResultingMapWithoutUpdates ) }"},
                     {expected,{b,2}},
                     {value,{b,3}}]}

几乎我想要的是它报告有问题的密钥和地图中有问题的值，然而它报告错误在{{1} }模块，即使我有兴趣看到失败的实际测试，而不是对断言模块的引用。我认为测试生成器确实很好，但是我无法以这种方式工作。

有什么方法可以让asserts报告实际的测试模块（eunit，函数/测试map_tests行X）而不是我的simple_map_test模块？

Answer 1

问题是，?_assert...宏被编译到asserts模块中，并且EUnit可以在其中发现模块和行号（在编译时，即）。如果将maps_assert_map_has_updated_values函数替换为放在所包含的头文件中的宏，则应该看到正确的堆栈跟踪。

Eunit断言错误报告错误的模块

1 个答案: