[Dejagnu] fix gcc-dg-prune glitch when filtering "relocation truncation" error

  gcc/testsuite/
    * lib/compat.exp (compat-run): Remove "unresolved".
    * lib/gcc-defs.exp (${tools}_check_compile): Update code logic for
    unsupported testcase.

From-SVN: r216543

gcc/testsuite/ChangeLog

+2014-10-22  Jiong Wang  <jiong.wang@arm.com>
+
+	* lib/compat.exp (compat-run): Remove "unresolved".
+	* lib/gcc-defs.exp (${tools}_check_compile): Update code logic for
+	unsupported testcase.
+
 2014-10-22  Jakub Jelinek  <jakub@redhat.com>
 
 	PR target/63594

gcc/testsuite/lib/compat.exp

@@ -134,7 +134,6 @@ proc compat-run { testname objlist dest optall optfile optstr } {
 		     "$options"]
     if ![${tool}_check_compile "$testcase $testname link" "" \
 	 $dest $comp_output] then {
-	unresolved "$testcase $testname execute $optstr"
 	return
     }
 

gcc/testsuite/lib/gcc-defs.exp

@@ -54,13 +54,18 @@ proc ${tool}_check_compile {testcase option objname gcc_output} {
     if { [info proc ${tool}-dg-prune] != "" } {
 	global target_triplet
 	set gcc_output [${tool}-dg-prune $target_triplet $gcc_output]
+	if [string match "*::unsupported::*" $gcc_output] then {
+	    regsub -- "::unsupported::" $gcc_output "" gcc_output
+	    unsupported "$testcase: $gcc_output"
+	    return 0
 	}
-
+    } else {
 	set unsupported_message [${tool}_check_unsupported_p $gcc_output]
 	if { $unsupported_message != "" } {
 	    unsupported "$testcase: $unsupported_message"
 	    return 0
 	}
+    }
 
     # remove any leftover LF/CR to make sure any output is legit
     regsub -all -- "\[\r\n\]*" $gcc_output "" gcc_output