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

* process para's from first to last instead of the other way round

Browse Source
This commit is contained in:
Jonas Maebe 2003-04-17 18:52:35 +00:00
parent 0c93e261e7
commit 44f26523e6
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/powerpc/cpupara.pas
View File

@ -168,7 +168,7 @@ unit cpupara;
{ inc(nextintreg); }
{ constructor? }
{ destructor? }
hp:=tparaitem(p.para.last);
hp:=tparaitem(p.para.first);
while assigned(hp) do
begin
if (hp.paratyp in [vs_var,vs_out]) then
@ -244,7 +244,7 @@ unit cpupara;
else
internalerror(2002071002);
end;
hp:=tparaitem(hp.previous);
hp:=tparaitem(hp.next);
end;
end;
@ -301,7 +301,10 @@ begin
end.
{
$Log$
Revision 1.24 2003-04-16 07:55:07 jonas
Revision 1.25 2003-04-17 18:52:35 jonas
* process para's from first to last instead of the other way round
Revision 1.24 2003/04/16 07:55:07 jonas
* fixed paralocation for integer var/out parameters
Revision 1.23 2003/03/11 21:46:24 jonas