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

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}}]}

这几乎是我想要的，因为它报告了地图中有问题的键和有问题的值，然而它报告了asserts模块中的错误，即使我有兴趣查看失败的实际测试，而不是对断言模块的引用。我认为测试生成器正好可以解决这个问题，但我无法让它以这种方式工作。

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

Answer 1

问题是，?_assert... 宏被编译到 asserts 模块中，这就是 EUnit 发挥魔力来计算模块和行号的地方（即在编译时）。如果您将 maps_assert_map_has_updated_values 函数替换为放入包含在头文件中的宏，您应该会看到正确的堆栈跟踪。