summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.samples/queue_demo.exp
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/systemtap.samples/queue_demo.exp')
-rw-r--r--testsuite/systemtap.samples/queue_demo.exp13
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/systemtap.samples/queue_demo.exp b/testsuite/systemtap.samples/queue_demo.exp
new file mode 100644
index 00000000..71feddd6
--- /dev/null
+++ b/testsuite/systemtap.samples/queue_demo.exp
@@ -0,0 +1,13 @@
+set test "queue_demo"
+if {![installtest_p]} { untested $test; return }
+
+spawn stap $srcdir/$subdir/queue_demo.stp
+set ok 0
+expect {
+ -timeout 30
+ -re {block-[^\r]*} { incr ok; exp_continue }
+ timeout { fail "$test (timeout)" }
+ eof { }
+}
+
+if {$ok > 4 && $ok < 10} { pass "$test" } { fail "$test" }