1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
# Check stap global variable option (-G)
set test "global_opt"
if {![installtest_p]} {
untested $test
return
}
set script "global var1=9 ; probe begin { if (var1 == 29) println(\"systemtap test success\") else println(\"systemtap test failure\") ; exit() }"
foreach runtime [get_runtime_list] {
set test "global_opt"
if {$runtime != ""} {
set test "${test}_${runtime}"
spawn stap -G var1=29 -e $script --runtime=$runtime
} else {
spawn stap -G var1=29 -e $script
}
expect {
-timeout 60
"systemtap test success" { pass $test }
"systemtap test failure" { fail $test }
timeout {fail "$test: unexpected timeout"}
eof {fail "$test: unexpected EOF"}
}
catch {close}; catch {wait}
}
|
