Bläddra i källkod

* changed to symbolic const for alignment

olle 22 år sedan
förälder
incheckning
3febb20061
1 ändrade filer med 4 tillägg och 3 borttagningar
  1. 4 3
      compiler/powerpc/cpupara.pas

+ 4 - 3
compiler/powerpc/cpupara.pas

@@ -237,7 +237,7 @@ unit cpupara;
                 end;
               { make sure all alignment bytes are 0 as well }
               fillchar(paraloc,sizeof(paraloc),0);
-              paraloc.Alignment:=4;
+              paraloc.alignment:= std_param_align;
               case loc of
                  LOC_REGISTER:
                    begin
@@ -324,6 +324,7 @@ unit cpupara;
 
         { Function return }
         fillchar(paraloc,sizeof(tparalocation),0);
+        paraloc.alignment:= std_param_align;
         paraloc.size:=def_cgsize(p.rettype.def);
         { Return in FPU register? }
         if p.rettype.def.deftype=floatdef then
@@ -358,8 +359,8 @@ begin
 end.
 {
   $Log$
-  Revision 1.48  2003-10-08 14:11:36  mazen
-  + Alignement field added to TParaLocation (=4 as 32 bits archs)
+  Revision 1.49  2003-10-08 21:15:27  olle
+    * changed to symbolic const for alignment
 
   Revision 1.47  2003/10/01 20:34:49  peter
     * procinfo unit contains tprocinfo