mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-21 02:21:42 +02:00
* registers of references aren't reused so we can safe a mov
git-svn-id: trunk@5411 -
This commit is contained in:
parent
9905e6d7ff
commit
ac5b260ec2
@ -224,6 +224,7 @@ interface
|
||||
begin
|
||||
location_reset(location,LOC_REFERENCE,OS_NO);
|
||||
case left.location.loc of
|
||||
LOC_CREGISTER,
|
||||
LOC_REGISTER :
|
||||
begin
|
||||
{$ifdef cpu_uses_separate_address_registers}
|
||||
@ -237,12 +238,6 @@ interface
|
||||
{$endif}
|
||||
location.reference.base := left.location.register;
|
||||
end;
|
||||
LOC_CREGISTER :
|
||||
begin
|
||||
location.reference.base:=cg.getaddressregister(current_asmdata.CurrAsmList);
|
||||
cg.a_load_reg_reg(current_asmdata.CurrAsmList,OS_ADDR,OS_ADDR,left.location.register,
|
||||
location.reference.base);
|
||||
end;
|
||||
LOC_REFERENCE,
|
||||
LOC_CREFERENCE :
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user