2007-07-06 Martin Hunt <hunt@redhat.com>

	* systemtap.maps/linear*: New tests of linear histograms.

1 files changed, 25 insertions, 0 deletions

diff --git a/testsuite/systemtap.maps/linear_neg.exp b/testsuite/systemtap.maps/linear_neg.exp
new file mode 100644
index 00000000..fcd1c4dd
--- /dev/null
+++ b/testsuite/systemtap.maps/linear_neg.exp
@@ -0,0 +1,25 @@
+# test of histogram with negative interval
+
+set test "linear_neg"
+
+if {![installtest_p]} { untested $test; return }
+
+set ok 0
+
+spawn stap -DMAXACTION=10000 $srcdir/$subdir/$test.stp
+expect {
+    -timeout 150
+    "saw: operator \'-\' at *linear_neg.stp" {
+	incr ok
+	exp_continue
+    }
+    eof { }
+}
+catch close
+wait
+
+if {$ok == 1} { 
+    pass $test 
+} else { 
+    fail $test 
+}