From: Marcin Kościelnicki <koriakin@0x04.net>
Date: Mon, 15 Feb 2016 11:48:28 +0000 (+0000)
Subject: S/390: New mcount call sequence for z900+ CPUs in 31-bit mode.
X-Git-Tag: basepoints/gcc-7~945
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7e2507a578d6c82e6bb1fb05353c61f7808cf47e;p=thirdparty%2Fgcc.git

S/390: New mcount call sequence for z900+ CPUs in 31-bit mode.

gcc/ChangeLog:

2016-02-15  Marcin Kościelnicki  <koriakin@0x04.net>

	* config/s390/s390.c (s390_function_profiler): Add a new sequence
	for z900+ CPUs in 31-bit mode.

From-SVN: r233422
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index cf178e74baaa..45f7b6ee8168 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2016-02-15  Marcin Kościelnicki  <koriakin@0x04.net>
+
+	* config/s390/s390.c (s390_function_profiler): Add a new sequence
+	for z900+ CPUs in 31-bit mode.
+
 2016-02-15  Marcin Kościelnicki  <koriakin@0x04.net>
 
 	* common/config/s390/s390-common.c (s390_supports_split_stack):
diff --git a/gcc/config/s390/s390.c b/gcc/config/s390/s390.c
index aa82d1c23295..b1ab0c07613a 100644
--- a/gcc/config/s390/s390.c
+++ b/gcc/config/s390/s390.c
@@ -12205,6 +12205,13 @@ s390_function_profiler (FILE *file, int labelno)
       output_asm_insn ("brasl\t%0,%4", op);
       output_asm_insn ("lg\t%0,%1", op);
     }
+  else if (TARGET_CPU_ZARCH)
+    {
+      output_asm_insn ("st\t%0,%1", op);
+      output_asm_insn ("larl\t%2,%3", op);
+      output_asm_insn ("brasl\t%0,%4", op);
+      output_asm_insn ("l\t%0,%1", op);
+    }
   else if (!flag_pic)
     {
       op[6] = gen_label_rtx ();