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

* handling of C styled varargs fixed

Browse Source
This commit is contained in:
florian 2004-09-25 20:28:39 +00:00
parent 36112785f8
commit be3f78e283
1 changed files with 17 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
compiler/sparc/cpupara.pas
View File

@ -222,6 +222,19 @@ implementation
hp:=firstpara;
while assigned(hp) do
begin
{ currently only support C-style array of const,
there should be no location assigned to the vararg array itself }
if (p.proccalloption in [pocall_cdecl,pocall_cppdecl]) and
is_array_of_const(hp.paratype.def) then
begin
paraloc:=hp.paraloc[side].add_location;
{ hack: the paraloc must be valid, but is not actually used }
paraloc^.loc:=LOC_REGISTER;
paraloc^.register:=NR_G0;
paraloc^.size:=OS_ADDR;
break;
end;
if push_addr_param(hp.paratyp,hp.paratype.def,p.proccalloption) then
paracgsize:=OS_ADDR
else
@ -309,7 +322,10 @@ begin
end.
{
$Log$
Revision 1.41 2004-09-21 17:25:13 peter
Revision 1.42 2004-09-25 20:28:39 florian
* handling of C styled varargs fixed
Revision 1.41 2004/09/21 17:25:13 peter
* paraloc branch merged
Revision 1.40.4.4 2004/09/19 18:08:15 peter