diff options
author | fche <fche> | 2007-10-06 02:42:29 +0000 |
---|---|---|
committer | fche <fche> | 2007-10-06 02:42:29 +0000 |
commit | a9e8f7e0533811be2cd7c9a88d9058da8caa1d11 (patch) | |
tree | 1bf932760ff25506f7fb8c9c2fc118bb249f5113 /testsuite | |
parent | 9ac6c5a8273dd7133a79517c9cd47b1a66b51c24 (diff) | |
download | systemtap-steved-a9e8f7e0533811be2cd7c9a88d9058da8caa1d11.tar.gz systemtap-steved-a9e8f7e0533811be2cd7c9a88d9058da8caa1d11.tar.xz systemtap-steved-a9e8f7e0533811be2cd7c9a88d9058da8caa1d11.zip |
PR1119: unused variable elision warnings
2007-10-05 Frank Ch. Eigler <fche@elastic.org>
PR 1119
* elaborate.cxx (semantic_pass_opt[12]): Warn on elided
variables/functions in user script.
* session.h (suppress_warnings): New field. Change
"timing" to plain old bool.
* main.cxx (main): Configure warnings on by default.
* stap.1.in: Document this.
PR 1119.
* systemtap.base/warnings.*: New test.
* futexes.stp, sig_by_proc.stp, small_demos/rwtiming.stp: Fix elision
warnings.
Diffstat (limited to 'testsuite')
-rw-r--r-- | testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | testsuite/systemtap.base/warnings.exp | 16 | ||||
-rw-r--r-- | testsuite/systemtap.base/warnings.stp | 9 |
3 files changed, 30 insertions, 0 deletions
diff --git a/testsuite/ChangeLog b/testsuite/ChangeLog index 7d400487..5e04e64f 100644 --- a/testsuite/ChangeLog +++ b/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-10-05 Frank Ch. Eigler <fche@elastic.org> + + PR 1119. + * systemtap.base/warnings.*: New test. + 2007-10-05 Martin Hunt <hunt@redhat.com> * buildok/aux_syscalls-embedded.stp: Add all embedded diff --git a/testsuite/systemtap.base/warnings.exp b/testsuite/systemtap.base/warnings.exp new file mode 100644 index 00000000..90409d18 --- /dev/null +++ b/testsuite/systemtap.base/warnings.exp @@ -0,0 +1,16 @@ +set test "warnings" + +spawn stap -p4 $srcdir/$subdir/warnings.stp +set ok 0 +expect { + -re {^WARNING:[^\r\n]*\r\n} { incr ok; exp_continue } + -re {^[^\r\n]*.ko\r\n} { incr ok; exp_continue } + timeout { fail "$test (timeout)" } + eof { } +} +wait +if {$ok == 6} { + pass $test +} else { + fail $test +} diff --git a/testsuite/systemtap.base/warnings.stp b/testsuite/systemtap.base/warnings.stp new file mode 100644 index 00000000..a0ce8d8d --- /dev/null +++ b/testsuite/systemtap.base/warnings.stp @@ -0,0 +1,9 @@ +# PR 1119 + +global elide_me1 + +function elide_me2 () {} + +function foo:long () { elide_me3 = 1 } + +probe never { elide_me4 = 1; (elide_me5+5); print (foo()) } |