paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-06 10:50:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* optimized float to float conversion

Browse Source
This commit is contained in:
florian 2004-12-25 10:48:17 +00:00
parent 2f8040263d
commit 0ad4b9d394
1 changed files with 16 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
compiler/ncgcnv.pas
View File

@ -298,9 +298,18 @@ interface
end;
LOC_CREFERENCE,
LOC_REFERENCE:
begin
location.register:=cg.getfpuregister(exprasmlist,left.location.size);
cg.a_loadfpu_loc_reg(exprasmlist,left.location,location.register);
begin
if expectloc=LOC_MMREGISTER then
begin
location_reset(location,LOC_MMREGISTER,def_cgsize(resulttype.def));
location.register:=cg.getmmregister(exprasmlist,left.location.size);
cg.a_loadmm_loc_reg(exprasmlist,def_cgsize(resulttype.def),left.location,location.register,mms_movescalar)
end
else
begin
location.register:=cg.getfpuregister(exprasmlist,left.location.size);
cg.a_loadfpu_loc_reg(exprasmlist,left.location,location.register);
end;
location_freetemp(exprasmlist,left.location);
end;
LOC_MMREGISTER,
@ -541,7 +550,10 @@ end.
{
$Log$
Revision 1.68 2004-12-11 15:25:40 jonas
Revision 1.69 2004-12-25 10:48:17 florian
* optimized float to float conversion
Revision 1.68 2004/12/11 15:25:40 jonas
- removed superfluous location_force_reg() in second_nothing
Revision 1.67 2004/12/10 23:38:54 jonas