aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssl/test/ssl_basic_SUITE.erl
diff options
context:
space:
mode:
authorIngela Anderton Andin <[email protected]>2011-10-27 16:26:29 +0200
committerIngela Anderton Andin <[email protected]>2011-11-15 12:09:37 +0100
commita6e27f130151617926077c34789a4cd159076da0 (patch)
treecd70cf8ad05bb87bc85b3981851d5a395a563ef3 /lib/ssl/test/ssl_basic_SUITE.erl
parent2851ac4e11375e7870a9d7be23a307aff31f270b (diff)
downloadotp-a6e27f130151617926077c34789a4cd159076da0.tar.gz
otp-a6e27f130151617926077c34789a4cd159076da0.tar.bz2
otp-a6e27f130151617926077c34789a4cd159076da0.zip
Adjustment to work with hipe
process_info(Pid, current_function) may return {current_function, undefined} in some cases but will not in the importante one!
Diffstat (limited to 'lib/ssl/test/ssl_basic_SUITE.erl')
-rw-r--r--lib/ssl/test/ssl_basic_SUITE.erl9
1 files changed, 4 insertions, 5 deletions
diff --git a/lib/ssl/test/ssl_basic_SUITE.erl b/lib/ssl/test/ssl_basic_SUITE.erl
index 3c79ede111..d9cb8002ed 100644
--- a/lib/ssl/test/ssl_basic_SUITE.erl
+++ b/lib/ssl/test/ssl_basic_SUITE.erl
@@ -2592,7 +2592,7 @@ client_renegotiate(Config) when is_list(Config) ->
{options, ServerOpts}]),
Port = ssl_test_lib:inet_port(Server),
- Client = ssl_test_lib:start_client([{node, ClientNode}, {port, Port},
+ Client = ssl_test_lib:start_client([{node, ClientNode}, {port, Port},
{host, Hostname},
{from, self()},
{mfa, {?MODULE,
@@ -3589,14 +3589,13 @@ hibernate(Config) ->
{from, self()},
{mfa, {?MODULE, send_recv_result_active, []}},
{options, [{hibernate_after, 1000}|ClientOpts]}]),
-
- { current_function, { _M, _F, _A } } =
+ {current_function, _} =
process_info(Pid, current_function),
timer:sleep(1100),
- { current_function, { erlang, hibernate, 3} } =
- process_info(Pid, current_function),
+ {current_function, {erlang, hibernate, 3}} =
+ process_info(Pid, current_function),
ssl_test_lib:close(Server),
ssl_test_lib:close(Client).