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

* fix trvinlinenode.second_fma

Browse Source
This commit is contained in:
florian 2025-01-01 18:00:05 +01:00
parent ceed183e33
commit 5add799193
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/riscv/nrvinl.pas
View File

@ -367,7 +367,8 @@ implementation
location_reset(location,LOC_FPUREGISTER,paraarray[1].location.size); location_reset(location,LOC_FPUREGISTER,paraarray[1].location.size);
location.register:=cg.getfpuregister(current_asmdata.CurrAsmList,location.size); location.register:=cg.getfpuregister(current_asmdata.CurrAsmList,location.size);
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg_reg(op[def_cgsize(resultdef), negproduct,negop3],location.register,paraarray[1].location.register,paraarray[2].location.register,paraarray[2].location.register)); current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg_reg(op[def_cgsize(resultdef), negproduct,negop3],
location.register,paraarray[1].location.register,paraarray[2].location.register,paraarray[3].location.register));
cg.maybe_check_for_fpu_exception(current_asmdata.CurrAsmList); cg.maybe_check_for_fpu_exception(current_asmdata.CurrAsmList);
end end
else else