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

- removed code commented out in previous commit

Browse Source 
git-svn-id: trunk@2106 -
This commit is contained in:
Jonas Maebe 2006-01-01 17:42:58 +00:00
parent 3f86e6b728
commit 2aa9653a61
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/ncgflw.pas
View File

@ -332,7 +332,6 @@ implementation
var
l3,oldclabel,oldblabel : tasmlabel;
temptovalue : boolean;
// temp1 : tregister;
hop : topcg;
hcond : topcmp;
opsize : tcgsize;
@ -370,12 +369,6 @@ implementation
do_loopvar_at_end:=false;
location_force_reg(exprasmlist,t1.location,t1.location.size,true);
temptovalue:=true;
{
temp1 := cg.getintregister(exprasmlist,
tg.GetTemp(exprasmlist,t1.resulttype.def.size,tt_normal,temp1);
cg.a_load_loc_ref(exprasmlist,opsize,t1.location,temp1);
location_freetemp(exprasmlist,t1.location);
}
end
else
temptovalue:=false;
@ -510,7 +503,6 @@ implementation
begin
cg.a_cmp_reg_loc_label(exprasmlist,opsize,hcond,t1.location.register,
left.location,l3);
{ tg.ungetiftemp(exprasmlist,temp1); }
end
else
begin