summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.syscall/syscall.exp
diff options
context:
space:
mode:
authorDave Brolley <brolley@redhat.com>2009-09-14 11:58:49 -0400
committerDave Brolley <brolley@redhat.com>2009-09-14 11:58:49 -0400
commit775c3771bb4a5f663a763d7c65b1571e24e4b212 (patch)
treedf01d695bcf1f0d0e7fac567a4b917bc273a00e3 /testsuite/systemtap.syscall/syscall.exp
parentd2c9ec9b6933fbe36834d7ad52be0994e96eb12c (diff)
parentef0e74fc1131f1d217c78aa839d0de731ea7c940 (diff)
downloadsystemtap-steved-775c3771bb4a5f663a763d7c65b1571e24e4b212.tar.gz
systemtap-steved-775c3771bb4a5f663a763d7c65b1571e24e4b212.tar.xz
systemtap-steved-775c3771bb4a5f663a763d7c65b1571e24e4b212.zip
Merge branch 'master' of ssh://sources.redhat.com/git/systemtap
Diffstat (limited to 'testsuite/systemtap.syscall/syscall.exp')
-rw-r--r--testsuite/systemtap.syscall/syscall.exp24
1 files changed, 4 insertions, 20 deletions
diff --git a/testsuite/systemtap.syscall/syscall.exp b/testsuite/systemtap.syscall/syscall.exp
index 22e9dc07..a4978997 100644
--- a/testsuite/systemtap.syscall/syscall.exp
+++ b/testsuite/systemtap.syscall/syscall.exp
@@ -32,17 +32,9 @@ proc test_procedure {} {
if {$do_64_bit_pass} {
foreach filename [lsort [glob $pattern]] {
set testname [file tail [string range $filename 0 end-2]]
- if {![installtest_p]} { untested $testname; continue }
+ if {![installtest_p]} { untested "64-bit $testname"; continue }
send_log "Testing 64-bit ${testname}\n"
- set res [run_one_test $filename $flags]
- if {$res == "PASS"} {
- pass "$testname"
- } elseif {$res == "UNSUPP"} {
- unsupported "$testname not supported on this arch"
- } else {
- fail "64-bit $testname"
- send_log "$res\n"
- }
+ run_one_test $filename $flags 64
}
}
@@ -56,17 +48,9 @@ proc test_procedure {} {
if {$do_32_bit_pass} {
foreach filename [lsort [glob $pattern]] {
set testname [file tail [string range $filename 0 end-2]]
- if {![installtest_p]} { untested $testname; continue }
+ if {![installtest_p]} { untested "32-bit $testname"; continue }
send_log "Testing 32-bit ${testname}\n"
- set res [run_one_test $filename $flags]
- if {$res == "PASS"} {
- pass "32-bit $testname"
- } elseif {$res == "UNSUPP"} {
- unsupported "$testname not supported on this arch"
- } else {
- fail "32-bit $testname"
- send_log "$res\n"
- }
+ run_one_test $filename $flags 32
}
}
}