Vous ne pouvez pas sélectionner plus de 25 sujets
Les noms de sujets doivent commencer par une lettre ou un nombre, peuvent contenir des tirets ('-') et peuvent comporter jusqu'à 35 caractères.
22 lignes
680 B
22 lignes
680 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 = lager:pr(A, ?MODULE),
|
|
Pr_A_Comp = lager: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).
|