aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorxuming <[email protected]>2016-04-25 21:04:09 +0800
committerZandra <[email protected]>2016-04-26 16:33:32 +0200
commita52df823097eb0f8820f4e4d1cbe73b7754d735a (patch)
tree29443d464ba0dd9022fa185b419074af2b069400
parent77bbf2f1412dd75add960ca3208a9eba9f6f36d6 (diff)
downloadotp-a52df823097eb0f8820f4e4d1cbe73b7754d735a.tar.gz
otp-a52df823097eb0f8820f4e4d1cbe73b7754d735a.tar.bz2
otp-a52df823097eb0f8820f4e4d1cbe73b7754d735a.zip
Update global_group_SUITE.erl
-rw-r--r--lib/kernel/test/global_group_SUITE.erl10
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/kernel/test/global_group_SUITE.erl b/lib/kernel/test/global_group_SUITE.erl
index 06a5b7fcfe..594ee6b537 100644
--- a/lib/kernel/test/global_group_SUITE.erl
+++ b/lib/kernel/test/global_group_SUITE.erl
@@ -1153,6 +1153,16 @@ test_exit(Config) when is_list(Config) ->
rpc:call(Cp1, global_group, send, [king, "The message"]),
undefined = rpc:call(Cp1, global_group, whereis_name, [king]),
+ % make sure the search process really exits after every global_group operations
+ ProcessCount0 = rpc:call(Cp1, erlang, system_info, [process_count]),
+ _ = rpc:call(Cp1, global_group, whereis_name, [{node, Cp1nn}, whatever_pid_name]),
+ ProcessCount1 = rpc:call(Cp1, erlang, system_info, [process_count]),
+ _ = rpc:call(Cp1, global_group, registered_names, [{node, Cp1nn}]),
+ ProcessCount2 = rpc:call(Cp1, erlang, system_info, [process_count]),
+ _ = rpc:call(Cp1, global_group, send, [{node, Cp1nn}, whatever_pid_name, msg]),
+ ProcessCount3 = rpc:call(Cp1, erlang, system_info, [process_count]),
+ ProcessCount0 = ProcessCount1 = ProcessCount2 = ProcessCount3,
+
%% stop the nodes, and make sure names are released.
stop_node(Cp1),
stop_node(Cp2),