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

* fixed inlining on arm

Browse Source
This commit is contained in:
florian 2004-03-13 21:23:21 +00:00
parent 72a8ac8dd7
commit 6ea06bc740
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/ncgcal.pas
View File

@ -112,7 +112,7 @@ implementation
LOC_REFERENCE:
begin
{ currently, we copy the value always to a secure location }
if true then
if not(assigned(aktcallnode.inlinecode)) then
paramanager.alloctempparaloc(exprasmlist,aktcallnode.procdefinition.proccalloption,paraitem,tempparaloc);
end;
{$endif cputargethasfixedstack}
@ -770,7 +770,7 @@ implementation
end;
end;
procedure freeparas;
procedure freeparas;
var
ppn : tcgcallparanode;
begin
@ -1264,7 +1264,10 @@ begin
end.
{
$Log$
Revision 1.162 2004-03-09 16:28:31 peter
Revision 1.163 2004-03-13 21:23:21 florian
* fixed inlining on arm
Revision 1.162 2004/03/09 16:28:31 peter
* fix for sparc that pushes floats in int registers
Revision 1.161 2004/03/09 13:04:12 mazen