From b470a0c853d060d059e4890f6cbe6ef672edb6ea Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Wed, 13 May 2020 06:44:16 -0400 Subject: Switched to a non-deprecated call for TLS initialization --- jessl.f90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'jessl.f90') diff --git a/jessl.f90 b/jessl.f90 index 0ee890e..bd9d1fe 100644 --- a/jessl.f90 +++ b/jessl.f90 @@ -36,10 +36,10 @@ implicit none subroutine load_error_strings() bind(c, name="SSL_load_error_strings") end subroutine load_error_strings - function tls_v1_3_client_method() bind(c, name="TLSv1_2_client_method") + function tls_client_method() bind(c, name="TLS_client_method") use iso_c_binding - type(c_ptr)::tls_v1_3_client_method - end function tls_v1_3_client_method + type(c_ptr)::tls_client_method + end function tls_client_method function ctx_new(meth) bind(c, name="SSL_CTX_new") use iso_c_binding -- cgit v1.2.3