Explorar el Código

* make functions, that return result in param to not have a return type in WebAssembly

git-svn-id: branches/wasm@48260 -
nickysn hace 4 años
padre
commit
4d758a64c2
Se han modificado 1 ficheros con 2 adiciones y 1 borrados
  1. 2 1
      compiler/wasm32/symcpu.pas

+ 2 - 1
compiler/wasm32/symcpu.pas

@@ -257,7 +257,8 @@ implementation
               end;
             end;
         end;
-      if Assigned(returndef) and (returndef.size>0) then
+      if Assigned(returndef) and (returndef.size>0) and
+         not paramanager.ret_in_param(returndef,self) then
         begin
           if not defToWasmBasic(returndef,bt) then
             bt:=wbt_i32;