paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 11:49:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed temp reuse

Browse Source
This commit is contained in:
peter 1999-04-06 11:19:49 +00:00
parent b149cc5681
commit 55809784b4
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/temp_gen.pas
View File

@ -166,8 +166,6 @@ unit temp_gen;
if hp^.size>=size then
begin
ofs:=hp^.pos;
if hp^.pos-size < maxtemp then
maxtemp := hp^.size-size;
{ the whole block is needed ? }
if hp^.size>size then
begin
@ -508,7 +506,10 @@ begin
end.
{
$Log$
Revision 1.9 1999-02-22 02:15:56 peter
Revision 1.10 1999-04-06 11:19:49 peter
* fixed temp reuse
Revision 1.9 1999/02/22 02:15:56 peter
* updates for ag386bin
Revision 1.8 1999/02/11 09:35:19 pierre