mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 18:49:15 +02:00
* fix temp release for 64bit compare
git-svn-id: trunk@8557 -
This commit is contained in:
parent
f8dfbc729f
commit
399a2a86fa
@ -278,6 +278,7 @@ interface
|
|||||||
hregister:=cg.getintregister(current_asmdata.CurrAsmList,OS_INT);
|
hregister:=cg.getintregister(current_asmdata.CurrAsmList,OS_INT);
|
||||||
hregister2:=cg.getintregister(current_asmdata.CurrAsmList,OS_INT);
|
hregister2:=cg.getintregister(current_asmdata.CurrAsmList,OS_INT);
|
||||||
cg64.a_load64_loc_reg(current_asmdata.CurrAsmList,left.location,joinreg64(hregister,hregister2));
|
cg64.a_load64_loc_reg(current_asmdata.CurrAsmList,left.location,joinreg64(hregister,hregister2));
|
||||||
|
location_freetemp(current_asmdata.CurrAsmList,left.location);
|
||||||
location_reset(left.location,LOC_REGISTER,OS_64);
|
location_reset(left.location,LOC_REGISTER,OS_64);
|
||||||
left.location.register64.reglo:=hregister;
|
left.location.register64.reglo:=hregister;
|
||||||
left.location.register64.reghi:=hregister2;
|
left.location.register64.reghi:=hregister2;
|
||||||
@ -332,8 +333,6 @@ interface
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
location_freetemp(current_asmdata.CurrAsmList,left.location);
|
|
||||||
|
|
||||||
{ we have LOC_JUMP as result }
|
{ we have LOC_JUMP as result }
|
||||||
location_reset(location,LOC_JUMP,OS_NO)
|
location_reset(location,LOC_JUMP,OS_NO)
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user