Indeed. Silly me...
Added to interface, revision 42114.
Michael.
On Wed, 22 May 2019, Dave Connolly wrote:
Just missing the function definition
function OpenSSLGetVersion(t: cint):String;
On Wed, 22 May 2019 at 11:53, Michael Van Canneyt <mich...@freepascal.org>
wrote:
On Wed, 22 May 2019, Dave Connolly wrote:
Hi all,
Would it be possible to add the following function to openssl.pas?
_OpenSSLVersion := GetProcAddr(SSLLibHandle, 'OpenSSL_version');
.
.
.
function OpenSSLGetVersion(t: cint):String;
begin
if InitSSLInterface and Assigned(_OpenSSLVersion) then
Result := _OpenSSL_version(t)
else
Result := '';
end;
Added, revision 42113. Please test and let me know if it is ok.
Michael.
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel