(Solved) Static linking in FPC 3.3.1 problem

[Igor Kokarev]

I get this error:

StaticLinkingUtils.pas(63,65) Fatal: Syntax error, "BEGIN" expected but "[" found

On this line:

Code: Pascal  [Select][+][-]

1. function _log(x: double): double; cdecl; export; {$ifdef Win64} [alias: 'log']; {$endif}
2. begin
3.   result := 0; // ln(x);
4. end;

I use this code to link statically some .o files from GCC compiler.

I attach full code in a file.

Lazarus 2.1.0 r63658 FPC 3.3.1 x86_64-win64-win32/win64

P.S. No problem with FPC 3.2.0

[Cyrax]

Change [alias: 'log']; to external name 'log'.

[Igor Kokarev]

Thanks, can you show full line of a code?

I get a new error:

Code: Pascal  [Select][+][-]

1. function _log(x: double): double; cdecl; export; external name 'log';

StaticLinkingUtils.pas(64,50) Error: Procedure directive "EXTERNAL" cannot be used with "EXPORT"

[Cyrax]

Remove export; directive.

[Cyrax]

Sorry, I just took a look at your unit file. Either change [alias: 'log'] to [public, alias: 'log'] or use public name 'log'.

https://www.freepascal.org/docs-html/ref/refsu71.html

[Igor Kokarev]

Thanks! Your solution helped me to compile my app in FPC Trunk!