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

* my last commit hopefully fixed

Browse Source
This commit is contained in:
florian 2021-11-07 14:58:17 +01:00
parent 492d75483d
commit 7fcbd1d7e0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/x86/aoptx86.pas
View File

@ -6183,7 +6183,7 @@ unit aoptx86;
else else
begin begin
DebugMsg(SPeepholeOptimization + '(V)Cvtss2CvtSd(V)Cvtsd2ss2Vmovaps done',p); DebugMsg(SPeepholeOptimization + '(V)Cvtss2CvtSd(V)Cvtsd2ss2Vmovaps done',p);
if taicpu(hp1).opcode=A_VCVTSD2SS then if taicpu(hp1).opcode=A_CVTSD2SS then
begin begin
taicpu(p).loadreg(1,taicpu(hp1).oper[1]^.reg); taicpu(p).loadreg(1,taicpu(hp1).oper[1]^.reg);
taicpu(p).opcode:=A_MOVAPS; taicpu(p).opcode:=A_MOVAPS;