Additional unit tests
This commit is contained in:
parent
8a5ed1e198
commit
508da0be45
1 changed files with 22 additions and 1 deletions
|
@ -481,7 +481,28 @@ general_skip_strategy_test() ->
|
|||
{},
|
||||
true},
|
||||
[{?STD_TAG, skip}]),
|
||||
?assertMatch(skip, TagStrat2).
|
||||
?assertMatch(skip, TagStrat2),
|
||||
TagStrat3 = compact_inkerkvc({{1,
|
||||
?INKT_KEYD,
|
||||
{?IDX_TAG, "B1", "K1", "SK"}},
|
||||
{},
|
||||
true},
|
||||
[{?STD_TAG, skip}]),
|
||||
?assertMatch(skip, TagStrat3),
|
||||
TagStrat4 = compact_inkerkvc({{1,
|
||||
?INKT_KEYD,
|
||||
{?IDX_TAG, "B1", "K1", "SK"}},
|
||||
{},
|
||||
true},
|
||||
[{?STD_TAG, skip}, {?IDX_TAG, recalc}]),
|
||||
?assertMatch({recalc, null}, TagStrat4),
|
||||
TagStrat5 = compact_inkerkvc({{1,
|
||||
?INKT_TOMB,
|
||||
{?IDX_TAG, "B1", "K1", "SK"}},
|
||||
{},
|
||||
true},
|
||||
[{?STD_TAG, skip}, {?IDX_TAG, recalc}]),
|
||||
?assertMatch(skip, TagStrat5).
|
||||
|
||||
corrupted_inker_tag_test() ->
|
||||
% Confirm that we will skip on unknown inker tag
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue