diff options
author | Ingela Anderton Andin <[email protected]> | 2016-06-28 09:53:35 +0200 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2016-06-28 09:53:35 +0200 |
commit | 76a5eedf33ab375fea1e834e4d5708cdf0e507f4 (patch) | |
tree | 400e00fbf0df8deffab8887ffc10880de8390f5d /lib/ssl/test/ssl_dist_SUITE.erl | |
parent | d8d66f375de102681d9f6cffb932f1fd4cbfc445 (diff) | |
download | otp-76a5eedf33ab375fea1e834e4d5708cdf0e507f4.tar.gz otp-76a5eedf33ab375fea1e834e4d5708cdf0e507f4.tar.bz2 otp-76a5eedf33ab375fea1e834e4d5708cdf0e507f4.zip |
ssl: All started test nodes must be cleaned up
Function to stop SSL/TLS node may not exit as a test case will start more than
one node and all nodes must be stopped.
Diffstat (limited to 'lib/ssl/test/ssl_dist_SUITE.erl')
-rw-r--r-- | lib/ssl/test/ssl_dist_SUITE.erl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/ssl/test/ssl_dist_SUITE.erl b/lib/ssl/test/ssl_dist_SUITE.erl index 55aa2eda2d..8740e8c8f0 100644 --- a/lib/ssl/test/ssl_dist_SUITE.erl +++ b/lib/ssl/test/ssl_dist_SUITE.erl @@ -680,13 +680,15 @@ stop_ssl_node(#node_handle{connection_handler = Handler, receive {'DOWN', Mon, process, Handler, Reason} -> case Reason of - normal -> ok; - _ -> exit(Reason) + normal -> + ok; + _ -> + ct:pal("Down ~p ~n", [Reason]) end end; Error -> erlang:demonitor(Mon, [flush]), - exit(Error) + ct:pal("Warning ~p ~n", [Error]) end. start_ssl_node(Config) -> |