diff options
Diffstat (limited to 'testsuite/systemtap.base/global_end.exp')
| -rw-r--r-- | testsuite/systemtap.base/global_end.exp | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/testsuite/systemtap.base/global_end.exp b/testsuite/systemtap.base/global_end.exp new file mode 100644 index 00000000..b1931a90 --- /dev/null +++ b/testsuite/systemtap.base/global_end.exp @@ -0,0 +1,23 @@ +# test end probe creation and display of written and unread global variables + +set test "global_end" + +if {![installtest_p]} {untested $test; return} + +spawn stap $srcdir/$subdir/global_end.stp +set ok 0 +expect { + -timeout 180 + -re {one,0x1.*one,0x2.*two,0x1.*two,0x2} { incr ok; exp_continue } + -re {alpha."one"..1.=0x1} { incr ok; exp_continue } + -re {alpha."one"..2.=0x2} { incr ok; exp_continue } + -re {alpha."two"..1.=0x3} { incr ok; exp_continue } + -re {alpha."two"..2.=0x4} { incr ok; exp_continue } + -re {gamma="abcdefghijklmnopqrstuvwxyz"} { incr ok; exp_continue } + -re {iota."one".="eleven"} { incr ok; exp_continue } + -re {iota."two".="twelve"} { incr ok; exp_continue } + timeout { fail "$test (timeout)" } + eof { } +} +wait +if {$ok == 8} { pass "$test ($ok)" } { fail "$test ($ok)" } |