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

* converted last part of second_real_to_real() to the high level code

Browse Source 
generator

git-svn-id: trunk@32546 -
This commit is contained in:
Jonas Maebe 2015-11-27 14:44:37 +00:00
parent f97192edf9
commit 64c4e16f8b
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/ncgcnv.pas
View File

@ -457,7 +457,7 @@ interface
begin begin
hlcg.location_force_mmregscalar(current_asmdata.CurrAsmList,left.location,left.resultdef,false); hlcg.location_force_mmregscalar(current_asmdata.CurrAsmList,left.location,left.resultdef,false);
location.register:=cg.getmmregister(current_asmdata.CurrAsmList,location.size); location.register:=cg.getmmregister(current_asmdata.CurrAsmList,location.size);
cg.a_loadmm_reg_reg(current_asmdata.CurrAsmList,left.location.size,location.size,left.location.register,location.register,mms_movescalar); hlcg.a_loadmm_reg_reg(current_asmdata.CurrAsmList,left.resultdef,resultdef,left.location.register,location.register,mms_movescalar);
end end
else else
internalerror(2003012262); internalerror(2003012262);