diff options
author | hunt <hunt> | 2007-05-23 21:40:06 +0000 |
---|---|---|
committer | hunt <hunt> | 2007-05-23 21:40:06 +0000 |
commit | 55192c252779817ac75867425ed7bab94de5f4fb (patch) | |
tree | 847dc5be3501d2567cd3b2aec905875015a3bbf7 /testsuite/systemtap.samples | |
parent | 7f23b8e9466dac1b0d8d7310513159ee1c25d976 (diff) | |
download | systemtap-steved-55192c252779817ac75867425ed7bab94de5f4fb.tar.gz systemtap-steved-55192c252779817ac75867425ed7bab94de5f4fb.tar.xz systemtap-steved-55192c252779817ac75867425ed7bab94de5f4fb.zip |
2007-05-23 Martin Hunt <hunt@redhat.com>
* systemtap.samples/system_func.exp: Fix pattern anchoring.
Diffstat (limited to 'testsuite/systemtap.samples')
-rw-r--r-- | testsuite/systemtap.samples/system_func.exp | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/testsuite/systemtap.samples/system_func.exp b/testsuite/systemtap.samples/system_func.exp index 0128b181..7847904a 100644 --- a/testsuite/systemtap.samples/system_func.exp +++ b/testsuite/systemtap.samples/system_func.exp @@ -1,15 +1,15 @@ set test "system_func" -if {![installtest_p]} { untested $test; return } +#if {![installtest_p]} { untested $test; return } spawn stap $srcdir/$subdir/system_func.stp set open 0 set done 0 set saw_user 0 set user [exec whoami] -set timeout 30 expect { - -re "$user\[^\r\]\*\r\n" {incr saw_user; exp_continue} - -re {sys_open[^\r]*\r\n} {incr open; exp_continue } - -re {DONE[^\r]*\r\n} {incr done; exp_continue } + -timeout 30 + -re "^$user\[^\r\]*\[\r\n\]*" {incr saw_user; exp_continue} + -re {^sys_open[^\r]*[\r\n]*} {incr open; exp_continue } + -re {DONE[^\r]*[\r\n]*} {incr done; exp_continue } timeout { fail "$test (timeout)" } eof { } } |