summaryrefslogtreecommitdiffstats
path: root/testsuite
diff options
context:
space:
mode:
authorfche <fche>2007-08-08 03:36:25 +0000
committerfche <fche>2007-08-08 03:36:25 +0000
commit3f99432cc11977a4345c881bed3aa60a1a614238 (patch)
tree70dc99d601a65cec051658402531ba39fa2b2dad /testsuite
parent98be953834c60aaa2ae7504890f1cf11815e558a (diff)
downloadsystemtap-steved-3f99432cc11977a4345c881bed3aa60a1a614238.tar.gz
systemtap-steved-3f99432cc11977a4345c881bed3aa60a1a614238.tar.xz
systemtap-steved-3f99432cc11977a4345c881bed3aa60a1a614238.zip
2007-08-07 Frank Ch. Eigler <fche@redhat.com>
PR 4846 * parse.cxx (input_put): New function, sort of like stdio ungetc. (input_get): Skip cursor position changing for input_put strings. (scan): Rework $.../@... substitution into character pasting. * parse.h: Corresponding changes. * util.h (lex_cast_qstring): Octal-quote unprintable characters. * stap.1.in, NEWS: Document new behaviour. 2007-08-07 Frank Ch. Eigler <fche@redhat.com> PR 4846 * parseko/preprocess13.stp, parseok/nineteen.stp, semok/twentyfive.stp: New tests.
Diffstat (limited to 'testsuite')
-rw-r--r--testsuite/ChangeLog6
-rwxr-xr-xtestsuite/parseko/preprocess13.stp4
-rwxr-xr-xtestsuite/parseok/nineteen.stp3
-rwxr-xr-xtestsuite/semok/twentyfive.stp8
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")}'
+