# Copyright (C) 2008-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 . if {[skip_shlib_tests]} { return 0 } set testfile "fixsection" set srcfile ${srcdir}/${subdir}/${testfile}.c set binfile ${objdir}/${subdir}/${testfile} set libfile "fixsectshr" set libsrc ${srcdir}/${subdir}/${libfile}.c set lib_sl ${objdir}/${subdir}/${libfile}.sl set lib_opts [list debug nowarnings] set exec_opts [list debug nowarnings shlib=$lib_sl] if [get_compiler_info] { return -1 } if { [gdb_compile_shlib $libsrc $lib_sl $lib_opts] != "" || [gdb_compile $srcfile $binfile executable $exec_opts] != ""} { untested "Could not compile either $libsrc or $srcfile." return -1 } # Start with a fresh gdb. gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir gdb_load ${binfile} gdb_load_shlibs ${lib_sl} if ![runto_main] then { fail "Can't run to main" return 1 } # # set breakpoint at static function static_fun # gdb_test "break static_fun" \ "Breakpoint.*at.* file .*${testfile}\\.c, line.*" \ "breakpoint at static_fun" # # exit gdb # gdb_exit