Hi all,
It took a bit longer than expected, but I'm happy to inform you that the
Lazarus services are back online.
For those interested in why it took longer, I'll explain at the end of
the message.
Marc
On 24-12-2021 08:30, Marc Weustink wrote:
Hi,
On Monday 27 December 9.00 CET (8.00
https://www.freepascal.org/docs-html/prog/progse55.html
When analysing the mylib.o output file under Linux with
nm -D mylib.o
the answer is: no symbols.
I have an export section in the library and in the past it worked already, but
I did not remember exactly how.
How can I get a shared
On Tue, 28 Dec 2021, Graeme Geldenhuys via fpc-pascal wrote:
On 2021-12-28 15:25, Michael Van Canneyt via fpc-pascal wrote:
Thanks to the magic of RTTI and Invoke(), creating a JSON-RPC server has
just become significantly easier !
That's pretty neat - nicely done Michael.
We do our
On Tue, 28 Dec 2021 23:11:42 +0100 (CET)
Michael Van Canneyt via fpc-pascal
wrote:
>[...]
> > Slightly off topic, and my Object Pascal is getting a bit rusty as
> > the years go by. ;-) In your factory above, is the "as
> > IInterface" part needed.
No.
> Can't the FPC compiler automatically
Ok.
'lib' is placed in front of the output file and '.so' afterwards.
So the library is "libmylib.so"
And "nm -D libmylib.so" works now.
But it is confusing, because it is nowhere explained in the compiler.
[x] Konventionen anwenden
[x] use conventions
In the Project settings -> path window
On 2021-12-28 15:25, Michael Van Canneyt via fpc-pascal wrote:
Thanks to the magic of RTTI and Invoke(), creating a JSON-RPC server has
just become significantly easier !
That's pretty neat - nicely done Michael.
// Create a class that implements the interface
Type
TIntf2Impl =
Hello,
Thanks to the magic of RTTI and Invoke(), creating a JSON-RPC server has
just become significantly easier !
Given an interface definition:
IMyOtherInterface = interface ['{4D52BEE3-F709-44AC-BD31-870CBFF44632}']
Function SayHello : string;
function Echo(args : TStringArray) :
May be that helps a little bit.
Please give a feedback if it works or not or if you can improve it.
I use the curl library directly. Not on the command line.
{$ifdef windows}
uses sockets , winsock2;
procedure adds2( var dw : dword ; p : pointer );
var
addr : pinaddr;
begin
addr := p;
if
