Remove systemtap.samples/queue_demo.{exp|stp}.

diff --git a/testsuite/ChangeLog b/testsuite/ChangeLog
index 41b99541644db65e307eeeafe3d6abbe54fe7204..07f2a15cae96639aa7d2af3a8fb1b9a4a48591df 100644 (file)
--- a/testsuite/ChangeLog
+++ b/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2009-01-30  Will Cohen  <wcohen@redhat.com>
+
+       * systemtap.samples/queue_demo.exp:
+       * systemtap.samples/queue_demo.stp: Remove.
+       
 2009-01-30  Frank Ch. Eigler  <fche@elastic.org>
 
        * semok/twenty.stp: Don't spew so much into systemtap.log.

diff --git a/testsuite/systemtap.samples/queue_demo.exp b/testsuite/systemtap.samples/queue_demo.exp
deleted file mode 100644 (file)
index 49dfac0..0000000
--- a/testsuite/systemtap.samples/queue_demo.exp
+++ /dev/null
@@ -1,13 +0,0 @@
-set test "queue_demo"
-if {![installtest_p]} { untested $test; return }
-
-spawn stap $srcdir/$subdir/queue_demo.stp
-set ok 0
-expect {
-    -timeout 240
-    -re {block-[^\r]*} { incr ok; exp_continue }
-    timeout { fail "$test (timeout)" }
-    eof { }
-}
-
-if {$ok > 4 && $ok < 10} { pass "$test" } { fail "$test" }

diff --git a/testsuite/systemtap.samples/queue_demo.stp b/testsuite/systemtap.samples/queue_demo.stp
deleted file mode 100644 (file)
index 61a3b6d..0000000
--- a/testsuite/systemtap.samples/queue_demo.stp
+++ /dev/null
@@ -1,32 +0,0 @@
-
-probe begin {
-  qsq_start ("block-read")
-  qsq_start ("block-write")
-}
-
-probe timer.ms(3500), end {
-  qsq_print ("block-read")
-  qsq_start ("block-read")
-  qsq_print ("block-write")
-  qsq_start ("block-write")
-}
-
-probe timer.ms(10000) { exit () }
-
-
-# synthesize queue work/service using three randomized "threads" for each queue.
-
-global tc
-function qs_doit (thread, name) {
-  n = tc[thread] = (tc[thread]+1) % 3 # per-thread state counter
-  if (n==1) qs_wait (name)
-  else if (n==2) qs_run (name)
-  else if (n==0) qs_done (name)
-}
-
-probe timer.ms(100).randomize(100) { qs_doit (0, "block-read") }
-probe timer.ms(100).randomize(100) { qs_doit (1, "block-read") }
-probe timer.ms(100).randomize(100) { qs_doit (2, "block-read") }
-probe timer.ms(100).randomize(100) { qs_doit (3, "block-write") }
-probe timer.ms(100).randomize(100) { qs_doit (4, "block-write") }
-probe timer.ms(100).randomize(100) { qs_doit (5, "block-write") }