summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/ct_helper.erl7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/ct_helper.erl b/src/ct_helper.erl
index 8a08a50..044d4f4 100644
--- a/src/ct_helper.erl
+++ b/src/ct_helper.erl
@@ -150,10 +150,17 @@ get_tls_state(TLSPid) ->
{_, #state{connection_env=#connection_env{user_application={_, UserPid}}}} = sys:get_state(TLSPid),
UserPid.
-else.
+%% This is defined in ssl_record.hrl starting from OTP-21.3.
+-ifdef(KNOWN_RECORD_TYPE).
+get_tls_state(TLSPid) ->
+ {_, #state{connection_env=#connection_env{user_application={_, UserPid}}}} = sys:get_state(TLSPid),
+ UserPid.
+-else.
get_tls_state(TLSPid) ->
{_, #state{user_application={_, UserPid}}} = sys:get_state(TLSPid),
UserPid.
-endif.
+-endif.
-else.
get_tls_state(TLSPid) ->
{_, #state{user_application={_, UserPid}}} = sys:get_state(TLSPid),