More sensible test assertion

Also better for test coverage stats
2016-11-09 19:38:02 +00:00 · 2016-11-09 19:38:02 +00:00 · 3d737dcf3c
commit 3d737dcf3c
parent 2458a90fb3
1 changed files with 6 additions and 14 deletions
--- a/src/leveled_sft.erl
+++ b/src/leveled_sft.erl
@ -1773,20 +1773,12 @@ big_create_file_test() ->
    ?assertMatch(Result1, {K1, {Sq1, St1, V1}}),
    ?assertMatch(Result2, {K2, {Sq2, St2, V2}}),
    SubList = lists:sublist(KL2, 1000),
-    FailedFinds = lists:foldl(fun(K, Acc) ->
+    lists:foreach(fun(K) ->
                        {Kn, {_, _, _}} = K,
                        Rn = fetch_keyvalue(Handle, FileMD, Kn),
-                                    case Rn of
-                                        {Kn, {_, _, _}} ->
-                                            Acc;
-                                        _ ->
-                                            Acc + 1
-                                    end
+                        ?assertMatch({Kn, {_, _, _}}, Rn)
                    end,
-                                0,
                    SubList),
-    io:format("FailedFinds of ~w~n", [FailedFinds]),
-    ?assertMatch(FailedFinds, 0),
    Result3 = fetch_keyvalue(Handle,
                                FileMD,
                                {o, "Bucket1024", "Key1024Alt", null}),