summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.stress/whitelist.exp
diff options
context:
space:
mode:
authorFrank Ch. Eigler <fche@elastic.org>2008-05-27 17:40:00 -0400
committerFrank Ch. Eigler <fche@elastic.org>2008-05-27 17:43:04 -0400
commit7938bd829dfd82c40b35d536b5913e666c1454d2 (patch)
tree2022964dca31d53b6eee3fe9588e955c410ec53e /testsuite/systemtap.stress/whitelist.exp
parent16a02dfb97fd3979d0f517a71a6aba050a3bed98 (diff)
downloadsystemtap-steved-7938bd829dfd82c40b35d536b5913e666c1454d2.tar.gz
systemtap-steved-7938bd829dfd82c40b35d536b5913e666c1454d2.tar.xz
systemtap-steved-7938bd829dfd82c40b35d536b5913e666c1454d2.zip
testsuite: use catch{close}catch{wait} to ensure child process pipe/zombie cleanup
Diffstat (limited to 'testsuite/systemtap.stress/whitelist.exp')
-rw-r--r--testsuite/systemtap.stress/whitelist.exp5
1 files changed, 2 insertions, 3 deletions
diff --git a/testsuite/systemtap.stress/whitelist.exp b/testsuite/systemtap.stress/whitelist.exp
index 4a31c124..f7c0bf16 100644
--- a/testsuite/systemtap.stress/whitelist.exp
+++ b/testsuite/systemtap.stress/whitelist.exp
@@ -320,8 +320,7 @@ proc whitelist_run { TEST_NAME {LOAD_GEN_FUNCTION ""} args } {
timeout { set detail "stap timeout"; exec kill -INT -[exp_pid -i $stap_id] }
eof { set failed 0 }
}
- catch {close -i $stap_id}
- wait -i $stap_id
+ closewait -i $stap_id
if {$failed} { puts "whitelist_run failure \($detail\)" }
}
@@ -353,7 +352,7 @@ proc runbenchs {} {
set donepos [lsearch $idlist $expect_out(spawn_id)]
set idlist [lreplace $idlist $donepos $donepos]
incr runningcount -1
- wait -i $expect_out(spawn_id)
+ closewait -i $expect_out(spawn_id)
} timeout {
break
}