summaryrefslogtreecommitdiff
path: root/lib/common_test/test
diff options
context:
space:
mode:
authorDan Gudmundsson <dgud@erlang.org>2020-02-25 10:49:43 +0100
committerDan Gudmundsson <dgud@erlang.org>2020-02-25 10:49:43 +0100
commit0acd20f80302b117c6a547d57abaf1c8477aedfd (patch)
treecd1bc905603b92dd807dfc1167c7ee545eb415a2 /lib/common_test/test
parentc8b1f98b92f05a80a2ba8c9bcd9675f135f49f2d (diff)
downloaderlang-0acd20f80302b117c6a547d57abaf1c8477aedfd.tar.gz
Reduce timer:sleep
Causes test runs to take an unnecessary long time
Diffstat (limited to 'lib/common_test/test')
-rw-r--r--lib/common_test/test/ct_repeat_testrun_SUITE.erl6
-rw-r--r--lib/common_test/test/ct_repeat_testrun_SUITE_data/a_test/r1_SUITE.erl2
2 files changed, 4 insertions, 4 deletions
diff --git a/lib/common_test/test/ct_repeat_testrun_SUITE.erl b/lib/common_test/test/ct_repeat_testrun_SUITE.erl
index 9382e4c011..79b9c4d549 100644
--- a/lib/common_test/test/ct_repeat_testrun_SUITE.erl
+++ b/lib/common_test/test/ct_repeat_testrun_SUITE.erl
@@ -94,9 +94,9 @@ init_per_suite(Config0) ->
[Opts3],Config)
end),
%% The time to compare with here must match the timeout value
- %% in the test suite. Accept 30% logging overhead (26 sec total).
- if T > 26000000 ->
- ct:pal("Timing test took ~w sec (< 27 sec expected). "
+ %% in the test suite. Accept some overhead
+ if T > 5000 ->
+ ct:pal("Timing test took ~w sec (< 5 sec expected). "
"Skipping the suite!",
[trunc(T/1000000)]),
ct_test_support:end_per_suite(Config),
diff --git a/lib/common_test/test/ct_repeat_testrun_SUITE_data/a_test/r1_SUITE.erl b/lib/common_test/test/ct_repeat_testrun_SUITE_data/a_test/r1_SUITE.erl
index 1a305b1516..de521a5622 100644
--- a/lib/common_test/test/ct_repeat_testrun_SUITE_data/a_test/r1_SUITE.erl
+++ b/lib/common_test/test/ct_repeat_testrun_SUITE_data/a_test/r1_SUITE.erl
@@ -61,7 +61,7 @@ end_per_testcase(_Case, Config) ->
%%%-----------------------------------------------------------------
%%% Test cases
tc1(_Config) ->
- ct:sleep(10000),
+ timer:sleep(1000),
ok.
tc2(_Config) ->