erlang: added simple performance test.

This commit is contained in:
UENISHI Kota 2010-07-08 23:36:18 +09:00
parent 167e2475d8
commit 45fb482ab4

View File

@ -359,4 +359,9 @@ test_([Before|Rest])->
other_test()->
{more,1}=msgpack:unpack(<<>>).
benchmark_test()->
Data=[test_data() || _ <- lists:seq(0, 10000)],
S=?debugTime(" serialize", msgpack:pack(Data)),
{Data,<<>>}=?debugTime("deserialize", msgpack:unpack(S)).
-endif.