diff options
Diffstat (limited to 'testsuite/systemtap.base/onoffprobe.exp')
| -rw-r--r-- | testsuite/systemtap.base/onoffprobe.exp | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/testsuite/systemtap.base/onoffprobe.exp b/testsuite/systemtap.base/onoffprobe.exp index 24012cac..1b39dab5 100644 --- a/testsuite/systemtap.base/onoffprobe.exp +++ b/testsuite/systemtap.base/onoffprobe.exp @@ -1,7 +1,7 @@ set test "onoffprobe" if {![installtest_p]} { untested $test; return } -spawn stap $srcdir/$subdir/$test.stp -m $test +spawn stap $srcdir/$subdir/$test.stp set pid $spawn_id set ok 0 @@ -9,16 +9,18 @@ proc advance {} { global test global expect_out global ok + global modname pass "$test $expect_out(1,string)" incr ok - exec echo $ok > /proc/systemtap/$test/switch + exec echo $ok > /proc/systemtap/$modname/switch exec echo dummy > /dev/null exp_continue } expect { -timeout 240 - -re "(begin1 probed)\r\n" { advance } + -re {(begin1 probed): ([^\r\n]+)\r\n} + { set modname "$expect_out(2,string)"; advance } -re "^(function return probed)\r\n" { advance } -re "^(function entry probed)\r\n" { advance } -re "^(timer probed)\r\n" { advance } |