From: Jim Wilson <wilson@gcc.gnu.org>
Date: Thu, 6 Jun 1996 23:40:38 +0000 (-0700)
Subject: (FUNCTION_ARG): General PARALLEL instead of EXPR_LIST.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=bd625e2114ad9ecde1bd4c72f063b942a5f910f2;p=gcc.git

(FUNCTION_ARG): General PARALLEL instead of EXPR_LIST.

From-SVN: r12197
---

diff --git a/gcc/config/pa/pa.h b/gcc/config/pa/pa.h
index 2d0c812a345..8179c6b2ce2 100644
--- a/gcc/config/pa/pa.h
+++ b/gcc/config/pa/pa.h
@@ -887,7 +887,7 @@ struct hppa_args {int words, nargs_prototype, indirect; };
 
 
 /* Similar, but when scanning the definition of a procedure.  We always
-   set NARGS_PROTOTYPE large so we never return an EXPR_LIST.  */
+   set NARGS_PROTOTYPE large so we never return a PARALLEL.  */
 
 #define INIT_CUMULATIVE_INCOMING_ARGS(CUM,FNTYPE,IGNORE) \
   (CUM).words = 0,				\
@@ -984,16 +984,23 @@ struct hppa_args {int words, nargs_prototype, indirect; };
 							      (TYPE))))))\
    /* We are calling a non-prototyped function with floating point	\
       arguments using the portable conventions.  */			\
-   : gen_rtx (EXPR_LIST, VOIDmode,					\
-	      gen_rtx (REG, (MODE),					\
-		       (FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1		\
-			? ((CUM).words ? 38 : 34)			\
-			: (32 + 2 * (CUM).words))),			\
-	      gen_rtx (REG, (MODE),					\
-		       (FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1		\
-			? ((CUM).words ? 23 : 25)			\
-			: (27 - (CUM).words - FUNCTION_ARG_SIZE ((MODE),\
-								 (TYPE)))))) \
+   : gen_rtx (PARALLEL, (MODE),						\
+	      gen_rtvec							\
+	      (2,							\
+	       gen_rtx (EXPR_LIST, VOIDmode,				\
+			gen_rtx (REG, (MODE),				\
+				 (FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1 \
+				  ? ((CUM).words ? 38 : 34)		\
+				  : (32 + 2 * (CUM).words))),		\
+			const0_rtx),					\
+	       gen_rtx (EXPR_LIST, VOIDmode,				\
+			gen_rtx (REG, (MODE),				\
+				 (FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1 \
+				  ? ((CUM).words ? 23 : 25)		\
+				  : (27 - (CUM).words -			\
+				     FUNCTION_ARG_SIZE ((MODE),		\
+							(TYPE))))),	\
+			const0_rtx)))					\
   /* Pass this parameter in the stack.  */				\
   : 0)