diff options
188 files changed, 384 insertions, 198 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index f123984..ad37b0a 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 cf19fef..5de1145 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 4de3a26..4a05418 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 74b8f2a..a958250 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 6ed6107..0a708d8 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 87f6332..023a602 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 ed42716..a1f615c 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 4eaa421..6207518 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 0ef25d1..52a6e4a 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 c4b212f..38e8c4d 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 1a868bd..896faf3 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 317b9f7..fb402fb 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 d08424b..47ddc8b 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 2eff7fb..3d9aef6 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 82201a3..d015787 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 0ac8185..a3e9ca7 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 c7371b4..11d9fba 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 4acd153..505f54a 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 ff1b6bc..c3e12a0 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 1e47b34..4012e66 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 fc71a5f..8df6d59 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 81501c2..0643210 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 a531188..6db6cfd 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 135010c..1b2a495 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 3057020..66abee9 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 21b8505..787d360 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 35fb537..9b9459c 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 ff403b5..2ce60f1 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 4d0b4ba..e8e0d84 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 c3edaf6..5036274 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 7764d04..eb8f024 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 027eb2c..b9fc7dc 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 8e296d3..57fa0f6 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 25f3bda..6632736 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 f46a8e6..9599028 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 e8760da..a001559 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 c4aee67..ad991a2 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 edc14e8..5f1a81c 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 ba222c2..65ce00c 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 11bed5d..151a95d 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 a5b5fa4..a8b967a 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 a1c1253..a1443a55 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 b0b4f70..627d8fb 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 9d78581..c87f104 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 d1be1a7..95752b5 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 7df2011..36f18ad 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 70b33a7..3034e6a 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 e041b01..7a96ce3 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 5814375..16d25d2 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 0df5555..495f529 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 a699d0b..880a078 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 d5af26e..fbc2d64 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 44a526b..5f29204 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 8e963c1..a7b8290 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 caafe05..cc27cc5 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 460e67c..c008abd 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 344a804..a5b0f38 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 f5fef76..a330d40 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 f650000..5ef6e4e 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 7c0c586..79c4576 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 e173b77..9930674 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 1090134..5b1a0bf 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 71196bd..4ea9e1e 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 0f35ba8..993162e 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 06674b1..fc0992b 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 51a3014..c7bede2 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 c1ee625..356d313 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 8db7096..273eaae 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 5b597ed..870d043 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 9b3e251..5c82d66 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 559a0a2..206d9d8 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 b7162d2..1683fbc 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 a8b2970..0c64e01 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 ab36a9e..f12df92 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 464f128..e4620a2 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 0b1e9e7..d9fb4b3 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 1491459..17ded75 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 f79ceea..7f456a6 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 49e67be..13f07a2 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 3c03317..1adb16f 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 4ad8d32..cf1aac7 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 78ad41c..7d2b4ed 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 cf71304..851d134 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 e68ab6c..d98b7f3 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 2d505d3..9005fbd 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 999fb1d..f91c24b 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 5ab0fcd..944e4e3 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 7a3e121..955c17d 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 827c28f..ade9d66 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 630763b..487c2fd 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 107c77c..b3dfea7 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 15482fa..2941fbf 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 8edd62c..57500b0 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 793bf0b..dda3a02 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 8ee08c8..6f812ff 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 bfe64e3..499c80f 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 db07780..15a3b32 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 3c01538..76867a6 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 9afc963..3fb134e 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 f1de8bd..fa7fb7a 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 0952cc6..42cc064 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 d5eed2f..b22b4e6 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 230fc80..c05bc4a 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 55c094a..305c32a 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 e5f1687..58fcb4b 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 ff20b31..654e85f 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 616c797..0fb2dfe 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 db49369..8e788e3 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 8985c2d..f65d64a 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 539b32d..d868062 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 4793a93..d512a70 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 95b4b4e..ad2a13d 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 ee499d7..0856ba5 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 6a95245..705e203 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 1ae7dc0..de50ee3 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 5bca25e..0a16a8a 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 17a76d3..a10fd8d 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 da35c11..ddb91b2 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 140260c..fb9c73f 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 ee78acd..4ae6baa 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 1f76ffa..f47b68a 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 e2abde8..3f04a08 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 e720583..c659281 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 1ef956e..16f72bf 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 563d701..26f9458 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 c13b62c..49f1e35 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 bf00c26..13a8fb4 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 d386c02..c1d3ebc 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 d4a9b13..f5b289a 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 b862bc6..2b2b3ee 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 82018c6..f56198c 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 2dafcab..8045e57 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 5da4a0c..cf37451 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 49affaa..ced50d6 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 dbc1a04..ebefb78 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 fecb882..bb89547 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 0eec05c..ff5d3fa 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 90da5bc..8c2d733 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 b8333f8..d8eac39 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 ececc98..34ee549 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 5362b80..1be6a77 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 605f8eb..1dc5368 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 afd5c5a..c6ecd21 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 d9e413f..ebd8d27 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 47d6207..91541a3 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 72b65ae..1eb82eb 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 846d8f9..d43e377 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 a31b3ff..83abd2a 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 094f807..a381227 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 7afe799..75b0695 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 803c5ca..a5061d5 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 5ad4a3b..6ef434f 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 a9011ea..52b0a42 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 a4a765b..af8a679 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 00eebe8..b9b997d 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 082e32b..2ddcbc6 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 10a9a7a..2e98203 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 ca3f51f..84fb347 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 821641a..0ea2c07 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 61c459d..7662321 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 27985ff..45dbf94 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 30d0838..8b62925 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 1b491bb..02ec5d3 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 027c77e..5677b7e 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 c5d12e5..73defdc 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 b060f1c..0a98950 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 bd0972a..25909df 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 4831a5b..a705e28 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 137e289..8bfa4e5 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 8e548f4..bee6a5d 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 9efc088..6ab5208 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 2559b3d..0c31980 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 6b35690..a90a1a7 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 13aeeb8..ec38d39 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 f11167f..4fbceb0 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 d872daf..28a1394 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 c601e85..e56ad67 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 8e64b92..eb9012a 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 ec89f6c..01e6ea1 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 7d90ccc..03bb175 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 a25a235..ee68382 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 80bc284..6289844 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 8560584..f98906b 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 caef169..cba19d8 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 f645729..c0538d3 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 ef8ab45..c881ae7 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 51da92b..b79fd9c 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 1dfe564..6489c15 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 |