diff --git a/compiler/wasm32/cpupara.pas b/compiler/wasm32/cpupara.pas index 80ee9a075d..f5646d0bf4 100644 --- a/compiler/wasm32/cpupara.pas +++ b/compiler/wasm32/cpupara.pas @@ -99,7 +99,7 @@ implementation recorddef : begin { Delphi stdcall passes records on the stack for call by value } - result:=(varspez=vs_const) or (def.size=0); + result:=(varspez=vs_const) or (not (def.size in [1,2,4,8])); end; arraydef : begin