diff options
author | hunt <hunt> | 2006-10-27 19:06:02 +0000 |
---|---|---|
committer | hunt <hunt> | 2006-10-27 19:06:02 +0000 |
commit | 29aec74d4af5df8f1d5caa699ca4d35659f51a29 (patch) | |
tree | 0083f31e56f9d99cdf262ad800661073175f2377 /testsuite/systemtap.syscall/test.tcl | |
parent | 68e7e59b32783bc9a40cddecbfdf6a19ba0d8e42 (diff) | |
download | systemtap-steved-29aec74d4af5df8f1d5caa699ca4d35659f51a29.tar.gz systemtap-steved-29aec74d4af5df8f1d5caa699ca4d35659f51a29.tar.xz systemtap-steved-29aec74d4af5df8f1d5caa699ca4d35659f51a29.zip |
2006-10-27 Martin Hunt <hunt@redhat.com>
* test.exp, test.tcl: Remove our own caching code
and just use systemtap's new caching.
* acct.c (main): Make pattern less selective so
it works when run by root.
Diffstat (limited to 'testsuite/systemtap.syscall/test.tcl')
-rwxr-xr-x | testsuite/systemtap.syscall/test.tcl | 20 |
1 files changed, 2 insertions, 18 deletions
diff --git a/testsuite/systemtap.syscall/test.tcl b/testsuite/systemtap.syscall/test.tcl index ee797565..41934da4 100755 --- a/testsuite/systemtap.syscall/test.tcl +++ b/testsuite/systemtap.syscall/test.tcl @@ -14,7 +14,7 @@ proc cleanup {} { } proc usage {progname} { - puts "Usage: $progname testname [modulename]" + puts "Usage: $progname testname" } proc bgerror {error} { @@ -23,29 +23,13 @@ proc bgerror {error} { } trap {cleanup} SIGINT set testname [lindex $argv 0] -set modname [lindex $argv 1] if {$testname == ""} { usage $argv0 exit } set filename "${testname}.c" - -if {$modname == ""} { - set cmd "stap -c ../${testname} ../sys.stp" -} else { - set ccmd "which staprun" - catch {eval exec $ccmd} output - if {[file exists $output]} { - set staprun $output - } else { - puts "staprun not found!" - exit - } - - set user $::tcl_platform(user) - set cmd "sudo $staprun -rmq -u $user -c ../${testname} ${modname}" -} +set cmd "stap -c ../${testname} ../sys.stp" # Extract the expected results # Use the preprocessor so we can ifdef tests in and out |