diff options
| author | Björn Gustavsson <[email protected]> | 2017-06-13 10:00:15 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2017-06-13 12:24:59 +0200 |
| commit | a54014638c6a1cd0a3e7b1ee36998756a475684b (patch) | |
| tree | 8d15455128bc9189e58f3431c809cbee8ab66eed | |
| parent | 0725fe8296204a61f3dbc57142bfd458a45dd547 (diff) | |
| download | otp-a54014638c6a1cd0a3e7b1ee36998756a475684b.tar.gz otp-a54014638c6a1cd0a3e7b1ee36998756a475684b.tar.bz2 otp-a54014638c6a1cd0a3e7b1ee36998756a475684b.zip | |
message_queue_data_SUITE: Don't leave processes running
| -rw-r--r-- | erts/emulator/test/message_queue_data_SUITE.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/erts/emulator/test/message_queue_data_SUITE.erl b/erts/emulator/test/message_queue_data_SUITE.erl index e084b9482d..0fd86155fb 100644 --- a/erts/emulator/test/message_queue_data_SUITE.erl +++ b/erts/emulator/test/message_queue_data_SUITE.erl @@ -169,7 +169,7 @@ total_heap_size(_Config) -> Fun = fun F() -> receive Pid when is_pid(Pid) -> Pid ! ok,F() end end, %% Test that on_heap messages grow the heap even if they are not received - OnPid = spawn_opt(Fun, [{message_queue_data, on_heap}]), + OnPid = spawn_opt(Fun, [{message_queue_data, on_heap},link]), {total_heap_size, OnSize} = erlang:process_info(OnPid, total_heap_size), [OnPid ! lists:duplicate(N,N) || N <- lists:seq(1,100)], OnPid ! self(), receive ok -> ok end, @@ -178,7 +178,7 @@ total_heap_size(_Config) -> true = OnSize < OnSizeAfter, %% Test that off_heap messages do not grow the heap if they are not received - OffPid = spawn_opt(Fun, [{message_queue_data, off_heap}]), + OffPid = spawn_opt(Fun, [{message_queue_data, off_heap},link]), {total_heap_size, OffSize} = erlang:process_info(OffPid, total_heap_size), [OffPid ! lists:duplicate(N,N) || N <- lists:seq(1,100)], OffPid ! self(), receive ok -> ok end, |