[fpc-devel] OpenSSL

[Dave Connolly]

Perfect - thank you.



On Wed, 22 May 2019 at 12:35, Michael Van Canneyt <michael at freepascal.org>
wrote:

>
>
> 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 <
> michael at 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 at lists.freepascal.org
> >> http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
> >>
> >
> _______________________________________________
> fpc-devel maillist  -  fpc-devel at lists.freepascal.org
> http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20190522/c402d671/attachment.html>