Bläddra i källkod

* store parameters at the callee side with the required alignment

git-svn-id: trunk@5604 -
Jonas Maebe 18 år sedan
förälder
incheckning
87e7e435bf
1 ändrade filer med 4 tillägg och 1 borttagningar
  1. 4 1
      compiler/sparc/cpupara.pas

+ 4 - 1
compiler/sparc/cpupara.pas

@@ -244,7 +244,10 @@ implementation
               end;
             hp.paraloc[side].reset;
             hp.paraloc[side].size:=paracgsize;
-            hp.paraloc[side].Alignment:=std_param_align;
+            if (side = callerside) then
+              hp.paraloc[side].Alignment:=std_param_align
+            else
+              hp.paraloc[side].Alignment:=hp.vardef.alignment;
             paralen:=tcgsize2size[paracgsize];
             hp.paraloc[side].intsize:=paralen;
             while paralen>0 do