diff options
| author | Sverker Eriksson <[email protected]> | 2017-07-25 20:27:16 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2017-07-25 20:27:16 +0200 |
| commit | 72d994d7a6251e6ec72cf864b11309e01c50ba1f (patch) | |
| tree | e2f9d852a4ae0d0ce39cb3b9f772d8ed0491b551 /erts/emulator/test/nif_SUITE.erl | |
| parent | a9b807733847d4ba8411af4f97fa71bf91b81c22 (diff) | |
| parent | 0b4e79dc173d562d05d93867d5cc9f1711ad0582 (diff) | |
| download | otp-72d994d7a6251e6ec72cf864b11309e01c50ba1f.tar.gz otp-72d994d7a6251e6ec72cf864b11309e01c50ba1f.tar.bz2 otp-72d994d7a6251e6ec72cf864b11309e01c50ba1f.zip | |
Merge branch 'maint'
Diffstat (limited to 'erts/emulator/test/nif_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/nif_SUITE.erl | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/erts/emulator/test/nif_SUITE.erl b/erts/emulator/test/nif_SUITE.erl index 47f9a6e712..ef66f0bbfc 100644 --- a/erts/emulator/test/nif_SUITE.erl +++ b/erts/emulator/test/nif_SUITE.erl @@ -2881,11 +2881,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], |