Account for slower tests in older Erlang versions

Tests run slower in OTP16 - so do less work in this version.
This commit is contained in:
Martin Sumner 2018-09-21 13:27:10 +01:00
parent 1a3d3daa89
commit ba93ea149f
2 changed files with 10 additions and 3 deletions

View file

@ -1,8 +1,9 @@
{erl_opts, [warnings_as_errors, {erl_opts, [warnings_as_errors,
{platform_define, "^2[0-1]{1}", fsm_deprecated}, {platform_define, "^2[0-1]{1}", fsm_deprecated},
{platform_define, "^1[7-8]{1}", old_rand}, {platform_define, "^1[7-8]{1}", old_rand},
{platform_define, "^R", no_sync},
{platform_define, "^R", old_rand}, {platform_define, "^R", old_rand},
{platform_define, "^R", no_sync}]}. {platform_define, "^R", slow_test}]}.
{xref_checks, [undefined_function_calls,undefined_functions]}. {xref_checks, [undefined_function_calls,undefined_functions]}.

View file

@ -61,6 +61,12 @@
{gen_fsm, send_all_state_event, 2}]}). {gen_fsm, send_all_state_event, 2}]}).
-endif. -endif.
-ifdef(slow_test).
-define(KEYCOUNT, 2048).
-else.
-define(KEYCOUNT, 16384).
-endif.
-export([init/1, -export([init/1,
handle_sync_event/4, handle_sync_event/4,
handle_event/3, handle_event/3,
@ -2235,10 +2241,10 @@ generate_sequentialkeys(Count, KVList) ->
generate_sequentialkeys(Count - 1, KVList ++ [KV]). generate_sequentialkeys(Count - 1, KVList ++ [KV]).
get_keys_byposition_manykeys_test_() -> get_keys_byposition_manykeys_test_() ->
{timeout, 120, fun get_keys_byposition_manykeys_test_to/0}. {timeout, 600, fun get_keys_byposition_manykeys_test_to/0}.
get_keys_byposition_manykeys_test_to() -> get_keys_byposition_manykeys_test_to() ->
KeyCount = 16384, KeyCount = ?KEYCOUNT,
{ok, P1} = cdb_open_writer("../test/poskeymany.pnd", {ok, P1} = cdb_open_writer("../test/poskeymany.pnd",
#cdb_options{binary_mode=false}), #cdb_options{binary_mode=false}),
KVList = generate_sequentialkeys(KeyCount, []), KVList = generate_sequentialkeys(KeyCount, []),