aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/test
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2017-07-25 20:23:53 +0200
committerSverker Eriksson <[email protected]>2017-07-25 20:23:53 +0200
commit0b4e79dc173d562d05d93867d5cc9f1711ad0582 (patch)
treed13fb0540250fe5cec181fd8756065f94f701287 /erts/emulator/test
parent13193403c7ec44632db37b455640867c1cf87f60 (diff)
parent5e8f74d6c2d98f22e5f32e866064974de6ee4e33 (diff)
downloadotp-0b4e79dc173d562d05d93867d5cc9f1711ad0582.tar.gz
otp-0b4e79dc173d562d05d93867d5cc9f1711ad0582.tar.bz2
otp-0b4e79dc173d562d05d93867d5cc9f1711ad0582.zip
Merge branch 'sverker/enif_whereis-bug/OTP-14523' into maint
* sverker/enif_whereis-bug: erts: Fix bug in enif_whereis_pid/port
Diffstat (limited to 'erts/emulator/test')
-rw-r--r--erts/emulator/test/nif_SUITE.erl10
1 files changed, 7 insertions, 3 deletions
diff --git a/erts/emulator/test/nif_SUITE.erl b/erts/emulator/test/nif_SUITE.erl
index 05c250125d..0337274178 100644
--- a/erts/emulator/test/nif_SUITE.erl
+++ b/erts/emulator/test/nif_SUITE.erl
@@ -2886,11 +2886,15 @@ nif_whereis_parallel(Config) when is_list(Config) ->
true = lists:all(PidReg, Procs),
%% tell them all to 'fire' as fast as we can
- [P ! {Ref, send_proc} || {_, P, _} <- Procs],
+ repeat(10, fun(_) ->
+ [P ! {Ref, send_proc} || {_, P, _} <- Procs]
+ end, void),
%% each gets forwarded through two processes
- true = lists:all(RecvNum, NSeq),
- true = lists:all(RecvNum, NSeq),
+ repeat(10, fun(_) ->
+ true = lists:all(RecvNum, NSeq),
+ true = lists:all(RecvNum, NSeq)
+ end, void),
%% tell them all to 'quit' by name
[N ! {Ref, quit} || {N, _, _} <- Procs],