aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/test/gen_server_SUITE.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2016-02-28 07:42:35 +0100
committerBjörn Gustavsson <[email protected]>2016-03-09 12:08:36 +0100
commitd1fa4cb61880930ee19f81fbbfc59c8edb472a0f (patch)
tree5cedb9e19f75be39e6d86cdcdad1e42d5b4406cd /lib/stdlib/test/gen_server_SUITE.erl
parent511ff3279897028cabace38388d475eb4e4c56ec (diff)
downloadotp-d1fa4cb61880930ee19f81fbbfc59c8edb472a0f.tar.gz
otp-d1fa4cb61880930ee19f81fbbfc59c8edb472a0f.tar.bz2
otp-d1fa4cb61880930ee19f81fbbfc59c8edb472a0f.zip
Eliminate use of test_server:do_times()
Diffstat (limited to 'lib/stdlib/test/gen_server_SUITE.erl')
-rw-r--r--lib/stdlib/test/gen_server_SUITE.erl12
1 files changed, 9 insertions, 3 deletions
diff --git a/lib/stdlib/test/gen_server_SUITE.erl b/lib/stdlib/test/gen_server_SUITE.erl
index 5f29fc911d..1ada226215 100644
--- a/lib/stdlib/test/gen_server_SUITE.erl
+++ b/lib/stdlib/test/gen_server_SUITE.erl
@@ -1050,11 +1050,17 @@ otp_5854(Config) when is_list(Config) ->
%% returns.
otp_7669(Config) when is_list(Config) ->
- ?line ?t:do_times(100, fun do_otp_7669_local_ignore/0),
- ?line ?t:do_times(100, fun do_otp_7669_global_ignore/0),
- ?line ?t:do_times(10, fun do_otp_7669_stop/0),
+ do_times(100, fun do_otp_7669_local_ignore/0),
+ do_times(100, fun do_otp_7669_global_ignore/0),
+ do_times(10, fun do_otp_7669_stop/0),
ok.
+do_times(0, _) ->
+ ok;
+do_times(N, Fun) ->
+ Fun(),
+ do_times(N-1, Fun).
+
do_otp_7669_local_ignore() ->
%% The name should never be registered after the return
%% from gen_server:start/3.