[testsuite] gcc-dg: handle all return values when shouldfail is set

2016-04-22  Christophe Lyon  <christophe.lyon@linaro.org>

	* lib/gcc-dg.exp (${tool}_load): Add default return value handler.

From-SVN: r235372

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 673a7da822aee3a0a81b0799f11cf0f5f8f775e8..1fef88cf84bd8be35cc1f4e6a5607d09b2a693f4 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2016-04-22  Christophe Lyon  <christophe.lyon@linaro.org>
+
+       * lib/gcc-dg.exp (${tool}_load): Add default return value handler.
+
 2016-04-22  Dominique d'Humieres  <dominiq@lps.ens.fr>
 
        * gfortran.dg/submodule_14.f08: Add cleanup-submodules.

diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp
index b732b54f4108046c80915b579aac31a66122f30a..39a7c208c319ece6e3126d620fb24a6462d14cf6 100644 (file)
--- a/gcc/testsuite/lib/gcc-dg.exp
+++ b/gcc/testsuite/lib/gcc-dg.exp
@@ -403,6 +403,7 @@ if { [info procs ${tool}_load] != [list] \
            switch [lindex $result 0] {
                "pass" { set status "fail" }
                "fail" { set status "pass" }
+               default { set status [lindex $result 0] }
            }
            set result [list $status [lindex $result 1]]
        }