[fpc-pascal] Regression in 3.2.0 ??

[Michael Van Canneyt]

On Tue, 18 Aug 2020, Peter via fpc-pascal wrote:

> I wondering if there is a regression in 3.2.0. The Lazarus file fpguiwsprivate.pp no longer compiles. It was fine in 3.0.4.
>
> The error message "No matching implementation for interface method ... CDecl; found "
> is strange as the interface and implementation are both clearly defined as stdcall. I can find no reference to CDecl in
> the release notes, and stdcall only mentioned under Darwin. (I'm using x86_64).
>
> function TFPGUIPrivate._AddRef: longint; stdcall;
> begin
>   Result := -1;
> end;
>
> Has anyone any ideas to fix it?   It compiles if I change stdcall to CDecl, but I have no idea if that is a valid fix.
> (More info; see bug 37566)

It is a valid fix for non-windows platforms. So you'll have to ifdef this.

Michael.