From: Richard Stallman <rms@gnu.org>
Date: Sat, 6 Nov 1993 06:24:13 +0000 (+0000)
Subject: (emit_move_insn_1): Push the components of a complex
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=e33c0d66894ffb6ffaddd7d733371e1011cc7d25;p=gcc.git

(emit_move_insn_1): Push the components of a complex
in proper order: imag part has higher address.

From-SVN: r6024
---

diff --git a/gcc/expr.c b/gcc/expr.c
index 32d5ef8f766..fc33c84f3f6 100644
--- a/gcc/expr.c
+++ b/gcc/expr.c
@@ -1802,20 +1802,22 @@ emit_move_insn_1 (x, y)
 	 the mode, not to change the address.  */
       if (stack)
 	{
+	  /* Note that the real part always precedes the imag part in memory
+	     regardless of machine's endianness.  */
 #ifdef STACK_GROWS_DOWNWARD
 	  emit_insn (GEN_FCN (mov_optab->handlers[(int) submode].insn_code)
 		     (gen_rtx (MEM, submode, (XEXP (x, 0))),
-		      gen_highpart (submode, y)));
+		      gen_imagpart (submode, y)));
 	  emit_insn (GEN_FCN (mov_optab->handlers[(int) submode].insn_code)
 		     (gen_rtx (MEM, submode, (XEXP (x, 0))),
-		      gen_lowpart (submode, y)));
+		      gen_realpart (submode, y)));
 #else
 	  emit_insn (GEN_FCN (mov_optab->handlers[(int) submode].insn_code)
 		     (gen_rtx (MEM, submode, (XEXP (x, 0))),
-		      gen_lowpart (submode, y)));
+		      gen_realpart (submode, y)));
 	  emit_insn (GEN_FCN (mov_optab->handlers[(int) submode].insn_code)
 		     (gen_rtx (MEM, submode, (XEXP (x, 0))),
-		      gen_highpart (submode, y)));
+		      gen_imagpart (submode, y)));
 #endif
 	}
       else