More sensible test assertion
Also better for test coverage stats
This commit is contained in:
parent
2458a90fb3
commit
3d737dcf3c
1 changed files with 6 additions and 14 deletions
|
@ -1773,20 +1773,12 @@ big_create_file_test() ->
|
||||||
?assertMatch(Result1, {K1, {Sq1, St1, V1}}),
|
?assertMatch(Result1, {K1, {Sq1, St1, V1}}),
|
||||||
?assertMatch(Result2, {K2, {Sq2, St2, V2}}),
|
?assertMatch(Result2, {K2, {Sq2, St2, V2}}),
|
||||||
SubList = lists:sublist(KL2, 1000),
|
SubList = lists:sublist(KL2, 1000),
|
||||||
FailedFinds = lists:foldl(fun(K, Acc) ->
|
lists:foreach(fun(K) ->
|
||||||
{Kn, {_, _, _}} = K,
|
{Kn, {_, _, _}} = K,
|
||||||
Rn = fetch_keyvalue(Handle, FileMD, Kn),
|
Rn = fetch_keyvalue(Handle, FileMD, Kn),
|
||||||
case Rn of
|
?assertMatch({Kn, {_, _, _}}, Rn)
|
||||||
{Kn, {_, _, _}} ->
|
end,
|
||||||
Acc;
|
SubList),
|
||||||
_ ->
|
|
||||||
Acc + 1
|
|
||||||
end
|
|
||||||
end,
|
|
||||||
0,
|
|
||||||
SubList),
|
|
||||||
io:format("FailedFinds of ~w~n", [FailedFinds]),
|
|
||||||
?assertMatch(FailedFinds, 0),
|
|
||||||
Result3 = fetch_keyvalue(Handle,
|
Result3 = fetch_keyvalue(Handle,
|
||||||
FileMD,
|
FileMD,
|
||||||
{o, "Bucket1024", "Key1024Alt", null}),
|
{o, "Bucket1024", "Key1024Alt", null}),
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue