2007-06-15 Frank Ch. Eigler <fche@elastic.org>

	* lib/systemtap.exp (stap_run_batch): Detect crashing stap and
	represent this as failing return code.

diff --git a/testsuite/ChangeLog b/testsuite/ChangeLog
index 4bdd6560883ca81acbfc25654af5a41cc61d24f8..a3ab8261a893514316c32f838d8c41408d7dee6a 100644 (file)
--- a/testsuite/ChangeLog
+++ b/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2007-06-15  Frank Ch. Eigler  <fche@elastic.org>
+
+       * lib/systemtap.exp (stap_run_batch): Detect crashing stap and
+       represent this as failing return code.
+
 2007-06-14  Martin Hunt  <hunt@redhat.com>
 
        * systemtap.samples/syscalls.stp: Use printf

diff --git a/testsuite/lib/systemtap.exp b/testsuite/lib/systemtap.exp
index 7f5349678f76e5d8783b0ca0bf66ddd1d42ba31e..46f4ada5aeb566070106ca65040d09a1d4eb65ad 100644 (file)
--- a/testsuite/lib/systemtap.exp
+++ b/testsuite/lib/systemtap.exp
@@ -88,5 +88,8 @@ proc stap_run_batch {args} {
     }
     set results [wait]
     verbose -log "wait results: $results"
+    # Crashed?
+    if {[llength $results] >= 5} {return 1}
+    # Not?
     return [lindex $results 3]
 }