| OLD | NEW | 
|---|
| 1 # Copyright 1997, 1999, 2004-2005, 2007-2012 Free Software Foundation, | 1 # Copyright 1997, 1999, 2004-2005, 2007-2012 Free Software Foundation, | 
| 2 # Inc. | 2 # Inc. | 
| 3 | 3 | 
| 4 # This program is free software; you can redistribute it and/or modify | 4 # This program is free software; you can redistribute it and/or modify | 
| 5 # it under the terms of the GNU General Public License as published by | 5 # it under the terms of the GNU General Public License as published by | 
| 6 # the Free Software Foundation; either version 3 of the License, or | 6 # the Free Software Foundation; either version 3 of the License, or | 
| 7 # (at your option) any later version. | 7 # (at your option) any later version. | 
| 8 # | 8 # | 
| 9 # This program is distributed in the hope that it will be useful, | 9 # This program is distributed in the hope that it will be useful, | 
| 10 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 10 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 
| 11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
| 12 # GNU General Public License for more details. | 12 # GNU General Public License for more details. | 
| 13 # | 13 # | 
| 14 # You should have received a copy of the GNU General Public License | 14 # You should have received a copy of the GNU General Public License | 
| 15 # along with this program.  If not, see <http://www.gnu.org/licenses/>. | 15 # along with this program.  If not, see <http://www.gnu.org/licenses/>. | 
| 16 | 16 | 
| 17 # Test that things still (sort of) work when compiled without -g. | 17 # Test that things still (sort of) work when compiled without -g. | 
| 18 | 18 | 
| 19 if $tracelevel then { |  | 
| 20         strace $tracelevel |  | 
| 21 } |  | 
| 22 |  | 
| 23 | 19 | 
| 24 set testfile nodebug | 20 set testfile nodebug | 
| 25 set srcfile $srcdir/$subdir/$testfile.c | 21 set srcfile $srcdir/$subdir/$testfile.c | 
| 26 set binfile $objdir/$subdir/$testfile | 22 set binfile $objdir/$subdir/$testfile | 
| 27 | 23 | 
| 28 if [get_compiler_info ${binfile}] { | 24 if [get_compiler_info] { | 
| 29     return -1; | 25     return -1; | 
| 30 } | 26 } | 
| 31 | 27 | 
| 32 if [test_compiler_info "xlc-*"] { | 28 if [test_compiler_info "xlc-*"] { | 
| 33     # By default, IBM'x xlc compiler doesn't add static variables into the symta
     b. | 29     # By default, IBM'x xlc compiler doesn't add static variables into the symta
     b. | 
| 34     # Use "-qstatsym" to do so. | 30     # Use "-qstatsym" to do so. | 
| 35     set exec_opts additional_flags=-qstatsym | 31     set exec_opts additional_flags=-qstatsym | 
| 36 } else { | 32 } else { | 
| 37     set exec_opts "" | 33     set exec_opts "" | 
| 38 } | 34 } | 
| (...skipping 176 matching lines...) Expand 10 before | Expand all | Expand 10 after  Loading... | 
| 215     # Now, try that we can give names of file-local symbols which happen | 211     # Now, try that we can give names of file-local symbols which happen | 
| 216     # to be unique, and have it still work | 212     # to be unique, and have it still work | 
| 217     if [test_compiler_info "gcc-*"] { | 213     if [test_compiler_info "gcc-*"] { | 
| 218         setup_xfail "mips-sgi-irix6*" | 214         setup_xfail "mips-sgi-irix6*" | 
| 219     } | 215     } | 
| 220     if [runto middle] then { | 216     if [runto middle] then { | 
| 221         gdb_test "backtrace 10" "#0.*middle.*#1.*top.*#2.*main.*" \ | 217         gdb_test "backtrace 10" "#0.*middle.*#1.*top.*#2.*main.*" \ | 
| 222             "backtrace from middle in nodebug.exp" | 218             "backtrace from middle in nodebug.exp" | 
| 223     } | 219     } | 
| 224 } | 220 } | 
| OLD | NEW | 
|---|