diff options
author | Ingela Anderton Andin <[email protected]> | 2013-11-18 10:34:04 +0100 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2013-12-02 09:50:27 +0100 |
commit | bae8fb577c0c3d2f5a3db31a34e584c8d7ccab6e (patch) | |
tree | 1188bc6a808d3f7adf19aaa721576631009dd58d /lib/ssl/test/ssl_to_openssl_SUITE.erl | |
parent | c9a45539359d71aa0c68c9ca45b8015dd0e1b9cd (diff) | |
download | otp-bae8fb577c0c3d2f5a3db31a34e584c8d7ccab6e.tar.gz otp-bae8fb577c0c3d2f5a3db31a34e584c8d7ccab6e.tar.bz2 otp-bae8fb577c0c3d2f5a3db31a34e584c8d7ccab6e.zip |
ssl: Test case enhancement
Make sure that test cases does not fail due to timing circumstances,
use selective receive even if it means we can not use test library functions
in some cases. TCP does not have delivery guarantee to application layer,
so sometimes a error message {error, Msg} or {error, closed} can be acceptable.
Diffstat (limited to 'lib/ssl/test/ssl_to_openssl_SUITE.erl')
-rw-r--r-- | lib/ssl/test/ssl_to_openssl_SUITE.erl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/ssl/test/ssl_to_openssl_SUITE.erl b/lib/ssl/test/ssl_to_openssl_SUITE.erl index b576b8f70d..21f0172dba 100644 --- a/lib/ssl/test/ssl_to_openssl_SUITE.erl +++ b/lib/ssl/test/ssl_to_openssl_SUITE.erl @@ -897,8 +897,11 @@ ssl2_erlang_server_openssl_client(Config) when is_list(Config) -> OpenSslPort = open_port({spawn, Cmd}, [stderr_to_stdout]), true = port_command(OpenSslPort, Data), + + ct:log("Ports ~p~n", [[erlang:port_info(P) || P <- erlang:ports()]]), receive - {'EXIT', OpenSslPort, _} -> + {'EXIT', OpenSslPort, _} = Exit -> + ct:log("Received: ~p ~n", [Exit]), ok end, |