diff options
| author | Ingela Anderton Andin <[email protected]> | 2011-10-25 16:28:18 +0200 |
|---|---|---|
| committer | Ingela Anderton Andin <[email protected]> | 2011-11-15 12:09:36 +0100 |
| commit | b445524f1f5910eac1df0ef776908e8dffe04d02 (patch) | |
| tree | d2c5e334cd1e4a00754739a1090d43ec971ab0e2 /lib/ssl/test/ssl_dist_SUITE.erl | |
| parent | 9ffaef655d7d3df24b7edde2900c224a858b763d (diff) | |
| download | otp-b445524f1f5910eac1df0ef776908e8dffe04d02.tar.gz otp-b445524f1f5910eac1df0ef776908e8dffe04d02.tar.bz2 otp-b445524f1f5910eac1df0ef776908e8dffe04d02.zip | |
Add better error message
Diffstat (limited to 'lib/ssl/test/ssl_dist_SUITE.erl')
| -rw-r--r-- | lib/ssl/test/ssl_dist_SUITE.erl | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lib/ssl/test/ssl_dist_SUITE.erl b/lib/ssl/test/ssl_dist_SUITE.erl index bbb9c49ec6..08d0194ae3 100644 --- a/lib/ssl/test/ssl_dist_SUITE.erl +++ b/lib/ssl/test/ssl_dist_SUITE.erl @@ -472,8 +472,10 @@ cnct2tstsrvr([Host, Port]) when is_list(Host), is_list(Port) -> ets:insert(test_server_info, {test_server_handler, self()}), ssl_node_con_loop(Socket); - _Error -> - halt("Failed to connect to test server") + Error -> + halt("Failed to connect to test server " ++ + lists:flatten(io_lib:format("Host:~p ~n Port:~p~n Error:~p~n", + [Host, Port, Error]))) end end), spawn(fun () -> @@ -481,9 +483,8 @@ cnct2tstsrvr([Host, Port]) when is_list(Host), is_list(Port) -> receive {'DOWN', Mon, process, ConnHandler, Reason} -> receive after 1000 -> ok end, - halt("test server connection handler terminated: " - ++ - lists:flatten(io_lib:format("~p", [Reason]))) + halt("test server connection handler terminated: " ++ + lists:flatten(io_lib:format("~p", [Reason]))) end end). |