(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-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.
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 set old_gcc [expr [test_compiler_info {gcc-[0-3]-*}] \
 
 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;
 }
 
 
 set binfile ${objdir}/${subdir}/${testfile}
 set srcfile ${testfile}.c
 
-if [get_compiler_info $binfile] {
+if [get_compiler_info] {
     warning "get_compiler failed"
     return -1
 }
 
 set srcfile ${testfile}.c
 
 set compile_flags {debug nowarnings}
-if [get_compiler_info $binfile] {
+if [get_compiler_info] {
     warning "get_compiler failed"
     return -1
 }
 
 set srcfile amd64-pseudo.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile amd64-pseudo.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile amd64-pseudo.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile i386-pseudo.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile i386-pseudo.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set binfile ${objdir}/${subdir}/${testfile}
 set srcfile ${testfile}.c
 
-if [get_compiler_info $binfile] {
+if [get_compiler_info] {
     warning "get_compiler failed"
     return -1
 }
 
 set binfile ${objdir}/${subdir}/${testfile}
 set srcfile ${testfile}.c
 
-if [get_compiler_info $binfile] {
+if [get_compiler_info] {
     warning "get_compiler failed"
     return -1
 }
 
 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
 }
 
     return -1
     }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
     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
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile "${test}-main.c"
 set srcfile_lib "${test}-lib.c"
 
-if [get_compiler_info ${binfile_lib}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 # 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;
 }
 
 
 # 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;
 }
 
 
 # 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;
 }
 
 
 # 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;
 }
 
 
     return -1
 }
 
-if {[get_compiler_info not-used]} {
+if {[get_compiler_info]} {
     warning "Could not get compiler info"
     untested catch-load.exp
     return -1
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 
 # Start with a fresh gdb.
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 # 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;
 }
 
 
 
 # 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;
 }
 
 
      return -1
     }
 
-if [get_compiler_info $binfile] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set binfile_2 ${objdir}/${subdir}/${testfile}_2.o
 
 # What compiler are we using?
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 # 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;
 }
 
 
 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
 }
 
 
 
 # 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;
 }
 
 
 # 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;
 }
 
 
 remote_exec build "rm -f ${binfile}"
 
 # get the value of gcc_compiled
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set lib_opts {}
 set exec_opts [list debug shlib=$lib_so]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set binfile ${objdir}/${subdir}/${executable}
 set bin_flags [list debug shlib=${binfile_lib}]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 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
 
     return -1
 }
 
-if {[get_compiler_info not-used]} {
+if {[get_compiler_info]} {
     warning "Could not get compiler info"
     untested jit-simple.exp
     return 1
 
     return -1
 }
 
-if {[get_compiler_info not-used]} {
+if {[get_compiler_info]} {
     warning "Could not get compiler info"
     untested jit-so.exp
     return 1
 
     return -1
 }
 
-if {[get_compiler_info not-used]} {
+if {[get_compiler_info]} {
     warning "Could not get compiler info"
     untested jit.exp
     return 1
 
 
 # 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;
 }
 
 
 
 # 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;
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 
 # What compiler are we using?
 #
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 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
 }
 
 
 # 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;
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 # 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
 }
 
 
 set srcfile $srcdir/$subdir/$testfile.c
 set binfile $objdir/$subdir/$testfile
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 
 # 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;
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set lib_opts  debug
 set exec_opts [list debug shlib=$lib_sl]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
     }
 
-if [get_compiler_info $binfile] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
     }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
     return
 }
 
-if [get_compiler_info "ignored"] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-get_compiler_info ${binfile}
+get_compiler_info
 
 proc test_integer_literals_accepted {} {
     global gdb_prompt
 
 
 # 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;
 }
 
 
 
 # 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;
 }
 
 
     return -1
 }
 
-if [get_compiler_info not-used] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 
 # 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;
 }
 
 
 
 # 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;
 }
 
 
 set lib_opts "debug"
 set exec_opts [list debug shlib=${lib1} shlib=${lib2}]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 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
 }
 
 
 
 # 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;
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 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
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 remote_exec build "rm -f ${binfile}"
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set binfile ${objdir}/${subdir}/${executable}
 set bin_flags [list debug shlib=${binfile_lib}]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 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}] != ""
 
     return 0
 }
 
-if [get_compiler_info binfile-unused] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 set binfile ${objdir}/${subdir}/${testfile}
 set bin_flags [list debug shlib=${binfile_lib}]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 }
 
 # This test uses GCC-specific syntax.
-if [get_compiler_info not-used] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 # 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;
 }
 
 
 
 # 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;
 }
 
 
 remote_exec build "rm -f ${binfile}"
 
 # get the value of gcc_compiled
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 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
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 # 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;
 }
 
 
 
 # What compiler are we using?
 #
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 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
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 set wp_set 1
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 # 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;
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
   return -1
 }
 
