From: Eric Botcazou <ebotcazou@adacore.com>
Date: Tue, 6 Dec 2016 22:47:00 +0000 (+0000)
Subject: re PR middle-end/78700 (gccgo testcases stack.go, recover.go, crypto/tls fails)
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=78bcf3dc722bce75c02eb05f351daf3447896c9d;p=gcc.git

re PR middle-end/78700 (gccgo testcases stack.go, recover.go, crypto/tls fails)

	PR middle-end/78700
	* calls.c (expand_call): Move back call to prepare_call_address.

From-SVN: r243322
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 463dc1a37d9..61eeea3bb73 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2016-12-06  Eric Botcazou  <ebotcazou@adacore.com>
+
+	PR middle-end/78700
+	* calls.c (expand_call): Move back call to prepare_call_address.
+
 2016-12-06  Michael Meissner  <meissner@linux.vnet.ibm.com>
 
 	PR target/78658
diff --git a/gcc/calls.c b/gcc/calls.c
index 21385ce0e12..7941869b2b8 100644
--- a/gcc/calls.c
+++ b/gcc/calls.c
@@ -3427,13 +3427,6 @@ expand_call (tree exp, rtx target, int ignore)
       if (STRICT_ALIGNMENT)
 	store_unaligned_arguments_into_pseudos (args, num_actuals);
 
-      /* Prepare the address of the call.  This must be done before any
-	 register parameters is loaded for find_first_parameter_load to
-	 work properly in the presence of descriptors.  */
-      funexp = prepare_call_address (fndecl ? fndecl : fntype, funexp,
-				     static_chain_value, &call_fusage,
-				     reg_parm_seen, flags);
-
       /* Now store any partially-in-registers parm.
 	 This is the last place a block-move can happen.  */
       if (reg_parm_seen)
@@ -3544,6 +3537,9 @@ expand_call (tree exp, rtx target, int ignore)
 	}
 
       after_args = get_last_insn ();
+      funexp = prepare_call_address (fndecl ? fndecl : fntype, funexp,
+				     static_chain_value, &call_fusage,
+				     reg_parm_seen, flags);
       load_register_parameters (args, num_actuals, &call_fusage, flags,
 				pass == 0, &sibcall_failure);