This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
PATCH: Fix thinko in lib/wrapper.exp
- From: Mark Mitchell <mark at codesourcery dot com>
- To: gcc-patches at gcc dot gnu dot org
- Date: Mon, 11 Apr 2005 23:28:36 -0700
- Subject: PATCH: Fix thinko in lib/wrapper.exp
- Reply-to: mark at codesourcery dot com
When running the testsuite under somewhat bizarre circumstances, I
provoked a Tcl backtrace. The problem was that
${tool}_maybe_build_wrapper was trying to unset gluefile, despite the
fact that we have, a few lines earlier:
&& ![info exists gluefile] } {
Tested on x86_64-unknown-linux-gnu and arm-none-elf, applied on the
mainline.
--
Mark Mitchell
CodeSourcery, LLC
mark@codesourcery.com
2005-04-11 Mark Mitchell <mark@codesourcery.com>
* lib/wrapper.exp (${tool}_maybe_build_wrapper): Don't unset gluefile.
Index: lib/wrapper.exp
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/lib/wrapper.exp,v
retrieving revision 1.2
diff -c -5 -p -r1.2 wrapper.exp
*** lib/wrapper.exp 8 Mar 2005 22:10:34 -0000 1.2
--- lib/wrapper.exp 12 Apr 2005 06:25:15 -0000
*************** proc ${tool}_maybe_build_wrapper { filen
*** 33,42 ****
set result [build_wrapper $filename]
set_currtarget_info wrap_compile_flags "$saved_wrap_compile_flags"
if { $result != "" } {
set gluefile [lindex $result 0]
set wrap_flags [lindex $result 1]
- } else {
- unset gluefile
}
}
}
--- 33,40 ----