1 # Copyright
2007, 2008 Free Software Foundation
, Inc.
3 # This
program is free software
; you can redistribute it and
/or modify
4 # it under the terms of the GNU General Public License as published by
5 # the Free Software Foundation
; either version
3 of the License
, or
6 #
(at your option
) any later version.
8 # This
program is distributed in the hope that it will be useful
,
9 # but WITHOUT
ANY WARRANTY
; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the
11 # GNU General Public License
for more details.
13 # You should have received a copy of the GNU General Public License
14 # along with this
program.
If not
, see
<http
://www.gnu.org
/licenses
/>.
16 # Please email
any bugs
, comments
, and
/or additions to this file to
:
19 # This file is part of the gdb testsuite.
21 # Unwinding of DW_CFA_GNU_negative_offset_extended test
program.
32 if ![istarget
"i?86-*-*"] then {
33 verbose
"Skipping i386 unwinder tests."
37 set testfile
"i386-gnu-cfi"
38 set srcfilec $
{testfile
}.c
39 set srcfileasm $
{testfile
}-asm.S
40 set binfile $
{objdir
}/$
{subdir
}/$
{testfile
}
42 # some targets have leading underscores
on assembly symbols.
43 # TODO
: detect this automatically
44 set additional_flags
""
45 if [istarget
"i?86-*-cygwin*"] then {
46 set additional_flags
"additional_flags=-DSYMBOL_PREFIX=\"_\""
49 if { [gdb_compile
"${srcdir}/${subdir}/${srcfilec} ${srcdir}/${subdir}/${srcfileasm}" "${binfile}" executable [list debug $additional_flags]] != "" } {
50 untested i386
-gnu
-cfi.exp
58 gdb_reinitialize_dir $srcdir
/$subdir
61 # We should stop in abort
(3).
65 gdb_test_multiple
{} "continue to abort()" {
66 -re
".*Program received signal SIGABRT,.*$gdb_prompt $" {
67 pass
"continue to abort()"
71 # Backtrace would crash before.
74 "main \\(\\) at .*${testfile}.c.*" \
77 # Check we see the inserted `DW_CFA_GNU_negative_offset_extended
' CFI.
78 # We see there the original CFI-stored filename `gate.c'.
81 "gate \\(\[^()\]*\\) at .*gate.c.*" \
82 "shift up to the modified frame"
84 gdb_test_multiple
"info frame" "Existence of the CFI inserted register" {
85 -re
"Stack level 3, frame at (0x\[0-9a-f\]+):.*Saved registers:.* ecx at (0x\[0-9a-f\]+),.*" {
86 pass
"Existence of the CFI inserted register"
87 if { [string compare $expect_out
(1,string
) $expect_out
(2,string
)] } then {
88 fail
"Value of the CFI inserted register"
90 pass
"Value of the CFI inserted register"