paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 16:09:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix temp release for 64bit compare

Browse Source 
git-svn-id: trunk@8557 -
This commit is contained in:
peter 2007-09-18 21:05:40 +00:00
parent f8dfbc729f
commit 399a2a86fa
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/i386/n386add.pas
View File

@ -278,6 +278,7 @@ interface
hregister:=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));
location_freetemp(current_asmdata.CurrAsmList,left.location);
location_reset(left.location,LOC_REGISTER,OS_64);
left.location.register64.reglo:=hregister;
left.location.register64.reghi:=hregister2;
@ -332,8 +333,6 @@ interface
end;
end;
location_freetemp(current_asmdata.CurrAsmList,left.location);
{ we have LOC_JUMP as result }
location_reset(location,LOC_JUMP,OS_NO)
end;