aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/test/heart_SUITE.erl
diff options
context:
space:
mode:
authorLukas Larsson <[email protected]>2016-06-10 08:34:36 +0200
committerLukas Larsson <[email protected]>2016-06-10 09:55:33 +0200
commit98068b0698d6cc0d0dd172ab575b1b4c74d864fb (patch)
treeee92967c8b91f4f8027b13a729486f5d68e5ff2d /lib/kernel/test/heart_SUITE.erl
parent85996c92853e90cb233a1405b1c8c7bb1b8ca54e (diff)
downloadotp-98068b0698d6cc0d0dd172ab575b1b4c74d864fb.tar.gz
otp-98068b0698d6cc0d0dd172ab575b1b4c74d864fb.tar.bz2
otp-98068b0698d6cc0d0dd172ab575b1b4c74d864fb.zip
erts: Fix HEART_NO_KILL logic
Diffstat (limited to 'lib/kernel/test/heart_SUITE.erl')
-rw-r--r--lib/kernel/test/heart_SUITE.erl7
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/kernel/test/heart_SUITE.erl b/lib/kernel/test/heart_SUITE.erl
index 16b9f7a9ee..c18d12c2b2 100644
--- a/lib/kernel/test/heart_SUITE.erl
+++ b/lib/kernel/test/heart_SUITE.erl
@@ -70,7 +70,8 @@ all() -> [
set_cmd, clear_cmd, get_cmd,
callback_api,
options_api,
- kill_pid
+ kill_pid,
+ heart_no_kill
].
groups() ->
@@ -650,7 +651,9 @@ suicide_by_heart() ->
end.
non_suicide_by_heart() ->
- P = open_port({spawn,"heart -ht 11 -pid "++os:getpid()},[exit_status, {env, {"HEART_NO_KILL", "TRUE"}}, {packet,2}]),
+ P = open_port({spawn,"heart -ht 11 -pid "++os:getpid()},
+ [exit_status, {env, [{"HEART_NO_KILL", "TRUE"}]},
+ {packet,2}]),
receive X -> X end,
%% Just hang and wait for heart to timeout
receive