From: Richard Kenner <kenner@gcc.gnu.org>
Date: Sun, 6 Mar 1994 00:18:05 +0000 (-0500)
Subject: (output_{pro,epi}log): Round var size to quadword boundary.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=4dd24d605d03f7d9799a14edaaf7e9de550ca291;p=gcc.git

(output_{pro,epi}log): Round var size to quadword boundary.

From-SVN: r6699
---

diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c
index 00ca472da6b..3a1977e18e1 100644
--- a/gcc/config/alpha/alpha.c
+++ b/gcc/config/alpha/alpha.c
@@ -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;