diff options
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/ChangeLog | 6 | ||||
| -rwxr-xr-x | testsuite/parseko/preprocess13.stp | 4 | ||||
| -rwxr-xr-x | testsuite/parseok/nineteen.stp | 3 | ||||
| -rwxr-xr-x | testsuite/semok/twentyfive.stp | 8 |
4 files changed, 21 insertions, 0 deletions
diff --git a/testsuite/ChangeLog b/testsuite/ChangeLog index 8a95ff1e..ee107c22 100644 --- a/testsuite/ChangeLog +++ b/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2007-08-07 Frank Ch. Eigler <fche@redhat.com> + + PR 4846 + * parseko/preprocess13.stp, parseok/nineteen.stp, + semok/twentyfive.stp: New tests. + 2007-08-07 David Smith <dsmith@redhat.com> PR 4736 (partial fix) diff --git a/testsuite/parseko/preprocess13.stp b/testsuite/parseko/preprocess13.stp new file mode 100755 index 00000000..9ef34f59 --- /dev/null +++ b/testsuite/parseko/preprocess13.stp @@ -0,0 +1,4 @@ +#! /bin/sh + +# recursive +stap -p1 -e '$1' '$1' diff --git a/testsuite/parseok/nineteen.stp b/testsuite/parseok/nineteen.stp new file mode 100755 index 00000000..1d36b590 --- /dev/null +++ b/testsuite/parseok/nineteen.stp @@ -0,0 +1,3 @@ +#! /bin/sh + +stap -p1 -e '$1 {log (@1.@2)}' 'probe foo' ' ' # <- control codes diff --git a/testsuite/semok/twentyfive.stp b/testsuite/semok/twentyfive.stp new file mode 100755 index 00000000..fadca484 --- /dev/null +++ b/testsuite/semok/twentyfive.stp @@ -0,0 +1,8 @@ +#! /bin/sh + +set -e +stap -p2 -e 'probe begin {foo$1$2$3}' # $-expansion only at token head +stap -p2 -e 'probe $1 $2' 'syscall.open,begin' '{log ("hello\n")}' +stap -p2 -e 'probe begin {@1 @2}' 'syscall.open,begin' '{log ("hello\n")}' +stap -p2 -e 'probe begin {log (@1.@2)}' 'syscall.open,begin' '{log ("hello\n")}' + |