diff options
Diffstat (limited to 'gdb/testsuite')
188 files changed, 384 insertions, 198 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index f1239845873..ad37b0a2123 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,192 @@ +2012-06-21 Tom Tromey <tromey@redhat.com> + + * lib/gdb.exp (skip_altivec_tests, skip_vsx_tests) + (build_executable): Update. + (get_compiler_info): Remove 'binfile' argument. + * gdb.ada/arrayidx.exp: Update. + * gdb.ada/null_array.exp: Update. + * gdb.arch/altivec-abi.exp: Update. + * gdb.arch/altivec-regs.exp: Update. + * gdb.arch/amd64-byte.exp: Update. + * gdb.arch/amd64-dword.exp: Update. + * gdb.arch/amd64-word.exp: Update. + * gdb.arch/i386-avx.exp: Update. + * gdb.arch/i386-byte.exp: Update. + * gdb.arch/i386-sse.exp: Update. + * gdb.arch/i386-word.exp: Update. + * gdb.arch/ppc-dfp.exp: Update. + * gdb.arch/ppc-fp.exp: Update. + * gdb.arch/vsx-regs.exp: Update. + * gdb.base/all-bin.exp: Update. + * gdb.base/annota1.exp: Update. + * gdb.base/async.exp: Update. + * gdb.base/attach.exp: Update. + * gdb.base/break-interp.exp: Update. + * gdb.base/call-ar-st.exp: Update. + * gdb.base/call-rt-st.exp: Update. + * gdb.base/call-sc.exp: Update. + * gdb.base/callfuncs.exp: Update. + * gdb.base/catch-load.exp: Update. + * gdb.base/completion.exp: Update. + * gdb.base/complex.exp: Update. + * gdb.base/condbreak.exp: Update. + * gdb.base/consecutive.exp: Update. + * gdb.base/constvars.exp: Update. + * gdb.base/corefile.exp: Update. + * gdb.base/eval-skip.exp: Update. + * gdb.base/expand-psymtabs.exp: Update. + * gdb.base/exprs.exp: Update. + * gdb.base/fileio.exp: Update. + * gdb.base/fixsection.exp: Update. + * gdb.base/funcargs.exp: Update. + * gdb.base/gdb11530.exp: Update. + * gdb.base/gdb1555.exp: Update. + * gdb.base/gnu-ifunc.exp: Update. + * gdb.base/gnu_vector.exp: Update. + * gdb.base/info-macros.exp: Update. + * gdb.base/jit-simple.exp: Update. + * gdb.base/jit-so.exp: Update. + * gdb.base/jit.exp: Update. + * gdb.base/langs.exp: Update. + * gdb.base/list.exp: Update. + * gdb.base/logical.exp: Update. + * gdb.base/long_long.exp: Update. + * gdb.base/longjmp.exp: Update. + * gdb.base/macscp.exp: Update. + * gdb.base/mips_pro.exp: Update. + * gdb.base/miscexprs.exp: Update. + * gdb.base/morestack.exp: Update. + * gdb.base/nodebug.exp: Update. + * gdb.base/opaque.exp: Update. + * gdb.base/pc-fp.exp: Update. + * gdb.base/pending.exp: Update. + * gdb.base/permissions.exp: Update. + * gdb.base/pointers.exp: Update. + * gdb.base/prelink.exp: Update. + * gdb.base/printcmds.exp: Update. + * gdb.base/psymtab.exp: Update. + * gdb.base/ptype.exp: Update. + * gdb.base/relational.exp: Update. + * gdb.base/scope.exp: Update. + * gdb.base/setvar.exp: Update. + * gdb.base/shlib-call.exp: Update. + * gdb.base/shreloc.exp: Update. + * gdb.base/signals.exp: Update. + * gdb.base/sizeof.exp: Update. + * gdb.base/so-impl-ld.exp: Update. + * gdb.base/so-indr-cl.exp: Update. + * gdb.base/solib-disc.exp: Update. + * gdb.base/solib-display.exp: Update. + * gdb.base/solib-nodir.exp: Update. + * gdb.base/solib-overlap.exp: Update. + * gdb.base/solib-symbol.exp: Update. + * gdb.base/solib-weak.exp: Update. + * gdb.base/solib.exp: Update. + * gdb.base/store.exp: Update. + * gdb.base/structs.exp: Update. + * gdb.base/structs2.exp: Update. + * gdb.base/type-opaque.exp: Update. + * gdb.base/unload.exp: Update. + * gdb.base/varargs.exp: Update. + * gdb.base/volatile.exp: Update. + * gdb.base/watch_thread_num.exp: Update. + * gdb.base/watchpoint-solib.exp: Update. + * gdb.base/watchpoint.exp: Update. + * gdb.base/watchpoints.exp: Update. + * gdb.base/whatis.exp: Update. + * gdb.cell/arch.exp: Update. + * gdb.cell/break.exp: Update. + * gdb.cell/bt.exp: Update. + * gdb.cell/core.exp: Update. + * gdb.cell/data.exp: Update. + * gdb.cell/ea-cache.exp: Update. + * gdb.cell/f-regs.exp: Update. + * gdb.cell/fork.exp: Update. + * gdb.cell/gcore.exp: Update. + * gdb.cell/mem-access.exp: Update. + * gdb.cell/ptype.exp: Update. + * gdb.cell/registers.exp: Update. + * gdb.cell/sizeof.exp: Update. + * gdb.cell/solib-symbol.exp: Update. + * gdb.cell/solib.exp: Update. + * gdb.cp/ambiguous.exp: Update. + * gdb.cp/breakpoint.exp: Update. + * gdb.cp/bs15503.exp: Update. + * gdb.cp/casts.exp: Update. + * gdb.cp/class2.exp: Update. + * gdb.cp/cpexprs.exp: Update. + * gdb.cp/cplusfuncs.exp: Update. + * gdb.cp/ctti.exp: Update. + * gdb.cp/dispcxx.exp: Update. + * gdb.cp/gdb1355.exp: Update. + * gdb.cp/gdb2384.exp: Update. + * gdb.cp/gdb2495.exp: Update. + * gdb.cp/infcall-dlopen.exp: Update. + * gdb.cp/local.exp: Update. + * gdb.cp/m-data.exp: Update. + * gdb.cp/m-static.exp: Update. + * gdb.cp/mb-ctor.exp: Update. + * gdb.cp/mb-inline.exp: Update. + * gdb.cp/mb-templates.exp: Update. + * gdb.cp/member-ptr.exp: Update. + * gdb.cp/method.exp: Update. + * gdb.cp/namespace.exp: Update. + * gdb.cp/nextoverthrow.exp: Update. + * gdb.cp/nsdecl.exp: Update. + * gdb.cp/nsrecurs.exp: Update. + * gdb.cp/nsstress.exp: Update. + * gdb.cp/nsusing.exp: Update. + * gdb.cp/pr-1023.exp: Update. + * gdb.cp/pr-1210.exp: Update. + * gdb.cp/pr-574.exp: Update. + * gdb.cp/pr9631.exp: Update. + * gdb.cp/printmethod.exp: Update. + * gdb.cp/psmang.exp: Update. + * gdb.cp/re-set-overloaded.exp: Update. + * gdb.cp/rtti.exp: Update. + * gdb.cp/shadow.exp: Update. + * gdb.cp/templates.exp: Update. + * gdb.cp/try_catch.exp: Update. + * gdb.dwarf2/dw2-ranges.exp: Update. + * gdb.dwarf2/pr10770.exp: Update. + * gdb.fortran/library-module.exp: Update. + * gdb.hp/gdb.aCC/optimize.exp: Update. + * gdb.hp/gdb.aCC/watch-cmd.exp: Update. + * gdb.hp/gdb.base-hp/callfwmall.exp: Update. + * gdb.hp/gdb.base-hp/hwwatchbus.exp: Update. + * gdb.hp/gdb.base-hp/pxdb.exp: Update. + * gdb.hp/gdb.base-hp/sized-enum.exp: Update. + * gdb.hp/gdb.base-hp/so-thresh.exp: Update. + * gdb.hp/gdb.compat/xdb1.exp: Update. + * gdb.hp/gdb.compat/xdb2.exp: Update. + * gdb.hp/gdb.compat/xdb3.exp: Update. + * gdb.hp/gdb.defects/bs14602.exp: Update. + * gdb.hp/gdb.defects/solib-d.exp: Update. + * gdb.hp/gdb.objdbg/objdbg01.exp: Update. + * gdb.hp/gdb.objdbg/objdbg02.exp: Update. + * gdb.hp/gdb.objdbg/objdbg03.exp: Update. + * gdb.hp/gdb.objdbg/objdbg04.exp: Update. + * gdb.mi/gdb792.exp: Update. + * gdb.mi/mi-pending.exp: Update. + * gdb.mi/mi-solib.exp: Update. + * gdb.mi/mi-var-cp.exp: Update. + * gdb.opt/clobbered-registers-O2.exp: Update. + * gdb.opt/inline-bt.exp: Update. + * gdb.opt/inline-cmds.exp: Update. + * gdb.opt/inline-locals.exp: Update. + * gdb.python/py-events.exp: Update. + * gdb.python/py-finish-breakpoint.exp: Update. + * gdb.python/py-type.exp: Update. + * gdb.reverse/solib-precsave.exp: Update. + * gdb.reverse/solib-reverse.exp: Update. + * gdb.server/solib-list.exp: Update. + * gdb.stabs/weird.exp: Update. + * gdb.threads/attach-into-signal.exp: Update. + * gdb.threads/attach-stopped.exp: Update. + * gdb.threads/tls-shared.exp: Update. + * gdb.trace/change-loc.exp: Update. + * gdb.trace/strace.exp: Update. + 2012-06-19 Tom Tromey <tromey@redhat.com> * gdb.base/whatis.exp: Add tests. diff --git a/gdb/testsuite/gdb.ada/arrayidx.exp b/gdb/testsuite/gdb.ada/arrayidx.exp index cf19feffdbb..5de1145098d 100644 --- a/gdb/testsuite/gdb.ada/arrayidx.exp +++ b/gdb/testsuite/gdb.ada/arrayidx.exp @@ -27,7 +27,7 @@ if {[gdb_compile_ada "${srcfile}" "${binfile}" executable {debug}] != ""} { return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } set old_gcc [expr [test_compiler_info {gcc-[0-3]-*}] \ diff --git a/gdb/testsuite/gdb.ada/null_array.exp b/gdb/testsuite/gdb.ada/null_array.exp index 4de3a269ef0..4a0541824e2 100644 --- a/gdb/testsuite/gdb.ada/null_array.exp +++ b/gdb/testsuite/gdb.ada/null_array.exp @@ -30,7 +30,7 @@ clean_restart ${testfile} set bp_location [gdb_get_line_number "START" ${testdir}/foo.adb] runto "foo.adb:$bp_location" -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.arch/altivec-abi.exp b/gdb/testsuite/gdb.arch/altivec-abi.exp index 74b8f2a2290..a958250bd1f 100644 --- a/gdb/testsuite/gdb.arch/altivec-abi.exp +++ b/gdb/testsuite/gdb.arch/altivec-abi.exp @@ -31,7 +31,7 @@ set testfile "altivec-abi" set binfile ${objdir}/${subdir}/${testfile} set srcfile ${testfile}.c -if [get_compiler_info $binfile] { +if [get_compiler_info] { warning "get_compiler failed" return -1 } diff --git a/gdb/testsuite/gdb.arch/altivec-regs.exp b/gdb/testsuite/gdb.arch/altivec-regs.exp index 6ed61079a1c..0a708d8c01d 100644 --- a/gdb/testsuite/gdb.arch/altivec-regs.exp +++ b/gdb/testsuite/gdb.arch/altivec-regs.exp @@ -33,7 +33,7 @@ set binfile ${objdir}/${subdir}/${testfile} set srcfile ${testfile}.c set compile_flags {debug nowarnings} -if [get_compiler_info $binfile] { +if [get_compiler_info] { warning "get_compiler failed" return -1 } diff --git a/gdb/testsuite/gdb.arch/amd64-byte.exp b/gdb/testsuite/gdb.arch/amd64-byte.exp index 87f6332356f..023a602db75 100644 --- a/gdb/testsuite/gdb.arch/amd64-byte.exp +++ b/gdb/testsuite/gdb.arch/amd64-byte.exp @@ -28,7 +28,7 @@ set testfile "amd64-byte" set srcfile amd64-pseudo.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.arch/amd64-dword.exp b/gdb/testsuite/gdb.arch/amd64-dword.exp index ed427162248..a1f615caa80 100644 --- a/gdb/testsuite/gdb.arch/amd64-dword.exp +++ b/gdb/testsuite/gdb.arch/amd64-dword.exp @@ -28,7 +28,7 @@ set testfile "amd64-dword" set srcfile amd64-pseudo.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.arch/amd64-word.exp b/gdb/testsuite/gdb.arch/amd64-word.exp index 4eaa4214f86..62075183c1a 100644 --- a/gdb/testsuite/gdb.arch/amd64-word.exp +++ b/gdb/testsuite/gdb.arch/amd64-word.exp @@ -28,7 +28,7 @@ set testfile "amd64-word" set srcfile amd64-pseudo.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.arch/i386-avx.exp b/gdb/testsuite/gdb.arch/i386-avx.exp index 0ef25d17383..52a6e4aa8f5 100644 --- a/gdb/testsuite/gdb.arch/i386-avx.exp +++ b/gdb/testsuite/gdb.arch/i386-avx.exp @@ -28,7 +28,7 @@ set testfile "i386-avx" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.arch/i386-byte.exp b/gdb/testsuite/gdb.arch/i386-byte.exp index c4b212fc2dd..38e8c4d884e 100644 --- a/gdb/testsuite/gdb.arch/i386-byte.exp +++ b/gdb/testsuite/gdb.arch/i386-byte.exp @@ -28,7 +28,7 @@ set testfile "i386-byte" set srcfile i386-pseudo.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.arch/i386-sse.exp b/gdb/testsuite/gdb.arch/i386-sse.exp index 1a868bd9f5a..896faf35427 100644 --- a/gdb/testsuite/gdb.arch/i386-sse.exp +++ b/gdb/testsuite/gdb.arch/i386-sse.exp @@ -28,7 +28,7 @@ set testfile "i386-sse" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.arch/i386-word.exp b/gdb/testsuite/gdb.arch/i386-word.exp index 317b9f7d99e..fb402fbb769 100644 --- a/gdb/testsuite/gdb.arch/i386-word.exp +++ b/gdb/testsuite/gdb.arch/i386-word.exp @@ -28,7 +28,7 @@ set testfile "i386-word" set srcfile i386-pseudo.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.arch/ppc-dfp.exp b/gdb/testsuite/gdb.arch/ppc-dfp.exp index d08424b0a4e..47ddc8b9da8 100644 --- a/gdb/testsuite/gdb.arch/ppc-dfp.exp +++ b/gdb/testsuite/gdb.arch/ppc-dfp.exp @@ -25,7 +25,7 @@ set testfile "ppc-dfp" set binfile ${objdir}/${subdir}/${testfile} set srcfile ${testfile}.c -if [get_compiler_info $binfile] { +if [get_compiler_info] { warning "get_compiler failed" return -1 } diff --git a/gdb/testsuite/gdb.arch/ppc-fp.exp b/gdb/testsuite/gdb.arch/ppc-fp.exp index 2eff7fb7dcf..3d9aef685c7 100644 --- a/gdb/testsuite/gdb.arch/ppc-fp.exp +++ b/gdb/testsuite/gdb.arch/ppc-fp.exp @@ -25,7 +25,7 @@ set testfile "ppc-fp" set binfile ${objdir}/${subdir}/${testfile} set srcfile ${testfile}.c -if [get_compiler_info $binfile] { +if [get_compiler_info] { warning "get_compiler failed" return -1 } diff --git a/gdb/testsuite/gdb.arch/vsx-regs.exp b/gdb/testsuite/gdb.arch/vsx-regs.exp index 82201a3f33b..d015787763a 100644 --- a/gdb/testsuite/gdb.arch/vsx-regs.exp +++ b/gdb/testsuite/gdb.arch/vsx-regs.exp @@ -29,7 +29,7 @@ set binfile ${objdir}/${subdir}/${testfile} set srcfile ${testfile}.c set compile_flags {debug nowarnings quiet} -if [get_compiler_info $binfile] { +if [get_compiler_info] { warning "get_compiler failed" return -1 } diff --git a/gdb/testsuite/gdb.base/all-bin.exp b/gdb/testsuite/gdb.base/all-bin.exp index 0ac81857130..a3e9ca730ea 100644 --- a/gdb/testsuite/gdb.base/all-bin.exp +++ b/gdb/testsuite/gdb.base/all-bin.exp @@ -36,7 +36,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/annota1.exp b/gdb/testsuite/gdb.base/annota1.exp index c7371b4db90..11d9fba1306 100644 --- a/gdb/testsuite/gdb.base/annota1.exp +++ b/gdb/testsuite/gdb.base/annota1.exp @@ -447,7 +447,7 @@ proc thread_test {} { set binfile ${objdir}/${subdir}/${testfile}-watch_thread_num set gdb_prompt $old_gdb_prompt - if { ![get_compiler_info ${binfile}] && [gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] == "" } { + if { ![get_compiler_info] && [gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] == "" } { gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.base/async.exp b/gdb/testsuite/gdb.base/async.exp index 4acd153a7cf..505f54a5ea1 100644 --- a/gdb/testsuite/gdb.base/async.exp +++ b/gdb/testsuite/gdb.base/async.exp @@ -27,7 +27,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/attach.exp b/gdb/testsuite/gdb.base/attach.exp index ff1b6bc62f7..c3e12a0d858 100644 --- a/gdb/testsuite/gdb.base/attach.exp +++ b/gdb/testsuite/gdb.base/attach.exp @@ -58,7 +58,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${binfile2}" executable {d return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/break-interp.exp b/gdb/testsuite/gdb.base/break-interp.exp index 1e47b34664d..4012e669867 100644 --- a/gdb/testsuite/gdb.base/break-interp.exp +++ b/gdb/testsuite/gdb.base/break-interp.exp @@ -30,7 +30,7 @@ set binfile_lib ${objdir}/${subdir}/${test}.so set srcfile "${test}-main.c" set srcfile_lib "${test}-lib.c" -if [get_compiler_info ${binfile_lib}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp b/gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp index fc71a5fdd6c..8df6d59c513 100644 --- a/gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp +++ b/gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp @@ -29,7 +29,7 @@ set testfile "break-on-linker-gcd-function" set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.base/call-ar-st.exp b/gdb/testsuite/gdb.base/call-ar-st.exp index 81501c26c9f..06432105e28 100644 --- a/gdb/testsuite/gdb.base/call-ar-st.exp +++ b/gdb/testsuite/gdb.base/call-ar-st.exp @@ -35,7 +35,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/call-rt-st.exp b/gdb/testsuite/gdb.base/call-rt-st.exp index a53118870f2..6db6cfd3865 100644 --- a/gdb/testsuite/gdb.base/call-rt-st.exp +++ b/gdb/testsuite/gdb.base/call-rt-st.exp @@ -41,7 +41,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/call-sc.exp b/gdb/testsuite/gdb.base/call-sc.exp index 135010cf120..1b2a495d0a4 100644 --- a/gdb/testsuite/gdb.base/call-sc.exp +++ b/gdb/testsuite/gdb.base/call-sc.exp @@ -35,7 +35,7 @@ set binfile ${objdir}/${subdir}/${testfile} # Create and source the file that provides information about the # compiler used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/callfuncs.exp b/gdb/testsuite/gdb.base/callfuncs.exp index 3057020b738..66abee932fe 100644 --- a/gdb/testsuite/gdb.base/callfuncs.exp +++ b/gdb/testsuite/gdb.base/callfuncs.exp @@ -33,7 +33,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable $com # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/catch-load.exp b/gdb/testsuite/gdb.base/catch-load.exp index 21b8505b5a7..787d360ddc0 100644 --- a/gdb/testsuite/gdb.base/catch-load.exp +++ b/gdb/testsuite/gdb.base/catch-load.exp @@ -18,7 +18,7 @@ if {[skip_shlib_tests]} { return -1 } -if {[get_compiler_info not-used]} { +if {[get_compiler_info]} { warning "Could not get compiler info" untested catch-load.exp return -1 diff --git a/gdb/testsuite/gdb.base/completion.exp b/gdb/testsuite/gdb.base/completion.exp index 35fb537ef28..9b9459c55ee 100644 --- a/gdb/testsuite/gdb.base/completion.exp +++ b/gdb/testsuite/gdb.base/completion.exp @@ -71,7 +71,7 @@ if { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/complex.exp b/gdb/testsuite/gdb.base/complex.exp index ff403b5a150..2ce60f14039 100644 --- a/gdb/testsuite/gdb.base/complex.exp +++ b/gdb/testsuite/gdb.base/complex.exp @@ -28,7 +28,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable $opt # Start with a fresh gdb. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/condbreak.exp b/gdb/testsuite/gdb.base/condbreak.exp index 4d0b4ba45e7..e8e0d84ef84 100644 --- a/gdb/testsuite/gdb.base/condbreak.exp +++ b/gdb/testsuite/gdb.base/condbreak.exp @@ -41,7 +41,7 @@ if { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/consecutive.exp b/gdb/testsuite/gdb.base/consecutive.exp index c3edaf6461f..50362743b4b 100644 --- a/gdb/testsuite/gdb.base/consecutive.exp +++ b/gdb/testsuite/gdb.base/consecutive.exp @@ -29,7 +29,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/constvars.exp b/gdb/testsuite/gdb.base/constvars.exp index 7764d0402f2..eb8f0248ea1 100644 --- a/gdb/testsuite/gdb.base/constvars.exp +++ b/gdb/testsuite/gdb.base/constvars.exp @@ -33,7 +33,7 @@ set binfile ${objdir}/${subdir}/${testfile} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/corefile.exp b/gdb/testsuite/gdb.base/corefile.exp index 027eb2c6437..b9fc7dca94f 100644 --- a/gdb/testsuite/gdb.base/corefile.exp +++ b/gdb/testsuite/gdb.base/corefile.exp @@ -31,7 +31,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/eval-skip.exp b/gdb/testsuite/gdb.base/eval-skip.exp index 8e296d37a5b..57fa0f6871d 100644 --- a/gdb/testsuite/gdb.base/eval-skip.exp +++ b/gdb/testsuite/gdb.base/eval-skip.exp @@ -41,7 +41,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info $binfile] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/expand-psymtabs.exp b/gdb/testsuite/gdb.base/expand-psymtabs.exp index 25f3bda55d3..6632736adc3 100644 --- a/gdb/testsuite/gdb.base/expand-psymtabs.exp +++ b/gdb/testsuite/gdb.base/expand-psymtabs.exp @@ -36,7 +36,7 @@ set binfile_1 ${objdir}/${subdir}/${testfile}_1.o set binfile_2 ${objdir}/${subdir}/${testfile}_2.o # What compiler are we using? -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/exprs.exp b/gdb/testsuite/gdb.base/exprs.exp index f46a8e6dcca..9599028bac7 100644 --- a/gdb/testsuite/gdb.base/exprs.exp +++ b/gdb/testsuite/gdb.base/exprs.exp @@ -28,7 +28,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/fileio.exp b/gdb/testsuite/gdb.base/fileio.exp index e8760da8d52..a001559361c 100644 --- a/gdb/testsuite/gdb.base/fileio.exp +++ b/gdb/testsuite/gdb.base/fileio.exp @@ -33,7 +33,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/fixsection.exp b/gdb/testsuite/gdb.base/fixsection.exp index c4aee67eafe..ad991a2c00d 100644 --- a/gdb/testsuite/gdb.base/fixsection.exp +++ b/gdb/testsuite/gdb.base/fixsection.exp @@ -29,7 +29,7 @@ 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 ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/funcargs.exp b/gdb/testsuite/gdb.base/funcargs.exp index edc14e8610d..5f1a81c7690 100644 --- a/gdb/testsuite/gdb.base/funcargs.exp +++ b/gdb/testsuite/gdb.base/funcargs.exp @@ -33,7 +33,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable $com # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/gdb11530.exp b/gdb/testsuite/gdb.base/gdb11530.exp index ba222c2078b..65ce00c3030 100644 --- a/gdb/testsuite/gdb.base/gdb11530.exp +++ b/gdb/testsuite/gdb.base/gdb11530.exp @@ -24,7 +24,7 @@ set binfile ${testfile}${EXEEXT} # Unnamed union is a GNU extension, thus we restrict the test # to gcc compiler. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/gdb1555.exp b/gdb/testsuite/gdb.base/gdb1555.exp index 11bed5ddd02..151a95d931b 100644 --- a/gdb/testsuite/gdb.base/gdb1555.exp +++ b/gdb/testsuite/gdb.base/gdb1555.exp @@ -33,7 +33,7 @@ set execsrc "${srcdir}/${subdir}/${srcfile}" remote_exec build "rm -f ${binfile}" # get the value of gcc_compiled -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/gnu-ifunc.exp b/gdb/testsuite/gdb.base/gnu-ifunc.exp index a5b5fa4798e..a8b967aebdf 100644 --- a/gdb/testsuite/gdb.base/gnu-ifunc.exp +++ b/gdb/testsuite/gdb.base/gnu-ifunc.exp @@ -48,7 +48,7 @@ set lib_o ${objdir}/${subdir}/${libfile}.o set lib_opts {} set exec_opts [list debug shlib=$lib_so] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/gnu_vector.exp b/gdb/testsuite/gdb.base/gnu_vector.exp index a1c12538343..a1443a55615 100644 --- a/gdb/testsuite/gdb.base/gnu_vector.exp +++ b/gdb/testsuite/gdb.base/gnu_vector.exp @@ -22,7 +22,7 @@ set testfile "gnu_vector" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/info-fun.exp b/gdb/testsuite/gdb.base/info-fun.exp index b0b4f700112..627d8fbda68 100644 --- a/gdb/testsuite/gdb.base/info-fun.exp +++ b/gdb/testsuite/gdb.base/info-fun.exp @@ -28,7 +28,7 @@ set executable ${testfile} set binfile ${objdir}/${subdir}/${executable} set bin_flags [list debug shlib=${binfile_lib}] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/info-macros.exp b/gdb/testsuite/gdb.base/info-macros.exp index 9d785816f6b..c87f1043ff9 100644 --- a/gdb/testsuite/gdb.base/info-macros.exp +++ b/gdb/testsuite/gdb.base/info-macros.exp @@ -17,7 +17,7 @@ set testfile "info-macros" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -get_compiler_info ${binfile} +get_compiler_info if ![test_compiler_info gcc*] { untested ${testfile}.exp return -1 diff --git a/gdb/testsuite/gdb.base/jit-simple.exp b/gdb/testsuite/gdb.base/jit-simple.exp index d1be1a774b5..95752b53db7 100644 --- a/gdb/testsuite/gdb.base/jit-simple.exp +++ b/gdb/testsuite/gdb.base/jit-simple.exp @@ -18,7 +18,7 @@ if {[skip_shlib_tests]} { return -1 } -if {[get_compiler_info not-used]} { +if {[get_compiler_info]} { warning "Could not get compiler info" untested jit-simple.exp return 1 diff --git a/gdb/testsuite/gdb.base/jit-so.exp b/gdb/testsuite/gdb.base/jit-so.exp index 7df2011acf5..36f18ad6fe7 100644 --- a/gdb/testsuite/gdb.base/jit-so.exp +++ b/gdb/testsuite/gdb.base/jit-so.exp @@ -21,7 +21,7 @@ if {[skip_shlib_tests]} { return -1 } -if {[get_compiler_info not-used]} { +if {[get_compiler_info]} { warning "Could not get compiler info" untested jit-so.exp return 1 diff --git a/gdb/testsuite/gdb.base/jit.exp b/gdb/testsuite/gdb.base/jit.exp index 70b33a7f205..3034e6ada33 100644 --- a/gdb/testsuite/gdb.base/jit.exp +++ b/gdb/testsuite/gdb.base/jit.exp @@ -18,7 +18,7 @@ if {[skip_shlib_tests]} { return -1 } -if {[get_compiler_info not-used]} { +if {[get_compiler_info]} { warning "Could not get compiler info" untested jit.exp return 1 diff --git a/gdb/testsuite/gdb.base/langs.exp b/gdb/testsuite/gdb.base/langs.exp index e041b016061..7a96ce3a2b2 100644 --- a/gdb/testsuite/gdb.base/langs.exp +++ b/gdb/testsuite/gdb.base/langs.exp @@ -50,7 +50,7 @@ set timeout 10 # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/list.exp b/gdb/testsuite/gdb.base/list.exp index 58143752d12..16d25d25a19 100644 --- a/gdb/testsuite/gdb.base/list.exp +++ b/gdb/testsuite/gdb.base/list.exp @@ -43,7 +43,7 @@ if { [gdb_compile "${binfile}0.o ${binfile}1.o" ${binfile} executable {debug}] # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/logical.exp b/gdb/testsuite/gdb.base/logical.exp index 0df5555effe..495f5294580 100644 --- a/gdb/testsuite/gdb.base/logical.exp +++ b/gdb/testsuite/gdb.base/logical.exp @@ -34,7 +34,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/long_long.exp b/gdb/testsuite/gdb.base/long_long.exp index a699d0bda97..880a078606d 100644 --- a/gdb/testsuite/gdb.base/long_long.exp +++ b/gdb/testsuite/gdb.base/long_long.exp @@ -28,7 +28,7 @@ set binfile ${objdir}/${subdir}/${testfile} # What compiler are we using? # -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/longjmp.exp b/gdb/testsuite/gdb.base/longjmp.exp index d5af26ee875..fbc2d64807f 100644 --- a/gdb/testsuite/gdb.base/longjmp.exp +++ b/gdb/testsuite/gdb.base/longjmp.exp @@ -27,7 +27,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/macscp.exp b/gdb/testsuite/gdb.base/macscp.exp index 44a526b4fe4..5f29204e97a 100644 --- a/gdb/testsuite/gdb.base/macscp.exp +++ b/gdb/testsuite/gdb.base/macscp.exp @@ -22,7 +22,7 @@ set binfile ${objdir}/${subdir}/${testfile} set options { debug additional_flags=-DFROM_COMMANDLINE=ARG} -get_compiler_info ${binfile} +get_compiler_info if [test_compiler_info gcc*] { lappend options additional_flags=-g3 } diff --git a/gdb/testsuite/gdb.base/mips_pro.exp b/gdb/testsuite/gdb.base/mips_pro.exp index 8e963c1a64a..a7b8290fb90 100644 --- a/gdb/testsuite/gdb.base/mips_pro.exp +++ b/gdb/testsuite/gdb.base/mips_pro.exp @@ -21,7 +21,7 @@ set binfile ${objdir}/${subdir}/${testfile} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/miscexprs.exp b/gdb/testsuite/gdb.base/miscexprs.exp index caafe0525c8..cc27cc5e960 100644 --- a/gdb/testsuite/gdb.base/miscexprs.exp +++ b/gdb/testsuite/gdb.base/miscexprs.exp @@ -46,7 +46,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [lis return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/morestack.exp b/gdb/testsuite/gdb.base/morestack.exp index 460e67c43ff..c008abd0f0b 100644 --- a/gdb/testsuite/gdb.base/morestack.exp +++ b/gdb/testsuite/gdb.base/morestack.exp @@ -13,7 +13,7 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see <http://www.gnu.org/licenses/>. -if [get_compiler_info "ignored"] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/nodebug.exp b/gdb/testsuite/gdb.base/nodebug.exp index 344a8048389..a5b0f38310b 100644 --- a/gdb/testsuite/gdb.base/nodebug.exp +++ b/gdb/testsuite/gdb.base/nodebug.exp @@ -21,7 +21,7 @@ set testfile nodebug set srcfile $srcdir/$subdir/$testfile.c set binfile $objdir/$subdir/$testfile -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/opaque.exp b/gdb/testsuite/gdb.base/opaque.exp index f5fef764bd7..a330d404c05 100644 --- a/gdb/testsuite/gdb.base/opaque.exp +++ b/gdb/testsuite/gdb.base/opaque.exp @@ -42,7 +42,7 @@ if { [gdb_compile "${binfile}0.o ${binfile}1.o" ${binfile} executable {debug}] # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/pc-fp.exp b/gdb/testsuite/gdb.base/pc-fp.exp index f6500000d51..5ef6e4e91f0 100644 --- a/gdb/testsuite/gdb.base/pc-fp.exp +++ b/gdb/testsuite/gdb.base/pc-fp.exp @@ -33,7 +33,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/pending.exp b/gdb/testsuite/gdb.base/pending.exp index 7c0c5866c78..79c45763ed6 100644 --- a/gdb/testsuite/gdb.base/pending.exp +++ b/gdb/testsuite/gdb.base/pending.exp @@ -33,7 +33,7 @@ set lib_sl $objdir/$subdir/$libfile.sl set lib_opts debug set exec_opts [list debug shlib=$lib_sl] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/permissions.exp b/gdb/testsuite/gdb.base/permissions.exp index e173b77c4db..9930674a712 100644 --- a/gdb/testsuite/gdb.base/permissions.exp +++ b/gdb/testsuite/gdb.base/permissions.exp @@ -27,7 +27,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info $binfile] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/pointers.exp b/gdb/testsuite/gdb.base/pointers.exp index 10901344b5c..5b1a0bf86d5 100644 --- a/gdb/testsuite/gdb.base/pointers.exp +++ b/gdb/testsuite/gdb.base/pointers.exp @@ -34,7 +34,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/prelink.exp b/gdb/testsuite/gdb.base/prelink.exp index 71196bd7e19..4ea9e1e7f52 100644 --- a/gdb/testsuite/gdb.base/prelink.exp +++ b/gdb/testsuite/gdb.base/prelink.exp @@ -23,7 +23,7 @@ if { ![isnative] || [is_remote host] || [skip_shlib_tests]} { return } -if [get_compiler_info "ignored"] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/printcmds.exp b/gdb/testsuite/gdb.base/printcmds.exp index 0f35ba8511e..993162e3505 100644 --- a/gdb/testsuite/gdb.base/printcmds.exp +++ b/gdb/testsuite/gdb.base/printcmds.exp @@ -29,7 +29,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -get_compiler_info ${binfile} +get_compiler_info proc test_integer_literals_accepted {} { global gdb_prompt diff --git a/gdb/testsuite/gdb.base/psymtab.exp b/gdb/testsuite/gdb.base/psymtab.exp index 06674b121cf..fc0992b1d75 100644 --- a/gdb/testsuite/gdb.base/psymtab.exp +++ b/gdb/testsuite/gdb.base/psymtab.exp @@ -46,7 +46,7 @@ if { [gdb_compile "${testfile}1.o ${testfile}2.o" ${binfile} executable {debug} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/ptype.exp b/gdb/testsuite/gdb.base/ptype.exp index 51a301468c6..c7bede212d6 100644 --- a/gdb/testsuite/gdb.base/ptype.exp +++ b/gdb/testsuite/gdb.base/ptype.exp @@ -40,7 +40,7 @@ if { [gdb_compile "${binfile}0.o ${binfile}1.o" "${binfile}" executable {debug} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/relational.exp b/gdb/testsuite/gdb.base/relational.exp index c1ee625b166..356d3138b75 100644 --- a/gdb/testsuite/gdb.base/relational.exp +++ b/gdb/testsuite/gdb.base/relational.exp @@ -29,7 +29,7 @@ if { [prepare_for_testing relational.exp relational int-type.c {debug nowarnings return -1 } -if [get_compiler_info not-used] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/scope.exp b/gdb/testsuite/gdb.base/scope.exp index 8db7096cc01..273eaaeaf1f 100644 --- a/gdb/testsuite/gdb.base/scope.exp +++ b/gdb/testsuite/gdb.base/scope.exp @@ -38,7 +38,7 @@ if { [gdb_compile "${binfile}0.o ${binfile}1.o" ${binfile} executable {debug}] # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/setvar.exp b/gdb/testsuite/gdb.base/setvar.exp index 5b597edd06c..870d0437408 100644 --- a/gdb/testsuite/gdb.base/setvar.exp +++ b/gdb/testsuite/gdb.base/setvar.exp @@ -35,7 +35,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/shlib-call.exp b/gdb/testsuite/gdb.base/shlib-call.exp index 9b3e251ed4d..5c82d660798 100644 --- a/gdb/testsuite/gdb.base/shlib-call.exp +++ b/gdb/testsuite/gdb.base/shlib-call.exp @@ -46,7 +46,7 @@ set binfile ${objdir}/${subdir}/${testfile} set lib_opts "debug" set exec_opts [list debug shlib=${lib1} shlib=${lib2}] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/shreloc.exp b/gdb/testsuite/gdb.base/shreloc.exp index 559a0a2e854..206d9d8b1df 100644 --- a/gdb/testsuite/gdb.base/shreloc.exp +++ b/gdb/testsuite/gdb.base/shreloc.exp @@ -39,7 +39,7 @@ set binfile $objdir/$subdir/$testfile set lib1_sl $objdir/$subdir/$libfile1.sl set lib2_sl $objdir/$subdir/$libfile2.sl -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/signals.exp b/gdb/testsuite/gdb.base/signals.exp index b7162d288ed..1683fbc1a23 100644 --- a/gdb/testsuite/gdb.base/signals.exp +++ b/gdb/testsuite/gdb.base/signals.exp @@ -30,7 +30,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/sizeof.exp b/gdb/testsuite/gdb.base/sizeof.exp index a8b29705c5b..0c64e013f7b 100644 --- a/gdb/testsuite/gdb.base/sizeof.exp +++ b/gdb/testsuite/gdb.base/sizeof.exp @@ -32,7 +32,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/so-impl-ld.exp b/gdb/testsuite/gdb.base/so-impl-ld.exp index ab36a9e5601..f12df92ca57 100644 --- a/gdb/testsuite/gdb.base/so-impl-ld.exp +++ b/gdb/testsuite/gdb.base/so-impl-ld.exp @@ -29,11 +29,11 @@ set lib_sl $objdir/$subdir/$libfile.sl set lib_opts debug set exec_opts [list debug shlib=$lib_sl] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/so-indr-cl.exp b/gdb/testsuite/gdb.base/so-indr-cl.exp index 464f1281bf5..e4620a25bc2 100644 --- a/gdb/testsuite/gdb.base/so-indr-cl.exp +++ b/gdb/testsuite/gdb.base/so-indr-cl.exp @@ -32,7 +32,7 @@ set testfile "so-indr-cl" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/solib-disc.exp b/gdb/testsuite/gdb.base/solib-disc.exp index 0b1e9e75112..d9fb4b3057f 100644 --- a/gdb/testsuite/gdb.base/solib-disc.exp +++ b/gdb/testsuite/gdb.base/solib-disc.exp @@ -38,7 +38,7 @@ set lib_syms [shlib_symbol_file ${libname}] remote_exec build "rm -f ${binfile}" -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/solib-display.exp b/gdb/testsuite/gdb.base/solib-display.exp index 14914595f7f..17ded75bff0 100644 --- a/gdb/testsuite/gdb.base/solib-display.exp +++ b/gdb/testsuite/gdb.base/solib-display.exp @@ -44,7 +44,7 @@ set executable ${testfile} set binfile ${objdir}/${subdir}/${executable} set bin_flags [list debug shlib=${binfile_lib}] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/solib-nodir.exp b/gdb/testsuite/gdb.base/solib-nodir.exp index f79ceead60c..7f456a6033f 100644 --- a/gdb/testsuite/gdb.base/solib-nodir.exp +++ b/gdb/testsuite/gdb.base/solib-nodir.exp @@ -31,7 +31,7 @@ set objfile ${objdir}/${subdir}/${executable}.o set binfile ${objdir}/${subdir}/${executable} # build the first test case -if { [get_compiler_info unused] +if { [get_compiler_info] || [gdb_compile_shlib "${srcdir}/${subdir}/${srclibfile}" "${binlibfile}" [list debug ldflags=-Wl,-soname,${binlibfilebase}]] != "" || [gdb_gnu_strip_debug $binlibfile] || [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug}] != "" diff --git a/gdb/testsuite/gdb.base/solib-overlap.exp b/gdb/testsuite/gdb.base/solib-overlap.exp index 49e67be6e39..13f07a2a5cc 100644 --- a/gdb/testsuite/gdb.base/solib-overlap.exp +++ b/gdb/testsuite/gdb.base/solib-overlap.exp @@ -36,7 +36,7 @@ if [is_remote target] { return 0 } -if [get_compiler_info binfile-unused] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/solib-symbol.exp b/gdb/testsuite/gdb.base/solib-symbol.exp index 3c0331749b1..1adb16f5335 100644 --- a/gdb/testsuite/gdb.base/solib-symbol.exp +++ b/gdb/testsuite/gdb.base/solib-symbol.exp @@ -30,7 +30,7 @@ set srcfile ${srcdir}/${subdir}/${testfile}.c set binfile ${objdir}/${subdir}/${testfile} set bin_flags [list debug shlib=${binfile_lib}] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/solib-weak.exp b/gdb/testsuite/gdb.base/solib-weak.exp index 4ad8d32a294..cf1aac784d8 100644 --- a/gdb/testsuite/gdb.base/solib-weak.exp +++ b/gdb/testsuite/gdb.base/solib-weak.exp @@ -30,7 +30,7 @@ if {([istarget arm*-*-symbianelf*] } # This test uses GCC-specific syntax. -if [get_compiler_info not-used] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/solib.exp b/gdb/testsuite/gdb.base/solib.exp index 78ad41c0fca..7d2b4ed1b20 100644 --- a/gdb/testsuite/gdb.base/solib.exp +++ b/gdb/testsuite/gdb.base/solib.exp @@ -39,7 +39,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/store.exp b/gdb/testsuite/gdb.base/store.exp index cf713041b83..851d134be0e 100644 --- a/gdb/testsuite/gdb.base/store.exp +++ b/gdb/testsuite/gdb.base/store.exp @@ -27,7 +27,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/structs.exp b/gdb/testsuite/gdb.base/structs.exp index e68ab6c8bcd..d98b7f30e7f 100644 --- a/gdb/testsuite/gdb.base/structs.exp +++ b/gdb/testsuite/gdb.base/structs.exp @@ -36,7 +36,7 @@ set anychar_re {-?[0-9]{1,3} '(.|\\([0-7]{3}|[a-z]|\\|'))'} # Create and source the file that provides information about the # compiler used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/structs2.exp b/gdb/testsuite/gdb.base/structs2.exp index 2d505d3fdba..9005fbd0a25 100644 --- a/gdb/testsuite/gdb.base/structs2.exp +++ b/gdb/testsuite/gdb.base/structs2.exp @@ -20,7 +20,7 @@ set binfile ${objdir}/${subdir}/${testfile} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/type-opaque.exp b/gdb/testsuite/gdb.base/type-opaque.exp index 999fb1d3d27..f91c24b47e6 100644 --- a/gdb/testsuite/gdb.base/type-opaque.exp +++ b/gdb/testsuite/gdb.base/type-opaque.exp @@ -27,7 +27,7 @@ set execsrc "${srcdir}/${subdir}/${srcfile}" remote_exec build "rm -f ${binfile}" # get the value of gcc_compiled -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/unload.exp b/gdb/testsuite/gdb.base/unload.exp index 5ab0fcda180..944e4e363a2 100644 --- a/gdb/testsuite/gdb.base/unload.exp +++ b/gdb/testsuite/gdb.base/unload.exp @@ -42,7 +42,7 @@ set lib_dlopen2 [shlib_target_file ${libname2}] set lib_syms [shlib_symbol_file ${libname}] set lib_syms2 [shlib_symbol_file ${libname2}] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/varargs.exp b/gdb/testsuite/gdb.base/varargs.exp index 7a3e121cac1..955c17dec9e 100644 --- a/gdb/testsuite/gdb.base/varargs.exp +++ b/gdb/testsuite/gdb.base/varargs.exp @@ -34,7 +34,7 @@ set testfile "varargs" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/volatile.exp b/gdb/testsuite/gdb.base/volatile.exp index 827c28f5d8c..ade9d66a6cd 100644 --- a/gdb/testsuite/gdb.base/volatile.exp +++ b/gdb/testsuite/gdb.base/volatile.exp @@ -42,7 +42,7 @@ if { [prepare_for_testing volatile.exp volatile constvars.c] } { # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info not-used] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.base/watch_thread_num.exp b/gdb/testsuite/gdb.base/watch_thread_num.exp index 630763b20a9..487c2fd7f9e 100644 --- a/gdb/testsuite/gdb.base/watch_thread_num.exp +++ b/gdb/testsuite/gdb.base/watch_thread_num.exp @@ -31,7 +31,7 @@ set binfile ${objdir}/${subdir}/${testfile} # What compiler are we using? # -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/watchpoint-solib.exp b/gdb/testsuite/gdb.base/watchpoint-solib.exp index 107c77c6336..b3dfea7c956 100644 --- a/gdb/testsuite/gdb.base/watchpoint-solib.exp +++ b/gdb/testsuite/gdb.base/watchpoint-solib.exp @@ -33,7 +33,7 @@ set lib_sl $objdir/$subdir/$libname set lib_dlopen [shlib_target_file ${libname}] set lib_syms [shlib_symbol_file ${libname}] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/watchpoint.exp b/gdb/testsuite/gdb.base/watchpoint.exp index 15482fab7c4..2941fbf4520 100644 --- a/gdb/testsuite/gdb.base/watchpoint.exp +++ b/gdb/testsuite/gdb.base/watchpoint.exp @@ -20,7 +20,7 @@ set testfile "watchpoint" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/watchpoints.exp b/gdb/testsuite/gdb.base/watchpoints.exp index 8edd62c240a..57500b05194 100644 --- a/gdb/testsuite/gdb.base/watchpoints.exp +++ b/gdb/testsuite/gdb.base/watchpoints.exp @@ -22,7 +22,7 @@ set binfile ${objdir}/${subdir}/${testfile} set wp_set 1 -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.base/whatis.exp b/gdb/testsuite/gdb.base/whatis.exp index 793bf0be01b..dda3a02322e 100644 --- a/gdb/testsuite/gdb.base/whatis.exp +++ b/gdb/testsuite/gdb.base/whatis.exp @@ -36,7 +36,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable $exe # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.cell/arch.exp b/gdb/testsuite/gdb.cell/arch.exp index 8ee08c8c1b2..6f812ff545d 100644 --- a/gdb/testsuite/gdb.cell/arch.exp +++ b/gdb/testsuite/gdb.cell/arch.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/break.exp b/gdb/testsuite/gdb.cell/break.exp index bfe64e37866..499c80ff676 100644 --- a/gdb/testsuite/gdb.cell/break.exp +++ b/gdb/testsuite/gdb.cell/break.exp @@ -47,7 +47,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/bt.exp b/gdb/testsuite/gdb.cell/bt.exp index db07780ba75..15a3b326722 100644 --- a/gdb/testsuite/gdb.cell/bt.exp +++ b/gdb/testsuite/gdb.cell/bt.exp @@ -58,7 +58,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o $spu2_bin-embed.o] $p return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/core.exp b/gdb/testsuite/gdb.cell/core.exp index 3c015384069..76867a68bc7 100644 --- a/gdb/testsuite/gdb.cell/core.exp +++ b/gdb/testsuite/gdb.cell/core.exp @@ -51,7 +51,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/data.exp b/gdb/testsuite/gdb.cell/data.exp index 9afc963467c..3fb134eb71c 100644 --- a/gdb/testsuite/gdb.cell/data.exp +++ b/gdb/testsuite/gdb.cell/data.exp @@ -47,7 +47,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/ea-cache.exp b/gdb/testsuite/gdb.cell/ea-cache.exp index f1de8bddc4c..fa7fb7a584b 100644 --- a/gdb/testsuite/gdb.cell/ea-cache.exp +++ b/gdb/testsuite/gdb.cell/ea-cache.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/f-regs.exp b/gdb/testsuite/gdb.cell/f-regs.exp index 0952cc601bc..42cc064c966 100644 --- a/gdb/testsuite/gdb.cell/f-regs.exp +++ b/gdb/testsuite/gdb.cell/f-regs.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/fork.exp b/gdb/testsuite/gdb.cell/fork.exp index d5eed2f0e7b..b22b4e63308 100644 --- a/gdb/testsuite/gdb.cell/fork.exp +++ b/gdb/testsuite/gdb.cell/fork.exp @@ -47,7 +47,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/gcore.exp b/gdb/testsuite/gdb.cell/gcore.exp index 230fc809712..c05bc4ab525 100644 --- a/gdb/testsuite/gdb.cell/gcore.exp +++ b/gdb/testsuite/gdb.cell/gcore.exp @@ -51,7 +51,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/mem-access.exp b/gdb/testsuite/gdb.cell/mem-access.exp index 55c094a2b2d..305c32a224e 100644 --- a/gdb/testsuite/gdb.cell/mem-access.exp +++ b/gdb/testsuite/gdb.cell/mem-access.exp @@ -47,7 +47,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/ptype.exp b/gdb/testsuite/gdb.cell/ptype.exp index e5f1687fe89..58fcb4b0b9c 100644 --- a/gdb/testsuite/gdb.cell/ptype.exp +++ b/gdb/testsuite/gdb.cell/ptype.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/registers.exp b/gdb/testsuite/gdb.cell/registers.exp index ff20b31b257..654e85f739c 100644 --- a/gdb/testsuite/gdb.cell/registers.exp +++ b/gdb/testsuite/gdb.cell/registers.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/sizeof.exp b/gdb/testsuite/gdb.cell/sizeof.exp index 616c797ab76..0fb2dfe2403 100644 --- a/gdb/testsuite/gdb.cell/sizeof.exp +++ b/gdb/testsuite/gdb.cell/sizeof.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/solib-symbol.exp b/gdb/testsuite/gdb.cell/solib-symbol.exp index db49369c1ed..8e788e3d722 100644 --- a/gdb/testsuite/gdb.cell/solib-symbol.exp +++ b/gdb/testsuite/gdb.cell/solib-symbol.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cell/solib.exp b/gdb/testsuite/gdb.cell/solib.exp index 8985c2d159a..f65d64add3f 100644 --- a/gdb/testsuite/gdb.cell/solib.exp +++ b/gdb/testsuite/gdb.cell/solib.exp @@ -46,7 +46,7 @@ if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable return -1 } -if [get_compiler_info ${ppu_bin}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/ambiguous.exp b/gdb/testsuite/gdb.cp/ambiguous.exp index 539b32de09b..d86806205c8 100644 --- a/gdb/testsuite/gdb.cp/ambiguous.exp +++ b/gdb/testsuite/gdb.cp/ambiguous.exp @@ -32,7 +32,7 @@ set testfile "ambiguous" set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.cp/breakpoint.exp b/gdb/testsuite/gdb.cp/breakpoint.exp index 4793a93ced2..d512a701b3b 100644 --- a/gdb/testsuite/gdb.cp/breakpoint.exp +++ b/gdb/testsuite/gdb.cp/breakpoint.exp @@ -32,7 +32,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/bs15503.exp b/gdb/testsuite/gdb.cp/bs15503.exp index 95b4b4e619c..ad2a13d48f6 100644 --- a/gdb/testsuite/gdb.cp/bs15503.exp +++ b/gdb/testsuite/gdb.cp/bs15503.exp @@ -28,7 +28,7 @@ set testfile "bs15503" set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/casts.exp b/gdb/testsuite/gdb.cp/casts.exp index ee499d72f0d..0856ba589a7 100644 --- a/gdb/testsuite/gdb.cp/casts.exp +++ b/gdb/testsuite/gdb.cp/casts.exp @@ -31,7 +31,7 @@ set testfile "casts" set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.cp/class2.exp b/gdb/testsuite/gdb.cp/class2.exp index 6a952454f17..705e2033b87 100644 --- a/gdb/testsuite/gdb.cp/class2.exp +++ b/gdb/testsuite/gdb.cp/class2.exp @@ -22,7 +22,7 @@ set binfile ${objdir}/${subdir}/${testfile} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/cpexprs.exp b/gdb/testsuite/gdb.cp/cpexprs.exp index 1ae7dc0c2f0..de50ee3c0fb 100644 --- a/gdb/testsuite/gdb.cp/cpexprs.exp +++ b/gdb/testsuite/gdb.cp/cpexprs.exp @@ -684,7 +684,7 @@ if {[gdb_compile [file join $srcdir $subdir $srcfile] $binfile \ return -1 } -if {[get_compiler_info $binfile "c++"]} { +if {[get_compiler_info "c++"]} { return -1 } diff --git a/gdb/testsuite/gdb.cp/cplusfuncs.exp b/gdb/testsuite/gdb.cp/cplusfuncs.exp index 5bca25e97f2..0a16a8a06b8 100644 --- a/gdb/testsuite/gdb.cp/cplusfuncs.exp +++ b/gdb/testsuite/gdb.cp/cplusfuncs.exp @@ -23,7 +23,7 @@ set testfile "cplusfuncs" set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if { [get_compiler_info $binfile "c++"] } { +if { [get_compiler_info "c++"] } { return -1 } diff --git a/gdb/testsuite/gdb.cp/ctti.exp b/gdb/testsuite/gdb.cp/ctti.exp index 17a76d3e9ca..a10fd8df594 100644 --- a/gdb/testsuite/gdb.cp/ctti.exp +++ b/gdb/testsuite/gdb.cp/ctti.exp @@ -60,7 +60,7 @@ if { [gdb_compile "$objdir/$subdir/$objfile $objdir/$subdir/$objfile1 $objdir/$s return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.cp/dispcxx.exp b/gdb/testsuite/gdb.cp/dispcxx.exp index da35c114431..ddb91b28d37 100644 --- a/gdb/testsuite/gdb.cp/dispcxx.exp +++ b/gdb/testsuite/gdb.cp/dispcxx.exp @@ -19,7 +19,7 @@ set testfile dispcxx set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { untested dispcxx.exp return -1 } diff --git a/gdb/testsuite/gdb.cp/gdb1355.exp b/gdb/testsuite/gdb.cp/gdb1355.exp index 140260c61d8..fb9c73f8234 100644 --- a/gdb/testsuite/gdb.cp/gdb1355.exp +++ b/gdb/testsuite/gdb.cp/gdb1355.exp @@ -36,7 +36,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/gdb2384.exp b/gdb/testsuite/gdb.cp/gdb2384.exp index ee78acd7004..4ae6baa7688 100644 --- a/gdb/testsuite/gdb.cp/gdb2384.exp +++ b/gdb/testsuite/gdb.cp/gdb2384.exp @@ -34,7 +34,7 @@ set sofile $objdir/$subdir/${libfile}.so # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/gdb2495.exp b/gdb/testsuite/gdb.cp/gdb2495.exp index 1f76ffa91af..f47b68aec61 100644 --- a/gdb/testsuite/gdb.cp/gdb2495.exp +++ b/gdb/testsuite/gdb.cp/gdb2495.exp @@ -49,7 +49,7 @@ set binfile $objdir/$subdir/$testfile # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/infcall-dlopen.exp b/gdb/testsuite/gdb.cp/infcall-dlopen.exp index e2abde898f3..3f04a085f98 100644 --- a/gdb/testsuite/gdb.cp/infcall-dlopen.exp +++ b/gdb/testsuite/gdb.cp/infcall-dlopen.exp @@ -17,7 +17,7 @@ if {[skip_shlib_tests]} { return 0 } -if [get_compiler_info not-used] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/local.exp b/gdb/testsuite/gdb.cp/local.exp index e720583609f..c6592815538 100644 --- a/gdb/testsuite/gdb.cp/local.exp +++ b/gdb/testsuite/gdb.cp/local.exp @@ -38,7 +38,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info $binfile "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/m-data.exp b/gdb/testsuite/gdb.cp/m-data.exp index 1ef956eeff0..16f72bff7d5 100644 --- a/gdb/testsuite/gdb.cp/m-data.exp +++ b/gdb/testsuite/gdb.cp/m-data.exp @@ -33,7 +33,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/m-static.exp b/gdb/testsuite/gdb.cp/m-static.exp index 563d70108e9..26f94583c9c 100644 --- a/gdb/testsuite/gdb.cp/m-static.exp +++ b/gdb/testsuite/gdb.cp/m-static.exp @@ -47,7 +47,7 @@ if { [gdb_compile "$objdir/$subdir/$objfile $objdir/$subdir/$objfile1" "${binfil return -1 } -if [get_compiler_info $binfile] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/mb-ctor.exp b/gdb/testsuite/gdb.cp/mb-ctor.exp index c13b62c70e8..49f1e35c965 100644 --- a/gdb/testsuite/gdb.cp/mb-ctor.exp +++ b/gdb/testsuite/gdb.cp/mb-ctor.exp @@ -23,7 +23,7 @@ set testfile "mb-ctor" set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/mb-inline.exp b/gdb/testsuite/gdb.cp/mb-inline.exp index bf00c26bbc2..13a8fb4e938 100644 --- a/gdb/testsuite/gdb.cp/mb-inline.exp +++ b/gdb/testsuite/gdb.cp/mb-inline.exp @@ -44,7 +44,7 @@ if { [gdb_compile "$objdir/$subdir/$objfile1 $objdir/$subdir/$objfile2" "${binf return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/mb-templates.exp b/gdb/testsuite/gdb.cp/mb-templates.exp index d386c029098..c1d3ebc7ee2 100644 --- a/gdb/testsuite/gdb.cp/mb-templates.exp +++ b/gdb/testsuite/gdb.cp/mb-templates.exp @@ -29,7 +29,7 @@ set srcfile ${testfile}.cc set executable ${testfile} set binfile ${objdir}/${subdir}/${executable} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/member-ptr.exp b/gdb/testsuite/gdb.cp/member-ptr.exp index d4a9b13ae2d..f5b289acfc7 100644 --- a/gdb/testsuite/gdb.cp/member-ptr.exp +++ b/gdb/testsuite/gdb.cp/member-ptr.exp @@ -29,7 +29,7 @@ set testfile "member-ptr" set srcfile ${testfile}.cc set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/method.exp b/gdb/testsuite/gdb.cp/method.exp index b862bc6a3b7..2b2b3ee641b 100644 --- a/gdb/testsuite/gdb.cp/method.exp +++ b/gdb/testsuite/gdb.cp/method.exp @@ -44,7 +44,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info $binfile "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/namespace.exp b/gdb/testsuite/gdb.cp/namespace.exp index 82018c6441b..f56198c91ef 100644 --- a/gdb/testsuite/gdb.cp/namespace.exp +++ b/gdb/testsuite/gdb.cp/namespace.exp @@ -35,7 +35,7 @@ set srcfile1 ${testfile}1.cc set objfile1 ${objdir}/${subdir}/${testfile}1.o set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} c++] { +if [get_compiler_info c++] { return -1; } diff --git a/gdb/testsuite/gdb.cp/nextoverthrow.exp b/gdb/testsuite/gdb.cp/nextoverthrow.exp index 2dafcab90e0..8045e570224 100644 --- a/gdb/testsuite/gdb.cp/nextoverthrow.exp +++ b/gdb/testsuite/gdb.cp/nextoverthrow.exp @@ -22,7 +22,7 @@ set binfile $objdir/$subdir/$testfile # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { untested nextoverthrow.exp return -1 } diff --git a/gdb/testsuite/gdb.cp/nsdecl.exp b/gdb/testsuite/gdb.cp/nsdecl.exp index 5da4a0c5256..cf37451001b 100644 --- a/gdb/testsuite/gdb.cp/nsdecl.exp +++ b/gdb/testsuite/gdb.cp/nsdecl.exp @@ -24,7 +24,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.cp/nsrecurs.exp b/gdb/testsuite/gdb.cp/nsrecurs.exp index 49affaa3c71..ced50d6df40 100644 --- a/gdb/testsuite/gdb.cp/nsrecurs.exp +++ b/gdb/testsuite/gdb.cp/nsrecurs.exp @@ -23,7 +23,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" \ return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/nsstress.exp b/gdb/testsuite/gdb.cp/nsstress.exp index dbc1a042924..ebefb7812e8 100644 --- a/gdb/testsuite/gdb.cp/nsstress.exp +++ b/gdb/testsuite/gdb.cp/nsstress.exp @@ -24,7 +24,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/nsusing.exp b/gdb/testsuite/gdb.cp/nsusing.exp index fecb882b179..bb8954710a7 100644 --- a/gdb/testsuite/gdb.cp/nsusing.exp +++ b/gdb/testsuite/gdb.cp/nsusing.exp @@ -23,7 +23,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable \ return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/pr-1023.exp b/gdb/testsuite/gdb.cp/pr-1023.exp index 0eec05ce553..ff5d3fa134e 100644 --- a/gdb/testsuite/gdb.cp/pr-1023.exp +++ b/gdb/testsuite/gdb.cp/pr-1023.exp @@ -33,7 +33,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/pr-1210.exp b/gdb/testsuite/gdb.cp/pr-1210.exp index 90da5bc55d8..8c2d733e6de 100644 --- a/gdb/testsuite/gdb.cp/pr-1210.exp +++ b/gdb/testsuite/gdb.cp/pr-1210.exp @@ -32,7 +32,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/pr-574.exp b/gdb/testsuite/gdb.cp/pr-574.exp index b8333f84f4c..d8eac399e51 100644 --- a/gdb/testsuite/gdb.cp/pr-574.exp +++ b/gdb/testsuite/gdb.cp/pr-574.exp @@ -35,7 +35,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/pr9631.exp b/gdb/testsuite/gdb.cp/pr9631.exp index ececc985816..34ee5494d6f 100644 --- a/gdb/testsuite/gdb.cp/pr9631.exp +++ b/gdb/testsuite/gdb.cp/pr9631.exp @@ -26,7 +26,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/printmethod.exp b/gdb/testsuite/gdb.cp/printmethod.exp index 5362b80d038..1be6a779664 100644 --- a/gdb/testsuite/gdb.cp/printmethod.exp +++ b/gdb/testsuite/gdb.cp/printmethod.exp @@ -34,7 +34,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/psmang.exp b/gdb/testsuite/gdb.cp/psmang.exp index 605f8ebf66a..1dc5368487b 100644 --- a/gdb/testsuite/gdb.cp/psmang.exp +++ b/gdb/testsuite/gdb.cp/psmang.exp @@ -181,7 +181,7 @@ if { [skip_cplus_tests] } { continue } set testfile "psmang" set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.cp/re-set-overloaded.exp b/gdb/testsuite/gdb.cp/re-set-overloaded.exp index afd5c5a3e49..c6ecd2145eb 100644 --- a/gdb/testsuite/gdb.cp/re-set-overloaded.exp +++ b/gdb/testsuite/gdb.cp/re-set-overloaded.exp @@ -26,7 +26,7 @@ set sofile $objdir/$subdir/${testfile}.so # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/rtti.exp b/gdb/testsuite/gdb.cp/rtti.exp index d9e413f4aae..ebd8d27fbe3 100644 --- a/gdb/testsuite/gdb.cp/rtti.exp +++ b/gdb/testsuite/gdb.cp/rtti.exp @@ -54,7 +54,7 @@ if { [gdb_compile "$objdir/$subdir/$objfile1 $objdir/$subdir/$objfile2" "${binf return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/shadow.exp b/gdb/testsuite/gdb.cp/shadow.exp index 47d6207d765..91541a36cc1 100644 --- a/gdb/testsuite/gdb.cp/shadow.exp +++ b/gdb/testsuite/gdb.cp/shadow.exp @@ -25,7 +25,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.cp/templates.exp b/gdb/testsuite/gdb.cp/templates.exp index 72b65ae4155..1eb82eba2b4 100644 --- a/gdb/testsuite/gdb.cp/templates.exp +++ b/gdb/testsuite/gdb.cp/templates.exp @@ -26,7 +26,7 @@ set binfile ${objdir}/${subdir}/${testfile} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.cp/try_catch.exp b/gdb/testsuite/gdb.cp/try_catch.exp index 846d8f9b8a1..d43e377ea19 100644 --- a/gdb/testsuite/gdb.cp/try_catch.exp +++ b/gdb/testsuite/gdb.cp/try_catch.exp @@ -33,7 +33,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1 } diff --git a/gdb/testsuite/gdb.dwarf2/dw2-ranges.exp b/gdb/testsuite/gdb.dwarf2/dw2-ranges.exp index a31b3ff88ba..83abd2a4511 100644 --- a/gdb/testsuite/gdb.dwarf2/dw2-ranges.exp +++ b/gdb/testsuite/gdb.dwarf2/dw2-ranges.exp @@ -24,7 +24,7 @@ if {![dwarf2_support]} { } # The .c files use __attribute__. -if [get_compiler_info unused] { +if [get_compiler_info] { return -1; } if !$gcc_compiled { diff --git a/gdb/testsuite/gdb.dwarf2/pr10770.exp b/gdb/testsuite/gdb.dwarf2/pr10770.exp index 094f807b285..a381227b770 100644 --- a/gdb/testsuite/gdb.dwarf2/pr10770.exp +++ b/gdb/testsuite/gdb.dwarf2/pr10770.exp @@ -23,7 +23,7 @@ if {[prepare_for_testing ${testfile}.exp ${testfile} ${srcfile}]} { } # This test can only be run on targets which use GCC. -get_compiler_info ${testfile} +get_compiler_info if {![test_compiler_info "gcc-*"]} { return 0 } diff --git a/gdb/testsuite/gdb.fortran/library-module.exp b/gdb/testsuite/gdb.fortran/library-module.exp index 7afe79959d2..75b0695ee0b 100644 --- a/gdb/testsuite/gdb.fortran/library-module.exp +++ b/gdb/testsuite/gdb.fortran/library-module.exp @@ -20,7 +20,7 @@ set libfile ${testfile}-lib.so set binfile ${testfile} # Required for -fPIC by gdb_compile_shlib. -if [get_compiler_info not-used] { +if [get_compiler_info] { warning "Could not get compiler info" return -1 } diff --git a/gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp b/gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp index 803c5ca084e..a5061d5c61d 100644 --- a/gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp +++ b/gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp @@ -30,7 +30,7 @@ set testfile optimize set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp b/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp index 5ad4a3beeea..6ef434f4bda 100644 --- a/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp +++ b/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp @@ -28,7 +28,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } if { $gcc_compiled } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp index a9011ea816c..52b0a42dae3 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp @@ -96,7 +96,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp index a4a765b758b..af8a679638d 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp @@ -31,7 +31,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp index 00eebe86a2b..b9b997d05f4 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp @@ -28,7 +28,7 @@ set srcfile ${testfile}.c set objfile ${objdir}/${subdir}/${testfile}.o set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp index 082e32b5197..2ddcbc64b00 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp @@ -32,7 +32,7 @@ set testfile "sized-enum" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp b/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp index 10a9a7a099b..2e982038f21 100644 --- a/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp +++ b/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp @@ -19,7 +19,7 @@ if { [skip_hp_tests] } then { continue } set testfile "so-thresh" set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp b/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp index ca3f51f8795..84fb3472ab0 100644 --- a/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp +++ b/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp @@ -30,7 +30,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } if { $gcc_compiled } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp b/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp index 821641ae7fe..0ea2c0702a1 100644 --- a/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp +++ b/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp @@ -42,7 +42,7 @@ if { [gdb_compile "${binfile}0.o ${binfile}1.o" ${binfile} executable {debug}] return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp b/gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp index 61c459df002..76623211ae0 100644 --- a/gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp +++ b/gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp @@ -38,7 +38,7 @@ if { [gdb_compile "${binfile1}.o ${binfile2}.o" ${binfile} executable {debug}] return -1 } -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } if { $gcc_compiled } then { continue } diff --git a/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp b/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp index 27985ff75d3..45dbf94bb9b 100644 --- a/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp +++ b/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp @@ -17,7 +17,7 @@ set binfile ${objdir}/${subdir}/${testfile} # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp b/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp index 30d08380f84..8b629250c74 100644 --- a/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp +++ b/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp @@ -70,7 +70,7 @@ set libfile2 ${objdir}/${subdir}/${testfile}2.sl # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1; } diff --git a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg01.exp b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg01.exp index 1b491bbfc0d..02ec5d363f9 100644 --- a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg01.exp +++ b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg01.exp @@ -16,7 +16,7 @@ set symaddrfile ${toolssubdir}/symaddr # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg02.exp b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg02.exp index 027c77e54d1..5677b7ea605 100644 --- a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg02.exp +++ b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg02.exp @@ -15,7 +15,7 @@ set toolssubdir ${srcdir}/${subdir}/tools # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg03.exp b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg03.exp index c5d12e55449..73defdcc13f 100644 --- a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg03.exp +++ b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg03.exp @@ -20,7 +20,7 @@ if [istarget "hppa64-*-*"] { # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg04.exp b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg04.exp index b060f1c2436..0a989502283 100644 --- a/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg04.exp +++ b/gdb/testsuite/gdb.hp/gdb.objdbg/objdbg04.exp @@ -16,7 +16,7 @@ set symaddrfile ${toolssubdir}/symaddr # Create and source the file that provides information about the compiler # used to compile the test case. -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.mi/gdb792.exp b/gdb/testsuite/gdb.mi/gdb792.exp index bd0972a5d02..25909df53d9 100644 --- a/gdb/testsuite/gdb.mi/gdb792.exp +++ b/gdb/testsuite/gdb.mi/gdb792.exp @@ -31,7 +31,7 @@ set testfile gdb792 set srcfile "$testfile.cc" set binfile $objdir/$subdir/$testfile -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.mi/mi-inheritance-syntax-error.exp b/gdb/testsuite/gdb.mi/mi-inheritance-syntax-error.exp index 4831a5bb31e..a705e2855fc 100644 --- a/gdb/testsuite/gdb.mi/mi-inheritance-syntax-error.exp +++ b/gdb/testsuite/gdb.mi/mi-inheritance-syntax-error.exp @@ -27,7 +27,7 @@ set testfile mi-inheritance-syntax-error set srcfile "$testfile.cc" set binfile $objdir/$subdir/$testfile -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.mi/mi-pending.exp b/gdb/testsuite/gdb.mi/mi-pending.exp index 137e289c27a..8bfa4e56ff5 100644 --- a/gdb/testsuite/gdb.mi/mi-pending.exp +++ b/gdb/testsuite/gdb.mi/mi-pending.exp @@ -34,7 +34,7 @@ set lib_sl $objdir/$subdir/$libfile.sl set lib_opts debug set exec_opts [list debug shlib=$lib_sl] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.mi/mi-solib.exp b/gdb/testsuite/gdb.mi/mi-solib.exp index 8e548f49f21..bee6a5d74f1 100644 --- a/gdb/testsuite/gdb.mi/mi-solib.exp +++ b/gdb/testsuite/gdb.mi/mi-solib.exp @@ -36,7 +36,7 @@ set srcfile ${srcdir}/${subdir}/${testfile}.c set binfile ${objdir}/${subdir}/${testfile} set bin_flags [list debug shlib=${binfile_lib}] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.mi/mi-var-cp.exp b/gdb/testsuite/gdb.mi/mi-var-cp.exp index 9efc0881096..6ab5208639c 100644 --- a/gdb/testsuite/gdb.mi/mi-var-cp.exp +++ b/gdb/testsuite/gdb.mi/mi-var-cp.exp @@ -27,7 +27,7 @@ set testfile mi-var-cp set srcfile "$testfile.cc" set binfile $objdir/$subdir/$testfile -if [get_compiler_info ${binfile} "c++"] { +if [get_compiler_info "c++"] { return -1; } diff --git a/gdb/testsuite/gdb.opt/clobbered-registers-O2.exp b/gdb/testsuite/gdb.opt/clobbered-registers-O2.exp index 2559b3d0f21..0c319800518 100644 --- a/gdb/testsuite/gdb.opt/clobbered-registers-O2.exp +++ b/gdb/testsuite/gdb.opt/clobbered-registers-O2.exp @@ -24,7 +24,7 @@ set binfile ${objdir}/${subdir}/${testfile} # What compiler are we using? # -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.opt/inline-bt.exp b/gdb/testsuite/gdb.opt/inline-bt.exp index 6b356905ed7..a90a1a7cc41 100644 --- a/gdb/testsuite/gdb.opt/inline-bt.exp +++ b/gdb/testsuite/gdb.opt/inline-bt.exp @@ -34,7 +34,7 @@ gdb_load ${binfile} runto_main -get_compiler_info $binfile +get_compiler_info get_debug_format if { [skip_inline_frame_tests] } { untested inline-bt.exp diff --git a/gdb/testsuite/gdb.opt/inline-cmds.exp b/gdb/testsuite/gdb.opt/inline-cmds.exp index 13aeeb81ae4..ec38d39c4b4 100644 --- a/gdb/testsuite/gdb.opt/inline-cmds.exp +++ b/gdb/testsuite/gdb.opt/inline-cmds.exp @@ -36,7 +36,7 @@ gdb_test_no_output "set listsize 1" runto_main -get_compiler_info $binfile +get_compiler_info get_debug_format if { [skip_inline_frame_tests] } { untested inline-cmds.exp diff --git a/gdb/testsuite/gdb.opt/inline-locals.exp b/gdb/testsuite/gdb.opt/inline-locals.exp index f11167f9b7b..4fbceb0caab 100644 --- a/gdb/testsuite/gdb.opt/inline-locals.exp +++ b/gdb/testsuite/gdb.opt/inline-locals.exp @@ -34,7 +34,7 @@ gdb_load ${binfile} runto_main -get_compiler_info $binfile +get_compiler_info get_debug_format if { [skip_inline_var_tests] } { untested inline-bt.exp diff --git a/gdb/testsuite/gdb.python/py-events.exp b/gdb/testsuite/gdb.python/py-events.exp index d872daf0e14..28a1394d265 100644 --- a/gdb/testsuite/gdb.python/py-events.exp +++ b/gdb/testsuite/gdb.python/py-events.exp @@ -30,7 +30,7 @@ set binfile ${objdir}/${subdir}/${testfile} set exec_opts [list debug shlib=$lib_sl] set pyfile ${srcdir}/${subdir}/${testfile}.py -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.python/py-finish-breakpoint.exp b/gdb/testsuite/gdb.python/py-finish-breakpoint.exp index c601e85377a..e56ad67e1bb 100644 --- a/gdb/testsuite/gdb.python/py-finish-breakpoint.exp +++ b/gdb/testsuite/gdb.python/py-finish-breakpoint.exp @@ -33,7 +33,7 @@ set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} set exec_opts [list debug shlib=$lib_sl] -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.python/py-type.exp b/gdb/testsuite/gdb.python/py-type.exp index 8e64b92916d..eb9012a08aa 100644 --- a/gdb/testsuite/gdb.python/py-type.exp +++ b/gdb/testsuite/gdb.python/py-type.exp @@ -22,7 +22,7 @@ set testfile "py-type" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info not-used c++] { +if [get_compiler_info c++] { return -1; } diff --git a/gdb/testsuite/gdb.reverse/solib-precsave.exp b/gdb/testsuite/gdb.reverse/solib-precsave.exp index ec89f6c4312..01e6ea1fcb6 100644 --- a/gdb/testsuite/gdb.reverse/solib-precsave.exp +++ b/gdb/testsuite/gdb.reverse/solib-precsave.exp @@ -28,7 +28,7 @@ set libsrc ${libfile}.c set library ${objdir}/${subdir}/${libfile}.sl set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.reverse/solib-reverse.exp b/gdb/testsuite/gdb.reverse/solib-reverse.exp index 7d90ccce987..03bb1756fcf 100644 --- a/gdb/testsuite/gdb.reverse/solib-reverse.exp +++ b/gdb/testsuite/gdb.reverse/solib-reverse.exp @@ -27,7 +27,7 @@ set libsrc ${libfile}.c set library ${objdir}/${subdir}/${libfile}.sl set binfile ${objdir}/${subdir}/${testfile} -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.server/solib-list.exp b/gdb/testsuite/gdb.server/solib-list.exp index a25a235dc95..ee68382db19 100644 --- a/gdb/testsuite/gdb.server/solib-list.exp +++ b/gdb/testsuite/gdb.server/solib-list.exp @@ -35,7 +35,7 @@ set executable ${testfile} set objfile ${objdir}/${subdir}/${executable}.o set binfile ${objdir}/${subdir}/${executable} -if { [get_compiler_info unused] +if { [get_compiler_info] || [gdb_compile_shlib "${srcdir}/${subdir}/${srclibfile}" "${binlibfile}" [list debug ldflags=-Wl,-soname,${binlibfile}]] != "" || [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug}] != "" || [gdb_compile "${objfile} ${binlibfile}" "${binfile}" executable {}] != "" } { diff --git a/gdb/testsuite/gdb.stabs/weird.exp b/gdb/testsuite/gdb.stabs/weird.exp index 80bc2841c8b..6289844dcc5 100644 --- a/gdb/testsuite/gdb.stabs/weird.exp +++ b/gdb/testsuite/gdb.stabs/weird.exp @@ -28,7 +28,7 @@ set testfile weird set srcfile ${objdir}/${subdir}/weird.s set binfile ${objdir}/${subdir}/weirdx.o -if { [ get_compiler_info "$binfile" ] } { +if { [ get_compiler_info ] } { return -1 } diff --git a/gdb/testsuite/gdb.threads/attach-into-signal.exp b/gdb/testsuite/gdb.threads/attach-into-signal.exp index 8560584d946..f98906b1292 100644 --- a/gdb/testsuite/gdb.threads/attach-into-signal.exp +++ b/gdb/testsuite/gdb.threads/attach-into-signal.exp @@ -46,7 +46,7 @@ proc corefunc { threadtype executable } { set binfile ${objdir}/${subdir}/${executable} set escapedbinfile [string_to_regexp ${objdir}/${subdir}/${executable}] - if [get_compiler_info ${binfile}] { + if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.threads/attach-stopped.exp b/gdb/testsuite/gdb.threads/attach-stopped.exp index caef1694f8b..cba19d83f48 100644 --- a/gdb/testsuite/gdb.threads/attach-stopped.exp +++ b/gdb/testsuite/gdb.threads/attach-stopped.exp @@ -42,7 +42,7 @@ proc corefunc { threadtype } { global subdir global gdb_prompt - if [get_compiler_info ${binfile}] { + if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.threads/tls-shared.exp b/gdb/testsuite/gdb.threads/tls-shared.exp index f6457292b5e..c0538d3beb2 100644 --- a/gdb/testsuite/gdb.threads/tls-shared.exp +++ b/gdb/testsuite/gdb.threads/tls-shared.exp @@ -26,7 +26,7 @@ set binfile_lib ${objdir}/${subdir}/${libfile}.so remote_exec build "rm -f ${binfile}" # get the value of gcc_compiled -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.trace/change-loc.exp b/gdb/testsuite/gdb.trace/change-loc.exp index ef8ab45953e..c881ae79291 100644 --- a/gdb/testsuite/gdb.trace/change-loc.exp +++ b/gdb/testsuite/gdb.trace/change-loc.exp @@ -31,7 +31,7 @@ set lib_sl2 $objdir/$subdir/$libfile2.sl set lib_opts debug -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/gdb.trace/strace.exp b/gdb/testsuite/gdb.trace/strace.exp index 51da92b6c74..b79fd9c5c7f 100644 --- a/gdb/testsuite/gdb.trace/strace.exp +++ b/gdb/testsuite/gdb.trace/strace.exp @@ -27,7 +27,7 @@ set libipa [get_in_proc_agent] set lib_opts debug -if [get_compiler_info ${binfile}] { +if [get_compiler_info] { return -1 } diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 1dfe564b0e6..6489c154720 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -1827,7 +1827,7 @@ proc skip_altivec_tests {} { # Make sure we have a compiler that understands altivec. set compile_flags {debug nowarnings} - if [get_compiler_info not-used] { + if [get_compiler_info] { warning "Could not get compiler info" return 1 } @@ -1916,7 +1916,7 @@ proc skip_vsx_tests {} { # Make sure we have a compiler that understands altivec. set compile_flags {debug nowarnings quiet} - if [get_compiler_info not-used] { + if [get_compiler_info] { warning "Could not get compiler info" return 1 } @@ -2100,10 +2100,7 @@ set hp_aCC_compiler 0 # Figure out what compiler I am using. # -# BINFILE is a "compiler information" output file. This implementation -# does not use BINFILE. -# -# ARGS can be empty or "C++". If empty, "C" is assumed. +# ARG can be empty or "C++". If empty, "C" is assumed. # # There are several ways to do this, with various problems. # @@ -2152,7 +2149,7 @@ set hp_aCC_compiler 0 # # -- chastain 2004-01-06 -proc get_compiler_info {binfile args} { +proc get_compiler_info {{arg ""}} { # For compiler.c and compiler.cc global srcdir @@ -2170,7 +2167,7 @@ proc get_compiler_info {binfile args} { # Choose which file to preprocess. set ifile "${srcdir}/lib/compiler.c" - if { [llength $args] > 0 && [lindex $args 0] == "c++" } { + if { $arg == "c++" } { set ifile "${srcdir}/lib/compiler.cc" } @@ -2181,12 +2178,12 @@ proc get_compiler_info {binfile args} { # We have to use -E and -o together, despite the comments # above, because of how DejaGnu handles remote host testing. set ppout "$outdir/compiler.i" - gdb_compile "${ifile}" "$ppout" preprocess [list "$args" quiet] + gdb_compile "${ifile}" "$ppout" preprocess [list "$arg" quiet] set file [open $ppout r] set cppout [read $file] close $file } else { - set cppout [ gdb_compile "${ifile}" "" preprocess [list "$args" quiet] ] + set cppout [ gdb_compile "${ifile}" "" preprocess [list "$arg" quiet] ] } log_file -a "$outdir/$tool.log" @@ -3690,7 +3687,7 @@ proc build_executable { testname executable {sources ""} {options {debug}} } { if { [lsearch -exact $options "c++"] >= 0 } { set info_options "c++" } - if [get_compiler_info ${binfile} ${info_options}] { + if [get_compiler_info ${info_options}] { return -1 } return 0 |