| OLD | NEW | 
|   1 # Copyright (C) 2008-2012 Free Software Foundation, Inc. |   1 # Copyright (C) 2008-2012 Free Software Foundation, Inc. | 
|   2  |   2  | 
|   3 # This program is free software; you can redistribute it and/or modify |   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 |   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 |   5 # the Free Software Foundation; either version 3 of the License, or | 
|   6 # (at your option) any later version. |   6 # (at your option) any later version. | 
|   7 # |   7 # | 
|   8 # This program is distributed in the hope that it will be useful, |   8 # This program is distributed in the hope that it will be useful, | 
|   9 # but WITHOUT ANY WARRANTY; without even the implied warranty of |   9 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|  10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the |  10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|  11 # GNU General Public License for more details. |  11 # GNU General Public License for more details. | 
|  12 # |  12 # | 
|  13 # You should have received a copy of the GNU General Public License |  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/>. |  14 # along with this program.  If not, see <http://www.gnu.org/licenses/>. | 
|  15  |  15  | 
|  16 if $tracelevel then { |  | 
|  17     strace $tracelevel |  | 
|  18 } |  | 
|  19  |  | 
|  20  |  16  | 
|  21 if {[skip_shlib_tests]} { |  17 if {[skip_shlib_tests]} { | 
|  22     return 0 |  18     return 0 | 
|  23 } |  19 } | 
|  24  |  20  | 
|  25 set testfile "fixsection" |  21 set testfile "fixsection" | 
|  26 set srcfile ${srcdir}/${subdir}/${testfile}.c |  22 set srcfile ${srcdir}/${subdir}/${testfile}.c | 
|  27 set binfile ${objdir}/${subdir}/${testfile} |  23 set binfile ${objdir}/${subdir}/${testfile} | 
|  28  |  24  | 
|  29 set libfile "fixsectshr" |  25 set libfile "fixsectshr" | 
|  30 set libsrc ${srcdir}/${subdir}/${libfile}.c |  26 set libsrc ${srcdir}/${subdir}/${libfile}.c | 
|  31 set lib_sl ${objdir}/${subdir}/${libfile}.sl |  27 set lib_sl ${objdir}/${subdir}/${libfile}.sl | 
|  32  |  28  | 
|  33 set lib_opts [list debug nowarnings] |  29 set lib_opts [list debug nowarnings] | 
|  34 set exec_opts [list debug nowarnings shlib=$lib_sl] |  30 set exec_opts [list debug nowarnings shlib=$lib_sl] | 
|  35  |  31  | 
|  36 if [get_compiler_info ${binfile}] { |  32 if [get_compiler_info] { | 
|  37     return -1 |  33     return -1 | 
|  38 } |  34 } | 
|  39  |  35  | 
|  40 if { [gdb_compile_shlib $libsrc $lib_sl $lib_opts] != "" |  36 if { [gdb_compile_shlib $libsrc $lib_sl $lib_opts] != "" | 
|  41      || [gdb_compile $srcfile $binfile executable $exec_opts] != ""} { |  37      || [gdb_compile $srcfile $binfile executable $exec_opts] != ""} { | 
|  42     untested "Could not compile either $libsrc or $srcfile." |  38     untested "Could not compile either $libsrc or $srcfile." | 
|  43     return -1 |  39     return -1 | 
|  44 } |  40 } | 
|  45  |  41  | 
|  46 # Start with a fresh gdb. |  42 # Start with a fresh gdb. | 
| (...skipping 13 matching lines...) Expand all  Loading... | 
|  60 # set breakpoint at static function static_fun |  56 # set breakpoint at static function static_fun | 
|  61 # |  57 # | 
|  62 gdb_test "break static_fun" \ |  58 gdb_test "break static_fun" \ | 
|  63     "Breakpoint.*at.* file .*${testfile}\\.c, line.*" \ |  59     "Breakpoint.*at.* file .*${testfile}\\.c, line.*" \ | 
|  64     "breakpoint at static_fun" |  60     "breakpoint at static_fun" | 
|  65  |  61  | 
|  66 # |  62 # | 
|  67 # exit gdb |  63 # exit gdb | 
|  68 # |  64 # | 
|  69 gdb_exit |  65 gdb_exit | 
| OLD | NEW |