[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.base / break-on-linker-gcd-function.exp

# Copyright 2011-2013 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 3 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, see <http://www.gnu.org/licenses/>.

# This file is part of the gdb testsuite

# Test casting, especially between class types or pointer-to-class
# types.

# This file is part of the gdb testsuite

#
# test running programs
#
if { [skip_cplus_tests] } { continue }

standard_testfile .cc

if [get_compiler_info "c++"] {
    return -1
}

set additional_flags {-ffunction-sections -Wl,--gc-sections}
if {[prepare_for_testing $testfile.exp $testfile $srcfile \
	 [list debug c++ additional_flags=$additional_flags]]} {
    untested $testfile.exp
    return -1
}

# Single hex digit
set xd {[0-9a-f]}

# This accepts e.g. "Breakpoint 1 at 0x40968a" (fixed GDB)
# but rejects e.g. "Breakpoint 1 at 0x4" (broken GDB).
gdb_test "b [gdb_get_line_number "gdb break here"]" "Breakpoint \[0-9\] at 0x${xd}${xd}+: .*"
Commit	Line	Data
28e7fd62	1	# Copyright 2011-2013 Free Software Foundation, Inc.
c91513d8 PP	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	# Test casting, especially between class types or pointer-to-class
	19	# types.
	20
	21	# This file is part of the gdb testsuite
	22
c91513d8 PP	23	#
	24	# test running programs
	25	#
	26	if { [skip_cplus_tests] } { continue }
	27
a64d2530	28	standard_testfile .cc
c91513d8	29
4c93b1db	30	if [get_compiler_info "c++"] {
ae59b1da	31	return -1
c91513d8 PP	32	}
	33
	34	set additional_flags {-ffunction-sections -Wl,--gc-sections}
a64d2530 TT	35	if {[prepare_for_testing $testfile.exp $testfile $srcfile \
	36	[list debug c++ additional_flags=$additional_flags]]} {
	37	untested $testfile.exp
c91513d8 PP	38	return -1
	39	}
	40
c91513d8 PP	41	# Single hex digit
	42	set xd {[0-9a-f]}
	43
	44	# This accepts e.g. "Breakpoint 1 at 0x40968a" (fixed GDB)
	45	# but rejects e.g. "Breakpoint 1 at 0x4" (broken GDB).
	46	gdb_test "b [gdb_get_line_number "gdb break here"]" "Breakpoint \[0-9\] at 0x${xd}${xd}+: .*"