-if [get_compiler_info ${ppu_bin}] {
+if [get_compiler_info] {
   return -1
 }
 
 
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 
 # 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
 }
 
 
     return -1
 }
 
-if {[get_compiler_info $binfile "c++"]} {
+if {[get_compiler_info "c++"]} {
     return -1
 }
 
 
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
-if { [get_compiler_info $binfile "c++"] } {
+if { [get_compiler_info "c++"] } {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 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
 }
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
 
 # 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
 }
 
 
 
 # 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
 }
 
 
     return 0
 }
 
-if [get_compiler_info not-used] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info $binfile "c++"] {
+if [get_compiler_info "c++"] {
   return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info $binfile] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
 set executable ${testfile}
 set binfile ${objdir}/${subdir}/${executable}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
 set srcfile ${testfile}.cc
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info $binfile "c++"] {
+if [get_compiler_info "c++"] {
   return -1
 }
 
 
 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;
 }
 
 
 
 # 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
 }
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
 set testfile "psmang"
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 
 # 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
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 # 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
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1
 }
 
 
 }
 
 # The .c files use __attribute__.
-if [get_compiler_info unused] {
+if [get_compiler_info] {
     return -1;
 }
 if !$gcc_compiled {
 
 }
 
 # 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
 }
 
 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
 }
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
 
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 if { $gcc_compiled } then { continue }
 
 # 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;
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set objfile ${objdir}/${subdir}/${testfile}.o
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set testfile "so-thresh"
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 if { $gcc_compiled } then { continue }
 
     return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 
 
      return -1
 }
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1;
 }
 if { $gcc_compiled } then { continue }
 
 
 # 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;
 }
 
 
 
 # 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;
 }
 
 
 
 # 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
 }
 
 
 
 # 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
 }
 
 
 
 # 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
 }
 
 
 
 # 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
 }
 
 
 set srcfile "$testfile.cc"
 set binfile $objdir/$subdir/$testfile
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 set srcfile "$testfile.cc"
 set binfile $objdir/$subdir/$testfile
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 set lib_opts  debug
 set exec_opts [list debug shlib=$lib_sl]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set binfile ${objdir}/${subdir}/${testfile}
 set bin_flags [list debug shlib=${binfile_lib}]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile "$testfile.cc"
 set binfile $objdir/$subdir/$testfile
 
-if [get_compiler_info ${binfile} "c++"] {
+if [get_compiler_info "c++"] {
     return -1;
 }
 
 
 
 # What compiler are we using?
 #
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 runto_main
 
-get_compiler_info $binfile
+get_compiler_info
 get_debug_format
 if { [skip_inline_frame_tests] } {
     untested inline-bt.exp
 
 
 runto_main
 
-get_compiler_info $binfile
+get_compiler_info
 get_debug_format
 if { [skip_inline_frame_tests] } {
     untested inline-cmds.exp
 
 
 runto_main
 
-get_compiler_info $binfile
+get_compiler_info
 get_debug_format
 if { [skip_inline_var_tests] } {
     untested inline-bt.exp
 
 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
 }
 
 
 set binfile ${objdir}/${subdir}/${testfile}
 set exec_opts [list debug shlib=$lib_sl]
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set srcfile ${testfile}.c
 set binfile ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info not-used c++] {
+if [get_compiler_info c++] {
     return -1;
 }
 
 
 set library  ${objdir}/${subdir}/${libfile}.sl
 set binfile  ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 set library  ${objdir}/${subdir}/${libfile}.sl
 set binfile  ${objdir}/${subdir}/${testfile}
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 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 {}] != "" } {
 
 set srcfile ${objdir}/${subdir}/weird.s
 set binfile ${objdir}/${subdir}/weirdx.o
 
-if { [ get_compiler_info "$binfile" ] } {
+if { [ get_compiler_info ] } {
     return -1
 }
 
 
        set binfile ${objdir}/${subdir}/${executable}
        set escapedbinfile [string_to_regexp ${objdir}/${subdir}/${executable}]
 
-       if [get_compiler_info ${binfile}] {
+       if [get_compiler_info] {
            return -1
        }
 
 
     global subdir
     global gdb_prompt
 
-    if [get_compiler_info ${binfile}] {
+    if [get_compiler_info] {
        return -1
     }
 
 
 remote_exec build "rm -f ${binfile}"
 
 # get the value of gcc_compiled
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 set lib_opts debug
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
 set lib_opts debug
 
-if [get_compiler_info ${binfile}] {
+if [get_compiler_info] {
     return -1
 }
 
 
 
     # 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
     }
 
     # 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
     }
 
 # 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.
 #
 #
 # -- chastain 2004-01-06
 
-proc get_compiler_info {binfile args} {
+proc get_compiler_info {{arg ""}} {
     # For compiler.c and compiler.cc
     global srcdir
 
 
     # 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"
     }
 
        # 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" 
 
     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