2006-03-09 Martin Hunt <hunt@redhat.com>

	* bench2: New directory containing a benchmark framework.

1 files changed, 16 insertions, 0 deletions

diff --git a/runtime/bench2/stap_bench b/runtime/bench2/stap_bench
new file mode 100755
index 00000000..b3b450d8
--- /dev/null
+++ b/runtime/bench2/stap_bench
@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+load './bench.rb'
+
+# run tests on all the files ending in ".st"
+# These must be systemtap scripts.
+# First line of scripts must be a comment with the test description.
+
+Dir["*.st"].each do |file|
+  File.open(file,"r") do |f|
+    desc = f.gets.sub(/^#/,'').strip
+    test = Stapbench.new(desc)
+    test.file = file
+    test.run
+    test.print
+  end
+end