On 06/25/2018 02:32 PM, Andreas Schwab wrote: > I'm still getting this error: > > Running /usr/local/gcc/gcc-20180625/gcc/testsuite/gcc.dg/guality/guality.exp > ... > gdb used in > /usr/local/gcc/gcc-20180625/gcc/testsuite/gcc.dg/guality/guality.exp: > /usr/bin/gdb > ERROR: tcl error sourcing > /usr/local/gcc/gcc-20180625/gcc/testsuite/gcc.dg/guality/guality.exp. > ERROR: GNU gdb (GDB; SUSE Linux Enterprise 11) 7.9.1 > Copyright (C) 2015 Free Software Foundation, Inc. > License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html> > This is free software: you are free to change and redistribute it. > There is NO WARRANTY, to the extent permitted by law. Type "show copying" > and "show warranty" for details. > This GDB was configured as "ia64-suse-linux". > Type "show configuration" for configuration details. > For bug reporting instructions, please see: > <http://bugs.opensuse.org/>. > Find the GDB manual and other documentation resources online at: > <http://www.gnu.org/software/gdb/documentation/>. > For help, type "help". > Type "apropos word" to search for commands related to "word". > [GDB failed to load libunwind-ia64.so.8: libunwind-ia64.so.8: cannot open > shared object file: No such file or directory] > [GDB failed to load libunwind-ia64.so.7: /usr/lib/libunwind-ia64.so.7: > undefined symbol: _Uelf64_get_proc_name] > while executing > "exec $gdb -v" > (procedure "report_gdb" line 8) > invoked from within > "report_gdb $::env(GUALITY_GDB_NAME) [info script]" > (file > "/usr/local/gcc/gcc-20180625/gcc/testsuite/gcc.dg/guality/guality.exp" line > 49) > invoked from within > "source /usr/local/gcc/gcc-20180625/gcc/testsuite/gcc.dg/guality/guality.exp" > ("uplevel" body line 1) > invoked from within > "uplevel #0 source > /usr/local/gcc/gcc-20180625/gcc/testsuite/gcc.dg/guality/guality.exp" > invoked from within > "catch "uplevel #0 source $test_file_name"" > testcase /usr/local/gcc/gcc-20180625/gcc/testsuite/gcc.dg/guality/guality.exp > completed in 0 seconds
Hi, Can you try this patch to see if it fixes the error? Thanks, - Tom diff --git a/gcc/testsuite/lib/gcc-gdb-test.exp b/gcc/testsuite/lib/gcc-gdb-test.exp index 9aff6218300..a83c4ca04c7 100644 --- a/gcc/testsuite/lib/gcc-gdb-test.exp +++ b/gcc/testsuite/lib/gcc-gdb-test.exp @@ -151,6 +151,9 @@ proc report_gdb { gdb loc } { } set gdb [exec which $gdb] send_log "gdb used in $loc: $gdb\n" - set gdb_version [exec $gdb -v] + if { [catch { set gdb_version [exec $gdb -v] }] } { + send_log "gdb used in $loc: getting version failed\n" + return + } send_log "gdb used in $loc: version:\n---\n$gdb_version\n---\n" }