From f902d9596b3f7ee135d180ec0bae01c05d9a97bd Mon Sep 17 00:00:00 2001 From: fche Date: Tue, 6 Feb 2007 20:23:25 +0000 Subject: * kernel_{string,long,...,char} protected accessor functions * test suites for all of 'em too * even documentation * mm, donuts 2007-02-06 Frank Ch. Eigler * stapfuncs.5.in: Add docs for kernel_{long,int,short,char} and some user_string* variants. 2007-02-06 Frank Ch. Eigler * conversions.stp (kernel_long/int/short/char): New functions. 2007-02-06 Frank Ch. Eigler * buildok/conversions.stp: Build-test all conversions.stp functions. * systemtap.stress/conversions.*: New test. --- testsuite/systemtap.stress/conversions.exp | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 testsuite/systemtap.stress/conversions.exp (limited to 'testsuite/systemtap.stress/conversions.exp') diff --git a/testsuite/systemtap.stress/conversions.exp b/testsuite/systemtap.stress/conversions.exp new file mode 100644 index 00000000..a7fd5e88 --- /dev/null +++ b/testsuite/systemtap.stress/conversions.exp @@ -0,0 +1,19 @@ + +set file $srcdir/$subdir/conversions.stp +foreach value {0 0xffffffff 0xffffffffffffffff} { + set test "conversions.stp $value" + if {![installtest_p]} { untested $test; continue } + spawn stap -DMAXERRORS=40 $file $value + set errs 0 + verbose -log "exp $test $errs" + expect { + -re {ERROR[^\r\n]*\r\n} { incr errs; exp_continue } + -re {WARNING[^\r\n]*\r\n} { incr errs; exp_continue } + eof { } + timeout { } + } + verbose -log "done exp $test $errs" + wait + if {$errs == 8} { pass $test } else { fail "$test ($errs)" } + verbose -log "done $test $errs" +} -- cgit