paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 14:29:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* handle -<mm reg.> more cleverly if SSE is used

Browse Source
This commit is contained in:
florian 2021-09-18 22:11:03 +02:00
parent 5a2d884fe3
commit 5bcc530707
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/x86/nx86mat.pas
View File

@ -215,10 +215,8 @@ interface
begin begin
reg:=cg.getmmregister(current_asmdata.CurrAsmList,def_cgsize(resultdef)); reg:=cg.getmmregister(current_asmdata.CurrAsmList,def_cgsize(resultdef));
cg.a_loadmm_ref_reg(current_asmdata.CurrAsmList,def_cgsize(resultdef),def_cgsize(resultdef),href,reg,mms_movescalar); cg.a_loadmm_ref_reg(current_asmdata.CurrAsmList,def_cgsize(resultdef),def_cgsize(resultdef),href,reg,mms_movescalar);
if not(left.location.loc=LOC_MMREGISTER) then location.register:=reg;
hlcg.location_force_mmregscalar(current_asmdata.CurrAsmList,left.location,left.resultdef,true); cg.a_opmm_loc_reg(current_asmdata.CurrAsmList,OP_XOR,left.location.size,left.location,location.register,mms_movescalar);
location.register:=left.location.register;
cg.a_opmm_reg_reg(current_asmdata.CurrAsmList,OP_XOR,left.location.size,reg,location.register,mms_movescalar);
end; end;
end; end;
end end