paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-28 20:00:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed bug, introduced in 6ff566350c, due to

Browse Source 
missing parenthesis
This commit is contained in:
Nikolay Nikolov 2023-06-11 09:01:07 +03:00
parent 64569df017
commit 3d55ac9d09
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/wasm32/nwasmcal.pas
View File

@ -70,8 +70,8 @@ implementation
begin
pvs:=tparavarsym(procdefinition.paras[paranr]);
if is_wasm_reference_type(p.left.resultdef) and
(pvs.varspez in [vs_var,vs_constref]) or
((pvs.varspez=vs_const) and (pvs.vardef.typ=formaldef)) then
((pvs.varspez in [vs_var,vs_constref,vs_out]) or
((pvs.varspez=vs_const) and (pvs.vardef.typ=formaldef))) then
CGMessage(parser_e_wasm_ref_types_can_only_be_passed_by_value);
Inc(paranr);
p:=tcallparanode(tcallparanode(p).right);