+ pass 64-bit structures by address in WebAssembly for compatibility with LLVM's C ABI

This commit is contained in:
Nikolay Nikolov 2021-10-13 08:13:13 +03:00
parent 321764bdd9
commit 236e10d03a

View File

@ -99,7 +99,7 @@ implementation
recorddef :
begin
{ Delphi stdcall passes records on the stack for call by value }
result:=(varspez=vs_const) or (not (def.size in [1,2,4,8]));
result:=(varspez=vs_const) or (not (def.size in [1,2,4{,8}]));
end;
arraydef :
begin