paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-13 08:59:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* pushparavalue shouldn't care about emulation settings

Browse Source 
git-svn-id: trunk@5260 -
This commit is contained in:
florian 2006-11-05 21:55:12 +00:00
parent f2a25e845d
commit 95518d7ecf
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/ncgcal.pas
View File

@ -130,8 +130,12 @@ implementation
if left.location.loc in [LOC_FLAGS,LOC_JUMP,LOC_SUBSETREG,LOC_CSUBSETREG,LOC_SUBSETREF,LOC_CSUBSETREF] then
location_force_reg(current_asmdata.CurrAsmList,left.location,def_cgsize(left.resultdef),false);
{ Handle Floating point types differently }
if (left.resultdef.typ=floatdef) and not(cs_fp_emulation in current_settings.moduleswitches) then
{ Handle Floating point types differently
This doesn't depend on emulator settings, emulator settings should
be handled by cpupara }
if left.resultdef.typ=floatdef then
begin
{$ifdef i386}
if tempcgpara.location^.loc<>LOC_REFERENCE then