From: Richard Kenner <kenner@gcc.gnu.org>
Date: Sat, 25 Dec 1993 14:02:34 +0000 (-0500)
Subject: (FUNCTION_ARG): Pass complex float in float regs.
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=14d4a67a3239f8bd5ec0d1b327e6c3118cc5ce74;p=platform%2Fupstream%2Fgcc.git

(FUNCTION_ARG): Pass complex float in float regs.

From-SVN: r6314
---

diff --git a/gcc/config/alpha/alpha.h b/gcc/config/alpha/alpha.h
index 54c41f1..41eab5d 100644
--- a/gcc/config/alpha/alpha.h
+++ b/gcc/config/alpha/alpha.h
@@ -783,8 +783,11 @@ enum reg_class { NO_REGS, GENERAL_REGS, FLOAT_REGS, ALL_REGS,
 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED)	\
 ((CUM) < 6 && ! MUST_PASS_IN_STACK (MODE, TYPE)	\
  ? gen_rtx(REG, (MODE),				\
-	   (CUM) + 16 + (TARGET_FPREGS		\
-			 && GET_MODE_CLASS (MODE) == MODE_FLOAT) * 32) : 0)
+	   (CUM) + 16 + ((TARGET_FPREGS		\
+			  && (GET_MODE_CLASS (MODE) == MODE_COMPLEX_FLOAT  \
+			      || GET_MODE_CLASS (MODE) == MODE_FLOAT)) \
+			 * 32))			\
+ : 0)
 
 /* Specify the padding direction of arguments.