mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-08 09:28:19 +02:00
* apply OptPass1FOP to FCVT.*.*
This commit is contained in:
parent
67bee1b652
commit
2cfb790eb7
@ -717,6 +717,7 @@ implementation
|
||||
A_FSQRT_S,
|
||||
A_FNEG_S,
|
||||
A_FLW,
|
||||
A_FCVT_D_S,
|
||||
A_FMADD_S,A_FMSUB_S,A_FNMSUB_S,A_FNMADD_S:
|
||||
result:=OptPass1FOP(p,A_FSGNJ_S);
|
||||
A_FADD_D,
|
||||
@ -726,6 +727,7 @@ implementation
|
||||
A_FSQRT_D,
|
||||
A_FNEG_D,
|
||||
A_FLD,
|
||||
A_FCVT_S_D,
|
||||
A_FMADD_D,A_FMSUB_D,A_FNMSUB_D,A_FNMADD_D:
|
||||
result:=OptPass1FOP(p,A_FSGNJ_D);
|
||||
else
|
||||
|
Loading…
Reference in New Issue
Block a user