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

* apply OptPass1FOP to FCVT.*.*

Browse Source
This commit is contained in:
florian 2024-10-13 23:18:19 +02:00
parent 67bee1b652
commit 2cfb790eb7
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/riscv/aoptcpurv.pas
View File

@ -717,6 +717,7 @@ implementation
A_FSQRT_S, A_FSQRT_S,
A_FNEG_S, A_FNEG_S,
A_FLW, A_FLW,
A_FCVT_D_S,
A_FMADD_S,A_FMSUB_S,A_FNMSUB_S,A_FNMADD_S: A_FMADD_S,A_FMSUB_S,A_FNMSUB_S,A_FNMADD_S:
result:=OptPass1FOP(p,A_FSGNJ_S); result:=OptPass1FOP(p,A_FSGNJ_S);
A_FADD_D, A_FADD_D,
@ -726,6 +727,7 @@ implementation
A_FSQRT_D, A_FSQRT_D,
A_FNEG_D, A_FNEG_D,
A_FLD, A_FLD,
A_FCVT_S_D,
A_FMADD_D,A_FMSUB_D,A_FNMSUB_D,A_FNMADD_D: A_FMADD_D,A_FMSUB_D,A_FNMSUB_D,A_FNMADD_D:
result:=OptPass1FOP(p,A_FSGNJ_D); result:=OptPass1FOP(p,A_FSGNJ_D);
else else