diff options
| author | David Smith <dsmith@redhat.com> | 2009-10-29 16:12:18 -0500 |
|---|---|---|
| committer | David Smith <dsmith@redhat.com> | 2009-10-29 16:12:18 -0500 |
| commit | 49e20063710b1d5dbb4efeb53d751b684835413c (patch) | |
| tree | 2e8f68e8f5a60bb765b1b535660ab362e85571d9 /testsuite/systemtap.syscall/test.tcl | |
| parent | d855fc1db953a049b953d0c987f93a252232e6f2 (diff) | |
| download | systemtap-steved-49e20063710b1d5dbb4efeb53d751b684835413c.tar.gz systemtap-steved-49e20063710b1d5dbb4efeb53d751b684835413c.tar.xz systemtap-steved-49e20063710b1d5dbb4efeb53d751b684835413c.zip | |
Fix syscall testsuite bugs.
* testsuite/systemtap.syscall/test.tcl: Substitute '[[[[' and ']]]]' for
'(' and ')'. This allows us to get unquoted parens.
* testsuite/systemtap.syscall/test-debug.tcl: Matches substitute logic of
test.tcl.
* testsuite/systemtap.syscall/README: Document '[[[[' and ']]]]'.
* testsuite/systemtap.syscall/chmod.c: Handle optional O_LARGEFILE flag in
open calls.
* testsuite/systemtap.syscall/dir.c: Ditto.
* testsuite/systemtap.syscall/mmap.c: Ditto.
* testsuite/systemtap.syscall/openclose.c: Ditto.
* testsuite/systemtap.syscall/readwrite.c: Ditto.
* testsuite/systemtap.syscall/stat.c: Ditto.
Diffstat (limited to 'testsuite/systemtap.syscall/test.tcl')
| -rwxr-xr-x | testsuite/systemtap.syscall/test.tcl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/systemtap.syscall/test.tcl b/testsuite/systemtap.syscall/test.tcl index b9d3c0d9..e640db66 100755 --- a/testsuite/systemtap.syscall/test.tcl +++ b/testsuite/systemtap.syscall/test.tcl @@ -67,6 +67,12 @@ proc run_one_test {filename flags bits} { #regsub -all {\+} $line {\\+} line #regsub -all {\*} $line {\\*} line + # Turn '[[[[' and ']]]]' into '(' and ')' respectively. + # Because normally parens get quoted, this allows us to + # have non-quoted parens. + regsub -all {\[\[\[\[} $line {(} line + regsub -all {\]\]\]\]} $line {)} line + regsub -all NNNN $line {[\-0-9]+} line regsub -all XXXX $line {[x0-9a-fA-F]+} line |