You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
108 lines
3.3 KiB
108 lines
3.3 KiB
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001 |
|
From: Jan Kratochvil <jan.kratochvil@redhat.com> |
|
Date: Fri, 27 Oct 2017 21:07:50 +0200 |
|
Subject: gdb-6.7-ppc-clobbered-registers-O2-test.patch |
|
|
|
;; Test PPC hiding of call-volatile parameter register. |
|
;;=fedoratest |
|
|
|
2007-11-04 Jan Kratochvil <jan.kratochvil@redhat.com> |
|
|
|
* gdb.arch/ppc-clobbered-registers-O2.exp: `powerpc64' changed to |
|
`powerpc*'. |
|
|
|
Testcase for: |
|
|
|
http://sourceware.org/ml/gdb-patches/2007-09/msg00228.html |
|
|
|
2007-10-21 Luis Machado <luisgpm@br.ibm.com> |
|
|
|
* rs6000-tdep.c (ppc_dwarf2_frame_init_reg): New function. |
|
* (rs6000_gdbarch_init): Install ppc_dwarf2_frame_init_reg as |
|
default dwarf2_frame_set_init_reg function. |
|
|
|
diff --git a/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.c b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.c |
|
new file mode 100644 |
|
--- /dev/null |
|
+++ b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.c |
|
@@ -0,0 +1,21 @@ |
|
+ |
|
+unsigned * __attribute__((noinline)) |
|
+start_sequence (unsigned * x, unsigned * y) |
|
+{ |
|
+ return (unsigned *)0xdeadbeef; |
|
+}; |
|
+ |
|
+unsigned __attribute__((noinline)) |
|
+gen_movsd (unsigned * operand0, unsigned * operand1) |
|
+{ |
|
+ return *start_sequence(operand0, operand1); |
|
+} |
|
+ |
|
+int main(void) |
|
+{ |
|
+ unsigned x, y; |
|
+ |
|
+ x = 13; |
|
+ y = 14; |
|
+ return (int)gen_movsd (&x, &y); |
|
+} |
|
diff --git a/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.exp b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.exp |
|
new file mode 100644 |
|
--- /dev/null |
|
+++ b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.exp |
|
@@ -0,0 +1,54 @@ |
|
+# Copyright 2006 Free Software Foundation, Inc. |
|
+# |
|
+# This program is free software; you can redistribute it and/or modify |
|
+# it under the terms of the GNU General Public License as published by |
|
+# the Free Software Foundation; either version 2 of the License, or |
|
+# (at your option) any later version. |
|
+# |
|
+# This program is distributed in the hope that it will be useful, |
|
+# but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
+# GNU General Public License for more details. |
|
+# |
|
+# You should have received a copy of the GNU General Public License |
|
+# along with this program; if not, write to the Free Software |
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
|
+# |
|
+# This file is part of the gdb testsuite. |
|
+ |
|
+# Test displaying call clobbered registers in optimized binaries for ppc. |
|
+# GDB should not show incorrect values. |
|
+ |
|
+if ![istarget "powerpc*-*"] then { |
|
+ verbose "Skipping powerpc* call clobbered registers testing." |
|
+ return |
|
+} |
|
+ |
|
+set testfile "ppc-clobbered-registers-O2" |
|
+set srcfile ${testfile}.c |
|
+set binfile [standard_output_file ${testfile}] |
|
+set compile_flags "debug additional_flags=-O2" |
|
+ |
|
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable ${compile_flags}] != "" } { |
|
+ unsupported "Testcase compile failed." |
|
+ return -1 |
|
+} |
|
+ |
|
+gdb_exit |
|
+gdb_start |
|
+gdb_reinitialize_dir $srcdir/$subdir |
|
+gdb_load ${binfile} |
|
+ |
|
+if ![runto_main] then { |
|
+ perror "Couldn't run to breakpoint" |
|
+ continue |
|
+} |
|
+ |
|
+gdb_test "b start_sequence" ".*Breakpoint 2 at.*line 6.*" \ |
|
+ "Insert breakpoint at problematic function" |
|
+ |
|
+gdb_test continue ".*Breakpoint 2.*in start_sequence.*" \ |
|
+ "Run until problematic function" |
|
+ |
|
+gdb_test backtrace ".*operand0=<value optimized out>.*operand1=<value optimized out>.*" \ |
|
+ "Check value of call clobbered registers"
|
|
|