diff options
author | Ingela Anderton Andin <[email protected]> | 2015-03-03 11:01:42 +0100 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2015-03-06 09:07:42 +0100 |
commit | be0f9642199c9a0d4ce2a98276f7b783a71d90f5 (patch) | |
tree | a8ef9b36069df27c4caa161ba5de9b62cbd9b098 | |
parent | 27f4f54b13159ef9d2c430e2107ce2803374cfc3 (diff) | |
download | otp-be0f9642199c9a0d4ce2a98276f7b783a71d90f5.tar.gz otp-be0f9642199c9a0d4ce2a98276f7b783a71d90f5.tar.bz2 otp-be0f9642199c9a0d4ce2a98276f7b783a71d90f5.zip |
ssl: Workaround test server halfwordemulator bug
As the halfwordemulator is deprecated just skip the test case
during the circumstances that provokes the bug.
-rw-r--r-- | lib/ssl/test/ssl_upgrade_SUITE.erl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/ssl/test/ssl_upgrade_SUITE.erl b/lib/ssl/test/ssl_upgrade_SUITE.erl index 6a6a1b4a7a..c83fb367dc 100644 --- a/lib/ssl/test/ssl_upgrade_SUITE.erl +++ b/lib/ssl/test/ssl_upgrade_SUITE.erl @@ -38,8 +38,8 @@ all() -> init_per_suite(Config0) -> catch crypto:stop(), - try crypto:start() of - ok -> + try {crypto:start(), erlang:system_info({wordsize, internal}) == erlang:system_info({wordsize, external})} of + {ok, true} -> case ct_release_test:init(Config0) of {skip, Reason} -> {skip, Reason}; @@ -49,7 +49,9 @@ init_per_suite(Config0) -> ?config(priv_dir, Config))), ct:log("Make certs ~p~n", [Result]), ssl_test_lib:cert_options(Config) - end + end; + {ok, false} -> + {skip, "Test server will not handle halfwordemulator correctly. Skip as halfwordemulator is deprecated"} catch _:_ -> {skip, "Crypto did not start"} end. |