On Sun, 2009-07-12 at 15:40 -0400, NightStrike wrote:
> On Fri, Jul 10, 2009 at 12:14 PM, NightStrike<nightstr...@gmail.com> wrote:
> > On Thu, Jul 9, 2009 at 2:52 PM, Steve
> > Kargl<s...@troutmask.apl.washington.edu> wrote:
> >> On Thu, Jul 09, 2009 at 12:34:00PM -0400, NightStrike wrote:
> >>> I have been trying to run the gfortran testsuite for a while now, and
> >>> it keeps falling apart. Dominiq tried to find a revision that might
> >>> attribute to it, and though r147421 might have something to do with
> >>> it: http://gcc.gnu.org/viewcvs?view=rev&revision=147421
> >>>
> >>> These are the errors I get that prevent the testsuite from running
> >>> more than a few thousand tests:
> >>>
> >>> ERROR: tcl error sourcing
> >>> /dev/shm/build/gcc-svn/gcc/gcc/testsuite/gfortran.dg/dg.exp.
> >>> ERROR: can't read "status": no such variable
Does this help?
Index: gcc/testsuite/lib/gcc-dg.exp
===================================================================
--- gcc/testsuite/lib/gcc-dg.exp (revision 149420)
+++ gcc/testsuite/lib/gcc-dg.exp (working copy)
@@ -205,9 +205,12 @@
global shouldfail
set result [eval [list saved_${tool}_load $program] $args]
if { $shouldfail != 0 } {
+ set status "unresolved"
switch [lindex $result 0] {
"pass" { set status "fail" }
"fail" { set status "pass" }
+ "xpass" { set status "xfail" }
+ "xfail" { set status "xpass" }
}
set result [list $status [lindex $result 1]]
}
