Minor changes to test code

This commit is contained in:
Kresten Krab Thorup 2012-05-05 18:56:03 +02:00
parent 8f1600b41a
commit 96c5ec74c3

View file

@ -257,8 +257,8 @@ postcondition(_S, {call, ?SERVER, open, [_Name]}, ok) ->
true; true;
postcondition(_S, {call, ?SERVER, close, [_Name]}, ok) -> postcondition(_S, {call, ?SERVER, close, [_Name]}, ok) ->
true; true;
postcondition(_, _, _) -> postcondition(_State, _Call, _Result) ->
error_logger:error_report([{not_matching_any_postcondition}]), % error_logger:error_report([{not_matching_any_postcondition, _State, _Call, _Result}]),
false. false.
@ -308,7 +308,7 @@ test_tree() ->
<<N:128>>, <<"data",N:128>>) <<N:128>>, <<"data",N:128>>)
end, end,
ok, ok,
lists:seq(2,100000,1)), lists:seq(2,10000,1)),
io:format(user, "INSERT DONE 1~n", []), io:format(user, "INSERT DONE 1~n", []),
lists:foldl(fun(N,_) -> lists:foldl(fun(N,_) ->