paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-16 03:30:34 +01:00
Code Issues Packages Projects Releases Wiki Activity

* load_loc_reg update

Browse Source
This commit is contained in:
peter 2003-05-31 15:04:31 +00:00
parent 790e125329
commit 0e11419a26
2 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/i386/n386mat.pas
View File

@ -291,7 +291,7 @@ implementation
location_release(exprasmlist,right.location);
r.enum:=R_INTREGISTER;
r.number:=NR_EDI;
cg.a_load_loc_reg(exprasmlist,right.location,r);
cg.a_load_loc_reg(exprasmlist,OS_INT,right.location,r);
popedx:=false;
popeax:=false;
r.number:=NR_EAX;
@ -677,7 +677,7 @@ implementation
hregister2:=rg.getexplicitregisterint(exprasmlist,NR_ECX)
else
hregister2:=rg.getregisterint(exprasmlist,OS_INT);
cg.a_load_loc_reg(exprasmlist,right.location,hregister2);
cg.a_load_loc_reg(exprasmlist,OS_INT,right.location,hregister2);
end
else
hregister2:=right.location.register;
@ -822,7 +822,7 @@ implementation
if right.location.loc<>LOC_CREGISTER then
location_release(exprasmlist,right.location);
hregister2:=rg.getexplicitregisterint(exprasmlist,NR_ECX);
cg.a_load_loc_reg(exprasmlist,right.location,hregister2);
cg.a_load_loc_reg(exprasmlist,OS_INT,right.location,hregister2);
end
else
hregister2:=right.location.register;
@ -1183,7 +1183,10 @@ begin
end.
{
$Log$
Revision 1.54 2003-05-22 21:32:29 peter
Revision 1.55 2003-05-31 15:04:31 peter
* load_loc_reg update
Revision 1.54 2003/05/22 21:32:29 peter
* removed some unit dependencies
Revision 1.53 2003/04/22 23:50:23 peter

7
compiler/i386/n386set.pas
View File

@ -549,7 +549,7 @@ implementation
{$else}
pleftreg:=rg.getexplicitregisterint(exprasmlist,NR_EDI);
{$endif}
cg.a_load_loc_reg(exprasmlist,left.location,pleftreg);
cg.a_load_loc_reg(exprasmlist,OS_INT,left.location,pleftreg);
location_freetemp(exprasmlist,left.location);
location_release(exprasmlist,left.location);
emit_reg_ref(A_BT,S_L,pleftreg,right.location.reference);
@ -739,7 +739,10 @@ begin
end.
{
$Log$
Revision 1.58 2003-05-22 21:32:29 peter
Revision 1.59 2003-05-31 15:04:31 peter
* load_loc_reg update
Revision 1.58 2003/05/22 21:32:29 peter
* removed some unit dependencies
Revision 1.57 2003/04/27 11:21:35 peter