diff options
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | testsuite/lib/stap_run2.exp | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/testsuite/ChangeLog b/testsuite/ChangeLog index ec9c74aa..ea41e111 100644 --- a/testsuite/ChangeLog +++ b/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-09-21 Martin Hunt <hunt@redhat.com> + + * lib/stap_run2.exp (stap_run2): Use send_log() + instead of puts to save failure context in the log. + 2007-09-21 Frank Ch. Eigler <fche@elastic.org> * systemtap.base/optim.exp/stp: New test for rhbz# 300121. diff --git a/testsuite/lib/stap_run2.exp b/testsuite/lib/stap_run2.exp index 123736f1..9849aefb 100644 --- a/testsuite/lib/stap_run2.exp +++ b/testsuite/lib/stap_run2.exp @@ -22,9 +22,9 @@ proc stap_run2 { TEST_NAME args } { set expected [split $::result_string "\n"] foreach line [split $res "\n"] { if {![string equal $line [lindex $expected $n]]} { - puts "line [expr $n + 1]: expected \"[lindex $expected $n]\"" - puts "Got \"$line\"" fail "$TEST_NAME" + send_log "line [expr $n + 1]: expected \"[lindex $expected $n]\"\n" + send_log "Got \"$line\"\n" return } incr n |