(output_{pro,epi}log): Round var size to quadword boundary.
authorRichard Kenner <kenner@gcc.gnu.org>
Sun, 6 Mar 1994 00:18:05 +0000 (19:18 -0500)
committerRichard Kenner <kenner@gcc.gnu.org>
Sun, 6 Mar 1994 00:18:05 +0000 (19:18 -0500)
From-SVN: r6699

gcc/config/alpha/alpha.c

index 00ca472da6babe080878544124ee26a0a16f3d40..3a1977e18e1cc88b9aa5779fae63887b5b8768a2 100644 (file)
@@ -1207,10 +1207,11 @@ output_prolog (file, size)
      FILE *file;
      int size;
 {
-  HOST_WIDE_INT frame_size = ((size + current_function_outgoing_args_size
+  HOST_WIDE_INT vars_size = (size + 7) & ~7;
+  HOST_WIDE_INT frame_size = ((vars_size + current_function_outgoing_args_size
                               + current_function_pretend_args_size
                               + alpha_sa_size () + 15) & ~15);
-  HOST_WIDE_INT reg_offset = size + current_function_outgoing_args_size;
+  HOST_WIDE_INT reg_offset = vars_size + current_function_outgoing_args_size;
   HOST_WIDE_INT start_reg_offset = reg_offset;
   HOST_WIDE_INT actual_start_reg_offset = start_reg_offset;
   rtx insn;
@@ -1408,10 +1409,11 @@ output_epilog (file, size)
      int size;
 {
   rtx insn = get_last_insn ();
-  HOST_WIDE_INT frame_size = ((size + current_function_outgoing_args_size
+  HOST_WIDE_INT vars_size = (size + 7) & ~7;
+  HOST_WIDE_INT frame_size = ((vars_size + current_function_outgoing_args_size
                               + current_function_pretend_args_size
                               + alpha_sa_size () + 15) & ~15);
-  HOST_WIDE_INT reg_offset = size + current_function_outgoing_args_size;
+  HOST_WIDE_INT reg_offset = vars_size + current_function_outgoing_args_size;
   HOST_WIDE_INT frame_size_from_reg_save = frame_size - reg_offset;
   int reg_offset_base_reg = 30;
   int i;