mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 11:29:24 +02:00
* fixed expectloc setting
git-svn-id: trunk@6833 -
This commit is contained in:
parent
168e652d42
commit
c4f65df9f9
@ -179,7 +179,7 @@ implementation
|
||||
|
||||
function tx86inlinenode.first_round_real : tnode;
|
||||
begin
|
||||
expectloc:=LOC_FPUREGISTER;
|
||||
expectloc:=LOC_REFERENCE;
|
||||
registersint:=left.registersint;
|
||||
registersfpu:=max(left.registersfpu,1);
|
||||
{$ifdef SUPPORT_MMX}
|
||||
@ -195,7 +195,7 @@ implementation
|
||||
result:=inherited
|
||||
else
|
||||
begin
|
||||
expectloc:=LOC_FPUREGISTER;
|
||||
expectloc:=LOC_REFERENCE;
|
||||
registersint:=left.registersint;
|
||||
registersfpu:=max(left.registersfpu,1);
|
||||
{$ifdef SUPPORT_MMX}
|
||||
|
Loading…
Reference in New Issue
Block a user