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

* don't reuse mm registers used by child nodes

Browse Source 
git-svn-id: trunk@24897 -
This commit is contained in:
florian 2013-06-14 20:52:36 +00:00
parent e81d2d1f3b
commit d8ff85846f
1 changed files with 15 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
compiler/x86/nx86add.pas
View File

@ -769,7 +769,8 @@ unit nx86add;
{ we can use only right as left operand if the operation is commutative } { we can use only right as left operand if the operation is commutative }
else if (right.location.loc=LOC_MMREGISTER) and (op in [OP_ADD,OP_MUL]) then else if (right.location.loc=LOC_MMREGISTER) and (op in [OP_ADD,OP_MUL]) then
begin begin
location.register:=right.location.register; location.register:=cg.getmmregister(current_asmdata.CurrAsmList,location.size);
cg.a_loadmm_reg_reg(current_asmdata.CurrAsmList,right.location.size,location.size,right.location.register,location.register,mms_movescalar);
{ force floating point reg. location to be written to memory, { force floating point reg. location to be written to memory,
we don't force it to mm register because writing to memory we don't force it to mm register because writing to memory
allows probably shorter code because there is no direct fpu->mm register allows probably shorter code because there is no direct fpu->mm register
@ -781,11 +782,20 @@ unit nx86add;
end end
else else
begin begin
if (nf_swapped in flags) then if nf_swapped in flags then
swapleftright; swapleftright;
hlcg.location_force_mmregscalar(current_asmdata.CurrAsmList,left.location,left.resultdef,false); { force floating point reg. location to be written to memory,
location.register:=left.location.register; we don't force it to mm register because writing to memory
allows probably shorter code because there is no direct fpu->mm register
copy instruction
}
if left.location.loc in [LOC_FPUREGISTER,LOC_CFPUREGISTER] then
hlcg.location_force_mem(current_asmdata.CurrAsmList,left.location,left.resultdef);
location.register:=cg.getmmregister(current_asmdata.CurrAsmList,location.size);
cg.a_loadmm_loc_reg(current_asmdata.CurrAsmList,location.size,left.location,location.register,mms_movescalar);
{ force floating point reg. location to be written to memory, { force floating point reg. location to be written to memory,
we don't force it to mm register because writing to memory we don't force it to mm register because writing to memory
allows probably shorter code because there is no direct fpu->mm register allows probably shorter code because there is no direct fpu->mm register
@ -793,6 +803,7 @@ unit nx86add;
} }
if right.location.loc in [LOC_FPUREGISTER,LOC_CFPUREGISTER] then if right.location.loc in [LOC_FPUREGISTER,LOC_CFPUREGISTER] then
hlcg.location_force_mem(current_asmdata.CurrAsmList,right.location,right.resultdef); hlcg.location_force_mem(current_asmdata.CurrAsmList,right.location,right.resultdef);
cg.a_opmm_loc_reg(current_asmdata.CurrAsmList,op,location.size,right.location,location.register,mms_movescalar); cg.a_opmm_loc_reg(current_asmdata.CurrAsmList,op,location.size,right.location,location.register,mms_movescalar);
end; end;
end; end;