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

* fixed web bug #3533

Browse Source
This commit is contained in:
Jonas Maebe 2005-03-01 21:28:50 +00:00
parent 92a2ba07ad
commit 43c5b3fd29
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/ncgadd.pas
View File

@ -140,6 +140,10 @@ interface
cg.a_loadfpu_loc_reg(exprasmlist,left.location,tmpreg);
location_reset(left.location,LOC_FPUREGISTER,left.location.size);
left.location.register := tmpreg;
{$ifdef x86}
{ left operand is now on top of the stack, instead of the right one! }
toggleflag(nf_swaped);
{$endif x86}
end;
end;
@ -789,7 +793,10 @@ begin
end.
{
$Log$
Revision 1.44 2005-02-15 19:53:41 florian
Revision 1.45 2005-03-01 21:28:50 jonas
* fixed web bug 3533
Revision 1.44 2005/02/15 19:53:41 florian
* don't generate overflow results if they aren't necessary
* fixed op_reg_reg_reg_reg on arm