Просмотр исходного кода

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

Nikolay Nikolov 4 лет назад
Родитель
Сommit
236e10d03a
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      compiler/wasm32/cpupara.pas

+ 1 - 1
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 (not (def.size in [1,2,4,8]));
+              result:=(varspez=vs_const) or (not (def.size in [1,2,4{,8}]));
             end;
           arraydef :
             begin