paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-28 23:24:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed web bug #3694

Browse Source
This commit is contained in:
Jonas Maebe 2005-03-05 20:08:27 +00:00
parent eeaded577a
commit 6cc3dbae94
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
compiler/ncgcnv.pas
View File

@ -501,15 +501,16 @@ interface
{ Floats should never be returned as LOC_CONSTANT, do the
moving to memory before the new size is set.
Also when converting from a float to a non-float move
to memory first to prevent invalid LOC_FPUREGISTER locations }
Also when converting from a float to a non-float
or the other way round, move to memory first to prevent
invalid LOC_FPUREGISTER locations }
if (
(resulttype.def.deftype=floatdef) and
(location.loc=LOC_CONSTANT)
) or
(
(left.resulttype.def.deftype=floatdef) and
(resulttype.def.deftype<>floatdef)
(left.resulttype.def.deftype=floatdef) xor
(resulttype.def.deftype=floatdef)
) then
location_force_mem(exprasmlist,location);
@ -567,7 +568,10 @@ end.
{
$Log$
Revision 1.73 2005-02-14 17:13:06 peter
Revision 1.74 2005-03-05 20:08:27 jonas
* fixed web bug 3694
Revision 1.73 2005/02/14 17:13:06 peter
* truncate log
Revision 1.72 2005/01/09 15:05:29 peter