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
