method2.exp revision 1.8
1# Copyright 2007-2019 Free Software Foundation, Inc. 2 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. 7# 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. 12# 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/>. 15 16# This file is part of the gdb testsuite 17 18# This tests setting a break in an ambiguous c++ method with 19# current_language set to c. 20 21if { [skip_cplus_tests] } { continue } 22 23standard_testfile .cc 24 25if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug c++}]} { 26 return -1 27} 28 29if {![runto_main]} { 30 perror "couldn't run to breakpoint" 31 continue 32} 33 34proc test_break { lang } { 35 global gdb_prompt 36 37 gdb_test "set lang $lang" \ 38 "" \ 39 "setting language $lang" 40 41 # Menu items should be alphabetical 42 set ovlds [lsort {"" "int" "A*"}] 43 set items {"cancel" "all"} 44 foreach ovld $ovlds { 45 lappend items "A::method($ovld)" 46 } 47 set menu_items {} 48 set idx 0 49 foreach item $items { 50 lappend menu_items ".$idx. .*[string_to_regexp $item]" 51 incr idx 52 } 53 set expect [join $menu_items {.*[\r\n]*}] 54 gdb_test_multiple "break A::method" "breaking in method ($lang)" { 55 -re $expect { 56 gdb_test "0" \ 57 "canceled" \ 58 "breaking in method ($lang)" 59 } 60 } 61} 62 63# We want in this test to double-check the contents of the multiple-choice 64# menu that's printed when a breakpoint location is ambiguous. So we need 65# to set multiple-symbols to "ask" first. 66gdb_test_no_output "set multiple-symbols ask" 67 68test_break "c" 69test_break "c++" 70 71gdb_continue_to_end "continue to end" 72