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

* redundant freetemp removed

Browse Source
This commit is contained in:
peter 2004-06-29 20:57:03 +00:00
parent 9a1925980c
commit 66516ba989
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/ncgld.pas
View File

@ -696,8 +696,10 @@ implementation
end;
if releaseright then
location_release(exprasmlist,right.location);
location_freetemp(exprasmlist,right.location);
begin
location_release(exprasmlist,right.location);
location_freetemp(exprasmlist,right.location);
end;
location_release(exprasmlist,left.location);
truelabel:=otlabel;
@ -950,7 +952,10 @@ begin
end.
{
$Log$
Revision 1.118 2004-06-20 08:55:29 florian
Revision 1.119 2004-06-29 20:57:03 peter
* redundant freetemp removed
Revision 1.118 2004/06/20 08:55:29 florian
* logs truncated
Revision 1.117 2004/06/16 20:07:08 florian