diff options
author | ddomingo <ddomingo@redhat.com> | 2008-09-29 16:08:16 +1000 |
---|---|---|
committer | ddomingo <ddomingo@redhat.com> | 2008-09-29 16:08:16 +1000 |
commit | 2e66077954be9d219e0b87926af1dc87138d99dc (patch) | |
tree | 090acfc6e37967ec1e369d943f0a43764d47bfc5 /testsuite/systemtap.base | |
parent | c45b18d71eb8d57db62fced5774c12adcaf4eaba (diff) | |
parent | b487a14d6d160f38dd1dbabe305b373b37972074 (diff) | |
download | systemtap-steved-2e66077954be9d219e0b87926af1dc87138d99dc.tar.gz systemtap-steved-2e66077954be9d219e0b87926af1dc87138d99dc.tar.xz systemtap-steved-2e66077954be9d219e0b87926af1dc87138d99dc.zip |
Merge branch 'master' of ssh://sources.redhat.com/git/systemtap
Diffstat (limited to 'testsuite/systemtap.base')
-rw-r--r-- | testsuite/systemtap.base/alternatives.exp | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/testsuite/systemtap.base/alternatives.exp b/testsuite/systemtap.base/alternatives.exp index 673f3426..deaf3bf8 100644 --- a/testsuite/systemtap.base/alternatives.exp +++ b/testsuite/systemtap.base/alternatives.exp @@ -26,11 +26,10 @@ proc stap_run_alternatives {args} { verbose -log "starting $args" eval spawn $args expect { - -re {semantic error: .+ \(alternatives: [a-zA-Z_]} - { set alternatives_found 1 } + -re {semantic error: .+ \(alternatives: [a-zA-Z_]} {incr alternatives_found; exp_continue} -re {[^\r]*\r} { verbose -log $expect_out(0,string); exp_continue } eof { } - timeout { exp_continue } + timeout { } } set results [wait] verbose -log "wait results: $results" @@ -39,8 +38,8 @@ proc stap_run_alternatives {args} { set test "LOCAL1" set rc [stap_run_alternatives stap -vu -p2 -e $local1_script] -if {$rc == 1} { pass $test } else { fail $test } +if {$rc == 1} { pass $test } else { fail "$test ($rc)" } set test "STRUCT1" set rc [stap_run_alternatives stap -vu -p2 -e $struct1_script] -if {$rc == 1} { pass $test } else { fail $test } +if {$rc == 1} { pass $test } else { fail "$test ($rc)" } |