From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 20468 invoked by alias); 6 Mar 2012 20:36:18 -0000 Mailing-List: contact archer-commits-help@sourceware.org; run by ezmlm Sender: Precedence: bulk List-Post: List-Help: List-Subscribe: Received: (qmail 20253 invoked by uid 9079); 6 Mar 2012 20:36:17 -0000 Date: Tue, 06 Mar 2012 20:36:00 -0000 Message-ID: <20120306203617.20226.qmail@sourceware.org> From: kseitz@sourceware.org To: archer-commits@sourceware.org Subject: [SCM] archer-keiths-linespec-rewrite: Fix expected output of "info break". X-Git-Refname: refs/heads/archer-keiths-linespec-rewrite X-Git-Reftype: branch X-Git-Oldrev: 6f2b24c74356c34cd624da6fd2ef7ed12ce87097 X-Git-Newrev: b5b25d475d4be277159083f689d84bec8efee798 X-SW-Source: 2012-q1/txt/msg00052.txt.bz2 List-Id: The branch, archer-keiths-linespec-rewrite has been updated via b5b25d475d4be277159083f689d84bec8efee798 (commit) via 2522ce68309d51d32ac192c9b5fbe53733baa11f (commit) from 6f2b24c74356c34cd624da6fd2ef7ed12ce87097 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email. - Log ----------------------------------------------------------------- commit b5b25d475d4be277159083f689d84bec8efee798 Author: keiths Date: Tue Mar 6 12:35:40 2012 -0800 Fix expected output of "info break". commit 2522ce68309d51d32ac192c9b5fbe53733baa11f Author: keiths Date: Tue Mar 6 11:46:39 2012 -0800 Fix invalid/illegal quoting tests. ----------------------------------------------------------------------- Summary of changes: gdb/testsuite/gdb.base/list.exp | 2 +- gdb/testsuite/gdb.cp/overload.exp | 1 - gdb/testsuite/gdb.cp/ovldbreak.exp | 26 ++++++++++---------------- gdb/testsuite/gdb.cp/static-method.exp | 5 ----- gdb/testsuite/gdb.cp/userdef.exp | 4 ++-- 5 files changed, 13 insertions(+), 25 deletions(-) First 500 lines of diff: diff --git a/gdb/testsuite/gdb.base/list.exp b/gdb/testsuite/gdb.base/list.exp index d1358c3..d00159d 100644 --- a/gdb/testsuite/gdb.base/list.exp +++ b/gdb/testsuite/gdb.base/list.exp @@ -468,7 +468,7 @@ proc test_list_filename_and_function {} { pass "list filename:function ($testcnt tests)" # Test with quoting. - gdb_test "list 'list0.c:main'" "int main.*" + gdb_test "list 'list0.c':'main'" "int main.*" # Test some invalid specs # The following test takes the FIXME result on most systems using diff --git a/gdb/testsuite/gdb.cp/overload.exp b/gdb/testsuite/gdb.cp/overload.exp index 5116e5f..f3e56c7 100644 --- a/gdb/testsuite/gdb.cp/overload.exp +++ b/gdb/testsuite/gdb.cp/overload.exp @@ -306,7 +306,6 @@ gdb_test "list \"foo::overloadfnarg(int, int (*)(int))\"" \ gdb_test "list ${srcfile}:intToChar" "int intToChar.*" gdb_test "list ${srcfile}:intToChar(char)" "int intToChar.*" gdb_test "list ${srcfile}:'intToChar(char)'" "int intToChar.*" -gdb_test "list '${srcfile}:intToChar(char)'" "int intToChar.*" gdb_test "list '${srcfile}':intToChar(char)" "int intToChar.*" gdb_test "list '${srcfile}':'intToChar(char)'" "int intToChar.*" diff --git a/gdb/testsuite/gdb.cp/ovldbreak.exp b/gdb/testsuite/gdb.cp/ovldbreak.exp index 3e35b79..2c27f2d 100644 --- a/gdb/testsuite/gdb.cp/ovldbreak.exp +++ b/gdb/testsuite/gdb.cp/ovldbreak.exp @@ -320,23 +320,17 @@ gdb_expect { } } -gdb_test "info break" \ - "Num Type\[\t \]+Disp Enb Address\[\t \]+What.* -\[0-9\]+\[\t \]+breakpoint keep y\[\t \]+\[\t \]*\r -\[0-9\]+.1\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(double\\) at.*$srcfile:140\r -\[0-9\]+.2\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(float\\) at.*$srcfile:137\r -\[0-9\]+.3\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\((unsigned long|long unsigned)( int)?\\) at.*$srcfile:134\r -\[0-9\]+.4\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(long( int)?\\) at.*$srcfile:131\r -\[0-9\]+.5\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\((unsigned|unsigned int)\\) at.*$srcfile:128\r -\[0-9\]+.6\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(int\\) at.*$srcfile:125\r -\[0-9\]+.7\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\((unsigned short|short unsigned)( int)?\\) at.*$srcfile:122\r -\[0-9\]+.8\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(short( int)?\\) at.*$srcfile:119\r -\[0-9\]+.9\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(unsigned char\\) at.*$srcfile:116\r -\[0-9\]+.10\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(signed char\\) at.*$srcfile:113\r -\[0-9\]+.11\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(char\\) at.*$srcfile:110\r -\[0-9\]+.12\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\((void|)\\) at.*$srcfile:107" \ - "breakpoint info (after setting on all)" +# Create the breakpoint table for "info breakpoint". +set bptable "Num Type\[\t \]+Disp Enb Address\[\t \]+What.*\[\r\n]+" +append bptable "\[0-9\]+\[\t \]+breakpoint\[\t \]+keep\[\t \]y\[\t \]+.*\[\r\n\]+" +foreach ovld {void char signed_char unsigned_char short_int \ + unsigned_short_int int unsigned_int long_int \ + unsigned_long_int float double} { + append bptable [format "\[0-9\]+.\[0-9\]+\[\t \]+y\[\t \]+$hex\[\t \]+in foo::overload1arg\\(%s\\) at.*$srcfile:%d\[\r\n\]+" \ + $types($ovld) $line($ovld)] +} +gdb_test "info break" $bptable "breakpoint info (after setting on all)" # Run through each breakpoint. proc continue_to_bp_overloaded {bpnumber might_fail line argtype argument} { diff --git a/gdb/testsuite/gdb.cp/static-method.exp b/gdb/testsuite/gdb.cp/static-method.exp index 6e086f3..576666c 100644 --- a/gdb/testsuite/gdb.cp/static-method.exp +++ b/gdb/testsuite/gdb.cp/static-method.exp @@ -95,11 +95,6 @@ foreach test $methods { && !$have_gcc_45682_fixed} { setup_xfail gcc/45682 "*-*-*" } - gdb_test "list '${srcfile}:$test'" $result - if {[string compare $test "xxx::${ans}::A::func"] == 0 - && !$have_gcc_45682_fixed} { - setup_xfail gcc/45682 "*-*-*" - } gdb_test "list '${srcfile}':'$test'" $result if {[string compare $test "xxx::${ans}::A::func"] == 0 && !$have_gcc_45682_fixed} { diff --git a/gdb/testsuite/gdb.cp/userdef.exp b/gdb/testsuite/gdb.cp/userdef.exp index 9c7cb57..90eb99d 100644 --- a/gdb/testsuite/gdb.cp/userdef.exp +++ b/gdb/testsuite/gdb.cp/userdef.exp @@ -136,8 +136,8 @@ gdb_test "print one += 7" "\\\$\[0-9\]* = {x = 9, y = 10}" gdb_test "print two = one" "\\\$\[0-9\]* = {x = 9, y = 10}" # Check that GDB tolerates whitespace in operator names. -gdb_test "break A2::'operator+'" ".*Breakpoint $decimal at.*" -gdb_test "break A2::'operator +'" ".*Breakpoint $decimal at.*" +gdb_test "break A2::operator+" ".*Breakpoint $decimal at.*" +gdb_test "break A2::operator +" ".*Breakpoint $decimal at.*" # Check that GDB handles operator* correctly. gdb_test "print c" "\\\$\[0-9\]* = {m = {z = .*}}" hooks/post-receive -- Repository for Project Archer.