rewrite from lager
您最多选择25个主题 主题必须以字母或数字开头,可以包含连字符 (-),并且长度不得超过35个字符
 

22 行
619 B

-module(compress_pr_record_test).
-compile([{parse_transform, lager_transform}]).
-record(a, {field1 :: term(),
field2 :: term(),
foo :: term(),
bar :: term(),
baz :: term(),
zyu :: term(),
zix :: term()}).
-ifdef(TEST).
-include_lib("eunit/include/eunit.hrl").
-endif.
nested_record_test() ->
A = #a{field1 = "Notice me senpai"},
Pr_A = eRum:pr(A, ?MODULE),
Pr_A_Comp = eRum:pr(A, ?MODULE, [compress]),
?assertMatch({'$lager_record', a, [{field1, "Notice me senpai"}, {field2, undefined} | _]}, Pr_A),
?assertEqual({'$lager_record', a, [{field1, "Notice me senpai"}]}, Pr_A_Comp).