diff options
| author | fche <fche> | 2006-09-09 22:30:43 +0000 |
|---|---|---|
| committer | fche <fche> | 2006-09-09 22:30:43 +0000 |
| commit | 0ecbca4cb58a9fc7057ff44cc4693010e7c3c7b7 (patch) | |
| tree | a9e4c1aa3c07af8bc65f5646fc78f59a86d96120 /testsuite/lib/systemtap.exp | |
| parent | 46b84a80a83501d9a83856c255b74100be1717b9 (diff) | |
| download | systemtap-steved-0ecbca4cb58a9fc7057ff44cc4693010e7c3c7b7.tar.gz systemtap-steved-0ecbca4cb58a9fc7057ff44cc4693010e7c3c7b7.tar.xz systemtap-steved-0ecbca4cb58a9fc7057ff44cc4693010e7c3c7b7.zip | |
2006-09-09 Frank Ch. Eigler <fche@elastic.org>
* lib/systemtap.exp (stap_run_batch): New helper routine.
* systemtap.pass1-4/*.exp: Use it instead of catch/exec/>>& hack.
Diffstat (limited to 'testsuite/lib/systemtap.exp')
| -rw-r--r-- | testsuite/lib/systemtap.exp | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/testsuite/lib/systemtap.exp b/testsuite/lib/systemtap.exp index 6bb578b4..888c685d 100644 --- a/testsuite/lib/systemtap.exp +++ b/testsuite/lib/systemtap.exp @@ -54,8 +54,16 @@ proc setup_systemtap_environment {} { setup_systemtap_environment print_systemtap_version - proc systemtap_init {args} {} proc systemtap_version {} {} proc systemtap_exit {} {} + +proc stap_run_batch {args} { + verbose -log "starting $args" + spawn $args + expect { -re .* { verbose -log $expect_out(1,string); exp_continue } eof { } } + set results [wait] + verbose -log "wait results: $results" + return [lindex $results 3] +}
\ No newline at end of file |