[jit] jit.exp: Detect compilation errors

[David Malcolm]

Committed to dmalcolm/jit.

---
 gcc/testsuite/ChangeLog.jit  | 5 +++++
 gcc/testsuite/jit.dg/jit.exp | 8 ++++++--
 2 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/gcc/testsuite/ChangeLog.jit b/gcc/testsuite/ChangeLog.jit
index 3d63d4b..6324e9e 100644
--- a/gcc/testsuite/ChangeLog.jit
+++ b/gcc/testsuite/ChangeLog.jit
@@ -1,5 +1,10 @@
 2013-10-14  David Malcolm  <dmalcolm@redhat.com>
 
+	* jit.dg/jit.exp (jit-dg-test): Detect compilation errors and
+	make them be test failures.
+
+2013-10-14  David Malcolm  <dmalcolm@redhat.com>
+
 	* jit.dg/test-factorial.c (code_making_callback): Update
 	for change to gcc_jit_function_place_forward_label.
 	* jit.dg/test-fibonacci.c (code_making_callback): Add line
diff --git a/gcc/testsuite/jit.dg/jit.exp b/gcc/testsuite/jit.dg/jit.exp
index 3f3f30e..e998d69 100644
--- a/gcc/testsuite/jit.dg/jit.exp
+++ b/gcc/testsuite/jit.dg/jit.exp
@@ -46,8 +46,12 @@ proc jit-dg-test { prog do_what extra_tool_flags } {
     verbose "output_file: $output_file"
 
     # Create the test executable:
-    gcc_target_compile $prog $output_file $do_what \
-        "{additional_flags=$extra_tool_flags}"
+    set comp_output [gcc_target_compile $prog $output_file $do_what \
+			"{additional_flags=$extra_tool_flags}"]
+    if ![jit_check_compile "$prog" "initial compilation" \
+	    $output_file $comp_output] then {
+      return
+    }
 
     # Run the test executable, capturing the PASS/FAIL textual output
     # from the C API, converting it into the Tcl API.
-- 
1.7.11.7