diff options
| author | Tim Moore <timoore@redhat.com> | 2010-01-13 19:38:47 +0100 |
|---|---|---|
| committer | Tim Moore <timoore@redhat.com> | 2010-01-13 19:38:47 +0100 |
| commit | 75de0a1f306ecedfe992b9b3ad8b8f2f76d8d24a (patch) | |
| tree | ea6e13dad9ed3706835d5f34fc25956a96f550b0 /testsuite/systemtap.syscall/test.tcl | |
| parent | 58b06a43d003a1e658b184d5ef577d44d824263e (diff) | |
| parent | c74bc9e5e177f947cdac9788d0272fa4d66780b9 (diff) | |
| download | systemtap-steved-75de0a1f306ecedfe992b9b3ad8b8f2f76d8d24a.tar.gz systemtap-steved-75de0a1f306ecedfe992b9b3ad8b8f2f76d8d24a.tar.xz systemtap-steved-75de0a1f306ecedfe992b9b3ad8b8f2f76d8d24a.zip | |
Merge remote branch 'origin/master'
Diffstat (limited to 'testsuite/systemtap.syscall/test.tcl')
| -rwxr-xr-x | testsuite/systemtap.syscall/test.tcl | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/testsuite/systemtap.syscall/test.tcl b/testsuite/systemtap.syscall/test.tcl index e640db66..9d620d74 100755 --- a/testsuite/systemtap.syscall/test.tcl +++ b/testsuite/systemtap.syscall/test.tcl @@ -46,10 +46,19 @@ proc run_one_test {filename flags bits} { set sys_prog "[file dirname [file normalize $filename]]/sys.stp" set cmd "stap --skip-badvars -c $dir/${testname} ${sys_prog}" + # Extract additional C flags needed to compile + set add_flags "" + foreach i $flags { + if [regexp "^additional_flags=" $i] { + regsub "^additional_flags=" $i "" tmp + append add_flags " $tmp" + } + } + # Extract the expected results # Use the preprocessor so we can ifdef tests in and out - set ccmd "gcc -E -C -P $filename" + set ccmd "gcc -E -C -P $add_flags $filename" # XXX: but note, this will expand all system headers too! catch {eval exec $ccmd} output |