diff options
Diffstat (limited to 'gdb/testsuite/gdb.gdb')
-rw-r--r-- | gdb/testsuite/gdb.gdb/selftest.exp | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.gdb/selftest.exp b/gdb/testsuite/gdb.gdb/selftest.exp index 201bd38e667..c837d4c6e50 100644 --- a/gdb/testsuite/gdb.gdb/selftest.exp +++ b/gdb/testsuite/gdb.gdb/selftest.exp @@ -1,5 +1,5 @@ # Copyright 1988, 1990, 1991, 1992, 1994, 1997, 1999, 2000, 2002, -# 2003, 2004 Free Software Foundation, Inc. +# 2003, 2004, 2005, 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 @@ -40,6 +40,7 @@ proc do_steps_and_nexts {} { gdb_reinitialize_dir $srcdir/.. + set unlikely_line 0 for {set count 0} {$count < 32} {incr count} { send_gdb "list\n" # NOTE: carlton/2002-12-11: The "initial brace" and @@ -193,6 +194,17 @@ proc do_steps_and_nexts {} { fail "must be able to list source lines" return } + -re ".*interpreter_p = xstrdup.*$gdb_prompt $" { + if { $unlikely_line == 0 } { + # This is a GCC optimization bug; a constant has been + # associated with the wrong line number. + setup_xfail "*-*-*" gcc/26475 + fail "$description (unlikely line from gcc)" + set unlikely_line 1 + } + set description "next over xstrdup" + set command "next" + } -re ".*$gdb_prompt $" { fail "unknown source line after $description" return |